summaryrefslogtreecommitdiffstats
path: root/documents/Ferrari/Ferrari.txt
blob: 38452e1d04d50163b083e22f26228c887550a803 (plain)
ofshex dumpascii
0000 0d 0a 0a 46 65 72 72 61 72 69 20 61 76 65 63 20 50 61 72 69 0a 0a 3f 20 50 3d 78 5e 34 2b 61 33 ...Ferrari.avec.Pari..?.P=x^4+a3
0020 2a 78 5e 33 2b 61 32 2a 78 5e 32 2b 61 31 2a 78 2b 61 30 0d 25 31 20 3d 20 78 5e 34 20 2b 20 61 *x^3+a2*x^2+a1*x+a0.%1.=.x^4.+.a
0040 33 2a 78 5e 33 20 2b 20 61 32 2a 78 5e 32 20 2b 20 61 31 2a 78 20 2b 20 61 30 0d 3f 20 43 3d 5b 3*x^3.+.a2*x^2.+.a1*x.+.a0.?.C=[
0060 31 2c 61 33 2f 32 2c 30 3b 61 33 2f 32 2c 61 32 2c 61 31 2f 32 3b 30 2c 61 31 2f 32 2c 61 30 5d 1,a3/2,0;a3/2,a2,a1/2;0,a1/2,a0]
0080 0d 25 32 20 3d 0d 5b 31 20 31 2f 32 2a 61 33 20 30 5d 0d 0d 5b 31 2f 32 2a 61 33 20 61 32 20 31 .%2.=.[1.1/2*a3.0]..[1/2*a3.a2.1
00a0 2f 32 2a 61 31 5d 0d 0d 5b 30 20 31 2f 32 2a 61 31 20 61 30 5d 0d 0d 3f 20 44 3d 5b 30 2c 30 2c /2*a1]..[0.1/2*a1.a0]..?.D=[0,0,
00c0 2d 31 2f 32 3b 30 2c 31 2c 30 3b 2d 31 2f 32 2c 30 2c 30 5d 0d 25 33 20 3d 0d 5b 30 20 30 20 2d -1/2;0,1,0;-1/2,0,0].%3.=.[0.0.-
00e0 31 2f 32 5d 0d 00 00 02 0a 5b 30 20 31 20 30 5d 0d 0d 5b 2d 31 2f 32 20 30 20 30 5d 0d 0d 3f 20 1/2].....[0.1.0]..[-1/2.0.0]..?.
0100 50 2d 28 78 5e 32 2b 28 61 33 2f 32 29 2a 78 2b 79 2f 32 29 5e 32 0d 25 34 20 3d 20 28 2d 31 2f P-(x^2+(a3/2)*x+y/2)^2.%4.=.(-1/
0120 34 2a 61 33 5e 32 20 2b 20 28 61 32 20 2d 20 79 29 29 2a 78 5e 32 20 2b 20 28 2d 31 2f 32 2a 79 4*a3^2.+.(a2.-.y))*x^2.+.(-1/2*y
0140 2a 61 33 20 2b 20 61 31 29 2a 78 20 2b 20 28 61 30 20 2d 20 31 2f 34 2a 79 5e 32 29 0d 3f 20 70 *a3.+.a1)*x.+.(a0.-.1/4*y^2).?.p
0160 6f 6c 64 69 73 63 28 25 29 0d 25 35 20 3d 20 61 30 2a 61 33 5e 32 20 2d 20 79 2a 61 31 2a 61 33 oldisc(%).%5.=.a0*a3^2.-.y*a1*a3
0180 20 2b 20 28 28 2d 34 2a 61 30 20 2b 20 79 5e 32 29 2a 61 32 20 2b 20 28 61 31 5e 32 20 2b 20 28 .+.((-4*a0.+.y^2)*a2.+.(a1^2.+.(
01a0 34 2a 79 2a 61 30 20 2d 20 79 5e 33 29 29 29 0d 3f 20 46 3d 2d 25 0d 25 36 20 3d 20 2d 61 30 2a 4*y*a0.-.y^3))).?.F=-%.%6.=.-a0*
01c0 61 33 5e 32 20 2b 20 79 2a 61 31 2a 61 33 20 2b 20 28 28 34 2a 61 30 20 2d 20 79 5e 32 29 2a 61 a3^2.+.y*a1*a3.+.((4*a0.-.y^2)*a
01e0 32 20 2b 20 28 2d 61 31 5e 32 20 2b 20 28 2d 34 2a 79 2a 61 30 20 2b 20 79 5e 33 29 29 29 0d 3f 2.+.(-a1^2.+.(-4*y*a0.+.y^3))).?
0200 20 46 2d 34 2a 6d 61 74 64 65 74 28 43 2d 79 2a 44 29 0d 25 37 20 3d 20 30 .F-4*matdet(C-y*D).%7.=.0