sd_channel_module

routines for swatdeg_hru module

this function multiplies the rating curve by a ratio used when interpolating flow rates in flood routing

Variables

Type	Visibility	Attributes		Name		Initial
integer,	public		::	maxint	=	0
real,	public		::	wtemp	=	0.
real,	public		::	peakrate	=	0.
real,	public		::	sed_reduc_t	=	0.
real,	public		::	no3_reduc_kg	=	0.
real,	public		::	tp_reduc_kg	=	0.
real,	public		::	tp_reduc	=	0.
real,	public		::	srp_reduc_kg	=	0.
real,	public,	dimension(:), allocatable	::	hyd_rad
real,	public,	dimension(:), allocatable	::	trav_time
real,	public,	dimension(:), allocatable	::	flo_dep
real,	public,	dimension(:), allocatable	::	timeint
type(swatdeg_hydsed_data),	public,	dimension (:), allocatable	::	sd_chd
type(swatdeg_sednut_data),	public,	dimension (:), allocatable	::	sd_chd1			channel sediment budget for output
type(channel_sediment_budget_output),	public,	dimension (:), allocatable	::	ch_sed_bud
type(channel_sediment_budget_output),	public,	dimension (:), allocatable	::	ch_sed_bud_m
type(channel_sediment_budget_output),	public,	dimension (:), allocatable	::	ch_sed_bud_y
type(channel_sediment_budget_output),	public,	dimension (:), allocatable	::	ch_sed_bud_a
type(channel_sediment_budget_output),	public		::	ch_sed_budz
type(channel_sediment_budget_output),	public		::	bch_sed_bud_d
type(channel_sediment_budget_output),	public		::	bch_sed_bud_m
type(channel_sediment_budget_output),	public		::	bch_sed_bud_y
type(channel_sediment_budget_output),	public		::	bch_sed_bud_a
type(channel_morphology_output),	public,	dimension (:), allocatable	::	ch_morph
type(gully_data),	public,	dimension (:), allocatable	::	gully
type(swatdeg_init_datafiles),	public,	dimension(:), allocatable	::	sd_init
type(swatdeg_datafiles),	public,	dimension(:), allocatable	::	sd_dat
type(swatdeg_channel_dynamic),	public,	dimension (:), allocatable	::	sd_ch
type(swatdeg_channel_dynamic),	public,	dimension (:), allocatable	::	sdch_init
type(channel_rating_curve_parameters),	public		::	rcurv
type(channel_rating_curve_parameters),	public		::	rcz
type(channel_rating_curve),	public,	dimension(:), allocatable	::	ch_rcurv
type(sd_ch_output),	public,	dimension(:), allocatable, save	::	chsd_d
type(sd_ch_output),	public,	dimension(:), allocatable, save	::	chsd_m
type(sd_ch_output),	public,	dimension(:), allocatable, save	::	chsd_y
type(sd_ch_output),	public,	dimension(:), allocatable, save	::	chsd_a
type(sd_ch_output),	public,	dimension(:), allocatable, save	::	schsd_d
type(sd_ch_output),	public,	dimension(:), allocatable, save	::	schsd_m
type(sd_ch_output),	public,	dimension(:), allocatable, save	::	schsd_y
type(sd_ch_output),	public,	dimension(:), allocatable, save	::	schsd_a
type(sd_ch_output),	public		::	bchsd_d
type(sd_ch_output),	public		::	bchsd_m
type(sd_ch_output),	public		::	bchsd_y
type(sd_ch_output),	public		::	bchsd_a
type(sd_ch_output),	public		::	chsdz
type(sdch_header),	public		::	sdch_hdr
type(sdch_header_units),	public		::	sdch_hdr_units			SD_CHAN_BUD_HEADERS
type(sdch_bud),	public		::	sdch_bud_hdr
type(sdch_bud_units),	public		::	sdch_bud_hdr_units			SD_CHAN_BUD_HEADERS
type(sdch_header_sub),	public		::	sdch_hdr_subday
type(sdch_header_units),	public		::	sdch_hdr_units_sub
type(sd_chd_header),	public		::	sd_chd_hdr

