LOGICAL usePTRACERS
& usePTRACERS, useGCHEM, useRBCS, useOffLine, useMATRIX,
IF ( .NOT.usePTRACERS) THEN
& .AND. usePTRACERS ) THEN
IF (usePTRACERS)
IF ( usePTRACERS ) THEN
IF ( usePTRACERS .AND. useDOWN_SLOPE ) THEN
IF (usePTRACERS) THEN
if ( usePTRACERS ) then
& .AND. ( saltStepping .OR. tempStepping .OR. usePTRACERS )
IF ( useMATRIX .AND. .NOT.usePTRACERS ) THEN
IF ( usePTRACERS .AND. tracerNum.GT.2 ) THEN
IF ( .NOT.usePTRACERS ) THEN
IF ( usePTRACERS )
usePTRACERS =.FALSE.
useGAD = tempStepping .OR. saltStepping .OR. usePTRACERS
& usePTRACERS,
IF (usePTRACERS) CALL PACKAGES_ERROR_MSG('PTRACERS',' ',myThid)
IF (usePTRACERS) CALL LONGSTEP_INIT_FIXED(myThid)
IF (usePTRACERS) CALL PTRACERS_INIT_FIXED(myThid)
IF (usePTRACERS) CALL LONGSTEP_READPARMS( myThid )
IF (usePTRACERS) CALL PTRACERS_READPARMS( myThid )