From 2bb17469c72809099b577e9871615bdd75732448 Mon Sep 17 00:00:00 2001 From: Bill Sacks Date: Fri, 3 Aug 2018 12:47:55 -0600 Subject: [PATCH] Fix documentation of hr and hr_road_perv Fixes #120 --- src/biogeophys/CanopyTemperatureMod.F90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/biogeophys/CanopyTemperatureMod.F90 b/src/biogeophys/CanopyTemperatureMod.F90 index 97fc45884f..de9c977f93 100644 --- a/src/biogeophys/CanopyTemperatureMod.F90 +++ b/src/biogeophys/CanopyTemperatureMod.F90 @@ -110,8 +110,8 @@ subroutine CanopyTemperature(bounds, & real(r8) :: qsatgdT ! d(qsatg)/dT real(r8) :: fac ! soil wetness of surface layer real(r8) :: psit ! negative potential of soil - real(r8) :: hr ! relative humidity - real(r8) :: hr_road_perv ! relative humidity for urban pervious road + real(r8) :: hr ! alpha soil + real(r8) :: hr_road_perv ! alpha soil for urban pervious road real(r8) :: wx ! partial volume of ice and water of surface layer real(r8) :: fac_fc ! soil wetness of surface layer relative to field capacity real(r8) :: eff_porosity ! effective porosity in layer