LOGICAL myPa_applyTendU
& myPa_applyTendU, myPa_applyTendV,
CALL WRITE_0D_L( myPa_applyTendU, INDEX_NONE,
myPa_applyTendU = .FALSE.
IF ( myPa_applyTendU .AND. myPa_Tend_Cgrid ) THEN
ELSEIF ( myPa_applyTendU ) THEN