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

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

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

revision 1.32 by mlosch, Tue Feb 7 11:47:48 2006 UTC revision 1.33 by jmc, Fri Mar 17 03:55:43 2006 UTC
# Line 117  CEOP Line 117  CEOP
117        IF (useGCHEM) CALL PACKAGES_CHECK_ERROR('GCHEM', myThid)        IF (useGCHEM) CALL PACKAGES_CHECK_ERROR('GCHEM', myThid)
118  #endif  #endif
119    
120    #ifndef ALLOW_OFFLINE
121          IF (useOffLine) CALL PACKAGES_CHECK_ERROR('OFFLINE', myThid)
122    #endif
123    
124  #ifndef ALLOW_SHAP_FILT  #ifndef ALLOW_SHAP_FILT
125        IF (useSHAP_FILT) CALL PACKAGES_CHECK_ERROR('SHAP_FILT', myThid)        IF (useSHAP_FILT) CALL PACKAGES_CHECK_ERROR('SHAP_FILT', myThid)
126  #endif  #endif
# Line 170  CEOP Line 174  CEOP
174  #ifdef ALLOW_DIAGNOSTICS  #ifdef ALLOW_DIAGNOSTICS
175        IF (useDiagnostics) CALL DIAGNOSTICS_CHECK( myThid )        IF (useDiagnostics) CALL DIAGNOSTICS_CHECK( myThid )
176  #else  #else
177        IF (useDiagnostics)        IF (useDiagnostics)
178       &   CALL PACKAGES_CHECK_ERROR('DIAGNOSTICS', myThid )       &   CALL PACKAGES_CHECK_ERROR('DIAGNOSTICS', myThid )
179  #endif  #endif
180    
Legend:
Removed from v.1.32  
changed lines
  Added in v.1.33
  ViewVC Help
Powered by ViewVC 1.1.22