wq_semianalyt Function

function wq_semianalyt(tres, tdel, term_m, prock, cprev, cint)

~ ~ ~ PURPOSE ~ ~ ~ This function solves a semi-analytic solution for the QUAL2E equations (cfr Befekadu Woldegiorgis).

~ ~ ~ INCOMING VARIABLES ~ ~ ~ name |units |definition ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ xx |none |Exponential argument ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~

~ ~ ~ OUTGOING VARIABLES ~ ~ ~ name |units |definition ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ tres |days |residence time in reach tdel |days |calculation time step term_m | |constant term in equation cprev |mg/l |concentration previous timestep cint |mg/l |incoming concentration
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~

~ ~ ~ SUBROUTINES/FUNCTIONS CALLED ~ ~ ~ Intrinsic: Exp

~ ~ ~ ~ ~ ~ END SPECIFICATIONS ~ ~ ~ ~ ~ ~

if time of residence in reach is less than or eq to timestep don't do this. MJW 2023

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	tres
real,	intent(in)			::	tdel
real,	intent(in)			::	term_m
real,	intent(in)			::	prock
real,	intent(in)			::	cprev
real,	intent(in)			::	cint

Return Value real