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

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

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

revision 1.25 by m_bates, Sun Sep 15 14:28:31 2013 UTC revision 1.26 by jmc, Fri Aug 15 19:20:57 2014 UTC
# Line 60  C-      3D arrays Line 60  C-      3D arrays
60    
61             gU(i,j,k,bi,bj) = 0. _d 0             gU(i,j,k,bi,bj) = 0. _d 0
62             gV(i,j,k,bi,bj) = 0. _d 0             gV(i,j,k,bi,bj) = 0. _d 0
63    #ifdef USE_OLD_EXTERNAL_FORCING
64             gT(i,j,k,bi,bj) = 0. _d 0             gT(i,j,k,bi,bj) = 0. _d 0
65             gS(i,j,k,bi,bj) = 0. _d 0             gS(i,j,k,bi,bj) = 0. _d 0
66    #endif
67  #ifdef ALLOW_ADAMSBASHFORTH_3  #ifdef ALLOW_ADAMSBASHFORTH_3
68             guNm(i,j,k,bi,bj,1) = 0. _d 0             guNm(i,j,k,bi,bj,1) = 0. _d 0
69             gvNm(i,j,k,bi,bj,1) = 0. _d 0             gvNm(i,j,k,bi,bj,1) = 0. _d 0
Legend:
Removed from v.1.25  
changed lines
  Added in v.1.26
  ViewVC Help
Powered by ViewVC 1.1.22