/[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.9 by cnh, Wed Sep 26 18:09:16 2001 UTC revision 1.9.6.1 by dimitri, Thu Feb 13 19:28:37 2003 UTC
# Line 64  CEOP Line 64  CEOP
64        IF (useFLT) CALL PACKAGES_CHECK_ERROR('FLT', myThid)        IF (useFLT) CALL PACKAGES_CHECK_ERROR('FLT', myThid)
65  #endif  #endif
66    
67    #ifdef ALLOW_SEAICE
68          IF (useSEAICE) CALL SEAICE_CHECK( myThid )
69    #else
70          IF (useSEAICE) CALL PACKAGES_CHECK_ERROR('SEAICE', myThid)
71    #endif
72    
73        RETURN        RETURN
74        END        END
Legend:
Removed from v.1.9  
changed lines
  Added in v.1.9.6.1
  ViewVC Help
Powered by ViewVC 1.1.22