/[MITgcm]/MITgcm/model/src/timestep.F
ViewVC logotype

Diff of /MITgcm/model/src/timestep.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.34 by edhill, Tue Oct 28 22:57:59 2003 UTC revision 1.35 by heimbach, Thu Oct 30 18:44:26 2003 UTC
# Line 159  C-     for CD-scheme, compute gU,Vtmp = Line 159  C-     for CD-scheme, compute gU,Vtmp =
159        IF (useCDscheme) THEN        IF (useCDscheme) THEN
160  C-     Step forward D-grid velocity using C-grid gU,Vtmp = gU,V^n + forcing  C-     Step forward D-grid velocity using C-grid gU,Vtmp = gU,V^n + forcing
161  C      and return coriolis terms on C-grid (guCor,gvCor)  C      and return coriolis terms on C-grid (guCor,gvCor)
162          CALL CD_SCHEME(          CALL CD_CODE_SCHEME(
163       I                  bi,bj,k, dPhiHydX,dPhiHydY, gUtmp,gVtmp,       I                  bi,bj,k, dPhiHydX,dPhiHydY, gUtmp,gVtmp,
164       O                  guCor,gvCor,       O                  guCor,gvCor,
165       I                  myTime, myIter, myThid)       I                  myTime, myIter, myThid)
Legend:
Removed from v.1.34  
changed lines
  Added in v.1.35
  ViewVC Help
Powered by ViewVC 1.1.22