Skip to content

Commit db53c65

Browse files
authored
Merge pull request #282 from crollinson/Forestry_Testing
New Forestry Routine Features
2 parents 3467f88 + 6067224 commit db53c65

28 files changed

Lines changed: 1001 additions & 1601 deletions

BRAMS/Template/RAMSIN

Lines changed: 8 additions & 51 deletions
Original file line numberDiff line numberDiff line change
@@ -2129,9 +2129,10 @@ $ED2_INFO
21292129
! SLCOL_DATABASE -- If ISLCOLFLG=1, this variable specifies the path and prefix of !
21302130
! soil colour data base. !
21312131
! LU_DATABASE -- land-use change disturbance rates database, used only when !
2132-
! IANTH_DISTURB is set to 1. Fill with the path and the prefix. !
2132+
! IANTH_DISTURB is set to 1 or 2. Fill with the path and the !
2133+
! prefix. !
21332134
! PLANTATION_FILE -- Character string for the path to the forest plantation fraction !
2134-
! file. This is used only when IANTH_DISTURB is set to 1 and !
2135+
! file. This is used only when IANTH_DISTURB is set to 1 or 2 and !
21352136
! the user wants to simulate forest plantations. Otherwise, leave !
21362137
! it empty (PLANTATION_FILE='') !
21372138
! THSUMS_DATABASE -- input directory with dataset to initialise chilling-degree and !
@@ -2827,43 +2828,11 @@ $ED2_INFO
28272828
! IANTH_DISTURB -- This flag controls whether to include anthropogenic disturbances !
28282829
! such as land clearing, abandonment, and logging. !
28292830
! 0. No anthropogenic disturbance. !
2830-
! 1. Use anthropogenic disturbance dataset (ED-2.2 default when !
2831-
! anthropogenic disturbance is sought). !
2832-
! 2. Site-specific forest plantation or selective logging cycle. !
2833-
! (Longo et al., in prep.) (Beta) !
2834-
! !
2835-
! The following variables are used only when IANTH_DISTURB is 2. !
2836-
! !
2837-
! SL_SCALE -- This flag assumes whether the simulation scale is local or !
2838-
! landscape. This controls the recurrence of logging. !
2839-
! 0. Local. The simulation represents one logging unit. Apply !
2840-
! logging only once every SL_NYRS !
2841-
! 1. Landscape. The simulation represents a landscape. Logging !
2842-
! occurs every year but it is restricted to patches with age !
2843-
! greater than or equal to SL_NYRS !
2844-
! SL_YR_FIRST -- The first year to apply logging. In case IANTH_DISTURB is 2 it !
2845-
! must be a simulation year (i.e. between IYEARA and IYEARZ). !
2846-
! SL_NYRS -- This variable defines the logging cycle, in years (see variable !
2847-
! SL_SCALE above) !
2848-
! SL_PFT -- PFTs that can be harvested. !
2849-
! SL_PROB_HARVEST -- Logging intensity (one value for each PFT provided in SL_PFT). !
2850-
! Values should be between 0.0 and 1.0, with 0 meaning no !
2851-
! removal, and 1 removal of all trees needed to meet demands. !
2852-
! SL_MINDBH_HARVEST -- Minimum DBH for logging (one value for each PFT provided in !
2853-
! SL_PFT). !
2854-
! SL_BIOMASS_HARVEST -- Target biomass to be harvested in each cycle, in kgC/m2. If !
2855-
! zero, then all trees that meet the minimum DBH and minimum !
2856-
! patch age will be logged. In case you don't want logging to !
2857-
! occur, don't set this value to zero! Instead, set IANTH_DISTURB !
2858-
! to zero. !
2859-
! !
2860-
! The following variables are used when IANTH_DISTURB is 1 or 2. !
2861-
! !
2862-
! SL_SKID_REL_AREA -- area damaged by skid trails (relative to felled area). !
2863-
! SL_SKID_DBH_THRESH -- DBH threshold for damage caused in skid trails. !
2864-
! SL_SKID_S_GTHARV -- survivorship of trees with DBH > MINDBH in skid trails. !
2865-
! SL_SKID_S_LTHARV -- survivorship of trees with DBH < MINDBH in skid trails. !
2866-
! SL_FELLING_S_LTHARV -- survivorship of trees with DBH < MINDBH in felling gaps. !
2831+
! 1. Use anthropogenic disturbance datasets, with either mass-based !
2832+
! harvesting targets, or selective logging when the target is -1 !
2833+
! (ED-2.2 default when anthropogenic disturbance is sought). !
2834+
! 2. Use anthropogenic disturbance datasets, with area-based !
2835+
! harvesting targets (beta). !
28672836
! !
28682837
! Cropland variables, used when IANTH_DISTURB is 1 or 2. !
28692838
! !
@@ -2872,18 +2841,6 @@ $ED2_INFO
28722841
! CL_FLEAF_HARVEST -- fraction of leaves that is harvested in croplands. !
28732842
!---------------------------------------------------------------------------------------!
28742843
IANTH_DISTURB = 0,
2875-
SL_SCALE = 1,
2876-
SL_YR_FIRST = 2017,
2877-
SL_NYRS = 40,
2878-
SL_PFT = 2,3,4,
2879-
SL_INTENSITY = 1.0,1.0,1.0,
2880-
SL_MINDBH_HARVEST = 35.0,35.0,35.0,
2881-
SL_BIOMASS_HARVEST = 0.,
2882-
SL_SKID_REL_AREA = 0.6,
2883-
SL_SKID_DBH_THRESH = 30.,
2884-
SL_SKID_S_GTHARV = 1.00,
2885-
SL_SKID_S_LTHARV = 0.60,
2886-
SL_FELLING_S_LTHARV = 0.35,
28872844
CL_FSEEDS_HARVEST = 0.75,
28882845
CL_FSTORAGE_HARVEST = 0.0,
28892846
CL_FLEAF_HARVEST = 0.0,

