Parent Directory | Revision Log | Revision Graph | Patch
revision 1.3 by heimbach, Fri Jul 13 14:26:57 2001 UTC | revision 1.4 by jmc, Wed Sep 19 13:53:10 2001 UTC | |
---|---|---|
# | Line 80 C- 2D arrays | Line 80 C- 2D arrays |
80 | DO J=1-Oly,sNy+Oly | DO J=1-Oly,sNy+Oly |
81 | DO I=1-Olx,sNx+Olx | DO I=1-Olx,sNx+Olx |
82 | etaN(I,J,bi,bj)=0. _d 0 | etaN(I,J,bi,bj)=0. _d 0 |
83 | etaH(I,J,bi,bj)=0. _d 0 | |
84 | #ifdef INCLUDE_CD_CODE | |
85 | etaNm1(I,J,bi,bj)=0. _d 0 | etaNm1(I,J,bi,bj)=0. _d 0 |
86 | #endif | |
87 | ENDDO | ENDDO |
88 | ENDDO | ENDDO |
89 |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |