/[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.52 by jmc, Fri Dec 24 21:54:03 2010 UTC revision 1.53 by jmc, Tue Jan 25 22:39:06 2011 UTC
# Line 172  C---  Continue with standard packages (w Line 172  C---  Continue with standard packages (w
172        IF (useOBCS) CALL PACKAGES_ERROR_MSG('OBCS',' ',myThid)        IF (useOBCS) CALL PACKAGES_ERROR_MSG('OBCS',' ',myThid)
173  #endif  #endif
174    
175  #ifndef ALLOW_EXF  #ifdef ALLOW_EXF
176          IF (useEXF) CALL EXF_CHECK( myThid )
177    #else
178        IF (useEXF) CALL PACKAGES_ERROR_MSG('EXF',' ',myThid)        IF (useEXF) CALL PACKAGES_ERROR_MSG('EXF',' ',myThid)
179  #endif  #endif
180    
Legend:
Removed from v.1.52  
changed lines
  Added in v.1.53
  ViewVC Help
Powered by ViewVC 1.1.22