Cyclotomic polynomial: Difference between revisions
m
fix name to match presentation here.
(J: FFT speedup for polynomial multiplication and division) |
m (fix name to match presentation here.) |
||
Line 2,155:
,(y%*/q) {."0 (* 1 _1 $~ #) cyclotomic */}.q
elseif. 1 e. 1 < p do.
,(y%*/q) {."0
else.
lgl=. {:$ ctlist=. cyclotomic "0 }:*/@>,{1,each q NB. ctlist is 2-d table of polynomial divisors
| |||