From b3845dc5a888fe279213b4cf2176a586ecb11186 Mon Sep 17 00:00:00 2001 From: YanlanLiu Date: Thu, 2 Jun 2022 09:41:03 -0700 Subject: [PATCH] pring out seed_in --- biogeochem/EDPhysiologyMod.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/biogeochem/EDPhysiologyMod.F90 b/biogeochem/EDPhysiologyMod.F90 index b793c965c8..4a0a8ed9db 100644 --- a/biogeochem/EDPhysiologyMod.F90 +++ b/biogeochem/EDPhysiologyMod.F90 @@ -1521,7 +1521,7 @@ subroutine SeedIn( currentSite, bc_in, bc_out) !YL--------- do pft = 1,numpft bc_out%seed_out(pft) = bc_out%seed_out(pft) + site_seed_rain(pft)*disp_frac(pft) ![kg/site/day] - !write(fates_log(),*) 'pft, site_seed_rain(pft), bc_out%seed_out(pft): ', pft, site_seed_rain(pft), bc_out%seed_out(pft) + write(fates_log(),*) 'pft, bc_in%seed_in(pft), bc_out%seed_out(pft): ', pft, bc_in%seed_in(pft), bc_out%seed_out(pft) end do !-----------