Interfaces

public interface operator (+)

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

Arguments

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

Return Value type(sd_ch_output)

public interface operator (/)

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

Arguments

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

Return Value type(sd_ch_output)

public interface operator (//)

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

Arguments

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

Return Value type(sd_ch_output)

public interface operator (*)

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

Arguments

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

Return Value type(sd_ch_output)

public interface operator (*)

public function chrc_mult(rc1, const) result(rc2)

Arguments

Type	Intent	Optional	Attributes		Name
type(channel_rating_curve_parameters),	intent(in)			::	rc1
real,	intent(in)			::	const

Return Value type(channel_rating_curve_parameters)

public interface operator (+)

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

Arguments

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

Return Value type(channel_sediment_budget_output)

public interface operator (/)

public function chsednut_div(cho1, const) result(cho2)

Arguments

Type	Intent	Optional	Attributes		Name
type(channel_sediment_budget_output),	intent(in)			::	cho1
real,	intent(in)			::	const

Return Value type(channel_sediment_budget_output)

Derived Types

type, public :: swatdeg_hydsed_data

Components

Type	Visibility		Name		Initial
character(len=25),	public	::	name	=	""
character(len=16),	public	::	order	=	""
real,	public	::	chw	=	0.
real,	public	::	chd	=	0.
real,	public	::	chs	=	0.
real,	public	::	chl	=	0.
real,	public	::	chn	=	0.
real,	public	::	chk	=	0.
real,	public	::	cherod	=	0.
real,	public	::	cov	=	0.
real,	public	::	sinu	=	0.
real,	public	::	chseq	=	0.
real,	public	::	d50	=	0.
real,	public	::	ch_clay	=	0.
real,	public	::	carbon	=	0.
real,	public	::	ch_bd	=	0.
real,	public	::	chss	=	0.
real,	public	::	bankfull_flo	=	0.
real,	public	::	fps	=	0.000001
real,	public	::	fpn	=	0.1
real,	public	::	n_conc	=	0.
real,	public	::	p_conc	=	0.
real,	public	::	p_bio	=	0.

type, public :: swatdeg_sednut_data

Components

Type	Visibility		Name		Initial
character(len=25),	public	::	name	=	""
character(len=16),	public	::	order	=	""
real,	public	::	pk_rto	=	1.
real,	public	::	fp_inun_days	=	5.
real,	public	::	n_setl	=	0.5
real,	public	::	p_setl	=	0.5
real,	public	::	n_sol_part	=	0.01
real,	public	::	p_sol_part	=	0.01
real,	public	::	n_dep_enr	=	0.5
real,	public	::	p_dep_enr	=	0.5
real,	public	::	arc_len_fr	=	1.2
real,	public	::	part_size	=	0.002
real,	public	::	wash_bed_fr	=	0.1

type, public :: channel_sediment_budget_output

Components

Type	Visibility		Name		Initial
real,	public	::	in_sed	=	0.
real,	public	::	out_sed	=	0.
real,	public	::	fp_dep	=	0.
real,	public	::	ch_dep	=	0.
real,	public	::	bank_ero	=	0.
real,	public	::	bed_ero	=	0.
real,	public	::	in_no3	=	0.
real,	public	::	in_orgn	=	0.
real,	public	::	out_no3	=	0.
real,	public	::	out_orgn	=	0.
real,	public	::	fp_no3	=	0.
real,	public	::	bank_no3	=	0.
real,	public	::	bed_no3	=	0.
real,	public	::	fp_orgn	=	0.
real,	public	::	ch_orgn	=	0.
real,	public	::	bank_orgn	=	0.
real,	public	::	bed_orgn	=	0.
real,	public	::	in_solp	=	0.
real,	public	::	in_orgp	=	0.
real,	public	::	out_solp	=	0.
real,	public	::	out_orgp	=	0.
real,	public	::	fp_solp	=	0.
real,	public	::	bank_solp	=	0.
real,	public	::	bed_solp	=	0.
real,	public	::	fp_orgp	=	0.
real,	public	::	ch_orgp	=	0.
real,	public	::	bank_orgp	=	0.
real,	public	::	bed_orgp	=	0.
real,	public	::	no3_orgn	=	0.
real,	public	::	solp_orgp	=	0.

type, public :: channel_morphology_output

Components

Type	Visibility		Name		Initial
real,	public	::	w_yr	=	0.
real,	public	::	d_yr	=	0.
real,	public	::	fp_mm	=	0.

type, public :: gully_data

Components

Type	Visibility		Name		Initial
character(len=16),	public	::	name	=	""
real,	public	::	hc_kh	=	0.
real,	public	::	hc_hgt	=	0.
real,	public	::	hc_ini	=	0.

type, public :: swatdeg_init_datafiles

Components

Type	Visibility		Name		Initial
integer,	public	::	init	=	1
integer,	public	::	org_min	=	1
integer,	public	::	pest	=	1
integer,	public	::	path	=	1
integer,	public	::	hmet	=	1
integer,	public	::	salt	=	1
integer,	public	::	cs	=	1

type, public :: swatdeg_datafiles

Components

Type	Visibility		Name		Initial
character(len=16),	public	::	name	=	""
character(len=16),	public	::	initc	=	""
character(len=16),	public	::	hydc	=	""
character(len=16),	public	::	sedc	=	""
character(len=16),	public	::	nutc	=	""
integer,	public	::	init	=	1
integer,	public	::	hyd	=	1
integer,	public	::	sed	=	1
integer,	public	::	nut	=	1
integer,	public	::	sednut	=	1

type, public :: floodplain_parameters

Components

Type	Visibility	Attributes		Name		Initial
character(len=25),	public		::	name	=	"floodplain"
integer,	public		::	obj_tot	=	0
integer,	public		::	hru_tot	=	0
real,	public		::	ha	=	0
character(len=3),	public,	dimension(:), allocatable	::	obtyp
integer,	public,	dimension(:), allocatable	::	obtypno
integer,	public,	dimension (:), allocatable	::	hru
real,	public,	dimension (:), allocatable	::	hru_fr

type, public :: muskingum_parameters

Components

Type	Visibility		Name		Initial
integer,	public	::	nsteps	=	1
integer,	public	::	substeps	=	1
real,	public	::	c1	=	0.
real,	public	::	c2	=	0.
real,	public	::	c3	=	0.

type, public :: swatdeg_channel_dynamic

Components

Type	Visibility	Attributes		Name		Initial
character(len=25),	public		::	name	=	"default"
integer,	public		::	props	=	0
integer,	public		::	obj_no	=	0
integer,	public		::	wallo	=	0
integer,	public		::	aqu_link	=	0
integer,	public		::	aqu_link_ch	=	0
character(len=25),	public		::	region	=	""
character(len=25),	public		::	order	=	""
real,	public		::	chw	=	3.
real,	public		::	chd	=	.5
real,	public		::	chs	=	.01
real,	public		::	chl	=	.1
real,	public		::	chn	=	0.
real,	public		::	chk	=	0.
real,	public		::	cov	=	0.
real,	public		::	sinu	=	0.
real,	public		::	chseq	=	0.
real,	public		::	d50	=	0.
real,	public		::	ch_clay	=	0.
real,	public		::	carbon	=	0.
real,	public		::	ch_bd	=	0.
real,	public		::	chss	=	0.
real,	public		::	bankfull_flo	=	0.
real,	public		::	fps	=	0.
real,	public		::	fpn	=	0.
real,	public		::	n_conc	=	0.
real,	public		::	p_conc	=	0.
real,	public		::	p_bio	=	0.
real,	public		::	pk_rto	=	1.
real,	public		::	fp_inun_days	=	5.
real,	public		::	n_setl	=	0.5
real,	public		::	p_setl	=	0.5
real,	public		::	n_sol_part	=	0.01
real,	public		::	p_sol_part	=	0.01
real,	public		::	n_dep_enr	=	0.5
real,	public		::	p_dep_enr	=	0.5
real,	public		::	arc_len_fr	=	1.2
real,	public		::	part_size	=	0.002
real,	public		::	wash_bed_fr	=	0.2
real,	public		::	hc_kh	=	0.
real,	public		::	hc_hgt	=	0.
real,	public		::	hc_ini	=	0.
real,	public		::	cherod	=	0.
real,	public		::	shear_bnk	=	0.
real,	public		::	hc_erod	=	0.
real,	public		::	hc_co	=	0.
real,	public		::	hc_len	=	0.
real,	public		::	in1_vol	=	0.
real,	public		::	out1_vol	=	0.
real,	public		::	stor_dis_01bf	=	0.
real,	public		::	stor_dis_bf	=	0.
type(muskingum_parameters),	public		::	msk
type(floodplain_parameters),	public		::	fp
real,	public,	dimension (:), allocatable	::	kd
real,	public,	dimension (:), allocatable	::	aq_mix
character(len=2),	public		::	overbank	=	""

type, public :: channel_rating_curve_parameters

Components

Type	Visibility		Name		Initial
real,	public	::	flo_rate	=	0.
real,	public	::	xsec_area	=	0.
real,	public	::	surf_area	=	0.
real,	public	::	dep	=	0.
real,	public	::	top_wid	=	0.
real,	public	::	vol	=	0.
real,	public	::	vol_fp	=	0.
real,	public	::	vol_ch	=	0.
real,	public	::	wet_perim	=	0.
real,	public	::	ttime	=	0.

type, public :: channel_rating_curve

Components

Type	Visibility	Attributes		Name		Initial
integer,	public		::	npts	=	4
real,	public		::	wid_btm	=	0.	elev - 1=.1 bf dep; 2=bf dep; 3=1.2bf dep; 4=2bf dep
type(channel_rating_curve_parameters),	public		::	in1
type(channel_rating_curve_parameters),	public		::	in2
type(channel_rating_curve_parameters),	public		::	out1
type(channel_rating_curve_parameters),	public		::	out2
type(channel_rating_curve_parameters),	public,	dimension(4)	::	elev

type, public :: sd_ch_output

Components

Type	Visibility		Name		Initial
real,	public	::	flo_in	=	0.
real,	public	::	aqu_in	=	0.
real,	public	::	flo	=	0.
real,	public	::	peakr	=	0.
real,	public	::	sed_in	=	0.
real,	public	::	sed_out	=	0.
real,	public	::	washld	=	0.
real,	public	::	bedld	=	0.
real,	public	::	dep	=	0.
real,	public	::	deg_btm	=	0.
real,	public	::	deg_bank	=	0.
real,	public	::	hc_sed	=	0.
real,	public	::	width	=	0.
real,	public	::	depth	=	0.
real,	public	::	slope	=	0.
real,	public	::	deg_btm_m	=	0.
real,	public	::	deg_bank_m	=	0.
real,	public	::	hc_m	=	0.
real,	public	::	flo_in_mm	=	0.
real,	public	::	aqu_in_mm	=	0.
real,	public	::	flo_mm	=	0.
real,	public	::	sed_stor	=	0.
real,	public	::	n_tot	=	0.
real,	public	::	p_tot	=	0.
real,	public	::	dep_bf	=	0.
real,	public	::	velav_bf	=	0.

type, public :: sdch_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=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	::	flo_in	=	" flo_in"
character(len=16),	public	::	aqu_in	=	" geo_bf"
character(len=16),	public	::	flo	=	" flo_out"
character(len=15),	public	::	peakr	=	" peakr"
character(len=15),	public	::	sed_in	=	" sed_in"
character(len=15),	public	::	sed_out	=	" sed_out"
character(len=15),	public	::	washld	=	" washld"
character(len=15),	public	::	bedld	=	" bedld"
character(len=15),	public	::	dep	=	" dep"
character(len=15),	public	::	deg_btm	=	" deg_btm"
character(len=15),	public	::	deg_bank	=	" deg_bank"
character(len=15),	public	::	hc_sed	=	" hc_sed"
character(len=15),	public	::	width	=	" width"
character(len=15),	public	::	depth	=	" depth"
character(len=15),	public	::	slope	=	" slope"
character(len=15),	public	::	deg_btm_m	=	" deg_btm"
character(len=15),	public	::	deg_bank_m	=	" deg_bank"
character(len=15),	public	::	hc_len	=	" hc_len"
character(len=16),	public	::	flo_in_mm	=	" flo_in_mm"
character(len=16),	public	::	aqu_in_mm	=	" aqu_in_mm"
character(len=16),	public	::	flo_mm	=	" flo_out_mm"
character(len=16),	public	::	sed_stor	=	" sed_stor"
character(len=16),	public	::	n_tot	=	" n_tot "
character(len=16),	public	::	p_tot	=	" p_tot "
character(len=16),	public	::	dep_bf	=	" dep_bf "
character(len=16),	public	::	velav_bf	=	"velav_bf "

type, public :: sdch_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=6),	public	::	yrc	=	" "
character(len=8),	public	::	isd	=	" "
character(len=8),	public	::	id	=	" "
character(len=16),	public	::	name	=	" "
character(len=16),	public	::	flo_in	=	" m^3/s"
character(len=16),	public	::	aqu_in	=	" m^3/s"
character(len=16),	public	::	flo	=	" m^3/s"
character(len=15),	public	::	peakr	=	" m^3/s"
character(len=15),	public	::	sed_in	=	" tons"
character(len=15),	public	::	sed_out	=	" tons"
character(len=15),	public	::	washld	=	" tons"
character(len=15),	public	::	bedld	=	" tons"
character(len=15),	public	::	dep	=	" tons"
character(len=15),	public	::	deg_btm	=	" tons"
character(len=15),	public	::	deg_bank	=	" tons"
character(len=15),	public	::	hc_sed	=	" tons"
character(len=15),	public	::	width	=	" m"
character(len=15),	public	::	depth	=	" m"
character(len=15),	public	::	slope	=	" m/m"
character(len=15),	public	::	deg_btm_m	=	" m"
character(len=15),	public	::	deg_bank_m	=	" m"
character(len=15),	public	::	hc_len	=	" m"
character(len=16),	public	::	flo_in_mm	=	" mm"
character(len=16),	public	::	aqu_in_mm	=	" mm"
character(len=16),	public	::	flo_mm	=	" mm"
character(len=16),	public	::	sed_stor	=	" tons"
character(len=16),	public	::	n_tot	=	" kg_N "
character(len=16),	public	::	p_tot	=	" kg_P "
character(len=16),	public	::	dep_bf	=	" m/s "
character(len=16),	public	::	velav_bf	=	" m/s "

