modify JPPFLAG to account for deleting nemosst

awnawab · Dec 8, 2024 · 36023d2 · 36023d2
1 parent 88a2569
commit 36023d2
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/ecwam/yowcout.F90 b/src/ecwam/yowcout.F90
@@ -16,7 +16,7 @@ MODULE YOWCOUT
 !*    ** *COUT*  OUTPUT POINTS INDICES AND FLAGS.
 
       INTEGER(KIND=JWIM), PARAMETER :: NTRAIN=3 
-      INTEGER(KIND=JWIM), PARAMETER :: JPPFLAG=73+3*NTRAIN+5 !!!! change also in scripts: wave_setgflag
+      INTEGER(KIND=JWIM), PARAMETER :: JPPFLAG=72+3*NTRAIN+5 !!!! change also in scripts: wave_setgflag
       INTEGER(KIND=JWIM), PARAMETER :: NREAL=16 
       INTEGER(KIND=JWIM), PARAMETER :: NIPRMINFO=7
       INTEGER(KIND=JWIM), PARAMETER :: NINFOBOUT=5