& afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom,
_RL vfFacMom
AhDudxFac = vfFacMom*1.
AhDudyFac = vfFacMom*1.
ArDudrFac = vfFacMom*1.
AhDvdxFac = vfFacMom*1.
AhDvdyFac = vfFacMom*1.
ArDvdrFac = vfFacMom*1.
vfFacMom = 1. _d 0
vfFacMom = 0. _d 0