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

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

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

revision 1.14 by heimbach, Fri Sep 17 23:02:01 2004 UTC revision 1.15 by gforget, Fri May 30 02:50:16 2008 UTC
# Line 132  C-      Off-diagonal components of verti Line 132  C-      Off-diagonal components of verti
132        ENDDO        ENDDO
133    
134  #ifdef GM_BOLUS_ADVEC  #ifdef GM_BOLUS_ADVEC
135        IF (GM_AdvForm .AND. GM_AdvSeparate) THEN        IF (GM_AdvForm .AND. GM_AdvSeparate
136         & .AND. .NOT.GM_InMomAsStress) THEN
137         DO j=jMin,jMax         DO j=jMin,jMax
138          DO i=iMin,iMax          DO i=iMin,iMax
139           rTrans(i,j) =           rTrans(i,j) =
Legend:
Removed from v.1.14  
changed lines
  Added in v.1.15
  ViewVC Help
Powered by ViewVC 1.1.22