type, public :: sdch_bud

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=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	::	in_sed	=	" in_sed"
character(len=16),	public	::	out_sed	=	" out_sed"
character(len=16),	public	::	fp_dep	=	" fp_dep "
character(len=16),	public	::	ch_dep	=	" ch_dep "
character(len=16),	public	::	bank_ero	=	" bank_ero "
character(len=16),	public	::	bed_ero	=	" bed_ero "
character(len=16),	public	::	in_no3	=	" in_no3 "
character(len=16),	public	::	in_orgn	=	" in_orgn "
character(len=15),	public	::	out_no3	=	" out_no3 "
character(len=16),	public	::	out_orgn	=	"out_orgn "
character(len=15),	public	::	fp_no3	=	" fp_no3 "
character(len=15),	public	::	bank_no3	=	"bank_no3 "
character(len=15),	public	::	bed_no3	=	"bed_no3 "
character(len=15),	public	::	fp_orgn	=	"fp_orgn "
character(len=15),	public	::	ch_orgn	=	"ch_orgn "
character(len=15),	public	::	bank_orgn	=	"bank_orgn "
character(len=15),	public	::	bed_orgn	=	"bed_orgn "
character(len=15),	public	::	in_solp	=	"in_solp "
character(len=15),	public	::	in_orgp	=	"in_orgp "
character(len=15),	public	::	out_solp	=	"out_solp "
character(len=15),	public	::	out_orgp	=	"out_orgp "
character(len=15),	public	::	fp_solp	=	"fp_solp "
character(len=15),	public	::	bank_solp	=	"bank_solp "
character(len=15),	public	::	bed_solp	=	"bed_solp "
character(len=15),	public	::	fp_orgp	=	"fp_orgp "
character(len=15),	public	::	ch_orgp	=	"ch_orgp "
character(len=15),	public	::	bank_orgp	=	"bank_orgp "
character(len=15),	public	::	bed_orgp	=	"bed_orgp "
character(len=15),	public	::	no3_orgn	=	"no3_orgn "
character(len=15),	public	::	solp_orgp	=	"solp_orgp "

