/[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.36 by jmc, Fri Mar 24 16:25:49 2006 UTC revision 1.37 by dimitri, Sat Jun 10 12:21:48 2006 UTC
# Line 474  C- jmc: but ultimately, this block can/w Line 474  C- jmc: but ultimately, this block can/w
474    
475        IF ( highOrderVorticity .AND. useCubedSphereExchange ) THEN        IF ( highOrderVorticity .AND. useCubedSphereExchange ) THEN
476          WRITE(msgBuf,'(2A)')          WRITE(msgBuf,'(2A)')
477       &   'CONFIG_CHECK: highOrderVorticity Scheme does not work',       &   'CONFIG_CHECK WARNING: highOrderVorticity Scheme is not ',
478       &   ' on CubedSphere grid'       &   'yet fully implemented on CubedSphere grid'
479          CALL PRINT_ERROR( msgBuf , myThid)          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
480          STOP 'ABNORMAL END: S/R CONFIG_CHECK'       &                    SQUEEZE_RIGHT , myThid)
481        ENDIF        ENDIF
482    
483        IF ( momForcingOutAB.NE.0 .AND. momForcingOutAB.NE.1 ) THEN        IF ( momForcingOutAB.NE.0 .AND. momForcingOutAB.NE.1 ) THEN
Legend:
Removed from v.1.36  
changed lines
  Added in v.1.37
  ViewVC Help
Powered by ViewVC 1.1.22