NextTest("Cyclotomic Polynomials");

Verify(Cyclotomic(1,x),x-1);
Verify(Cyclotomic(5,x),x^4+x^3+x^2+x+1);
Verify(Cyclotomic(8,z),z^4+1);
Verify(Cyclotomic(10,y),y^4-y^3+y^2-y+1);
Verify(Cyclotomic(15,x),x^8-x^7+x^5-x^4+x^3-x+1);