type, public :: sdch_bud_units

Components

Type	Visibility		Name		Initial
character(len=6),	public	::	day	=	" "
character(len=6),	public	::	mo	=	" "
character(len=6),	public	::	day_mo	=	" "
character(len=6),	public	::	yrc	=	" "
character(len=8),	public	::	isd	=	" "
character(len=8),	public	::	id	=	" "
character(len=16),	public	::	name	=	" "
character(len=16),	public	::	in_sed	=	" tons"
character(len=16),	public	::	out_sed	=	" tons"
character(len=16),	public	::	fp_dep	=	" tons "
character(len=16),	public	::	ch_dep	=	" tons "
character(len=16),	public	::	bank_ero	=	" tons "
character(len=16),	public	::	bed_ero	=	" tons "
character(len=16),	public	::	in_no3	=	" tons "
character(len=16),	public	::	in_orgn	=	" tons "
character(len=15),	public	::	out_no3	=	" tons "
character(len=16),	public	::	out_orgn	=	" tons "
character(len=15),	public	::	fp_no3	=	" tons "
character(len=15),	public	::	bank_no3	=	" tons "
character(len=15),	public	::	bed_no3	=	" tons "
character(len=16),	public	::	fp_orgn	=	" tons "
character(len=15),	public	::	ch_orgn	=	" tons "
character(len=15),	public	::	bank_orgn	=	" tons "
character(len=15),	public	::	bed_orgn	=	" tons "
character(len=15),	public	::	in_solp	=	" tons "
character(len=15),	public	::	in_orgp	=	" tons "
character(len=15),	public	::	out_solp	=	" tons "
character(len=15),	public	::	out_orgp	=	" tons "
character(len=15),	public	::	fp_solp	=	" tons "
character(len=15),	public	::	bank_solp	=	" tons "
character(len=15),	public	::	bed_solp	=	" tons "
character(len=15),	public	::	fp_orgp	=	" tons "
character(len=15),	public	::	ch_orgp	=	" tons "
character(len=15),	public	::	bank_orgp	=	" tons "
character(len=15),	public	::	bed_orgp	=	" tons "
character(len=15),	public	::	no3_orgp	=	" tons "
character(len=15),	public	::	solp_orgp	=	" tons "

