/[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.41 by molod, Thu Jun 30 23:07:50 2005 UTC revision 1.42 by edhill, Mon Aug 1 21:07:34 2005 UTC
# Line 64  C       |-- PTRACERS_INITIALISE Line 64  C       |-- PTRACERS_INITIALISE
64  C       |  C       |
65  C       |-- GCHEM_INIT_FIXED  C       |-- GCHEM_INIT_FIXED
66  C       |  C       |
67    C       |-- DIC_INIT_FIXED
68    C       |
69  C       |-- THSICE_INIT_FIXED  C       |-- THSICE_INIT_FIXED
70  C       |  C       |
71  C       |-- CPL_INIT_FIXED  C       |-- CPL_INIT_FIXED
# Line 217  C--   Initialise the control variables Line 219  C--   Initialise the control variables
219        IF (useGCHEM) CALL GCHEM_INIT_FIXED(mythid)        IF (useGCHEM) CALL GCHEM_INIT_FIXED(mythid)
220  #endif  #endif
221    
222    #ifdef ALLOW_DIC
223    C     IF (useDIC)
224          CALL DIC_INIT_FIXED(mythid)
225    #endif
226    
227  #ifdef ALLOW_THSICE  #ifdef ALLOW_THSICE
228        IF (useThSIce) CALL THSICE_INIT_FIXED(mythid)        IF (useThSIce) CALL THSICE_INIT_FIXED(mythid)
229  #endif  #endif
Legend:
Removed from v.1.41  
changed lines
  Added in v.1.42
  ViewVC Help
Powered by ViewVC 1.1.22