/[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.133 by heimbach, Wed May 31 19:53:28 2006 UTC revision 1.134 by heimbach, Wed Jun 7 01:55:12 2006 UTC
# Line 423  CADJ STORE gunm1(:,:,k,bi,bj) Line 423  CADJ STORE gunm1(:,:,k,bi,bj)
423  CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte  CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte
424  CADJ STORE gvnm1(:,:,k,bi,bj)  CADJ STORE gvnm1(:,:,k,bi,bj)
425  CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte  CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte
426  #   ifndef DISABLE_RSTAR_CODE  #  ifndef DISABLE_RSTAR_CODE
427  CADJ STORE dwtransc(:,:,bi,bj)  CADJ STORE dwtransc(:,:,bi,bj)
428  CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte  CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte
429  CADJ STORE dwtransu(:,:,bi,bj)  CADJ STORE dwtransu(:,:,bi,bj)
430  CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte  CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte
431  CADJ STORE dwtransv(:,:,bi,bj)  CADJ STORE dwtransv(:,:,bi,bj)
432  CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte  CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte
433  #   endif  #  endif
434  #  ifdef ALLOW_CD_CODE  #  ifdef ALLOW_CD_CODE
435  CADJ STORE unm1(:,:,k,bi,bj)  CADJ STORE unm1(:,:,k,bi,bj)
436  CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte  CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte
# Line 442  CADJ STORE vVelD(:,:,k,bi,bj) Line 442  CADJ STORE vVelD(:,:,k,bi,bj)
442  CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte  CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte
443  #  endif  #  endif
444  # endif  # endif
445    # ifdef ALLOW_DEPTH_CONTROL
446    CADJ STORE  fVerU (:,:,:)
447    CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte
448    CADJ STORE  fVerV (:,:,:)
449    CADJ &     = comlev1_bibj_k, key=kkey, byte=isbyte
450    # endif
451  #endif /* ALLOW_AUTODIFF_TAMC */  #endif /* ALLOW_AUTODIFF_TAMC */
452    
453  C--      Integrate hydrostatic balance for phiHyd with BC of  C--      Integrate hydrostatic balance for phiHyd with BC of
Legend:
Removed from v.1.133  
changed lines
  Added in v.1.134
  ViewVC Help
Powered by ViewVC 1.1.22