/[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.9 by heimbach, Mon Jun 23 22:32:02 2003 UTC revision 1.10 by stephd, Mon Oct 6 20:37:30 2003 UTC
# Line 92  C--   Initialise ecco-specific cost func Line 92  C--   Initialise ecco-specific cost func
92  # endif  # endif
93  #endif  #endif
94    
95    #ifdef ALLOW_PTRACERS
96    #ifdef ALLOW_GCHEM
97          IF (usePTRACERS) then
98           call GCHEM_INIT_FIXED(mythid)
99          ENDIF
100    #endif
101    #endif
102    
103    
104        RETURN        RETURN
105        END        END
Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10
  ViewVC Help
Powered by ViewVC 1.1.22