Cyclotomic polynomial: Difference between revisions
Oops, that last edit was supposed to be a preview, not a save page...
m (→{{header|J}}) |
(Oops, that last edit was supposed to be a preview, not a save page...) |
||
Line 2,019:
<lang J>cyclo=: {{<.-:1+(++) p. 1;^0j2p1* y%~1+I.1=y+.1+i.y}}</lang>
This approach suggests that cyclotomic polynomial zero should be <tt>f<sub>0
Implementation of routine to find nth cyclotomic polynomial:
|