/[MITgcm]/MITgcm/pkg/seaice/diffus.F
ViewVC logotype

Diff of /MITgcm/pkg/seaice/diffus.F

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

revision 1.2 by heimbach, Tue Nov 12 20:47:27 2002 UTC revision 1.3 by dimitri, Thu Dec 5 08:43:02 2002 UTC
# Line 39  C     i,j,k,bi,bj - Loop counters Line 39  C     i,j,k,bi,bj - Loop counters
39    
40          DO j=1-OLy,sNy+OLy          DO j=1-OLy,sNy+OLy
41           DO i=1-OLx,sNx+OLx           DO i=1-OLx,sNx+OLx
42            HEFF1(I,J)=0.0            HEFF1(I,J)=0.0 _d 0
43           ENDDO           ENDDO
44          ENDDO          ENDDO
45    
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22