diff --git a/src/pbl_dry_contrgradient.f90 b/src/pbl_dry_contrgradient.f90 index d279fca767e011690b76cfc7d0ee4d92df63ddf6..42bc01f79431f66cb824a401708b8ebb4d2d71a5 100644 --- a/src/pbl_dry_contrgradient.f90 +++ b/src/pbl_dry_contrgradient.f90 @@ -106,7 +106,7 @@ module pbl_dry_contrgradient cbl%va_up(kmax) = cbl%va_up0 do k = kmax-1 ,1,-1 - if (grid%z_cell(k) > bl%hpbla_diag ) then + if (grid%z_cell(k) >= bl%hpbla_diag ) then cbl%theta_up(k) = 0.0 cbl%thetav_up(k) = 0.0 cbl%qv_up(k) = 0