Parent Directory | Revision Log | Revision Graph
Patch dynamics.F when using staggered time step.
1 | diff -r1.65.2.2 dynamics.F |
2 | 484a485,494 |
3 | > Ccs- |
4 | > ENDDO |
5 | > ENDDO |
6 | > IF (staggerTimeStep.AND.useCubedSphereExchange) THEN |
7 | > _EXCH_XYZ_R8(gTnm1,myThid) |
8 | > _EXCH_XYZ_R8(gSnm1,myThid) |
9 | > ENDIF |
10 | > DO bj=myByLo(myThid),myByHi(myThid) |
11 | > DO bi=myBxLo(myThid),myBxHi(myThid) |
12 | > Ccs- |
ViewVC Help | |
Powered by ViewVC 1.1.22 |