& CFC_forcingPeriod, CFC_forcingCycle,
_RL CFC_forcingCycle
IF ( CFC_forcingCycle.LE.zeroRL .AND.
CALL WRITE_0D_RL( CFC_forcingCycle, INDEX_NONE,
ELSEIF ( CFC_forcingCycle.GT.zeroRL
IF ( CFC_forcingCycle.GT.zeroRL
IF ( CFC_forcingCycle .GT. 0. _d 0 ) THEN
I CFC_forcingCycle, CFC_forcingPeriod,
& CFC_forcingPeriod, CFC_forcingCycle
CFC_forcingCycle = externForcingCycle