Added debug protection to an abundant water balance error write state…

…ment
NordicESMhub · Nov 20, 2018 · 9d70ddd · 9d70ddd
1 parent 757d93b
commit 9d70ddd
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/biogeophys/FatesPlantHydraulicsMod.F90 b/biogeophys/FatesPlantHydraulicsMod.F90
@@ -3361,7 +3361,7 @@ subroutine Hydraulics_1DSolve(cc_p, ft, z_node, v_node, ths_node, thr_node, kmax
     ccohort_hydr%iterh2 = real(iterh2)
 
     ! WATER BALANCE ERROR-HANDLING
-    if (abs(we_local) > thresh) then
+    if ( (abs(we_local) > thresh) .and. debug) then
        write(fates_log(),*)'WARNING: plant hydraulics water balance error exceeds threshold of ',&
              thresh
     else if (abs(we_local) > thresh_break) then