\\ Copyright (c) 2003 Henri Darmon and Adam Logan
print("reading data for Q(sqrt(41))");
\l
\r helpers;
\r fp241coefs;
\r integrate.gp;
w=quadgen(41);
\r reduce.gp
a=bnfinit(x^2-x-10);
ev=[1,0,0,-10*x-27,0];
\\ev=[1,x,x,3,-2];  (this curve is 2-isogenous to the one above)
\l