/[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.4 by heimbach, Wed Sep 13 20:35:07 2000 UTC revision 1.5 by heimbach, Mon Nov 13 16:32:58 2000 UTC
# Line 26  C     msgBuf      - Informational/error Line 26  C     msgBuf      - Informational/error
26  #ifdef ALLOW_KPP  #ifdef ALLOW_KPP
27        IF (useKPP) CALL KPP_CHECK( myThid )        IF (useKPP) CALL KPP_CHECK( myThid )
28  #else  #else
29        IF (useKPP) CALL PACKAGES_CHECK_ERROR('KPP')        IF (useKPP) CALL PACKAGES_CHECK_ERROR('KPP', myThid)
30  #endif  #endif
31    
32  #ifdef ALLOW_GMREDI  #ifdef ALLOW_GMREDI
33        IF (useGMRedi) CALL GMREDI_CHECK( myThid )        IF (useGMRedi) CALL GMREDI_CHECK( myThid )
34  #else  #else
35        IF (useGMRedi) CALL PACKAGES_CHECK_ERROR('GMREDI')        IF (useGMRedi) CALL PACKAGES_CHECK_ERROR('GMREDI', myThid)
36  #endif  #endif
37    
38        return        return
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.22