I xx_gentim2d_period(iarr),
& xx_gentim2d_period
_RL xx_gentim2d_period(maxCtrlTim2D)
& xx_gentim2d_startdate, xx_gentim2d_period,
xx_gentim2d_period(iarr) = 0. _d 0
& xx_gentim2d_period(1),