Changeset 8289 for branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limrhg.F90

Timestamp:

2017-07-06T10:17:02+02:00 (7 years ago)

Author:

clem

Message:

correct outputs

File:

• branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limrhg.F90 (modified) (1 diff)

branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limrhg.F90

@@ -727 +727 @@
       CALL lbc_lnk_multi(   diag_utau_oi, 'U', -1., diag_vtau_oi, 'V', -1.    )
 
+      CALL lbc_lnk_multi(   diag_xmtrp_ice, 'U', -1., diag_xmtrp_snw, 'U', -1., &
+                 &          diag_xatrp    , 'U', -1., diag_ymtrp_ice, 'V', -1., &
+                 &          diag_ymtrp_snw, 'V', -1., diag_yatrp    , 'V', -1.  )
+
       !
       !------------------------------------------------------------------------------!