_RL climsstperiod
& climsstperiod, climsstStartTime,
& climsstperiod .NE. 0. )
I climsstStartTime, climsstperiod, climsstRepCycle,
I 'exf', 'climsst', climsstperiod,
I climsstperiod, exf_inscal_climsst, climsstconst,
& climsstperiod .EQ. 0. )
& climsstRepCycle, climsstperiod, climsstStartTime,
climsstperiod = 0
I climsstfile, climsstRepCycle, climsstperiod,