/[MITgcm]/MITgcm/pkg/cost/cost_init_varia.F
ViewVC logotype

Diff of /MITgcm/pkg/cost/cost_init_varia.F

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

revision 1.7 by dfer, Wed Jul 19 14:34:19 2006 UTC revision 1.8 by heimbach, Sat Mar 24 02:23:09 2007 UTC
# Line 75  c Line 75  c
75                  cMeanTheta(i,j,k,bi,bj) = 0. _d 0                  cMeanTheta(i,j,k,bi,bj) = 0. _d 0
76                  cMeanUVel(i,j,k,bi,bj)  = 0. _d 0                  cMeanUVel(i,j,k,bi,bj)  = 0. _d 0
77                  cMeanVVel(i,j,k,bi,bj)  = 0. _d 0                  cMeanVVel(i,j,k,bi,bj)  = 0. _d 0
78                    cMeanThetaUVel(i,j,k,bi,bj) = 0. _d 0
79                    cMeanThetaVVel(i,j,k,bi,bj) = 0. _d 0
80                end do                end do
81              end do              end do
82            end do            end do
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22