/[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.1 by stephd, Wed Jun 25 21:00:36 2003 UTC revision 1.2 by stephd, Wed Jul 9 19:59:18 2003 UTC
# Line 215  c save averages Line 215  c save averages
215       &                           pCO2(i,j,bi,bj)*deltaTclock       &                           pCO2(i,j,bi,bj)*deltaTclock
216                pHave(i,j,bi,bj)=pHave(i,j,bi,bj)+                pHave(i,j,bi,bj)=pHave(i,j,bi,bj)+
217       &                           pH(i,j,bi,bj)*deltaTclock       &                           pH(i,j,bi,bj)*deltaTclock
218                  fluxCO2ave(i,j,bi,bj)=fluxCO2ave(i,j,bi,bj)+
219         &                           fluxCO2(i,j,bi,bj)*deltaTclock
220              endif              endif
221            ENDDO            ENDDO
222           ENDDO           ENDDO

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

  ViewVC Help
Powered by ViewVC 1.1.22