Parent Directory | Revision Log | Revision Graph | Patch
revision 1.13 by edhill, Thu Oct 9 04:19:20 2003 UTC | revision 1.14 by heimbach, Fri Oct 10 23:00:01 2003 UTC | |
---|---|---|
# | Line 179 C Initialise intermediate terms | Line 179 C Initialise intermediate terms |
179 | fMer(i,j) = 0. | fMer(i,j) = 0. |
180 | rTransU(i,j) = 0. | rTransU(i,j) = 0. |
181 | rTransV(i,j) = 0. | rTransV(i,j) = 0. |
182 | fVerU(i,j,1) = 0. _d 0 | |
183 | fVerU(i,j,2) = 0. _d 0 | |
184 | fVerV(i,j,1) = 0. _d 0 | |
185 | fVerV(i,j,2) = 0. _d 0 | |
186 | ENDDO | ENDDO |
187 | ENDDO | ENDDO |
188 |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |