_RL exf_inscal_precip
& exf_inscal_precip,
I exf_inscal_precip,
I precipperiod, exf_inscal_precip, precipconst,
& exf_inscal_swflux, exf_inscal_lwflux, exf_inscal_precip,
exf_inscal_precip = 1. _d 0