/[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.67 by jmc, Sat Jan 31 22:22:25 2009 UTC revision 1.68 by jahn, Fri Jun 26 23:10:09 2009 UTC
# Line 70  C       |-- CTRL_INIT Line 70  C       |-- CTRL_INIT
70  C       |  C       |
71  C       |-- FLT_INIT_FIXED  C       |-- FLT_INIT_FIXED
72  C       |  C       |
73    C       |-- LONGSTEP_INIT_FIXED
74    C       |
75  C       |-- PTRACERS_INIT_FIXED  C       |-- PTRACERS_INIT_FIXED
76  C       |  C       |
77  C       |-- GCHEM_INIT_FIXED  C       |-- GCHEM_INIT_FIXED
# Line 269  C--   Initialise fixed array for Float p Line 271  C--   Initialise fixed array for Float p
271        IF ( useFLT ) CALL FLT_INIT_FIXED( myThid )        IF ( useFLT ) CALL FLT_INIT_FIXED( myThid )
272  #endif  #endif
273    
274    #ifdef ALLOW_LONGSTEP
275          IF (usePTRACERS) CALL LONGSTEP_INIT_FIXED(myThid)
276    #endif
277    
278  #ifdef ALLOW_PTRACERS  #ifdef ALLOW_PTRACERS
279        IF (usePTRACERS) CALL PTRACERS_INIT_FIXED(myThid)        IF (usePTRACERS) CALL PTRACERS_INIT_FIXED(myThid)
280  #endif  #endif
Legend:
Removed from v.1.67  
changed lines
  Added in v.1.68
  ViewVC Help
Powered by ViewVC 1.1.22