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

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

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

revision 1.13 by adcroft, Tue Jun 16 15:20:08 1998 UTC revision 1.14 by cnh, Wed Sep 9 15:04:44 1998 UTC
# Line 67  C     Step forward salt Line 67  C     Step forward salt
67         DO j=jMin,jMax         DO j=jMin,jMax
68          DO i=iMin,iMax          DO i=iMin,iMax
69           gSNm1(i,j,k,bi,bj)=salt(i,j,k,bi,bj)           gSNm1(i,j,k,bi,bj)=salt(i,j,k,bi,bj)
70       &    +deltaTtracer*(ab15*gS(i,j,k,bi,bj)+ab05*gSNm1(i,j,k,bi,bj))  C    &    +deltaTtracer*(ab15*gS(i,j,k,bi,bj)+ab05*gSNm1(i,j,k,bi,bj))
71          ENDDO          ENDDO
72         ENDDO         ENDDO
73        ENDIF        ENDIF

Legend:
Removed from v.1.13  
changed lines
  Added in v.1.14

  ViewVC Help
Powered by ViewVC 1.1.22