Changeset 7639

Timestamp:

2017-02-03T15:58:14+01:00 (8 years ago)

Author:

clem

Message:

bug fix for AGRIF+LIM2-VP, see ticket #1837

File:

• branches/2015/nemo_v3_6_STABLE/NEMOGCM/NEMO/NST_SRC/agrif_lim2_interp.F90 (modified) (2 diffs)

branches/2015/nemo_v3_6_STABLE/NEMOGCM/NEMO/NST_SRC/agrif_lim2_interp.F90

@@ -531 +531 @@
          DO jj=MAX(j1,2),j2
             DO ji=MAX(i1,2),i2
-               uice_agr(ji,jj) = tabres(ji,jj)
+               u_ice_nst(ji,jj) = tabres(ji,jj)
             END DO
          END DO
@@ -582 +582 @@
          DO jj=MAX(j1,2),j2
             DO ji=MAX(i1,2),i2
-               vice_agr(ji,jj) = tabres(ji,jj)
+               v_ice_nst(ji,jj) = tabres(ji,jj)
             END DO
          END DO