/[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.1 by adcroft, Wed Jun 21 19:42:54 2000 UTC revision 1.2 by heimbach, Mon Nov 13 16:35:28 2000 UTC
# Line 42  C     I, J - Loop counters Line 42  C     I, J - Loop counters
42        _RL dTdx,dTdy        _RL dTdx,dTdy
43    
44  C     Surface flux is zero  C     Surface flux is zero
45        IF (use_GMRedi .AND. K.GT.1) THEN        IF (useGMRedi .AND. K.GT.1) THEN
46    
47        DO j=jMin,jMax        DO j=jMin,jMax
48         DO i=iMin,iMax         DO i=iMin,iMax
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22