/[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.26 by heimbach, Wed Sep 7 13:55:21 2005 UTC revision 1.27 by jmc, Sat Oct 1 18:35:20 2005 UTC
# Line 245  C     o If calendarDumps is set, pkg/cal Line 245  C     o If calendarDumps is set, pkg/cal
245        ENDIF        ENDIF
246  #endif  #endif
247    
 #ifndef ALLOW_MATRIX  
       IF (useMATRIX) THEN  
         WRITE(msgBuf,'(A)')  
      &   'CONFIG_CHECK: useMATRIX is TRUE and #undef ALLOW_MATRIX'  
         CALL PRINT_ERROR( msgBuf , myThid)  
         STOP 'ABNORMAL END: S/R CONFIG_CHECK'  
       ENDIF  
 #endif  
   
248  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
249    
250  C-  check parameter consistency :  C-  check parameter consistency :
# Line 442  C- jmc: but ultimately, this block can/w Line 433  C- jmc: but ultimately, this block can/w
433          CALL PRINT_ERROR( msgBuf , myThid)          CALL PRINT_ERROR( msgBuf , myThid)
434          STOP 'ABNORMAL END: S/R CONFIG_CHECK'          STOP 'ABNORMAL END: S/R CONFIG_CHECK'
435        ENDIF        ENDIF
436    
437          IF ( highOrderVorticity .AND. useCubedSphereExchange ) THEN
438            WRITE(msgBuf,'(2A)')
439         &   'CONFIG_CHECK: highOrderVorticity Scheme does not work',
440         &   ' on CubedSphere grid'
441            CALL PRINT_ERROR( msgBuf , myThid)
442            STOP 'ABNORMAL END: S/R CONFIG_CHECK'
443          ENDIF
444    
445        IF ( useOldFreezing .AND. allowFreezing ) THEN        IF ( useOldFreezing .AND. allowFreezing ) THEN
446          WRITE(msgBuf,'(2A)')          WRITE(msgBuf,'(2A)')
Legend:
Removed from v.1.26  
changed lines
  Added in v.1.27
  ViewVC Help
Powered by ViewVC 1.1.22