_RL exf_inscal_hs
& exf_inscal_hs,
I exf_inscal_hs,
I hs_period, exf_inscal_hs, hs_const,
& exf_inscal_aqh, exf_inscal_hs, exf_inscal_hl,
exf_inscal_hs = 1. _d 0