/[MITgcm]/MITgcm/model/src/ini_forcing.F
ViewVC logotype

Diff of /MITgcm/model/src/ini_forcing.F

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

revision 1.34 by jmc, Fri Jul 16 01:19:30 2004 UTC revision 1.35 by jmc, Sun Jul 18 01:04:23 2004 UTC
# Line 56  CEOP Line 56  CEOP
56            pload           (i,j,bi,bj) = 0. _d 0            pload           (i,j,bi,bj) = 0. _d 0
57            sIceLoad        (i,j,bi,bj) = 0. _d 0            sIceLoad        (i,j,bi,bj) = 0. _d 0
58  #endif  #endif
59            surfaceTendencyU(i,j,bi,bj) = 0. _d 0            surfaceForcingU(i,j,bi,bj) = 0. _d 0
60            surfaceTendencyV(i,j,bi,bj) = 0. _d 0            surfaceForcingV(i,j,bi,bj) = 0. _d 0
61            surfaceTendencyT(i,j,bi,bj) = 0. _d 0            surfaceForcingT(i,j,bi,bj) = 0. _d 0
62            surfaceTendencyS(i,j,bi,bj) = 0. _d 0            surfaceForcingS(i,j,bi,bj) = 0. _d 0
63            surfaceTendencyTice(i,j,bi,bj) = 0. _d 0            surfaceForcingTice(i,j,bi,bj) = 0. _d 0
64  #ifndef ALLOW_EXF  #ifndef ALLOW_EXF
65            taux0           (i,j,bi,bj) = 0. _d 0            taux0           (i,j,bi,bj) = 0. _d 0
66            taux1           (i,j,bi,bj) = 0. _d 0            taux1           (i,j,bi,bj) = 0. _d 0

Legend:
Removed from v.1.34  
changed lines
  Added in v.1.35

  ViewVC Help
Powered by ViewVC 1.1.22