/[MITgcm]/MITgcm/pkg/dic/dic_biotic_forcing.F
ViewVC logotype

Diff of /MITgcm/pkg/dic/dic_biotic_forcing.F

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

revision 1.9 by stephd, Thu Aug 25 22:32:44 2005 UTC revision 1.10 by stephd, Thu Oct 13 16:25:12 2005 UTC
# Line 235  C update Line 235  C update
235           ENDDO           ENDDO
236         ENDDO         ENDDO
237    
238    #ifdef ALLOW_FE
239    #ifdef MINFE
240    c find free iron and get rid of insoluble part
241           call fe_chem(bi,bj,iMin,iMax,jMin,jMax, PTR_FE, freefe,
242         &                myIter, mythid)
243    #endif
244    #endif
245    
246    
247  #ifdef ALLOW_TIMEAVE  #ifdef ALLOW_TIMEAVE
248  c save averages  c save averages
249        DO k=1,Nr        DO k=1,Nr
Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10
  ViewVC Help
Powered by ViewVC 1.1.22