Function qawoe

void qawoe(Real, Func) (
  Func f,
  Real a,
  Real b,
  Real omega,
  int integr,
  Real epsabs,
  Real epsrel,
  int limit,
  int icall,
  int maxp1,
  out Real result,
  out Real abserr,
  out int neval,
  out int ier,
  out int last,
  Real* alist_,
  Real* blist_,
  Real* rlist_,
  Real* elist_,
  int* iord_,
  int* nnlog_,
  ref int momcom,
  Real* chebmo_
);