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

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

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

revision 1.111 by jmc, Thu Dec 16 23:20:06 2004 UTC revision 1.112 by heimbach, Mon Jan 24 17:00:17 2005 UTC
# Line 260  C     uninitialised but inert locations. Line 260  C     uninitialised but inert locations.
260  #ifdef ALLOW_AUTODIFF_TAMC  #ifdef ALLOW_AUTODIFF_TAMC
261  cph(  cph(
262  c--   need some re-initialisation here to break dependencies  c--   need some re-initialisation here to break dependencies
 c--   totphihyd is assumed zero from ini_pressure, i.e.  
 c--   avoiding iterate pressure p = integral of (g*rho(p)*dz)  
263  cph)  cph)
            totPhiHyd(i,j,k,bi,bj) = 0. _d 0  
264             gu(i,j,k,bi,bj) = 0. _d 0             gu(i,j,k,bi,bj) = 0. _d 0
265             gv(i,j,k,bi,bj) = 0. _d 0             gv(i,j,k,bi,bj) = 0. _d 0
266  #endif  #endif
Legend:
Removed from v.1.111  
changed lines
  Added in v.1.112
  ViewVC Help
Powered by ViewVC 1.1.22