LOGICAL useAIM
& useGMRedi, useOBCS, useAIM, useLand,
IF ( useAIM )
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_V(
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_T(
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_S(
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_U(
IF ( useAIM ) THEN
IF (useAIM) CALL PACKAGES_CHECK_ERROR('AIM', myThid)
IF (useAIM) CALL AIM_INITIALISE( myThid )
useAIM =.FALSE.
& useAIM,
IF ( .NOT.useAIM ) THEN
& (useAIM .AND. tracerIdentity.EQ.GAD_SALINITY .AND. k.EQ.Nr)
& (.NOT.useAIM .OR.tracerIdentity.NE.GAD_SALINITY .OR.K.LT.Nr)
& (.NOT.useAIM .OR.tracerIdentity.NE.GAD_SALINITY .OR.k.LT.Nr)