/[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.30 by heimbach, Mon Jan 2 21:17:02 2006 UTC revision 1.31 by mlosch, Fri Feb 10 07:56:20 2006 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    
248    #ifndef ALLOW_BALANCE_FLUXES
249          IF (balanceEmPmR .OR. balanceQnet) THEN
250            WRITE(msgBuf,'(A,A)')
251         &  'CONFIG_CHECK: balanceEmPmR/Qnet is set but balance code ',
252         &  'is not compiled.'
253            CALL PRINT_ERROR( msgBuf , 1)
254            WRITE(msgBuf,'(A)')
255         &  'Re-compile with  ALLOW_BALANCE_FLUXES defined'
256            CALL PRINT_ERROR( msgBuf , 1)
257            STOP 'ABNORMAL END: S/R CONFIG_CHECK'
258          ENDIF
259    #endif
260    
261  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
262    
263  C-  check parameter consistency :  C-  check parameter consistency :
Legend:
Removed from v.1.30  
changed lines
  Added in v.1.31
  ViewVC Help
Powered by ViewVC 1.1.22