/[MITgcm]/MITgcm/pkg/generic_advdiff/gad_calc_rhs.F
ViewVC logotype

Diff of /MITgcm/pkg/generic_advdiff/gad_calc_rhs.F

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

revision 1.6 by adcroft, Tue Sep 4 17:16:11 2001 UTC revision 1.7 by heimbach, Wed Sep 5 17:46:03 2001 UTC
# Line 202  C-    Diffusive flux in Y Line 202  C-    Diffusive flux in Y
202  #ifdef ALLOW_GMREDI  #ifdef ALLOW_GMREDI
203  C-    GM/Redi flux in Y  C-    GM/Redi flux in Y
204        IF (useGMRedi) THEN        IF (useGMRedi) THEN
        CALL GMREDI_YTRANSPORT(  
205  C *note* should update GMREDI_YTRANSPORT to use localT and set df  *aja*  C *note* should update GMREDI_YTRANSPORT to use localT and set df  *aja*
206           CALL GMREDI_YTRANSPORT(
207       I     iMin,iMax,jMin,jMax,bi,bj,K,       I     iMin,iMax,jMin,jMax,bi,bj,K,
208       I     yA,Tracer,       I     yA,Tracer,
209       U     df,       U     df,
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.22