/[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.23 by mlosch, Thu Sep 16 09:35:11 2004 UTC revision 1.26 by heimbach, Sat Dec 4 17:57:06 2004 UTC
# Line 101  CEOP Line 101  CEOP
101        IF (usePTRACERS) CALL PACKAGES_CHECK_ERROR('PTRACERS', myThid)        IF (usePTRACERS) CALL PACKAGES_CHECK_ERROR('PTRACERS', myThid)
102  #endif  #endif
103    
104    #ifdef ALLOW_GCHEM
105          IF (useGCHEM) CALL GCHEM_CHECK( myThid )
106    #else
107          IF (useGCHEM) CALL PACKAGES_CHECK_ERROR('GCHEM', myThid)
108    #endif
109    
110  #ifndef ALLOW_SHAP_FILT  #ifndef ALLOW_SHAP_FILT
111        IF (useSHAP_FILT) CALL PACKAGES_CHECK_ERROR('SHAP_FILT', myThid)        IF (useSHAP_FILT) CALL PACKAGES_CHECK_ERROR('SHAP_FILT', myThid)
112  #endif  #endif
# Line 130  CEOP Line 136  CEOP
136  #endif  #endif
137    
138  #ifdef ALLOW_AUTODIFF  #ifdef ALLOW_AUTODIFF
139          CALL AUTODIFF_CHECK( myThid )
140    #endif
141    
142    #ifdef ALLOW_CTRL
143        CALL CTRL_CHECK( myThid )        CALL CTRL_CHECK( myThid )
144    #endif
145    
146    #ifdef ALLOW_COST
147        CALL COST_CHECK( myThid )        CALL COST_CHECK( myThid )
148  #endif  #endif
149    
Legend:
Removed from v.1.23  
changed lines
  Added in v.1.26
  ViewVC Help
Powered by ViewVC 1.1.22