& maskc, sflux, xx_sflux0, xx_sflux1, xx_sflux_dummy,
& , xx_sflux_dummy
_RL xx_sflux_dummy
& mythid, xx_sflux_dummy )
& xx_sflux_file, xx_sflux_dummy, xx_sfluxperiod,