Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Jump to bottom

Add new scheme Li2024 of ozone plant damage #2302

Draft
wants to merge 4 commits into
base: master
Choose a base branch
from
Draft

Add new scheme Li2024 of ozone plant damage #2302

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
4 commits
Select commit Hold shift + click to select a range
facbac6
Add new scheme Li2024 of ozone plant damage
Dec 28, 2023
3cb6d61
add comment about work to be done
Dec 28, 2023
47309ca
update Y in PODY and response functions in Li2024
Jan 15, 2024
61cc20f
Revise code according to Sam Levis's suggestions
lifang0209 Jan 19, 2024
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
5 changes: 3 additions & 2 deletions bld/namelist_files/namelist_definition_ctsm.xml
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -1174,9 +1174,10 @@ Initial seed Carbon to use at planting
</entry>

<entry id="o3_veg_stress_method" type="char*32" category="physics"
group="clm_inparm" valid_values="unset,stress_lombardozzi2015,stress_falk" value="unset">
group="clm_inparm" valid_values="unset,stress_li2024,stress_lombardozzi2015,stress_falk" value="unset">
Parameter to set the type of ozone vegetation stress method
unset = (default) ozone stress vegetation method is off
unset = (default) ozone stress vegetation method is off
stress_li2024 = ozone stress vegetation functions from Fang Li 2024
stress_lombardozzi2015 = ozone stress vegetation functions from Danica Lombardozzi 2015
stress_falk = ozone stress vegetation functions from Stefanie Falk (issue #1224)
<default>Default: "unset"</default>
Expand Down
3 changes: 2 additions & 1 deletion src/biogeophys/CanopyFluxesMod.F90
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -1681,7 +1681,8 @@ subroutine CanopyFluxes(bounds, num_exposedvegp, filter_exposedvegp,
rb = frictionvel_inst%rb1_patch(bounds%begp:bounds%endp), &
ram = frictionvel_inst%ram1_patch(bounds%begp:bounds%endp), &
tlai = canopystate_inst%tlai_patch(bounds%begp:bounds%endp), &
forc_o3 = atm2lnd_inst%forc_o3_grc(bounds%begg:bounds%endg))
forc_o3 = atm2lnd_inst%forc_o3_grc(bounds%begg:bounds%endg), &
sabv = solarabs_inst%sabv_patch(bounds%begp:bounds%endp))

!---------------------------------------------------------
!update Vc,max and Jmax by LUNA model
Expand Down
4 changes: 3 additions & 1 deletion src/biogeophys/OzoneBaseMod.F90
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -64,7 +64,7 @@ subroutine Restart_interface(this, bounds, ncid, flag)
end subroutine Restart_interface

subroutine CalcOzoneUptake_interface(this, bounds, num_exposedvegp, filter_exposedvegp, &
forc_pbot, forc_th, rssun, rssha, rb, ram, tlai, forc_o3)
forc_pbot, forc_th, rssun, rssha, rb, ram, tlai, forc_o3, sabv)
use decompMod , only : bounds_type
use shr_kind_mod , only : r8 => shr_kind_r8
import :: ozone_base_type
Expand All @@ -81,6 +81,8 @@ subroutine CalcOzoneUptake_interface(this, bounds, num_exposedvegp, filter_expos
real(r8) , intent(in) :: ram( bounds%begp: ) ! aerodynamical resistance (s/m)
real(r8) , intent(in) :: tlai( bounds%begp: ) ! one-sided leaf area index, no burying by snow
real(r8) , intent(in) :: forc_o3( bounds%begg: ) ! atmospheric ozone (mol/mol)
real(r8) , intent(in) :: sabv ( bounds%begp: ) ! solar radiation absorbed by vegetation (W/m**2)

end subroutine CalcOzoneUptake_interface

subroutine CalcOzoneStress_interface(this, bounds, &
Expand Down
Loading