7 #include "cl_LF_tran.h"
12 #include "cln/lfloat.h"
13 #include "cln/integer.h"
14 #include "cln/abort.h"
19 const cl_LF eval_pqd_series (uintC N, cl_pqd_series_term* args, uintC len)
22 return cl_I_to_LF(0,len);
23 var cl_pqd_series_result sums;
24 eval_pqd_series_aux(N,args,sums);
25 // Instead of computing fsum = T/Q and gsum = V/(D*Q)
26 // and then dividing them, to compute gsum/fsum, we save two
27 // divisions by computing V/(D*T).
29 cl_I_to_LF(sums.V,len) / The(cl_LF)(sums.D * cl_I_to_LF(sums.T,len));