Ignore:
Timestamp:
2017-12-08T17:42:49+01:00 (3 years ago)
Author:
jchanut
Message:

Add zoom capability in default Gyre, remove bcs velocity update (non reproducible), add option to set clamped obcs - #1965

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_r8624_AGRIF3_VVL/NEMOGCM/NEMO/NST_SRC/agrif_opa_sponge.F90

    r8762 r8965  
    280280      ! 
    281281      IF( before ) THEN 
    282          tabres = un(i1:i2,j1:j2,:) 
     282         tabres = ub(i1:i2,j1:j2,:) 
    283283      ELSE 
    284284         ubdiff(i1:i2,j1:j2,:) = (ub(i1:i2,j1:j2,:) - tabres(:,:,:))*umask(i1:i2,j1:j2,:) 
     
    377377 
    378378      IF( before ) THEN  
    379          tabres = vn(i1:i2,j1:j2,:) 
     379         tabres = vb(i1:i2,j1:j2,:) 
    380380      ELSE 
    381381         ! 
Note: See TracChangeset for help on using the changeset viewer.