/[MITgcm]/MITgcm/pkg/gchem/gchem_forcing_sep.F
ViewVC logotype

Diff of /MITgcm/pkg/gchem/gchem_forcing_sep.F

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

revision 1.26 by jahn, Tue Jun 30 16:43:00 2009 UTC revision 1.27 by heimbach, Wed Oct 14 14:18:58 2009 UTC
# Line 158  C array because of last (iPtr) index Line 158  C array because of last (iPtr) index
158         CALL DIC_STORE_FLUXCO2( myTime, myIter, myThid )         CALL DIC_STORE_FLUXCO2( myTime, myIter, myThid )
159  #endif  #endif
160    
161    #ifdef ALLOW_COST
162           CALL DIC_COST( myTime, myIter, myThid )
163    #endif
164    
165  #endif /* GCHEM_SEPARATE_FORCING */  #endif /* GCHEM_SEPARATE_FORCING */
166  #endif /* ALLOW_GCHEM */  #endif /* ALLOW_GCHEM */
167    
Legend:
Removed from v.1.26  
changed lines
  Added in v.1.27
  ViewVC Help
Powered by ViewVC 1.1.22