channel_module

Variables

Type	Visibility	Attributes		Name		Initial
integer,	public		::	jhyd	=	0
integer,	public		::	jsed	=	0
integer,	public		::	jnut	=	0
real,	public		::	rttime	=	0.
real,	public		::	ben_area	=	0.
real,	public		::	rchdep	=	0.
real,	public		::	rtevp	=	0.
real,	public		::	rttlc	=	0.
real,	public		::	pet_ch	=	0.
real,	public,	dimension (:), allocatable	::	hrtwtr
real,	public,	dimension (:), allocatable	::	hharea
real,	public,	dimension (:), allocatable	::	hdepth
real,	public,	dimension (:), allocatable	::	rhy
real,	public,	dimension (:), allocatable	::	hsdti
real,	public,	dimension (:), allocatable	::	hhtime
real,	public,	dimension (:), allocatable	::	hrttlc
real,	public,	dimension (:), allocatable	::	hrtevp
real,	public,	dimension (:), allocatable	::	hhstor
real,	public,	dimension (:), allocatable	::	hrchwtr
real,	public,	dimension (:), allocatable	::	halgae
real,	public,	dimension (:), allocatable	::	hbactlp
real,	public,	dimension (:), allocatable	::	hbactp
real,	public,	dimension (:), allocatable	::	hbod
real,	public,	dimension (:), allocatable	::	hchla
real,	public,	dimension (:), allocatable	::	hdisox
real,	public,	dimension (:), allocatable	::	hnh4
real,	public,	dimension (:), allocatable	::	hno2
real,	public,	dimension (:), allocatable	::	hno3
real,	public,	dimension (:), allocatable	::	horgn
real,	public,	dimension (:), allocatable	::	horgp
real,	public,	dimension (:), allocatable	::	hsedst
real,	public,	dimension (:), allocatable	::	hsedyld
real,	public,	dimension (:), allocatable	::	hsolp
real,	public,	dimension (:), allocatable	::	hsolpst
real,	public,	dimension (:), allocatable	::	hsorpst
real,	public,	dimension (:), allocatable	::	rchsep
real,	public		::	peakr	=	0.
real,	public		::	rcharea	=	0.
real,	public		::	sdti	=	0.
real,	public		::	bnkrte	=	0.
real,	public		::	degrte	=	0.
real,	public		::	sedrch	=	0.
real,	public		::	rch_san	=	0.
real,	public		::	rch_sil	=	0.
real,	public		::	rch_cla	=	0.
real,	public		::	rch_sag	=	0.
real,	public		::	rtwtr_d	=	0.
real,	public		::	rt_delt	=	0.
real,	public		::	rch_lag	=	0.
real,	public		::	rch_gra	=	0.
real,	public		::	rtwtr	=	0.
real,	public		::	wtrin	=	0.
integer,	public		::	sed_ch	=	0
type(channel),	public,	dimension(:), allocatable	::	ch
type(regional_output_channel),	public,	dimension (:), allocatable	::	rch_d
type(regional_output_channel),	public,	dimension (:), allocatable	::	rch_m
type(regional_output_channel),	public,	dimension (:), allocatable	::	rch_y
type(regional_output_channel),	public,	dimension (:), allocatable	::	rch_a
type(ch_output),	public,	dimension(:), allocatable, save	::	ch_d
type(ch_output),	public,	dimension(:), allocatable, save	::	ch_m
type(ch_output),	public,	dimension(:), allocatable, save	::	ch_y
type(ch_output),	public,	dimension(:), allocatable, save	::	ch_a
type(ch_output),	public		::	bch_d
type(ch_output),	public		::	bch_m
type(ch_output),	public		::	bch_y
type(ch_output),	public		::	bch_a
type(ch_output),	public		::	chz
type(ch_header),	public		::	ch_hdr
type(ch_header_units),	public		::	ch_hdr_units

Interfaces

public interface operator (+)

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

Arguments

Type	Intent	Optional	Attributes		Name
type(ch_output),	intent(in)			::	cho1
type(ch_output),	intent(in)			::	cho2

Return Value type(ch_output)

public interface operator (/)

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

Arguments

Type	Intent	Optional	Attributes		Name
type(ch_output),	intent(in)			::	ch1
real,	intent(in)			::	const

Return Value type(ch_output)

public interface operator (*)

public function ch_mult(const, chn1) result(chn2)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	const
type(ch_output),	intent(in)			::	chn1

Return Value type(ch_output)

Derived Types

type, public :: channel

Components

