From 0faf662a25b2e53c3a7d0836071b187f3697907a Mon Sep 17 00:00:00 2001 From: Erik Kluzek Date: Wed, 18 Aug 2021 12:47:52 -0600 Subject: [PATCH] Turn off setting of GSSUN and GSSHA until we can bring #1462 in an answer changing tag. --- src/biogeophys/PhotosynthesisMod.F90 | 17 ++++++++++++----- 1 file changed, 12 insertions(+), 5 deletions(-) diff --git a/src/biogeophys/PhotosynthesisMod.F90 b/src/biogeophys/PhotosynthesisMod.F90 index e407a3c8a9..7d2e91b207 100644 --- a/src/biogeophys/PhotosynthesisMod.F90 +++ b/src/biogeophys/PhotosynthesisMod.F90 @@ -1884,11 +1884,18 @@ subroutine Photosynthesis ( bounds, fn, filterp, & end if end if - ! Write stomatal conductance to the appropriate phase - if (phase=='sun') then - gs_mol_sun(p,iv) = gs_mol(p,iv) - else if (phase=='sha') then - gs_mol_sha(p,iv) = gs_mol(p,iv) + ! + ! Turn this off right now as it causes an apparant change in + ! answers (See ESCOMP/#CTSM/1446) for history variables + ! This sets the variables GSSUN and GSSHA + ! + if ( .false. )then + ! Write stomatal conductance to the appropriate phase + if (phase=='sun') then + gs_mol_sun(p,iv) = gs_mol(p,iv) + else if (phase=='sha') then + gs_mol_sha(p,iv) = gs_mol(p,iv) + end if end if ! Use time period 1 hour before and 1 hour after local noon inclusive (11AM-1PM)