type, public :: sdch_header_sub

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=6),	public	::	yrc	=	" yr"
character(len=8),	public	::	isd	=	" unit "
character(len=8),	public	::	id	=	" gis_id "
character(len=8),	public	::	ii	=	" tstep "
character(len=16),	public	::	name	=	" name "
character(len=16),	public	::	hyd_flo	=	" flo_out"

type, public :: sdch_header_units_sub

Components

Type	Visibility		Name		Initial
character(len=6),	public	::	day	=	" "
character(len=6),	public	::	mo	=	" "
character(len=6),	public	::	day_mo	=	" "
character(len=6),	public	::	yrc	=	" "
character(len=8),	public	::	isd	=	" "
character(len=8),	public	::	id	=	" "
character(len=8),	public	::	ii	=	" "
character(len=16),	public	::	name	=	" "
character(len=16),	public	::	hyd_flo	=	" m^3/s "

type, public :: sd_chd_header

Components

Type	Visibility		Name		Initial
character(len=16),	public	::	name	=	"name"
character(len=16),	public	::	order	=	"order"
character(len=16),	public	::	chw	=	'chw'
character(len=16),	public	::	chd	=	'chd'
character(len=16),	public	::	chs	=	'chs'
character(len=16),	public	::	chl	=	'chl'
character(len=16),	public	::	chn	=	'chn'
character(len=16),	public	::	chk	=	'chk'
character(len=16),	public	::	cherod	=	'cherod'
character(len=16),	public	::	cov	=	'cov'
character(len=16),	public	::	sinu	=	'sinu'
character(len=16),	public	::	chseq	=	'chseq'
character(len=16),	public	::	d50	=	'd50'
character(len=16),	public	::	ch_clay	=	'ch_clay'
character(len=16),	public	::	carbon	=	'carbon'
character(len=16),	public	::	ch_bd	=	'ch_bd'
character(len=16),	public	::	chss	=	'chss'
character(len=16),	public	::	bankfull_flo	=	'bankfull_flo'
character(len=16),	public	::	fps	=	'fps'
character(len=16),	public	::	fpn	=	'fpn'
character(len=16),	public	::	n_conc	=	'n_conc'
character(len=16),	public	::	p_conc	=	'p_conc'
character(len=16),	public	::	p_bio	=	'p_bio'

