
「これから俺の言う話は全部冗談ですから、本気にしないで下さい。」
http://wikiprejudices.org/, http://www.⁂.com
Tiens, c'est marrant, ça : [google]spartaaaaaaaaaaaaaaaaaans[/google]
cornacchia(p)= { if(kronecker(-d,p)!=1,return(0), x=lift(sqrt(Mod(-d,p))); if(x<=p/2,x=p-x); z=p%x; until(x^2<p && p<=y^2, if(x!=0,w=x%z,w=0); y=x; x=z; z=w;); if(issquare((p-x^2)/d,&v),return([x,v]),0); ); }
Bref...