Parent Directory | Revision Log | Revision Graph | Patch
revision 1.34 by heimbach, Mon Apr 21 15:17:33 2008 UTC | revision 1.35 by jmc, Tue Apr 22 22:50:11 2008 UTC | |
---|---|---|
# | Line 136 C == Local variables == | Line 136 C == Local variables == |
136 | _RL viscA4_DSmg(1-OLx:sNx+OLx,1-OLy:sNy+OLy) | _RL viscA4_DSmg(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
137 | LOGICAL calcLeith, calcSmag | LOGICAL calcLeith, calcSmag |
138 | ||
cph( | ||
print *, 'ph-test a ', mythid, k | ||
print *, 'ph-test b ', myBxLo(myThid) | ||
cph) | ||
139 | #ifdef ALLOW_AUTODIFF_TAMC | #ifdef ALLOW_AUTODIFF_TAMC |
140 | act1 = bi - myBxLo(myThid) | act1 = bi - myBxLo(myThid) |
141 | max1 = myBxHi(myThid) - myBxLo(myThid) + 1 | max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |