Changeset 7060 for branches/2016/dev_v3_6_STABLE_r6506_AGRIF_LIM3/NEMOGCM/NEMO/NST_SRC/agrif_opa_interp.F90
- Timestamp:
- 2016-10-20T16:16:29+02:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2016/dev_v3_6_STABLE_r6506_AGRIF_LIM3/NEMOGCM/NEMO/NST_SRC/agrif_opa_interp.F90
r6204 r7060 638 638 REAL(wp) :: zalpha4, zalpha5, zalpha6, zalpha7 639 639 LOGICAL :: western_side, eastern_side,northern_side,southern_side 640 640 641 641 IF (before) THEN 642 642 ptab(i1:i2,j1:j2,k1:k2,n1:n2) = tsn(i1:i2,j1:j2,k1:k2,n1:n2)
Note: See TracChangeset
for help on using the changeset viewer.