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

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

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

revision 1.1 by stephd, Thu Aug 18 19:45:49 2005 UTC revision 1.2 by stephd, Fri Dec 16 21:07:53 2005 UTC
# Line 77  c determine calcite saturation state Line 77  c determine calcite saturation state
77       I                       k)       I                       k)
78    
79    
80          DO j=1-OLy,sNy+OLy          DO j=jmin,jmax
81           DO i=1-OLx,sNx+OLx           DO i=imin,imax
82    
83             if(hFacC(i,j,k,bi,bj) .gt. 0.0d0)then             if(hFacC(i,j,k,bi,bj) .gt. 0.0d0)then
84    
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22