/[MITgcm]/MITgcm/model/src/packages_init_fixed.F
ViewVC logotype

Diff of /MITgcm/model/src/packages_init_fixed.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.16 by molod, Thu Jan 29 14:10:51 2004 UTC revision 1.17 by molod, Thu Jan 29 14:45:47 2004 UTC
# Line 85  C--   Initialise & Read FIZHI physical p Line 85  C--   Initialise & Read FIZHI physical p
85  #endif  #endif
86  C AMM  C AMM
87    
 C AMM  
 #ifdef ALLOW_DIAGNOSTICS  
 C--   Read DIAGNOSTICS namelists and initialise parameters  
       IF (useDIAGNOSTICS) CALL DIAGNOSTICS_INITIALISE( myThid )  
 #endif  
 C AMM  
   
88  #ifdef ALLOW_LAND  #ifdef ALLOW_LAND
89  C--   Initialise & Read Land package parameters  C--   Initialise & Read Land package parameters
90        IF (useLand) CALL LAND_INITIALISE( myThid )        IF (useLand) CALL LAND_INITIALISE( myThid )

Legend:
Removed from v.1.16  
changed lines
  Added in v.1.17

  ViewVC Help
Powered by ViewVC 1.1.22