Add forcing height change back into CanopyFluxesMod after rebase.

ESCOMP · Mar 14, 2022 · 382441c · 382441c
1 parent 546f615
commit 382441c
Showing 1 changed file with 0 additions and 5 deletions.
diff --git a/src/biogeophys/CanopyFluxesMod.F90 b/src/biogeophys/CanopyFluxesMod.F90
@@ -918,11 +918,6 @@ subroutine CanopyFluxes(bounds,  num_exposedvegp, filter_exposedvegp,
             call endrun(msg = 'unknown z0param_method', additional_msg = errMsg(sourcefile, __LINE__))
           end select
 
-          ! Update the forcing heights
-          forc_hgt_u_patch(p) = forc_hgt_u(g) + z0mg(c) + displa(p)
-          forc_hgt_t_patch(p) = forc_hgt_t(g) + z0mg(c) + displa(p)
-          forc_hgt_q_patch(p) = forc_hgt_q(g) + z0mg(c) + displa(p)
-
           z0hv(p)   = z0mv(p)
           z0qv(p)   = z0mv(p)