BRAMS/run/RAMSIN

Lines changed: 8 additions & 39 deletions
Original file line numberDiff line numberDiff line change
@@ -2147,9 +2147,10 @@ $ED2_INFO
21472147
! SLCOL_DATABASE -- If ISLCOLFLG=1, this variable specifies the path and prefix of !
21482148
! soil colour data base. !
21492149
! LU_DATABASE -- land-use change disturbance rates database, used only when !
2150-
! IANTH_DISTURB is set to 1. Fill with the path and the prefix. !
2150+
! IANTH_DISTURB is set to 1 or 2. Fill with the path and the !
2151+
! prefix. !
21512152
! PLANTATION_FILE -- Character string for the path to the forest plantation fraction !
2152-
! file. This is used only when IANTH_DISTURB is set to 1 and !
2153+
! file. This is used only when IANTH_DISTURB is set to 1 or 2 and !
21532154
! the user wants to simulate forest plantations. Otherwise, leave !
21542155
! it empty (PLANTATION_FILE='') !
21552156
! THSUMS_DATABASE -- input directory with dataset to initialise chilling-degree and !
@@ -2846,43 +2847,11 @@ $ED2_INFO
28462847
! IANTH_DISTURB -- This flag controls whether to include anthropogenic disturbances !
28472848
! such as land clearing, abandonment, and logging. !
28482849
! 0. No anthropogenic disturbance. !
2849-
! 1. Use anthropogenic disturbance dataset (ED-2.2 default when !
2850-
! anthropogenic disturbance is sought). !
2851-
! 2. Site-specific forest plantation or selective logging cycle. !
2852-
! (Longo et al., in prep.) (Beta) !
2853-
! !
2854-
! The following variables are used only when IANTH_DISTURB is 2. !
2855-
! !
2856-
! SL_SCALE -- This flag assumes whether the simulation scale is local or !
2857-
! landscape. This controls the recurrence of logging. !
2858-
! 0. Local. The simulation represents one logging unit. Apply !
2859-
! logging only once every SL_NYRS !
2860-
! 1. Landscape. The simulation represents a landscape. Logging !
2861-
! occurs every year but it is restricted to patches with age !
2862-
! greater than or equal to SL_NYRS !
2863-
! SL_YR_FIRST -- The first year to apply logging. In case IANTH_DISTURB is 2 it !
2864-
! must be a simulation year (i.e. between IYEARA and IYEARZ). !
2865-
! SL_NYRS -- This variable defines the logging cycle, in years (see variable !
2866-
! SL_SCALE above) !
2867-
! SL_PFT -- PFTs that can be harvested. !
2868-
! SL_PROB_HARVEST -- Logging intensity (one value for each PFT provided in SL_PFT). !
2869-
! Values should be between 0.0 and 1.0, with 0 meaning no !
2870-
! removal, and 1 removal of all trees needed to meet demands. !
2871-
! SL_MINDBH_HARVEST -- Minimum DBH for logging (one value for each PFT provided in !
2872-
! SL_PFT). !
2873-
! SL_BIOMASS_HARVEST -- Target biomass to be harvested in each cycle, in kgC/m2. If !
2874-
! zero, then all trees that meet the minimum DBH and minimum !
2875-
! patch age will be logged. In case you don't want logging to !
2876-
! occur, don't set this value to zero! Instead, set IANTH_DISTURB !
2877-
! to zero. !
2878-
! !
2879-
! The following variables are used when IANTH_DISTURB is 1 or 2. !
2880-
! !
2881-
! SL_SKID_REL_AREA -- area damaged by skid trails (relative to felled area). !
2882-
! SL_SKID_DBH_THRESH -- DBH threshold for damage caused in skid trails. !
2883-
! SL_SKID_S_GTHARV -- survivorship of trees with DBH > MINDBH in skid trails. !
2884-
! SL_SKID_S_LTHARV -- survivorship of trees with DBH < MINDBH in skid trails. !
2885-
! SL_FELLING_S_LTHARV -- survivorship of trees with DBH < MINDBH in felling gaps. !
2850+
! 1. Use anthropogenic disturbance datasets, with either mass-based !
2851+
! harvesting targets, or selective logging when the target is -1 !
2852+
! (ED-2.2 default when anthropogenic disturbance is sought). !
2853+
! 2. Use anthropogenic disturbance datasets, with area-based !
2854+
! harvesting targets (beta). !
28862855
! !
28872856
! Cropland variables, used when IANTH_DISTURB is 1 or 2. !
28882857
! !

