/[MITgcm]/MITgcm/pkg/seaice/seaice_init_varia.F
ViewVC logotype

Diff of /MITgcm/pkg/seaice/seaice_init_varia.F

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

revision 1.73 by jmc, Tue Sep 18 20:14:28 2012 UTC revision 1.74 by mlosch, Thu Oct 18 10:06:42 2012 UTC
# Line 81  C Line 81  C
81  #endif  #endif
82            ETA (i,j,bi,bj)   = 0. _d 0            ETA (i,j,bi,bj)   = 0. _d 0
83            ZETA(i,j,bi,bj)   = 0. _d 0            ZETA(i,j,bi,bj)   = 0. _d 0
           DRAGS(i,j,bi,bj)  = 0. _d 0  
           DRAGA(i,j,bi,bj)  = 0. _d 0  
84            FORCEX(i,j,bi,bj) = 0. _d 0            FORCEX(i,j,bi,bj) = 0. _d 0
85            FORCEY(i,j,bi,bj) = 0. _d 0            FORCEY(i,j,bi,bj) = 0. _d 0
86            uIceC(i,j,bi,bj)  = 0. _d 0            uIceC(i,j,bi,bj)  = 0. _d 0
Legend:
Removed from v.1.73  
changed lines
  Added in v.1.74
  ViewVC Help
Powered by ViewVC 1.1.22