Functions

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

Arguments

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

Return Value type(channel_sediment_budget_output)

public function chsednut_div(cho1, const) result(cho2)

Arguments

Type	Intent	Optional	Attributes		Name
type(channel_sediment_budget_output),	intent(in)			::	cho1
real,	intent(in)			::	const

Return Value type(channel_sediment_budget_output)

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

Arguments

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

Return Value type(sd_ch_output)

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

Arguments

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

Return Value type(sd_ch_output)

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

Arguments

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

Return Value type(sd_ch_output)

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

Arguments

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

Return Value type(sd_ch_output)

public function chrc_mult(rc1, const) result(rc2)

Arguments

Type	Intent	Optional	Attributes		Name
type(channel_rating_curve_parameters),	intent(in)			::	rc1
real,	intent(in)			::	const

Return Value type(channel_rating_curve_parameters)

Subroutines

public subroutine chrc_interp(rc1, rc2, const, rci)

Arguments

Type	Intent		Name
type(channel_rating_curve_parameters),	intent(in)	::	rc1
type(channel_rating_curve_parameters),	intent(in)	::	rc2
real,	intent(in)	::	const
type(channel_rating_curve_parameters),	intent(out)	::	rci

sd_channel_module Module

Contents

Variables

Interfaces

Derived Types

