~ ~ ~ PURPOSE ~ ~ ~
this subroutine controls the simulation of the land phase of the
hydrologic cycle
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
~ ~ ~ SUBROUTINES/FUNCTIONS CALLED ~ ~ ~
~ ~ ~ ~ ~ ~ END SPECIFICATIONS ~ ~ ~ ~ ~ ~
define soil layer the drainage tile is in setting tile lage time Set some defaults if needed minimum value for vfsratio is 0 max is 300 minimum value for vfscon is 0.1 default is 0.5 max is 0.95 minimum value for vfsch is 0 max is .95 Set defaults - Mannings via Fiener, 2006 length based on one side of a square HRU default to a workable depth based on with and 8:1 sideslopes Default to 3/4 HRU slope default sed coeff to 0.005 Calculate time of concentration for waterway similar to hydro_init.f Check the channel to make sure the enter width and depth will work with 8:1 trap channel, assume width is correct Depth and Width not possible with 8:1 sideslope and trapazoidal channel assume b =.25*width Sediment Particulate P Soluble P Particulate N Soluble N Bacteria
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=16), | intent(in) | :: | str_name | |||
integer, | intent(in) | :: | istr | |||
integer, | intent(in) | :: | j |