Type	Visibility		Name		Initial
real,	public	::	algae	=	0.
real,	public	::	ammonian	=	0.
real,	public	::	bankst	=	0.
real,	public	::	li	=	0.
real,	public	::	orgn	=	0.
real,	public	::	orgp	=	0.
real,	public	::	si	=	0.
real,	public	::	wi	=	0.
real,	public	::	di	=	0.
real,	public	::	chlora	=	0.
real,	public	::	pst_conc	=	0.
real,	public	::	dep_chan	=	0.
real,	public	::	disolvp	=	0.
real,	public	::	drift	=	0.
real,	public	::	flwin	=	0.
real,	public	::	flwout	=	0.
real,	public	::	nitraten	=	0.
real,	public	::	nitriten	=	0.
real,	public	::	organicn	=	0.
real,	public	::	organicp	=	0.
real,	public	::	rch_bactlp	=	0.
real,	public	::	rch_bactp	=	0.
real,	public	::	rch_cbod	=	0.
real,	public	::	rch_dox	=	0.
real,	public	::	rchstor	=	0.
real,	public	::	sedst	=	0.
real,	public	::	vel_chan	=	0.
real,	public	::	bed_san	=	0.
real,	public	::	bed_sil	=	0.
real,	public	::	bed_cla	=	0.
real,	public	::	bed_gra	=	0.
real,	public	::	bnk_san	=	0.
real,	public	::	bnk_sil	=	0.
real,	public	::	bnk_cla	=	0.
real,	public	::	bnk_gra	=	0.
real,	public	::	depfp	=	0.
real,	public	::	depprfp	=	0.
real,	public	::	depsilfp	=	0.
real,	public	::	depclafp	=	0.
real,	public	::	depch	=	0.
real,	public	::	depprch	=	0.
real,	public	::	depsanch	=	0.
real,	public	::	depsilch	=	0.
real,	public	::	depclach	=	0.
real,	public	::	depsagch	=	0.
real,	public	::	deplagch	=	0.
real,	public	::	depgrach	=	0.
real,	public	::	sanst	=	0.
real,	public	::	silst	=	0.
real,	public	::	clast	=	0.
real,	public	::	sagst	=	0.
real,	public	::	lagst	=	0.
real,	public	::	grast	=	0.
real,	public	::	wattemp	=	0.
real,	public	::	bactp	=	0.
real,	public	::	chfloodvol	=	0.
real,	public	::	bactlp	=	0.

type, public :: ch_output

Components

Type	Visibility		Name		Initial
real,	public	::	flo_in	=	0.
real,	public	::	flo_out	=	0.
real,	public	::	evap	=	0.
real,	public	::	tloss	=	0.
real,	public	::	sed_in	=	0.
real,	public	::	sed_out	=	0.
real,	public	::	sed_conc	=	0.
real,	public	::	orgn_in	=	0.
real,	public	::	orgn_out	=	0.
real,	public	::	orgp_in	=	0.
real,	public	::	orgp_out	=	0.
real,	public	::	no3_in	=	0.
real,	public	::	no3_out	=	0.
real,	public	::	nh4_in	=	0.
real,	public	::	nh4_out	=	0.
real,	public	::	no2_in	=	0.
real,	public	::	no2_out	=	0.
real,	public	::	solp_in	=	0.
real,	public	::	solp_out	=	0.
real,	public	::	chla_in	=	0.
real,	public	::	chla_out	=	0.
real,	public	::	cbod_in	=	0.
real,	public	::	cbod_out	=	0.
real,	public	::	dis_in	=	0.
real,	public	::	dis_out	=	0.
real,	public	::	solpst_in	=	0.
real,	public	::	solpst_out	=	0.
real,	public	::	sorbpst_in	=	0.
real,	public	::	sorbpst_out	=	0.
real,	public	::	react	=	0.
real,	public	::	volat	=	0.
real,	public	::	setlpst	=	0.
real,	public	::	resuspst	=	0.
real,	public	::	difus	=	0.
real,	public	::	reactb	=	0.
real,	public	::	bury	=	0.
real,	public	::	sedpest	=	0.
real,	public	::	bacp	=	0.
real,	public	::	baclp	=	0.
real,	public	::	met1	=	0.
real,	public	::	met2	=	0.
real,	public	::	met3	=	0.
real,	public	::	sand_in	=	0.
real,	public	::	sand_out	=	0.
real,	public	::	silt_in	=	0.
real,	public	::	silt_out	=	0.
real,	public	::	clay_in	=	0.
real,	public	::	clay_out	=	0.
real,	public	::	smag_in	=	0.
real,	public	::	smag_out	=	0.
real,	public	::	lag_in	=	0.
real,	public	::	lag_out	=	0.
real,	public	::	grvl_in	=	0.
real,	public	::	grvl_out	=	0.
real,	public	::	bnk_ero	=	0.
real,	public	::	ch_deg	=	0.
real,	public	::	ch_dep	=	0.
real,	public	::	fp_dep	=	0.
real,	public	::	tot_ssed	=	0.