Functions

Subroutines

Used by

Variables

Interfaces

public interface operator (+)

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

Arguments

Return Value type(sd_ch_output)

public interface operator (/)

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

Arguments

Return Value type(sd_ch_output)

public interface operator (//)

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

Arguments

Return Value type(sd_ch_output)

public interface operator (*)

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

Arguments

Return Value type(sd_ch_output)

public interface operator (*)

public function chrc_mult(rc1, const) result(rc2)

Arguments

Return Value type(channel_rating_curve_parameters)

public interface operator (+)

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

Arguments

Return Value type(channel_sediment_budget_output)

public interface operator (/)

public function chsednut_div(cho1, const) result(cho2)

Arguments

Return Value type(channel_sediment_budget_output)

Derived Types

type, public :: swatdeg_hydsed_data

Components

type, public :: swatdeg_sednut_data

Components

type, public :: channel_sediment_budget_output

Components

type, public :: channel_morphology_output

Components

type, public :: gully_data

Components

type, public :: swatdeg_init_datafiles

Components

type, public :: swatdeg_datafiles

Components

type, public :: floodplain_parameters

Components

type, public :: muskingum_parameters

Components

type, public :: swatdeg_channel_dynamic

Components

type, public :: channel_rating_curve_parameters

Components

type, public :: channel_rating_curve

Components

type, public :: sd_ch_output

Components

type, public :: sdch_header

Components

type, public :: sdch_header_units

Components

type, public :: sdch_bud

Components

type, public :: sdch_bud_units

Components

type, public :: sdch_header_sub

Components

type, public :: sdch_header_units_sub

Components

type, public :: sd_chd_header

Components

Functions