LOGICAL useMYPACKAGE
& useMYPACKAGE
IF ( useMYPACKAGE ) THEN
IF ( seqFlag.EQ.0 .AND. useMYPACKAGE ) THEN
IF ( useMYPACKAGE ) CALL MYPACKAGE_TENDENCY_APPLY_U(
IF ( useMYPACKAGE ) CALL MYPACKAGE_TENDENCY_APPLY_V(
IF ( useMYPACKAGE ) CALL MYPACKAGE_TENDENCY_APPLY_T(
IF ( useMYPACKAGE ) CALL MYPACKAGE_TENDENCY_APPLY_S(
useMYPACKAGE =.FALSE.
IF (useMYPACKAGE) CALL MYPACKAGE_CHECK( myThid )
IF (useMYPACKAGE) CALL PACKAGES_ERROR_MSG('MYPACKAGE',' ',myThid)
IF (useMYPACKAGE) CALL MYPACKAGE_INIT_FIXED(myThid)
IF (useMYPACKAGE) CALL MYPACKAGE_READPARMS( myThid )
IF (useMYPACKAGE) THEN