From 886793d493b32c950b573ef3a3e06eacdf0c0ed8 Mon Sep 17 00:00:00 2001
From: Philippe WAUTELET <philippe.wautelet@aero.obs-mip.fr>
Date: Wed, 20 Mar 2019 14:17:43 +0100
Subject: [PATCH] Philippe & Juan 20/03/2019: SURFEX: missing use
 modi_get_luout in coupling_seaflux_n

---
 src/SURFEX/coupling_seafluxn.F90 | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/SURFEX/coupling_seafluxn.F90 b/src/SURFEX/coupling_seafluxn.F90
index a7c421d68..612b8df12 100644
--- a/src/SURFEX/coupling_seafluxn.F90
+++ b/src/SURFEX/coupling_seafluxn.F90
@@ -51,7 +51,7 @@ SUBROUTINE COUPLING_SEAFLUX_n (CHS, DTS, DGS, O, OR, G, S, DST, SLT, &
 !!      Modified    11/2014 : J. Pianezze : add currents for wave coupling
 !!      Modified    02/2019 : S. Bielli Sea salt : significant sea wave height influences salt emission; 5 salt modes
 !!      Modified    03/2019 : P. Wautelet: correct ZWS when variable not present in file
-!!
+!!      Modified    03/2019 : P. Wautelet: missing use MODI_GET_LUOUT
 !!---------------------------------------------------------------------
 !
 !
@@ -109,6 +109,7 @@ USE MODI_COUPLING_ICEFLUX_n
 USE MODI_SEAICE_GELATO1D_n
 !
 USE MODI_COUPLING_SLT_n
+USE MODI_GET_LUOUT
 !
 IMPLICIT NONE
 !
-- 
GitLab