New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 2802 – NEMO

Changeset 2802


Ignore:
Timestamp:
2011-07-14T09:49:36+02:00 (13 years ago)
Author:
rblod
Message:

Correct update of T and S with agrif, see ticket #847

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/NEMOGCM/NEMO/NST_SRC/agrif_opa_update.F90

    r2715 r2802  
    99   USE in_out_manager  ! I/O manager 
    1010   USE lib_mpp 
    11  
     11   USE traswp 
     12    
    1213   IMPLICIT NONE 
    1314   PRIVATE 
    … …  
    5657 
    5758      Agrif_UseSpecialValueInUpdate = .FALSE. 
     59 
     60      CALL Agrif_ChildGrid_To_ParentGrid() 
     61      CALL tra_swap 
     62      CALL Agrif_ParentGrid_To_ChildGrid() 
    5863 
    5964      IF( wrk_not_released(3, 1) ) THEN 
Note: See TracChangeset for help on using the changeset viewer.