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

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

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

revision 1.35 by edhill, Thu Oct 14 13:44:54 2004 UTC revision 1.36 by mlosch, Fri Nov 19 01:33:32 2004 UTC
# Line 161  C -- initialize Therm.Sea-Ice parameters Line 161  C -- initialize Therm.Sea-Ice parameters
161    
162  cswdptr -- add --  cswdptr -- add --
163  #ifdef ALLOW_GCHEM  #ifdef ALLOW_GCHEM
164        IF (usePTRACERS) CALL GCHEM_READPARMS( myThid )        IF (useGCHEM) CALL GCHEM_READPARMS( myThid )
165  #endif  #endif
166  cswdptr -- end add ---  cswdptr -- end add ---
167    

Legend:
Removed from v.1.35  
changed lines
  Added in v.1.36

  ViewVC Help
Powered by ViewVC 1.1.22