type, public :: regional_output_channel

Components

Type	Visibility	Attributes		Name		Initial
type(ch_output),	public,	dimension (:), allocatable	::	ord

type, public :: ch_header

Components

Type	Visibility		Name		Initial
character(len=6),	public	::	day	=	" jday"
character(len=6),	public	::	mo	=	" mon"
character(len=6),	public	::	day_mo	=	" day"
character(len=5),	public	::	yrc	=	" yr"
character(len=9),	public	::	isd	=	" unit "
character(len=8),	public	::	id	=	" gis_id "
character(len=16),	public	::	name	=	" name "
character(len=16),	public	::	flo_in	=	" flo_in "
character(len=15),	public	::	flo_out	=	" flo_out "
character(len=15),	public	::	evap	=	" evap "
character(len=15),	public	::	tloss	=	" tloss "
character(len=15),	public	::	sed_in	=	" sed_in "
character(len=15),	public	::	sed_out	=	" sed_out "
character(len=15),	public	::	sed_conc	=	" sed_conc "
character(len=15),	public	::	orgn_in	=	" orgn_in "
character(len=15),	public	::	orgn_out	=	" orgn_out "
character(len=15),	public	::	orgp_in	=	" orgp_in "
character(len=15),	public	::	orgp_out	=	" orgp_out "
character(len=15),	public	::	no3_in	=	" no3_in "
character(len=15),	public	::	no3_out	=	" no3_out "
character(len=15),	public	::	nh4_in	=	" nh4_in "
character(len=15),	public	::	nh4_out	=	" nh4_out "
character(len=15),	public	::	no2_in	=	" no2_in "
character(len=15),	public	::	no2_out	=	" no2_out "
character(len=15),	public	::	solp_in	=	" solp_in "
character(len=15),	public	::	solp_out	=	" solp_out "
character(len=15),	public	::	chla_in	=	" chla_in "
character(len=15),	public	::	chla_out	=	" chla_out "
character(len=15),	public	::	cbod_in	=	" cbod_in "
character(len=15),	public	::	cbod_out	=	" cbod_out "
character(len=15),	public	::	dis_in	=	" dis_in "
character(len=15),	public	::	dis_out	=	" dis_out "
character(len=15),	public	::	solpst_in	=	" solpst_in "
character(len=15),	public	::	solpst_out	=	" solpst_out "
character(len=15),	public	::	sorbpst_in	=	" sorbpst_in "
character(len=15),	public	::	sorbpst_out	=	" sorbpst_out "
character(len=15),	public	::	react	=	" react "
character(len=15),	public	::	volat	=	" volat "
character(len=15),	public	::	setlpst	=	" setlpst "
character(len=15),	public	::	resuspst	=	" resuspst "
character(len=15),	public	::	difus	=	" difus "
character(len=15),	public	::	reactb	=	" reactb "
character(len=15),	public	::	bury	=	" bury "
character(len=15),	public	::	sedpest	=	" sedpest "
character(len=15),	public	::	bacp	=	" bacp"
character(len=15),	public	::	baclp	=	" baclp"
character(len=15),	public	::	met1	=	" met1"
character(len=15),	public	::	met2	=	" met2"
character(len=15),	public	::	met3	=	" met3"
character(len=15),	public	::	sand_in	=	" sand_in"
character(len=15),	public	::	sand_out	=	" sand_out"
character(len=15),	public	::	silt_in	=	" silt_in"
character(len=15),	public	::	silt_out	=	" silt_out"
character(len=15),	public	::	clay_in	=	" clay_in"
character(len=15),	public	::	clay_out	=	" clay_out"
character(len=15),	public	::	smag_in	=	" smag_in"
character(len=15),	public	::	smag_out	=	" smag_out"
character(len=15),	public	::	lag_in	=	" lag_in"
character(len=15),	public	::	lag_out	=	" lag_out"
character(len=15),	public	::	grvl_in	=	" grvl_in"
character(len=15),	public	::	grvl_out	=	" grvl_out"
character(len=15),	public	::	bnk_ero	=	" bnk_ero"
character(len=15),	public	::	ch_deg	=	" ch_deg"
character(len=15),	public	::	ch_dep	=	" ch_dep"
character(len=15),	public	::	fp_dep	=	" fp_dep"
character(len=15),	public	::	tot_ssed	=	" tot_ssed"

type, public :: ch_header_units

Components

