Turn off setting of GSSUN and GSSHA until we can bring ESCOMP#1462 in…

… an answer changing tag.
djk2120 · Aug 18, 2021 · 0faf662 · 0faf662
1 parent fe982ba
commit 0faf662
Showing 1 changed file with 12 additions and 5 deletions.
diff --git 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)