/[MITgcm]/MITgcm/pkg/my82/my82_init.F
ViewVC logotype

Diff of /MITgcm/pkg/my82/my82_init.F

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

revision 1.1 by mlosch, Thu Sep 2 09:11:54 2004 UTC revision 1.2 by jmc, Sun Oct 17 23:12:31 2004 UTC
# Line 52  C--------------------------------------- Line 52  C---------------------------------------
52            do i = 1-OLx, sNx+OLx            do i = 1-OLx, sNx+OLx
53             MYhbl    (i,j  ,bi,bj) = 0.             MYhbl    (i,j  ,bi,bj) = 0.
54             MYviscAr (i,j,k,bi,bj) = viscAr             MYviscAr (i,j,k,bi,bj) = viscAr
55             MYdiffKr (i,j,k,bi,bj) = diffKrT             MYdiffKr (i,j,k,bi,bj) = diffKrNrT(k)
56            end do            end do
57           end do           end do
58          end do          end do
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22