/[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.4.2 by heimbach, Fri Mar 7 23:10:21 2003 UTC revision 1.6 by heimbach, Thu Nov 8 20:57:51 2001 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    
            totPhiHyd(I,J,K,bi,bj)=0. _d 0  
83            ENDDO            ENDDO
84           ENDDO           ENDDO
85          ENDDO          ENDDO
# Line 93  C-      2D arrays Line 92  C-      2D arrays
92  #ifdef INCLUDE_CD_CODE  #ifdef INCLUDE_CD_CODE
93            etaNm1(I,J,bi,bj)=0. _d 0            etaNm1(I,J,bi,bj)=0. _d 0
94  #endif  #endif
           phiHydLow(I,J,bi,bj)=0. _d 0  
95           ENDDO           ENDDO
96          ENDDO          ENDDO
97    
Legend:
Removed from v.1.5.4.2  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22