Parent Directory | Revision Log | Revision Graph | Patch
revision 1.5 by edhill, Sat Nov 1 04:50:02 2003 UTC | revision 1.6 by heimbach, Wed Jun 30 23:45:35 2004 UTC | |
---|---|---|
# | Line 53 C- 2D arrays | Line 53 C- 2D arrays |
53 | DO J=1-Oly,sNy+Oly | DO J=1-Oly,sNy+Oly |
54 | DO I=1-Olx,sNx+Olx | DO I=1-Olx,sNx+Olx |
55 | #ifdef EXACT_CONSERV | #ifdef EXACT_CONSERV |
56 | hDivFlow(I,J,bi,bj)=0. _d 0 | dEtaHdt(i,j,bi,bj) = 0. _d 0 |
57 | cph hDivFlow(I,J,bi,bj)=0. _d 0 | |
58 | #endif | #endif |
59 | #ifdef ALLOW_EXF | #ifdef ALLOW_EXF |
60 | EmPmR(I,J,bi,bj) = 0. _d 0 | EmPmR(I,J,bi,bj) = 0. _d 0 |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |