fixes one more gradBuoyEddy

E3SM-Project · Sep 25, 2022 · 16ad766 · 16ad766
1 parent 7821033
commit 16ad766
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/components/mpas-ocean/src/shared/mpas_ocn_submesoscale_eddies.F b/components/mpas-ocean/src/shared/mpas_ocn_submesoscale_eddies.F
@@ -131,7 +131,7 @@ subroutine ocn_submesoscale_compute_velocity()
                               max(BruntVaisalaFreqTop(k,cell2),1.0E-20_RKIND)))
            bvfML = bvfML + hAv*bvfAv
            hML = hML + hAv
-           gradBuoyML = gradBuoyML + hAv*gradBuoyEddy(k,iEdge)
+           gradBuoyML = gradBuoyML + hAv*gradDensityEddy(k,iEdge)
         end do
         bvfML = bvfML / (1.0E-20_RKIND + hML)
         gradBuoyML = gradBuoyML / (1.0E-20_RKIND + hML)