/[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.11 by adcroft, Mon Mar 4 17:26:41 2002 UTC revision 1.12 by heimbach, Tue Nov 12 20:45:41 2002 UTC
# Line 76  CEOP Line 76  CEOP
76        IF (useFLT) CALL PACKAGES_CHECK_ERROR('FLT', myThid)        IF (useFLT) CALL PACKAGES_CHECK_ERROR('FLT', myThid)
77  #endif  #endif
78    
79    #ifdef ALLOW_SEAICE
80          IF (useSEAICE) CALL SEAICE_CHECK( myThid )
81    #else
82          IF (useSEAICE) CALL PACKAGES_CHECK_ERROR('SEAICE', myThid)
83    #endif
84    
85        RETURN        RETURN
86        END        END
Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12
  ViewVC Help
Powered by ViewVC 1.1.22