_RL climvstrperiod
& climvstrperiod, climvstrStartTime,
I climvstrStartTime, climvstrperiod, climvstrRepCycle,
& climvstrperiod .NE. 0. )
I 'exf', 'climvstr', climvstrperiod,
& .AND. climustrperiod .EQ. climvstrperiod
I climvstrperiod, exf_inscal_climvstr, climvstrconst,
& climvstrperiod .EQ. 0. )
& climvstrRepCycle, climvstrperiod, climvstrStartTime,
climvstrperiod = 0