a5003bd1-e4ff-4fbf-83f6-57f3f35c683e 14 6 9 decimal

&[DATE] &[TIME] - &[FILENAME]

n a x f x a j 1 -^1 x - / (j 1 k product (k 1 n 1 + sum * :

1 1 x f 2 1 x f 3 1 x f 3 1 sys

1 a x f x 1 x - a + (* 1 x - (2^/

collect f(n,a,x) j 13 range f j el j a x f : for

nd collects index list select 1 f rows range : ct 1 : i select ND ct el f i el numden : ct ct 1 + : 21 line for ND 51 line :

j 3 :

sanity check for Maple coeff nd j el 1 el x coeff maple 1 a 1 a 2^+ a 5^+ (* +

C collects index list select 1 f rows range : ct 1 : i select Coeff ct el nd i el 1 el x coeff maple : ct ct 1 + : 21 line for Coeff 51 line :

1 x 1 x 2^+ x 5^+ (* + 1 x 1 x 2^1 x 3^+ (* + (* + ≡

C 1 a + 1 a 1 a 2^+ (* + 1 a 1 a 2^1 a 3^+ (* + (* + 31 mat

CWD C:\SmathFile CurrentDirectory :

C CWD maplecoeff wfile 1

C CWD maplecoeff rfile :

f x 1 x - a + (* 1 x - (2^/ x 1 x - a + (1 x - (* a 3^+ (* 1 x - (3^/ x 1 x - a + (1 x - (* a 3^+ (1 x - (* a 6^+ (* 1 x - (4^/ 31 mat

nd x 1 x - a + (* 1 x - (2^21 mat x 1 x - a + (1 x - (* a 3^+ (* 1 x - (3^21 mat x 1 x - a + (1 x - (* a 3^+ (1 x - (* a 6^+ (* 1 x - (4^21 mat 31 mat

a 1.5 :

C 2.5 5.875 17.265625 31 mat