/[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.40 by jmc, Sun Dec 24 20:03:49 2006 UTC revision 1.41 by dfer, Tue Jan 2 20:42:08 2007 UTC
# Line 342  C-    Deep-Atmosphere & Anelastic limita Line 342  C-    Deep-Atmosphere & Anelastic limita
342          STOP 'ABNORMAL END: S/R CONFIG_CHECK'          STOP 'ABNORMAL END: S/R CONFIG_CHECK'
343        ENDIF        ENDIF
344    
345          IF ( linFSConserveTr .AND. nonlinFreeSurf.NE.0 ) THEN
346            WRITE(msgBuf,'(A)')
347         &   'CONFIG_CHECK: Cannot select both a Nonlinear Free Surf.'
348            CALL PRINT_ERROR( msgBuf , myThid)
349            WRITE(msgBuf,'(A)')
350         &   'CONFIG_CHECK: and Tracer Correction of Lin. Free Surf.'
351            CALL PRINT_ERROR( msgBuf , myThid)
352            STOP 'ABNORMAL END: S/R CONFIG_CHECK'
353          ENDIF
354    
355        IF (rigidLid .AND. useRealFreshWaterFlux) THEN        IF (rigidLid .AND. useRealFreshWaterFlux) THEN
356          WRITE(msgBuf,'(A)')          WRITE(msgBuf,'(A)')
357       &   'CONFIG_CHECK: useRealFreshWaterFlux not compatible with'       &   'CONFIG_CHECK: useRealFreshWaterFlux not compatible with'
Legend:
Removed from v.1.40  
changed lines
  Added in v.1.41
  ViewVC Help
Powered by ViewVC 1.1.22