~ ~ ~ PURPOSE ~ ~ ~
this subroutine finds the current paramter value based on
user defined change
~ ~ ~ INCOMING VARIABLES ~ ~ ~
name |units |definition
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
val_cur |variable |current parameter value
|the standard temperature (20 degrees C)
chg |data type |contains information on variable change
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
~ ~ ~ OUTGOING VARIABLES ~ ~ ~
name |units |definition
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
~ ~ ~ ~ ~ ~ END SPECIFICATIONS ~ ~ ~ ~ ~ ~
HRU
don't change for tile ***Mike
set epco parameter for each crop
don't change for tile ***Mike
define soil layer the drainage tile is in
setting tile lage time
SOL
BSN
SWQ
PST
channel hydrology and sediment parms
RES
res decision tables
AQU
LTE
gwflow (rtb)
initial soil properties
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | ielem | |||
| integer, | intent(in) | :: | ly | |||
| character(len=16), | intent(in) | :: | chg_parm | |||
| character(len=16), | intent(in) | :: | chg_typ | |||
| real, | intent(in) | :: | chg_val | |||
| real, | intent(in) | :: | absmin | |||
| real, | intent(in) | :: | absmax | |||
| integer, | intent(in) | :: | num_db |