~ ~ ~ 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
d50 -micro meters
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 |