ch_pesticide_module Module


Uses

  • module~~ch_pesticide_module~~UsesGraph module~ch_pesticide_module ch_pesticide_module module~constituent_mass_module constituent_mass_module module~ch_pesticide_module->module~constituent_mass_module

Used by

  • module~~ch_pesticide_module~~UsedByGraph module~ch_pesticide_module ch_pesticide_module proc~aqu_1d_control aqu_1d_control proc~aqu_1d_control->module~ch_pesticide_module proc~basin_ch_pest_output basin_ch_pest_output proc~basin_ch_pest_output->module~ch_pesticide_module proc~ch_rtpest ch_rtpest proc~ch_rtpest->module~ch_pesticide_module proc~cha_pesticide_output cha_pesticide_output proc~cha_pesticide_output->module~ch_pesticide_module proc~header_pest header_pest proc~header_pest->module~ch_pesticide_module proc~sd_channel_control2 sd_channel_control2 proc~sd_channel_control2->module~ch_pesticide_module proc~sd_channel_control3 sd_channel_control3 proc~sd_channel_control3->module~ch_pesticide_module proc~sd_channel_read sd_channel_read proc~sd_channel_read->module~ch_pesticide_module

Variables

Type Visibility Attributes Name Initial
real, public :: frsol = 0.
real, public :: frsrb = 0.
type(ch_pesticide_processes), public :: ch_pestbz
type(ch_pesticide_output), public, dimension(:), allocatable, save :: chpst_d
type(ch_pesticide_output), public, dimension(:), allocatable, save :: chpst_m
type(ch_pesticide_output), public, dimension(:), allocatable, save :: chpst_y
type(ch_pesticide_output), public, dimension(:), allocatable, save :: chpst_a
type(ch_pesticide_output), public :: bchpst_d
type(ch_pesticide_output), public :: bchpst_m
type(ch_pesticide_output), public :: bchpst_y
type(ch_pesticide_output), public :: bchpst_a
type(ch_pesticide_output), public :: chpst
type(ch_pesticide_output), public :: chpstz
type(ch_pesticide_header), public :: chpest_hdr

Interfaces

public interface operator (+)

public interface operator (/)

public interface operator (//)


Derived Types

type, public ::  ch_pesticide_processes

Components

Type Visibility Attributes Name Initial
real, public :: tot_in = 0.
real, public :: sol_out = 0.
real, public :: sor_out = 0.
real, public :: react = 0.
real, public :: metab = 0.
real, public :: volat = 0.
real, public :: settle = 0.
real, public :: resus = 0.
real, public :: difus = 0.
real, public :: react_bot = 0.
real, public :: metab_bot = 0.
real, public :: bury = 0.
real, public :: water = 0.
real, public :: benthic = 0.

type, public ::  ch_pesticide_output

Components

Type Visibility Attributes Name Initial
type(ch_pesticide_processes), public, dimension (:), allocatable :: pest

type, public ::  ch_pesticide_header

Components

Type Visibility Attributes Name Initial
character(len=6), public :: day = "  jday"
character(len=6), public :: mo = "   mon"
character(len=6), public :: day_mo = "   day"
character(len=6), public :: yrc = "    yr"
character(len=8), public :: isd = "   unit "
character(len=8), public :: id = " gis_id "
character(len=16), public :: name = " name           "
character(len=16), public :: pest = " pesticide"
character(len=13), public :: tot_in = "tot_in_kg "
character(len=13), public :: sol_out = "sol_out_kg "
character(len=14), public :: sor_out = "sor_out_kg "
character(len=13), public :: react = "react_h2o_kg "
character(len=13), public :: metab = "metab_h2o_kg "
character(len=12), public :: volat = "volat_kg "
character(len=12), public :: settle = "settle_kg "
character(len=13), public :: resus = "resuspend_kg "
character(len=12), public :: difus = "diffuse_kg "
character(len=15), public :: react_bot = "react_benth_kg "
character(len=15), public :: metab_bot = "metab_benth_kg "
character(len=14), public :: bury = "bury_benth_kg "
character(len=14), public :: water = "water_stor_kg "
character(len=12), public :: benthic = "benthic_kg "

Functions

public function chpest_add(cho1, cho2) result(cho3)

Arguments

Type IntentOptional Attributes Name
type(ch_pesticide_processes), intent(in) :: cho1
type(ch_pesticide_processes), intent(in) :: cho2

Return Value type(ch_pesticide_processes)

public function chpest_div(ch1, const) result(ch2)

Arguments

Type IntentOptional Attributes Name
type(ch_pesticide_processes), intent(in) :: ch1
real, intent(in) :: const

Return Value type(ch_pesticide_processes)

public function chpest_ave(ch1, const) result(ch2)

Arguments

Type IntentOptional Attributes Name
type(ch_pesticide_processes), intent(in) :: ch1
real, intent(in) :: const

Return Value type(ch_pesticide_processes)