From e7d6ef67a00d9139d0e94871f781e2de86f1fe7e Mon Sep 17 00:00:00 2001
From: ma05cde <mickael.accensi@ifremer.fr>
Date: Tue, 10 Oct 2023 14:07:26 +0000
Subject: [PATCH] correct ww3_trnc issue with NL1

---
 model/src/ww3_trnc.F90 | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/model/src/ww3_trnc.F90 b/model/src/ww3_trnc.F90
index c2049751c..ec69db4dc 100644
--- a/model/src/ww3_trnc.F90
+++ b/model/src/ww3_trnc.F90
@@ -71,6 +71,9 @@ PROGRAM W3TRNC
   !/ ------------------------------------------------------------------- /
   USE CONSTANTS
 
+#ifdef W3_NL1
+    USE W3ADATMD, ONLY : W3NAUX, W3SETA
+#endif
   USE W3GDATMD, ONLY : W3NMOD, W3SETG, FLAGLL, XFR, GNAME
   USE W3ODATMD, ONLY : W3NOUT, W3SETO, FNMPRE
   USE W3SERVMD, ONLY : ITRACE, NEXTLN, EXTCDE
@@ -131,6 +134,10 @@ PROGRAM W3TRNC
   !
   CALL W3NMOD ( 1, 6, 6 )
   CALL W3SETG ( 1, 6, 6 )
+#ifdef W3_NL1
+  CALL W3NAUX (    6, 6 )
+  CALL W3SETA ( 1, 6, 6 )
+#endif
   CALL W3NOUT (    6, 6 )
   CALL W3SETO ( 1, 6, 6 )
   !