8 #define _GAUNT_H_MIN(x,y) (((x) > (y)) ? (y) : (x))
9 static inline int gaunt_q_max(
int m,
int n,
int mu,
int nu) {
10 return _GAUNT_H_MIN(n, _GAUNT_H_MIN(nu, (n+nu-abs(m+mu))/2));
14 void gaunt_xu(
int m,
int n,
int mu,
int nu,
int qmax,
double *v_aq,
int *err);
18 #ifdef GAUNT_PRECOMPILED
19 extern const double gaunt_table[];
20 extern const int gaunt_table_lMax;
24 double gaunt_table_retrieve_single(
int m,
int n,
int mu,
int nu,
int q);
28 double const * gaunt_table_retrieve_allq(
int m,
int n,
int mu,
int nu);
30 int gaunt_table_or_xu_fill(
double *target,
int m,
int n,
int mu,
int nu);