Merge pull request #324 from adele157/adele_tide_fixes

Fix halo bug on tidal forcing
mom-ocean · Oct 26, 2020 · af3a94d · af3a94d
2 parents 5aec067 + 8d40d33
commit af3a94d
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/mom5/ocean_core/ocean_barotropic.F90 b/src/mom5/ocean_core/ocean_barotropic.F90
@@ -6467,9 +6467,9 @@ subroutine get_tidal_forcing(Time, dayr)
      eta_eq_tidal(:,:)  =  ideal_amp(:,:)*cosomegat_M2
   endif
 
-  eta_eq_tidal(:,:) = eta_eq_tidal(:,:)*Grd%tmask(:,:,1) 
+  eta_eq_tidal(:,:) = eta_eq_tidal(:,:)*tmask_bt(:,:) 
 
-  call diagnose_2d(Time, Grd, id_eta_eq_tidal, eta_eq_tidal(:,:))
+  call diagnose_2d(Time, Grd, id_eta_eq_tidal, eta_eq_tidal(isd:ied,jsd:jed))
 
 
 end subroutine get_tidal_forcing