/[MITgcm]/MITgcm/model/src/temp_integrate.F
ViewVC logotype

Diff of /MITgcm/model/src/temp_integrate.F

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

revision 1.1 by jmc, Tue Nov 19 16:58:38 2013 UTC revision 1.2 by jmc, Thu Nov 21 00:16:55 2013 UTC
# Line 132  C---+----1----+----2----+----3----+----4 Line 132  C---+----1----+----2----+----3----+----4
132         DO i=1-OLx,sNx+OLx         DO i=1-OLx,sNx+OLx
133           fVerT(i,j,1) = 0. _d 0           fVerT(i,j,1) = 0. _d 0
134           fVerT(i,j,2) = 0. _d 0           fVerT(i,j,2) = 0. _d 0
135    #ifdef ALLOW_AUTODIFF
136             rTrans(i,j) = 0. _d 0
137    #endif /* ALLOW_AUTODIFF */
138         ENDDO         ENDDO
139        ENDDO        ENDDO
140    
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22