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