Parent Directory | Revision Log | Revision Graph | Patch
revision 1.59 by heimbach, Tue Jul 18 03:23:30 2006 UTC | revision 1.60 by jmc, Thu Nov 23 00:45:21 2006 UTC | |
---|---|---|
# | Line 176 C Initialise intermediate terms | Line 176 C Initialise intermediate terms |
176 | vort3(i,j) = 0. | vort3(i,j) = 0. |
177 | omega3(i,j)= 0. | omega3(i,j)= 0. |
178 | KE(i,j) = 0. | KE(i,j) = 0. |
179 | c hDiv(i,j) = 0. | |
180 | viscAh_Z(i,j) = 0. | viscAh_Z(i,j) = 0. |
181 | viscAh_D(i,j) = 0. | viscAh_D(i,j) = 0. |
182 | viscA4_Z(i,j) = 0. | viscA4_Z(i,j) = 0. |
183 | viscA4_D(i,j) = 0. | viscA4_D(i,j) = 0. |
184 | ||
#ifdef ALLOW_AUTODIFF_TAMC | ||
185 | strain(i,j) = 0. _d 0 | strain(i,j) = 0. _d 0 |
186 | tension(i,j) = 0. _d 0 | tension(i,j) = 0. _d 0 |
187 | #ifdef ALLOW_AUTODIFF_TAMC | |
188 | hFacZ(i,j) = 0. _d 0 | hFacZ(i,j) = 0. _d 0 |
189 | #endif | #endif |
190 | ENDDO | ENDDO |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |