/[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.6 by adcroft, Fri Feb 2 21:04:48 2001 UTC revision 1.8 by adcroft, Thu Sep 13 17:43:55 2001 UTC
# Line 47  C     msgBuf      - Informational/error Line 47  C     msgBuf      - Informational/error
47        IF (useOBCS) CALL PACKAGES_CHECK_ERROR('OBCS', myThid)        IF (useOBCS) CALL PACKAGES_CHECK_ERROR('OBCS', myThid)
48  #endif  #endif
49    
50    #ifndef ALLOW_AIM
51          IF (useAIM) CALL PACKAGES_CHECK_ERROR('AIM', myThid)
52    #endif
53    
54    #ifndef ALLOW_FLT
55          IF (useFLT) CALL PACKAGES_CHECK_ERROR('FLT', myThid)
56    #endif
57    
58        RETURN        RETURN
59        END        END
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22