~ ~ ~ PURPOSE ~ ~ ~ this subroutine calculates pesticide transported with suspended sediment
~ ~ ~ INCOMING VARIABLES ~ ~ ~ name |units |definition ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ enratio |none |enrichment ratio calculated for day in HRU ihru |none |HRU number pst_enr(:,:) |none |pesticide enrichment ratio zdb(:,:) |mm |division term from net pesticide equation ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
set kd units: mm + (m^3/ton)(ton/m^3)mm = mm