I xx_genstartdate, xx_genperiod,
& ( xx_genperiod .NE. 0 ) ) then
_RL xx_genperiod
I xx_gen_file, xx_genstartdate, xx_genperiod,
fldperiod = xx_genperiod
if ( xx_genperiod .eq. -12. _d 0 ) then
if ( xx_genperiod .eq. 0. _d 0
I externForcingCycle, xx_genperiod,
I xx_genperiod,