was@form:~/talks/padic-height/e2heights$ was@form:~/talks/padic-height/e2heights$ Magma V2.11-8 Thu Oct 14 2004 19:11:56 on form [Seed = 3788482326] Type ? for help. Type -D to quit. Loading startup file "/home/was/magma/local/emacs.m" Loading "/home/was/magma/local/init.m" > function EC(s) return EllipticCurve(CremonaDatabase(),s); end function; > E := EC("37A"); > Attach("formal.m"); Attach("kedlaya.m"); > P := good_ordinary_primes(E,100); P; [ 5, 7, 11, 13, 23, 29, 31, 41, 43, 47, 53, 59, 61, 67, 71, 73, 79, 83, 89, 97 ] > for p in P do time print p, regulator(E,p,10); end for; 5 22229672 + O(5^11) Time: 0.040 7 317628041 + O(7^11) Time: 0.070 11 88864810146 + O(11^11) Time: 0.110 13 -24496495874*13 + O(13^11) Time: 0.130 23 -3766862007424 + O(23^10) Time: 0.190 29 96973472735990 + O(29^10) Time: 0.240 31 -161956692928757 + O(31^10) Time: 0.260 41 4876411385711438 + O(41^10) Time: 0.410 43 -6087146057265913 + O(43^10) Time: 0.460 47 21727272333147185 + O(47^10) Time: 0.540 53 18042281923023602*53^-2 + O(53^8) Time: 0.610 59 121517496384660047 + O(59^10) Time: 0.650 61 -18861341992290367 + O(61^10) Time: 0.670 67 -6806065060739176*67 + O(67^10) Time: 0.740 71 -1106615194756807446 + O(71^10) Time: 0.870 73 72855102866812855 + O(73^10) Time: 0.870 79 -486432442944317457 + O(79^10) Time: 0.930 83 -3867919760868272163 + O(83^10) Time: 1.000 89 15480467821870438719 + O(89^10) Time: 1.190 97 -11195795337175141289 + O(97^10) Time: 1.490 > E := EC("389A"); > P := good_ordinary_primes(E,100); P; [ 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 53, 59, 61, 67, 71, 73, 79, 83, 89, 97 ] > for p in P do time print p, regulator(E,p,10); end for; 5 -3871266 + O(5^11) Time: 0.260 7 483898350 + O(7^11) Time: 0.070 11 -64773591629 + O(11^11) Time: 0.110 13 -600727622574 + O(13^11) Time: 0.140 17 400840470707 + O(17^10) Time: 0.170 19 2140961309150 + O(19^10) Time: 0.180 23 -14826288011207 + O(23^10) Time: 0.200 29 198889744518957 + O(29^10) Time: 0.270 31 -351024635702215 + O(31^10) Time: 0.290 37 1785323936231506 + O(37^10) Time: 0.380 41 -6132394337634886 + O(41^10) Time: 0.440 43 10033905626158066 + O(43^10) Time: 0.480 47 503861161530575 + O(47^10) Time: 0.570 53 -19341752153987008 + O(53^10) Time: 0.640 59 -37856613598714026 + O(59^10) Time: 0.700 61 63535576740182919 + O(61^10) Time: 0.720 67 -832517080092063556 + O(67^10) Time: 0.860 71 -525365262173958313 + O(71^10) Time: 0.930 73 24258073069790144 + O(73^10) Time: 1.050 79 4416773349797280179 + O(79^10) Time: 1.200 83 -683174032586652177 + O(83^10) Time: 1.140 89 9775723521676164462 + O(89^10) Time: 1.330 97 -13688331881071698338 + O(97^10) Time: 1.820 > E := EC("5077A"); > P := good_ordinary_primes(E,100); P; [ 5, 7, 11, 13, 17, 19, 23, 29, 31, 43, 47, 53, 59, 61, 67, 71, 73, 79, 83, 89, 97 ] > for p in P do time print p, regulator(E,p,10); end for; 5 655268*5^-2 + O(5^7) Time: 0.800 7 -933185758 + O(7^11) Time: 0.070 11 135120780357 + O(11^11) Time: 0.120 13 -724465484545 + O(13^11) Time: 0.130 17 556128598240 + O(17^10) Time: 0.180 19 848515374979 + O(19^10) Time: 0.220 23 -5909072108626 + O(23^10) Time: 0.220 29 -151714467976646 + O(29^10) Time: 0.280 31 259815532381623 + O(31^10) Time: 0.310 43 -4781156173634086 + O(43^10) Time: 0.570 47 9036649342920828 + O(47^10) Time: 0.780 53 80433881259999378 + O(53^10) Time: 0.960 59 106876965932167178 + O(59^10) Time: 1.180 61 352708420308295915 + O(61^10) Time: 0.820 67 757107078954031508 + O(67^10) Time: 1.080 71 1382713671602021558 + O(71^10) Time: 1.180 73 -1303046742911299457 + O(73^10) Time: 1.340 79 -2815919677336502158 + O(79^10) Time: 1.440 83 3470030907126207472 + O(83^10) Time: 1.490 89 -3325438607428779200 + O(89^10) Time: 1.910 97 -5353586908063282167 + O(97^10) Time: 2.010 > E := EC("37A"); > time regulator(E,5,50); 115299522541340178416234094637464047 + O(5^51) Time: 1.860 > time regulator(E,97,50); -501927152395015686299629534025456518187030822234827798494096480\ 697957622583267105973403430183075091 + O(97^50) Time: 31.780 > Valuation(115299522541340178416234094637464047 - 22229672,5); 9 >