LOGICAL myPa_applyTendT
& myPa_applyTendT, myPa_applyTendS,
CALL WRITE_0D_L( myPa_applyTendT, INDEX_NONE,
IF ( .NOT.tempStepping .AND. myPa_applyTendT ) THEN
myPa_applyTendT = .FALSE.
IF ( myPa_applyTendT ) THEN