Remote application of Stokes tendency on thermodynamic step

- This only makes sense to add on the dynamics timestep.
NOAA-GFDL · Jun 7, 2021 · a6de11c · a6de11c
1 parent 9fbdf11
commit a6de11c
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/src/core/MOM.F90 b/src/core/MOM.F90
@@ -656,10 +656,10 @@ subroutine step_MOM(forces_in, fluxes_in, sfc_state, Time_start, time_int_in, CS
   else ! not do_dyn.
     if (CS%UseWaves) then ! Diagnostics are not enabled in this call.
       call Update_Stokes_Drift(G, GV, US, Waves, h, fluxes%ustar, dt)
-      if (Waves%Stokes_DDT) then
-        u(:,:,:) = u(:,:,:) + Waves%ddt_us_x(:,:,:)*dt
-        v(:,:,:) = v(:,:,:) + Waves%ddt_us_y(:,:,:)*dt
-      endif
+      !if (Waves%Stokes_DDT) then
+      !  u(:,:,:) = u(:,:,:) + Waves%ddt_us_x(:,:,:)*dt
+      !  v(:,:,:) = v(:,:,:) + Waves%ddt_us_y(:,:,:)*dt
+      !endif
     endif
   endif