From 2864b547744f7ce763c2c4ccee246c5f15d5dcea Mon Sep 17 00:00:00 2001 From: Patrick Campbell Date: Thu, 25 Jul 2024 12:19:25 -0400 Subject: [PATCH] Update src/canopy_bioparm_mod.F90 Co-authored-by: Maggie Marvin <47859989+MaggieMarvin@users.noreply.github.com> --- src/canopy_bioparm_mod.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/canopy_bioparm_mod.F90 b/src/canopy_bioparm_mod.F90 index 616be563..4dcb6ad2 100644 --- a/src/canopy_bioparm_mod.F90 +++ b/src/canopy_bioparm_mod.F90 @@ -624,7 +624,7 @@ SUBROUTINE CANOPY_BIOP( EMI_IND, LU_OPT, VTYPE, & REAL(RK), PARAMETER :: CLT_APIN = 1.0_rk !coefficient for low temperature stress REAL(RK), PARAMETER :: TLT_APIN = 283.15_rk !threshold for low temperature stress (K) REAL(RK), PARAMETER :: DTLT_APIN = 8.0_rk !delta threshold for low temperature stress (K) - REAL(RK), PARAMETER :: CHW_APIN = 1.0_rk !coefficient for high wind stress + REAL(RK), PARAMETER :: CHW_APIN = 5.0_rk !coefficient for high wind stress REAL(RK), PARAMETER :: THW_APIN = 12.0_rk !threshold for high wind stress (m/s) REAL(RK), PARAMETER :: DTHW_APIN = 8.0_rk !delta threshold for high wind stress (m/s)