remove lines that were commented out

E3SM-Ocean-Discussion · Nov 5, 2024 · 2f732f2 · 2f732f2
1 parent 1ed7ef6
commit 2f732f2
Showing 1 changed file with 0 additions and 21 deletions.
diff --git a/components/ww3/src/cpl/wav_comp_mct.F90 b/components/ww3/src/cpl/wav_comp_mct.F90
@@ -854,27 +854,6 @@ SUBROUTINE WAV_INIT_MCT( EClock, cdata, x2w_w, w2x_w, NLFilename )
 
       ! add call to gptl timer
 
-      ! send initial state to driver
-      !do jsea=1, nseal
-      !   w2x_w%rattr(index_w2x_Sw_ustokes_wavenumber_1,jsea) = 0.0
-      !   w2x_w%rattr(index_w2x_Sw_vstokes_wavenumber_1,jsea) = 0.0
-
-      !   w2x_w%rattr(index_w2x_Sw_ustokes_wavenumber_2,jsea) = 0.0
-      !   w2x_w%rattr(index_w2x_Sw_vstokes_wavenumber_2,jsea) = 0.0
-
-      !   w2x_w%rattr(index_w2x_Sw_ustokes_wavenumber_3,jsea) = 0.0
-      !   w2x_w%rattr(index_w2x_Sw_vstokes_wavenumber_3,jsea) = 0.0
-
-      !   w2x_w%rattr(index_w2x_Sw_ustokes_wavenumber_4,jsea) = 0.0
-      !   w2x_w%rattr(index_w2x_Sw_vstokes_wavenumber_4,jsea) = 0.0
-
-      !   w2x_w%rattr(index_w2x_Sw_ustokes_wavenumber_5,jsea) = 0.0
-      !   w2x_w%rattr(index_w2x_Sw_vstokes_wavenumber_5,jsea) = 0.0
-
-      !   w2x_w%rattr(index_w2x_Sw_ustokes_wavenumber_6,jsea) = 0.0
-      !   w2x_w%rattr(index_w2x_Sw_vstokes_wavenumber_6,jsea) = 0.0
-      !enddo
-
       ! end redirection of share output to wav log
 
       if ( iaproc .eq. napout ) then