Function qawo

void qawo(Real, Func) (
  Func f,
  Real a,
  Real b,
  Real omega,
  int integr,
  Real epsabs,
  Real epsrel,
  out Real result,
  out Real abserr,
  out int neval,
  out int ier,
  int leniw,
  int maxp1,
  int lenw,
  out int last,
  int* iwork,
  Real* work
);