Type	Visibility		Name		Initial
character(len=6),	public	::	day	=	" "
character(len=6),	public	::	mo	=	" "
character(len=6),	public	::	day_mo	=	" "
character(len=5),	public	::	yrc	=	" "
character(len=9),	public	::	isd	=	" "
character(len=8),	public	::	id	=	" "
character(len=16),	public	::	name	=	" "
character(len=16),	public	::	flo_in	=	" ha-m"
character(len=15),	public	::	flo_out	=	" ha-m"
character(len=15),	public	::	evap	=	" ha-m"
character(len=15),	public	::	tloss	=	" ha-m"
character(len=15),	public	::	sed_in	=	" tons"
character(len=15),	public	::	sed_out	=	" tons"
character(len=15),	public	::	sed_conc	=	" mg/L"
character(len=15),	public	::	orgn_in	=	" kgN"
character(len=15),	public	::	orgn_out	=	" kgN"
character(len=15),	public	::	orgp_in	=	" kgP"
character(len=15),	public	::	orgp_out	=	" kgP"
character(len=15),	public	::	no3_in	=	" kgN"
character(len=15),	public	::	no3_out	=	" kgN"
character(len=15),	public	::	nh4_in	=	" kg"
character(len=15),	public	::	nh4_out	=	" kg"
character(len=15),	public	::	no2_in	=	" kg"
character(len=15),	public	::	no2_out	=	" kg"
character(len=15),	public	::	solp_in	=	" kgP"
character(len=15),	public	::	solp_out	=	" kgP"
character(len=15),	public	::	chla_in	=	" kg"
character(len=15),	public	::	chla_out	=	" kg"
character(len=15),	public	::	cbod_in	=	" kg"
character(len=15),	public	::	cbod_out	=	" kg"
character(len=15),	public	::	dis_in	=	" kg"
character(len=15),	public	::	dis_out	=	" kg"
character(len=15),	public	::	solpst_in	=	" mg_pst"
character(len=15),	public	::	solpst_out	=	" mg_pst"
character(len=15),	public	::	sorbpst_in	=	" mg_pst"
character(len=15),	public	::	sorbpst_out	=	" mg_pst"
character(len=15),	public	::	react	=	" mg_pst"
character(len=15),	public	::	volat	=	" mg"
character(len=15),	public	::	setlpst	=	" mg_pst"
character(len=15),	public	::	resuspst	=	" mg"
character(len=15),	public	::	difus	=	" mg_pst"
character(len=15),	public	::	reactb	=	" mg"
character(len=15),	public	::	bury	=	" mg"
character(len=15),	public	::	sedpest	=	" mg"
character(len=15),	public	::	bacp	=	" ----"
character(len=15),	public	::	baclp	=	" ----"
character(len=15),	public	::	met1	=	" ----"
character(len=15),	public	::	met2	=	" ----"
character(len=15),	public	::	met3	=	" ----"
character(len=15),	public	::	sand_in	=	" ----"
character(len=15),	public	::	sand_out	=	" ----"
character(len=15),	public	::	silt_in	=	" ----"
character(len=15),	public	::	silt_out	=	" ----"
character(len=15),	public	::	clay_in	=	" ----"
character(len=15),	public	::	clay_out	=	" ----"
character(len=15),	public	::	smag_in	=	" ----"
character(len=15),	public	::	smag_out	=	" ----"
character(len=15),	public	::	lag_in	=	" ----"
character(len=15),	public	::	lag_out	=	" ----"
character(len=15),	public	::	grvl_in	=	" ----"
character(len=15),	public	::	grvl_out	=	" ----"
character(len=15),	public	::	bnk_ero	=	" ----"
character(len=15),	public	::	ch_deg	=	" ----"
character(len=15),	public	::	ch_dep	=	" ----"
character(len=15),	public	::	fp_dep	=	" ----"
character(len=15),	public	::	tot_ssed	=	" ----"

Functions

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

Arguments

Type	Intent	Optional	Attributes		Name
type(ch_output),	intent(in)			::	cho1
type(ch_output),	intent(in)			::	cho2

Return Value type(ch_output)

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

Arguments

Type	Intent	Optional	Attributes		Name
type(ch_output),	intent(in)			::	ch1
real,	intent(in)			::	const

Return Value type(ch_output)

public function ch_mult(const, chn1) result(chn2)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	const
type(ch_output),	intent(in)			::	chn1

channel_module Module

Contents

Variables

Interfaces

Derived Types

Functions

Used by

Variables

Interfaces

public interface operator (+)

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

Arguments

Return Value type(ch_output)

public interface operator (/)

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

Arguments

Return Value type(ch_output)

public interface operator (*)

public function ch_mult(const, chn1) result(chn2)

Arguments

Return Value type(ch_output)

Derived Types

type, public :: channel

Components

type, public :: ch_output

Components

type, public :: regional_output_channel

Components

type, public :: ch_header

Components

type, public :: ch_header_units

Components

Functions

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

Arguments

Return Value type(ch_output)

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

Arguments

Return Value type(ch_output)

public function ch_mult(const, chn1) result(chn2)

Arguments

Return Value type(ch_output)