/[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.14 by jmc, Wed Aug 9 01:25:40 2006 UTC revision 1.15 by stephd, Tue May 1 21:45:52 2007 UTC
# Line 90  c Line 90  c
90       &                          bi,bj,imin,imax,jmin,jmax,       &                          bi,bj,imin,imax,jmin,jmax,
91       &                          myIter,myTime,myThid)       &                          myIter,myTime,myThid)
92  #else  #else
93    #ifdef ALLOW_O2
94            call DIC_BIOTIC_Forcing( Ptracer(1-Olx,1-Oly,1,bi,bj,1),            call DIC_BIOTIC_Forcing( Ptracer(1-Olx,1-Oly,1,bi,bj,1),
95       &                          Ptracer(1-Olx,1-Oly,1,bi,bj,2),       &                          Ptracer(1-Olx,1-Oly,1,bi,bj,2),
96       &                          Ptracer(1-Olx,1-Oly,1,bi,bj,3),       &                          Ptracer(1-Olx,1-Oly,1,bi,bj,3),
# Line 97  c Line 98  c
98       &                          Ptracer(1-Olx,1-Oly,1,bi,bj,5),       &                          Ptracer(1-Olx,1-Oly,1,bi,bj,5),
99       &                          bi,bj,imin,imax,jmin,jmax,       &                          bi,bj,imin,imax,jmin,jmax,
100       &                          myIter,myTime,myThid)       &                          myIter,myTime,myThid)
101    #else
102              call DIC_BIOTIC_Forcing( Ptracer(1-Olx,1-Oly,1,bi,bj,1),
103         &                          Ptracer(1-Olx,1-Oly,1,bi,bj,2),
104         &                          Ptracer(1-Olx,1-Oly,1,bi,bj,3),
105         &                          Ptracer(1-Olx,1-Oly,1,bi,bj,4),
106         &                          bi,bj,imin,imax,jmin,jmax,
107         &                          myIter,myTime,myThid)
108    #endif
109  #endif  #endif
110  #endif  #endif
111  cccccccccccccccccccccccccc END DIC cccccccccccccccccccccccccccccccccc  cccccccccccccccccccccccccc END DIC cccccccccccccccccccccccccccccccccc
Legend:
Removed from v.1.14  
changed lines
  Added in v.1.15
  ViewVC Help
Powered by ViewVC 1.1.22