update mds 13->15

JessicaMeixner-NOAA · Jan 3, 2025 · 174cf7b · 174cf7b
1 parent 2e49d78
commit 174cf7b
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/model/src/wav_comp_nuopc.F90 b/model/src/wav_comp_nuopc.F90
@@ -482,7 +482,7 @@ subroutine InitializeRealize(gcomp, importState, exportState, clock, rc)
     character(CL)                  :: logfile
     logical                        :: local
     integer                        :: imod, idsi, idso, idss, idst, idse
-    integer                        :: mds(13) ! Note that nds is set to this in w3initmod
+    integer                        :: mds(15) ! Note that nds is set to this in w3initmod
     integer                        :: stdout
     integer                        :: petcount
     real(r8)                       :: toff

diff --git a/model/src/wav_shel_inp.F90 b/model/src/wav_shel_inp.F90
@@ -50,7 +50,7 @@ subroutine set_shel_io(stdout,mds,ntrace)
 
     ! Input parameter
     integer , intent(in)   :: stdout
-    integer , intent(out)  :: mds(13), ntrace(2)
+    integer , intent(out)  :: mds(15), ntrace(2)
 
     ! local variables
     integer :: i