/[MITgcm]/MITgcm/model/src/config_check.F
ViewVC logotype

Diff of /MITgcm/model/src/config_check.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.17 by jmc, Tue Nov 2 01:02:25 2004 UTC revision 1.18 by jmc, Sat Dec 4 00:12:14 2004 UTC
# Line 182  C       code is being compiled Line 182  C       code is being compiled
182        ENDIF        ENDIF
183  #endif  #endif
184    
185    #ifndef ALLOW_GENERIC_ADVDIFF
186          IF ( tempStepping .OR. saltStepping .OR. usePTRACERS ) THEN
187            WRITE(msgBuf,'(2A)')
188         &  'CONFIG_CHECK: cannot step forward Temp,Salt or pTracers',
189         &  ' without pkg/generic_advdiff'
190            CALL PRINT_ERROR( msgBuf , 1)
191            WRITE(msgBuf,'(A)')
192         &  'Re-compile with pkg "generic_advdiff" in packages.conf'
193            CALL PRINT_ERROR( msgBuf , 1)
194            STOP 'ABNORMAL END: S/R CONFIG_CHECK'
195          ENDIF
196    #endif
197    
198  C     o If taveFreq is finite, then we must make sure the diagnostics  C     o If taveFreq is finite, then we must make sure the diagnostics
199  C       code is being compiled  C       code is being compiled
200  #ifndef ALLOW_TIMEAVE  #ifndef ALLOW_TIMEAVE
# Line 290  c     ENDIF Line 303  c     ENDIF
303          STOP 'ABNORMAL END: S/R CONFIG_CHECK'          STOP 'ABNORMAL END: S/R CONFIG_CHECK'
304        ENDIF        ENDIF
305    
306        IF (nonlinFreeSurf.NE.0.AND.deltaTfreesurf.NE.deltaTtracer) THEN        IF ( nonlinFreeSurf.NE.0 .AND.
307         &     deltaTfreesurf.NE.dTtracerLev(1) ) THEN
308          WRITE(msgBuf,'(A)')          WRITE(msgBuf,'(A)')
309       &   'CONFIG_CHECK: WARNING: nonlinFreeSurf might cause problems'       &   'CONFIG_CHECK: WARNING: nonlinFreeSurf might cause problems'
310          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
Legend:
Removed from v.1.17  
changed lines
  Added in v.1.18
  ViewVC Help
Powered by ViewVC 1.1.22