BRAMS/src/ed2/edcp_load_namelist.f90

Lines changed: 7 additions & 22 deletions
Original file line numberDiff line numberDiff line change
@@ -76,18 +76,6 @@ subroutine read_ednl(iunit,filename)
7676
use disturb_coms , only : include_fire & ! intent(out)
7777
, fire_parameter & ! intent(out)
7878
, ianth_disturb & ! intent(out)
79-
, sl_scale & ! intent(out)
80-
, sl_yr_first & ! intent(out)
81-
, sl_nyrs & ! intent(out)
82-
, sl_pft & ! intent(out)
83-
, sl_prob_harvest & ! intent(out)
84-
, sl_mindbh_harvest & ! intent(out)
85-
, sl_biomass_harvest & ! intent(out)
86-
, sl_skid_rel_area & ! intent(out)
87-
, sl_skid_dbh_thresh & ! intent(out)
88-
, sl_skid_s_gtharv & ! intent(out)
89-
, sl_skid_s_ltharv & ! intent(out)
90-
, sl_felling_s_ltharv & ! intent(out)
9179
, cl_fseeds_harvest & ! intent(out)
9280
, cl_fstorage_harvest & ! intent(out)
9381
, cl_fleaf_harvest & ! intent(out)
@@ -263,16 +251,13 @@ subroutine read_ednl(iunit,filename)
263251
,trait_plasticity_scheme,iddmort_scheme,cbr_scheme,ddmort_const &
264252
,carbon_mortality_scheme,hydraulic_mortality_scheme &
265253
,thetacrit &
266-
,quantum_efficiency_t,n_plant_lim,n_decomp_lim,include_fire,sl_pft &
267-
,sl_prob_harvest,sl_mindbh_harvest,sl_biomass_harvest &
268-
,sl_skid_rel_area,sl_skid_dbh_thresh,sl_skid_s_gtharv &
269-
,sl_skid_s_ltharv,sl_felling_s_ltharv,cl_fseeds_harvest &
270-
,cl_fstorage_harvest,cl_fleaf_harvest,icanturb,include_these_pft &
271-
,pasture_stock,agri_stock,plantation_stock,pft_1st_check,ifusion &
272-
,maxpatch,maxcohort,min_patch_area,treefall_disturbance_rate &
273-
,time2canopy,iprintpolys,npvars,printvars,pfmtstr,ipmin,ipmax &
274-
,imetrad,iphenys1,iphenysf,iphenyf1,iphenyff,iedcnfgf,event_file &
275-
,phenpath
254+
,quantum_efficiency_t,n_plant_lim,n_decomp_lim,include_fire &
255+
,ianth_disturb,cl_fseeds_harvest,cl_fstorage_harvest &
256+
,cl_fleaf_harvest,icanturb,include_these_pft,pasture_stock &
257+
,agri_stock,plantation_stock,pft_1st_check,ifusion,maxpatch &
258+
,maxcohort,min_patch_area,treefall_disturbance_rate,time2canopy &
259+
,iprintpolys,npvars,printvars,pfmtstr,ipmin,ipmax,imetrad,iphenys1 &
260+
,iphenysf,iphenyf1,iphenyff,iedcnfgf,event_file,phenpath
276261

277262
!----- Initialise some database variables with a non-sense path. -----------------------!
278263
islcolflg (:) = undef_integer

0 commit comments

Comments
 (0)