7 #include "cl_LF_tran.h"
12 #include "cl_lfloat.h"
13 #include "cl_integer.h"
17 const cl_LF eval_pqcd_series (uintL N, cl_pqcd_series_term* args, uintC len)
20 return cl_I_to_LF(0,len);
21 var cl_pqcd_series_result sums;
22 eval_pqcd_series_aux(N,args,sums);
23 // Instead of computing fsum = T/Q and gsum = V/(D*Q)
24 // and then dividing them, to compute gsum/fsum, we save two
25 // divisions by computing V/(D*T).
27 cl_I_to_LF(sums.V,len) / The(cl_LF)(sums.D * cl_I_to_LF(sums.T,len));