/[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.5 by cnh, Wed Sep 26 18:09:15 2001 UTC revision 1.5.4.2 by heimbach, Fri Mar 7 23:10:21 2003 UTC
# Line 80  C-      3D arrays Line 80  C-      3D arrays
80             gWnm1(I,J,K,bi,bj)=0. _d 0             gWnm1(I,J,K,bi,bj)=0. _d 0
81  #endif  #endif
82    
83               totPhiHyd(I,J,K,bi,bj)=0. _d 0
84            ENDDO            ENDDO
85           ENDDO           ENDDO
86          ENDDO          ENDDO
# Line 92  C-      2D arrays Line 93  C-      2D arrays
93  #ifdef INCLUDE_CD_CODE  #ifdef INCLUDE_CD_CODE
94            etaNm1(I,J,bi,bj)=0. _d 0            etaNm1(I,J,bi,bj)=0. _d 0
95  #endif  #endif
96              phiHydLow(I,J,bi,bj)=0. _d 0
97           ENDDO           ENDDO
98          ENDDO          ENDDO
99    
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.5.4.2
  ViewVC Help
Powered by ViewVC 1.1.22