_RL xx_hflux_mean_dummy
& , xx_hflux_mean_dummy
& hfluxmeanbar, qnet, xx_hflux_mean_dummy,
xx_hflux_mean_dummy = 0. _d 0
& eccoiter,mythid, xx_hflux_mean_dummy )