Function qwgtf

Real qwgtf(Real) (
  Real x,
  Real omega,
  Real p2,
  Real p3,
  Real p4,
  int integr
);