From b87c41f1265015594edd82ad962d0f685d2228e6 Mon Sep 17 00:00:00 2001
From: Chonggang Xu <xuchongang@gmail.com>
Date: Fri, 19 Apr 2019 14:14:58 -0600
Subject: [PATCH] resolve a bug for the patch loop to calculate the soil-root
 interface conductivity

---
 biogeophys/FatesPlantHydraulicsMod.F90 | 1 +
 1 file changed, 1 insertion(+)

diff --git a/biogeophys/FatesPlantHydraulicsMod.F90 b/biogeophys/FatesPlantHydraulicsMod.F90
index 190c6bb46c..c46b59824f 100644
--- a/biogeophys/FatesPlantHydraulicsMod.F90
+++ b/biogeophys/FatesPlantHydraulicsMod.F90
@@ -1643,6 +1643,7 @@ subroutine UpdateSizeDepRhizVolLenCon(currentSite, bc_in)
     !hydraulic vs osmostic with and without transpiration
     !Steudle, E. Water uptake by roots: effects of water deficit. 
     !J Exp Bot 51, 1531-1542, doi:DOI 10.1093/jexbot/51.350.1531 (2000).
+    cPatch => currentSite%youngest_patch
     do while(associated(cPatch))
        cCohort => cPatch%tallest
        do while(associated(cCohort))