/[MITgcm]/MITgcm/pkg/gmredi/gmredi_xtransport.F
ViewVC logotype

Diff of /MITgcm/pkg/gmredi/gmredi_xtransport.F

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

revision 1.15 by dfer, Tue Jan 30 15:17:52 2007 UTC revision 1.16 by gforget, Sat Feb 2 02:35:53 2008 UTC
# Line 106  C--   Area integrated zonal flux Line 106  C--   Area integrated zonal flux
106  #ifdef GM_NON_UNITY_DIAGONAL  #ifdef GM_NON_UNITY_DIAGONAL
107       &    *Kux(i,j,k,bi,bj)       &    *Kux(i,j,k,bi,bj)
108  #else  #else
109       &    *(GM_isopycK  #ifdef ALLOW_KAPREDI_CONTROL
110         &    *(kapredi(i,j,k,bi,bj)
111    #else
112         &    *(GM_isopycK
113    #endif
114  #ifdef GM_VISBECK_VARIABLE_K  #ifdef GM_VISBECK_VARIABLE_K
115       &    +op5*(VisbeckK(i,j,bi,bj)+VisbeckK(i-1,j,bi,bj))       &    +op5*(VisbeckK(i,j,bi,bj)+VisbeckK(i-1,j,bi,bj))
116  #endif  #endif
Legend:
Removed from v.1.15  
changed lines
  Added in v.1.16
  ViewVC Help
Powered by ViewVC 1.1.22