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