/[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.64 by jmc, Sun Jul 7 22:26:26 2013 UTC revision 1.66 by jmc, Wed Jul 30 03:31:35 2014 UTC
# Line 154  C---  Continue with standard packages (w Line 154  C---  Continue with standard packages (w
154        IF (usePP81) CALL PACKAGES_ERROR_MSG('PP81',' ',myThid)        IF (usePP81) CALL PACKAGES_ERROR_MSG('PP81',' ',myThid)
155  #endif  #endif
156    
157    #ifdef ALLOW_KL10
158          IF (useKL10) CALL KL10_CHECK( myThid )
159    #else
160          IF (useKL10) CALL PACKAGES_ERROR_MSG('KL10',' ',myThid)
161    #endif
162    
163  #ifdef ALLOW_MY82  #ifdef ALLOW_MY82
164        IF (useMY82) CALL MY82_CHECK( myThid )        IF (useMY82) CALL MY82_CHECK( myThid )
165  #else  #else
# Line 282  C---  Continue with standard packages (w Line 288  C---  Continue with standard packages (w
288        IF (useThSIce) CALL PACKAGES_ERROR_MSG('ThSIce',' ',myThid)        IF (useThSIce) CALL PACKAGES_ERROR_MSG('ThSIce',' ',myThid)
289  #endif  #endif
290    
291  #ifndef ALLOW_LAND  #ifdef ALLOW_LAND
292          IF (useLand) CALL LAND_CHECK( myThid )
293    #else
294        IF (useLand) CALL PACKAGES_ERROR_MSG('Land',' ',myThid)        IF (useLand) CALL PACKAGES_ERROR_MSG('Land',' ',myThid)
295  #endif  #endif
296    
# Line 321  C---  Continue with standard packages (w Line 329  C---  Continue with standard packages (w
329  #endif  #endif
330    
331  #ifdef ALLOW_GRDCHK  #ifdef ALLOW_GRDCHK
332        IF (useGRDCHK) CALL GRDCHK_CHECK( myThid )        IF (useGrdChk) CALL GRDCHK_CHECK( myThid )
333    #else
334          IF (useGrdChk) CALL PACKAGES_ERROR_MSG('GrdChk',' ',myThid)
335  #endif  #endif
336    
337  #ifndef ALLOW_SMOOTH  #ifndef ALLOW_SMOOTH
Legend:
Removed from v.1.64  
changed lines
  Added in v.1.66
  ViewVC Help
Powered by ViewVC 1.1.22