pesticide_data_module Module


Used by

  • module~~pesticide_data_module~~UsedByGraph module~pesticide_data_module pesticide_data_module proc~aqu_1d_control aqu_1d_control proc~aqu_1d_control->module~pesticide_data_module proc~cal_parm_select cal_parm_select proc~cal_parm_select->module~pesticide_data_module proc~ch_read ch_read proc~ch_read->module~pesticide_data_module proc~ch_rtpest ch_rtpest proc~ch_rtpest->module~pesticide_data_module proc~constit_db_read constit_db_read proc~constit_db_read->module~pesticide_data_module proc~cs_hru_init cs_hru_init proc~cs_hru_init->module~pesticide_data_module proc~dtbl_lum_read dtbl_lum_read proc~dtbl_lum_read->module~pesticide_data_module proc~hydro_init hydro_init proc~hydro_init->module~pesticide_data_module proc~mgt_harvbiomass mgt_harvbiomass proc~mgt_harvbiomass->module~pesticide_data_module proc~mgt_harvtuber mgt_harvtuber proc~mgt_harvtuber->module~pesticide_data_module proc~pest_decay pest_decay proc~pest_decay->module~pesticide_data_module proc~pest_lch pest_lch proc~pest_lch->module~pesticide_data_module proc~pest_metabolite_read pest_metabolite_read proc~pest_metabolite_read->module~pesticide_data_module proc~pest_parm_read pest_parm_read proc~pest_parm_read->module~pesticide_data_module proc~pest_pesty pest_pesty proc~pest_pesty->module~pesticide_data_module proc~pest_pl_up pest_pl_up proc~pest_pl_up->module~pesticide_data_module proc~pest_soil_tot pest_soil_tot proc~pest_soil_tot->module~pesticide_data_module proc~pest_washp pest_washp proc~pest_washp->module~pesticide_data_module proc~pesticide_init pesticide_init proc~pesticide_init->module~pesticide_data_module proc~read_mgtops read_mgtops proc~read_mgtops->module~pesticide_data_module proc~res_initial res_initial proc~res_initial->module~pesticide_data_module proc~res_pest res_pest proc~res_pest->module~pesticide_data_module proc~res_read res_read proc~res_read->module~pesticide_data_module proc~salt_hru_init salt_hru_init proc~salt_hru_init->module~pesticide_data_module proc~sd_channel_control3 sd_channel_control3 proc~sd_channel_control3->module~pesticide_data_module proc~sd_channel_read sd_channel_read proc~sd_channel_read->module~pesticide_data_module proc~sd_hydsed_init sd_hydsed_init proc~sd_hydsed_init->module~pesticide_data_module proc~swr_substor swr_substor proc~swr_substor->module~pesticide_data_module proc~wet_read wet_read proc~wet_read->module~pesticide_data_module

Variables

Type Visibility Attributes Name Initial
type(pesticide_db), public, dimension(:), allocatable, save :: pestdb
type(pesticide_cp), public, dimension(:), allocatable, save :: pestcp

--- scenario flags for plant-uptake behaviour (hardcoded) --- pest_uptake_lamshoeft : .true. = exact Lamshoeft PUF log-ratio formulation .false. = original linear TSCF * C * V (default) pest_uptake_skip_ly1 : .true. = skip layer 1 in root uptake (dominated by evaporation) .false. = include all layers (default) -- per-pesticide parameters (read from pesticide.pes, stored in pesticide_db) -- harvest_sink (pesticide_db field): 1=plant is 100% sink (uptake permanently lost); 0=accumulates in pl_in, returned to soil on harvest/kill resistance_n (pesticide_db field): 0=actual st conc; 1=field-capacity conc; st_eff = st + n * max(0, fc - st)
logical, public, parameter :: pest_uptake_lamshoeft = .false.
logical, public, parameter :: pest_uptake_skip_ly1 = .false.

Derived Types

type, public ::  pesticide_db

Components

Type Visibility Attributes Name Initial
character(len=16), public :: name = ""

|pesticide name
real, public :: koc = 0.

(mL/g) |soil adsorption coeff normalized for soil org carbon content
real, public :: washoff = 0.

none |frac of pesticide on foliage which is washed off by rainfall event

real, public :: foliar_hlife = 0.

days |half-life of pest on foliage
real, public :: soil_hlife = 0.

days |half-life of pest in soil
real, public :: solub = 0.

mg/L (ppm) |solubility of chemical in water
real, public :: aq_hlife = 0.

days |aquatic half-life
real, public :: aq_volat = 0.

m/day |aquatic volatilization coeff
real, public :: mol_wt = 0.

g/mol |molecular weight - to calulate mixing velocity
real, public :: aq_resus = 0.

m/day |aquatic resuspension velocity for pesticide sorbed to sediment
real, public :: aq_settle = 0.

m/day |aquatic settling velocity for pesticide sorbed to sediment
real, public :: ben_act_dep = 0.

m |depth of active benthic layer
real, public :: ben_bury = 0.

m/day |burial velocity in benthic sediment
real, public :: ben_hlife = 0.

days |half-life of pest in benthic sediment
real, public :: pl_uptake = 0.

none |fraction taken up by plant

real, public :: harvest_sink = 1.

0/1 |1=plant is 100% sink (lost on uptake); 0=accumulates in pl_in, returned to soil on harvest/kill
real, public :: resistance_n = 1.

0-1 |resistance blending: 0=actual st conc; 1=field-capacity conc; st_eff = st + n*max(0,fc-st)
character(len=32), public :: descrip = ""

type, public ::  daughter_decay_fractions

Components

Type Visibility Attributes Name Initial
character(len=16), public :: name = ""

daughter pesticide name
integer, public :: num = 0

sequential pesticide number in simulation
real, public :: foliar_fr = 0.

0-1 |fraction of parent foilar degrading to daughter
real, public :: soil_fr = 0.

0-1 |fraction of parent soil degrading to daughter
real, public :: aq_fr = 0.

0-1 |fraction of parent aquatic degrading to daughter
real, public :: ben_fr = 0.

0-1 |fraction of parent benthic degrading to daughter

type, public ::  pesticide_cp

calculated parameters from input parms

Components

Type Visibility Attributes Name Initial
integer, public :: num_metab = 0

number of metabolites
type(daughter_decay_fractions), public, dimension(:), allocatable :: daughter
real, public :: decay_f = 0.

none |exp of the rate const for degradation of the pest on foliage
real, public :: decay_s = 0.

none |exp of the rate const for degradation of the pest in soil
real, public :: decay_a = 0.

none |exp of the rate const for degradation of the pest in aquatic
real, public :: decay_b = 0.

none |exp of the rate const for degradation of the pest in benthic layer