_RL climustrconst
& climustrconst, climustrRepCycle,
I climustrperiod, exf_inscal_climustr, climustrconst,
& climustrconst, climvstrconst,
climustrconst = 0.0 _d 0