_RL xx_vbar_mean_dummy
& , xx_vbar_mean_dummy
& mythid, xx_vbar_mean_dummy)
xx_vbar_mean_dummy = 0. _d 0
& xx_vbar_mean_dummy )
& eccoiter, mythid, xx_vbar_mean_dummy)