/* This code can be loaded, or copied and paste using cpaste, into Sage. It will load the data associated to the HMF, including the field, level, and Hecke and Atkin-Lehner eigenvalue data. */ P. = PolynomialRing(QQ) g = P([45, 15, -14, -2, 1]) F. = NumberField(g) ZF = F.ring_of_integers() NN = ZF.ideal([1, 1, 1]) primes_array = [ [5, 5, 2/3*w^2 + 1/3*w - 5],\ [5, 5, 2/3*w^2 - 5/3*w - 4],\ [9, 3, -w + 3],\ [9, 3, w + 2],\ [11, 11, 2/3*w^2 + 1/3*w - 4],\ [16, 2, 2],\ [19, 19, 1/3*w^3 - 10/3*w - 3],\ [19, 19, 1/3*w^3 - w^2 - 7/3*w + 6],\ [29, 29, -1/3*w^3 + 2/3*w^2 + 8/3*w - 2],\ [29, 29, 1/3*w^3 - 1/3*w^2 - 3*w + 1],\ [31, 31, -1/3*w^3 + 1/3*w^2 + 3*w + 1],\ [31, 31, -1/3*w^3 + 2/3*w^2 + 8/3*w - 4],\ [49, 7, 1/3*w^3 - 10/3*w - 1],\ [49, 7, -1/3*w^3 + w^2 + 7/3*w - 4],\ [59, 59, -1/3*w^3 + 5/3*w^2 + 5/3*w - 11],\ [59, 59, -2/3*w^3 + 5/3*w^2 + 5*w - 13],\ [61, 61, -1/3*w^3 + 5/3*w^2 + 2/3*w - 9],\ [61, 61, -1/3*w^3 + 1/3*w^2 + 4*w + 2],\ [61, 61, 2/3*w^2 - 5/3*w - 1],\ [61, 61, -1/3*w^2 + 4/3*w + 6],\ [71, 71, -4/3*w^2 + 7/3*w + 11],\ [79, 79, -1/3*w^2 + 7/3*w - 3],\ [79, 79, -2/3*w^3 + 1/3*w^2 + 16/3*w - 4],\ [101, 101, 2/3*w^2 - 5/3*w - 6],\ [101, 101, -2/3*w^2 - 1/3*w + 7],\ [109, 109, -4/3*w^2 + 1/3*w + 9],\ [109, 109, 1/3*w^3 - 1/3*w^2 - 3*w - 4],\ [121, 11, -1/3*w^2 + 1/3*w + 6],\ [131, 131, -2/3*w^3 + 2/3*w^2 + 5*w - 7],\ [131, 131, 2/3*w^3 - 4/3*w^2 - 13/3*w - 2],\ [151, 151, -1/3*w^3 - 2/3*w^2 + 5*w + 7],\ [151, 151, 1/3*w^3 - 10/3*w + 2],\ [169, 13, 5/3*w^2 + 1/3*w - 11],\ [169, 13, 5/3*w^2 - 11/3*w - 9],\ [181, 181, -1/3*w^3 + 4/3*w^2 + 3*w - 8],\ [181, 181, -1/3*w^3 - 1/3*w^2 + 14/3*w + 4],\ [191, 191, -2/3*w^3 + w^2 + 17/3*w - 9],\ [191, 191, 1/3*w^3 - 2*w^2 - 7/3*w + 13],\ [191, 191, 2/3*w^3 - 1/3*w^2 - 22/3*w - 7],\ [191, 191, 2/3*w^3 - w^2 - 17/3*w - 3],\ [199, 199, 1/3*w^3 + w^2 - 13/3*w - 9],\ [199, 199, 2/3*w^2 - 5/3*w - 7],\ [199, 199, 1/3*w^3 - w^2 - 4/3*w + 6],\ [199, 199, -1/3*w^3 + 2*w^2 + 4/3*w - 12],\ [269, 269, -1/3*w^3 - 4/3*w^2 + 11/3*w + 14],\ [269, 269, 1/3*w^3 - 7/3*w^2 + 16],\ [271, 271, 2/3*w^2 + 1/3*w - 9],\ [271, 271, 2/3*w^2 - 5/3*w - 8],\ [281, 281, 1/3*w^3 + w^2 - 13/3*w - 11],\ [281, 281, -2/3*w^3 + 20/3*w + 3],\ [281, 281, -w^2 + 3*w + 2],\ [281, 281, -1/3*w^3 + 2*w^2 + 4/3*w - 14],\ [289, 17, w^3 - 8/3*w^2 - 16/3*w + 4],\ [289, 17, -w^3 + 1/3*w^2 + 23/3*w - 3],\ [331, 331, -2/3*w^3 + 2*w^2 + 11/3*w - 7],\ [331, 331, 2/3*w^3 - 17/3*w - 2],\ [359, 359, -1/3*w^3 - 1/3*w^2 + 11/3*w - 2],\ [359, 359, 1/3*w^3 + 4/3*w^2 - 17/3*w - 12],\ [361, 19, 4/3*w^2 - 4/3*w - 11],\ [389, 389, 5/3*w^2 - 8/3*w - 13],\ [389, 389, 5/3*w^2 - 2/3*w - 14],\ [401, 401, -1/3*w^3 + 5/3*w^2 + 11/3*w - 12],\ [401, 401, 1/3*w^3 + 2/3*w^2 - 6*w - 7],\ [409, 409, 1/3*w^3 + 1/3*w^2 - 14/3*w - 3],\ [409, 409, -1/3*w^3 + 4/3*w^2 + 3*w - 7],\ [421, 421, -1/3*w^3 + 5/3*w^2 + 11/3*w - 13],\ [421, 421, 1/3*w^3 + 2/3*w^2 - 6*w - 8],\ [431, 431, 2/3*w^2 + 4/3*w - 9],\ [431, 431, 2/3*w^2 - 8/3*w - 7],\ [449, 449, 2/3*w^3 - 17/3*w + 2],\ [449, 449, 1/3*w^3 + 4/3*w^2 - 20/3*w - 11],\ [461, 461, 1/3*w^2 + 5/3*w - 8],\ [461, 461, 1/3*w^3 + 1/3*w^2 - 17/3*w - 3],\ [461, 461, -1/3*w^3 + 4/3*w^2 + 4*w - 8],\ [461, 461, 1/3*w^2 - 7/3*w - 6],\ [479, 479, -1/3*w^3 + 2/3*w^2 + 5/3*w - 9],\ [479, 479, 4/3*w^3 + w^2 - 40/3*w - 18],\ [479, 479, 4/3*w^3 - 5*w^2 - 22/3*w + 29],\ [479, 479, 1/3*w^3 - 1/3*w^2 - 2*w - 7],\ [491, 491, 2/3*w^3 - 5/3*w^2 - 5*w + 8],\ [491, 491, -1/3*w^3 + 3*w^2 + 10/3*w - 24],\ [491, 491, 1/3*w^3 + 2*w^2 - 25/3*w - 18],\ [491, 491, 2/3*w^3 - 1/3*w^2 - 19/3*w - 2],\ [499, 499, -1/3*w^3 + 10/3*w^2 - 4*w - 17],\ [499, 499, 1/3*w^3 - 7/3*w - 9],\ [499, 499, -1/3*w^3 + w^2 + 4/3*w - 11],\ [499, 499, -w^3 + 5/3*w^2 + 22/3*w - 14],\ [509, 509, w^3 - 14/3*w^2 - 10/3*w + 24],\ [509, 509, -2/3*w^2 + 5/3*w + 11],\ [509, 509, 2/3*w^2 + 1/3*w - 12],\ [509, 509, -2/3*w^3 + 3*w^2 + 8/3*w - 18],\ [521, 521, 1/3*w^3 - 13/3*w + 1],\ [521, 521, w^3 + 2/3*w^2 - 32/3*w - 12],\ [521, 521, 2/3*w^3 + 7/3*w^2 - 13*w - 23],\ [521, 521, -1/3*w^3 + w^2 + 10/3*w - 3],\ [541, 541, 2/3*w^3 - 17/3*w - 3],\ [541, 541, -1/3*w^3 + 4/3*w^2 + 2*w - 14],\ [541, 541, -1/3*w^3 + 4/3*w^2 + w - 1],\ [541, 541, -1/3*w^3 + 1/3*w^2 + 5*w - 4],\ [569, 569, 1/3*w^3 + 11/3*w^2 - 12*w - 26],\ [569, 569, -w^3 + 10/3*w^2 + 23/3*w - 21],\ [571, 571, w^3 - 7/3*w^2 - 23/3*w + 17],\ [571, 571, 2/3*w^3 - 3*w^2 - 11/3*w + 17],\ [599, 599, 1/3*w^3 + 2/3*w^2 - 4*w - 1],\ [599, 599, 1/3*w^3 - 5/3*w^2 - 5/3*w + 4],\ [601, 601, 1/3*w^3 - 7/3*w - 6],\ [601, 601, -2/3*w^3 + 2*w^2 + 11/3*w - 9],\ [601, 601, 2/3*w^3 - 17/3*w - 4],\ [601, 601, -1/3*w^3 + w^2 + 4/3*w - 8],\ [619, 619, -2/3*w^3 + 10/3*w^2 + 19/3*w - 26],\ [619, 619, 2/3*w^3 + 4/3*w^2 - 11*w - 17],\ [631, 631, 1/3*w^3 - 7/3*w^2 - w + 14],\ [631, 631, 1/3*w^3 + 4/3*w^2 - 14/3*w - 11],\ [659, 659, -2/3*w^3 + 2/3*w^2 + 6*w + 1],\ [659, 659, 2/3*w^3 - 4/3*w^2 - 16/3*w + 7],\ [661, 661, -2/3*w^3 + 13/3*w^2 + 16/3*w - 32],\ [661, 661, -2/3*w^3 - 7/3*w^2 + 12*w + 23],\ [691, 691, 1/3*w^3 - 11/3*w^2 - 11/3*w + 29],\ [691, 691, -2/3*w^3 + 10/3*w^2 + 10/3*w - 23],\ [701, 701, 2/3*w^3 - 4/3*w^2 - 13/3*w - 3],\ [701, 701, 2/3*w^3 - 4/3*w^2 - 16/3*w - 1],\ [701, 701, -2/3*w^3 + 2/3*w^2 + 6*w - 7],\ [701, 701, -2/3*w^3 + 2/3*w^2 + 5*w - 8],\ [709, 709, -4/3*w^3 + 31/3*w - 2],\ [709, 709, -w^3 + 1/3*w^2 + 32/3*w + 4],\ [719, 719, -2/3*w^3 + w^2 + 17/3*w - 2],\ [719, 719, 1/3*w^3 - 2*w^2 - 4/3*w + 9],\ [719, 719, 1/3*w^3 + w^2 - 13/3*w - 6],\ [719, 719, 2/3*w^3 - w^2 - 17/3*w + 4],\ [739, 739, 2/3*w^3 + 2/3*w^2 - 19/3*w - 11],\ [739, 739, -2/3*w^3 + 8/3*w^2 + 3*w - 16],\ [751, 751, -1/3*w^3 + w^2 + 4/3*w - 9],\ [751, 751, 1/3*w^3 - 7/3*w - 7],\ [761, 761, 1/3*w^3 - 16/3*w - 4],\ [761, 761, w^3 - 1/3*w^2 - 29/3*w - 12],\ [761, 761, -w^3 + 8/3*w^2 + 22/3*w - 21],\ [761, 761, -1/3*w^3 + w^2 + 13/3*w - 9],\ [769, 769, w^3 - 7/3*w^2 - 23/3*w + 8],\ [769, 769, 1/3*w^3 + 4/3*w^2 - 14/3*w - 14],\ [769, 769, -1/3*w^3 + 7/3*w^2 + w - 17],\ [769, 769, 1/3*w^3 - 3*w^2 + 11/3*w + 13],\ [811, 811, 1/3*w^3 + w^2 - 10/3*w - 12],\ [811, 811, -1/3*w^3 + 2*w^2 + 1/3*w - 14],\ [821, 821, -1/3*w^3 + 13/3*w - 3],\ [821, 821, -1/3*w^3 + w^2 + 10/3*w - 1],\ [839, 839, -w^3 - 5/3*w^2 + 32/3*w + 18],\ [839, 839, 1/3*w^3 + 3*w^2 - 7/3*w - 22],\ [839, 839, 1/3*w^3 - 4*w^2 + 14/3*w + 21],\ [839, 839, -w^3 + 14/3*w^2 + 13/3*w - 26],\ [841, 29, -5/3*w^2 + 5/3*w + 11],\ [859, 859, -w^3 + 5/3*w^2 + 25/3*w - 1],\ [859, 859, -w^3 + 4/3*w^2 + 26/3*w - 8],\ [911, 911, -1/3*w^3 + 1/3*w^2 + 5*w + 1],\ [911, 911, 1/3*w^3 - 2/3*w^2 - 14/3*w + 6],\ [919, 919, 2/3*w^3 - 2/3*w^2 - 5*w - 7],\ [919, 919, -2/3*w^3 + 7/3*w^2 + 10/3*w - 7],\ [919, 919, 2/3*w^3 + 1/3*w^2 - 6*w - 2],\ [919, 919, -2/3*w^3 + 4/3*w^2 + 13/3*w - 12],\ [941, 941, 5/3*w^2 + 1/3*w - 9],\ [941, 941, 5/3*w^2 - 11/3*w - 7],\ [961, 31, 5/3*w^2 - 5/3*w - 13],\ [971, 971, -1/3*w^3 + w^2 + 13/3*w - 8],\ [971, 971, 2/3*w^3 - 2/3*w^2 - 5*w + 2],\ [971, 971, -2/3*w^3 + 4/3*w^2 + 13/3*w - 3],\ [971, 971, 1/3*w^3 - 16/3*w - 3],\ [991, 991, 10/3*w^2 - 22/3*w - 19],\ [991, 991, 10/3*w^2 + 2/3*w - 23],\ [1009, 1009, -2*w^2 + 3*w + 16],\ [1009, 1009, 2*w^2 - w - 17],\ [1019, 1019, 1/3*w^3 + w^2 - 19/3*w - 14],\ [1019, 1019, -1/3*w^3 + 2*w^2 + 10/3*w - 19],\ [1021, 1021, 2/3*w^3 - 3*w^2 - 14/3*w + 19],\ [1021, 1021, 11/3*w^2 + 4/3*w - 27],\ [1021, 1021, 11/3*w^2 - 26/3*w - 22],\ [1021, 1021, -2/3*w^3 - w^2 + 26/3*w + 12],\ [1031, 1031, -2/3*w^3 + 5/3*w^2 + 4*w + 1],\ [1031, 1031, -2/3*w^3 + 1/3*w^2 + 16/3*w - 6],\ [1049, 1049, -1/3*w^3 - 2/3*w^2 + 4*w - 1],\ [1049, 1049, 1/3*w^3 + 5/3*w^2 - 6*w - 14],\ [1051, 1051, 1/3*w^3 - 16/3*w - 2],\ [1051, 1051, -1/3*w^3 + w^2 + 13/3*w - 7],\ [1061, 1061, 11/3*w^2 + 1/3*w - 27],\ [1061, 1061, 11/3*w^2 - 23/3*w - 23],\ [1069, 1069, w^2 + 2*w - 11],\ [1069, 1069, w^2 - 4*w - 8],\ [1109, 1109, w^3 - 5/3*w^2 - 19/3*w - 1],\ [1109, 1109, -w^3 - w^2 + 12*w + 16],\ [1129, 1129, -w^3 + 5/3*w^2 + 25/3*w - 11],\ [1129, 1129, -w^3 + 4/3*w^2 + 26/3*w + 2],\ [1151, 1151, 1/3*w^3 + w^2 - 16/3*w - 7],\ [1151, 1151, -1/3*w^3 + 2*w^2 + 7/3*w - 11],\ [1171, 1171, w^3 - 8/3*w^2 - 16/3*w + 1],\ [1171, 1171, -w^3 + 1/3*w^2 + 23/3*w - 6],\ [1201, 1201, -1/3*w^3 + 2/3*w^2 + 14/3*w - 4],\ [1201, 1201, -1/3*w^3 - 4/3*w^2 + 8/3*w + 13],\ [1201, 1201, 1/3*w^3 - 7/3*w^2 + w + 14],\ [1201, 1201, 1/3*w^3 - 1/3*w^2 - 5*w + 1],\ [1231, 1231, -1/3*w^3 + 5/3*w^2 + 8/3*w - 8],\ [1231, 1231, 1/3*w^3 + 2/3*w^2 - 5*w - 4],\ [1249, 1249, -4/3*w^3 + 7/3*w^2 + 9*w + 4],\ [1249, 1249, 4/3*w^2 - 13/3*w - 9],\ [1249, 1249, 4/3*w^2 + 5/3*w - 12],\ [1249, 1249, -4/3*w^3 + 5/3*w^2 + 29/3*w - 14],\ [1259, 1259, 2/3*w^3 - w^2 - 20/3*w + 11],\ [1259, 1259, -2/3*w^3 + w^2 + 20/3*w + 4],\ [1279, 1279, -2/3*w^3 - 1/3*w^2 + 5*w + 8],\ [1279, 1279, 1/3*w^3 - w^2 - 7/3*w + 12],\ [1279, 1279, -2*w^2 + 3*w + 13],\ [1279, 1279, -2/3*w^3 + 7/3*w^2 + 7/3*w - 12],\ [1289, 1289, w^3 + 1/3*w^2 - 28/3*w - 8],\ [1289, 1289, -2/3*w^3 + 3*w^2 + 8/3*w - 19],\ [1289, 1289, 2/3*w^3 + w^2 - 20/3*w - 14],\ [1289, 1289, 5/3*w^3 - 11/3*w^2 - 11*w - 1],\ [1291, 1291, -w^3 + 2/3*w^2 + 25/3*w - 7],\ [1291, 1291, w^3 - 7/3*w^2 - 20/3*w + 1],\ [1301, 1301, w^3 - 10/3*w^2 - 14/3*w + 16],\ [1301, 1301, -w^3 + 14/3*w^2 + 25/3*w - 34],\ [1319, 1319, -5/3*w^3 + 6*w^2 + 17/3*w - 14],\ [1319, 1319, 1/3*w^3 - 2/3*w^2 - 8/3*w - 4],\ [1319, 1319, -1/3*w^3 + 1/3*w^2 + 3*w - 7],\ [1319, 1319, -5/3*w^3 - w^2 + 38/3*w + 4],\ [1361, 1361, w^3 - 4*w^2 - 6*w + 23],\ [1361, 1361, w^3 + w^2 - 11*w - 14],\ [1369, 37, -w^3 + 7*w - 4],\ [1369, 37, -1/3*w^3 - 2*w^2 + 10/3*w + 16],\ [1381, 1381, -2/3*w^3 + 20/3*w + 1],\ [1381, 1381, 2/3*w^3 - 2*w^2 - 14/3*w + 7],\ [1399, 1399, -w^3 + 4/3*w^2 + 20/3*w + 4],\ [1399, 1399, -w^3 + 5/3*w^2 + 19/3*w - 11],\ [1429, 1429, -2/3*w^3 + 2/3*w^2 + 4*w - 7],\ [1429, 1429, w^3 + 1/3*w^2 - 19/3*w + 1],\ [1451, 1451, w^3 - 4/3*w^2 - 23/3*w + 9],\ [1451, 1451, -1/3*w^3 + 2*w^2 - 2/3*w - 12],\ [1451, 1451, -1/3*w^3 - w^2 + 7/3*w + 11],\ [1451, 1451, 1/3*w^3 - 8/3*w^2 + 10/3*w + 12],\ [1459, 1459, -2/3*w^3 + 8/3*w^2 + 5*w - 16],\ [1459, 1459, -1/3*w^3 + 8/3*w^2 + 2/3*w - 16],\ [1459, 1459, -1/3*w^3 - 5/3*w^2 + 5*w + 13],\ [1459, 1459, 2/3*w^3 + 2/3*w^2 - 25/3*w - 9],\ [1471, 1471, -2/3*w^3 + 3*w^2 + 5/3*w - 16],\ [1471, 1471, -13/3*w^2 - 5/3*w + 33],\ [1471, 1471, -13/3*w^2 + 31/3*w + 27],\ [1471, 1471, 2/3*w^3 + w^2 - 17/3*w - 12],\ [1489, 1489, 1/3*w^3 - 7/3*w^2 - 4*w + 17],\ [1489, 1489, 1/3*w^3 + 4/3*w^2 - 23/3*w - 11],\ [1531, 1531, -w^3 + 3*w^2 + 7*w - 17],\ [1531, 1531, w^3 - 10*w - 8],\ [1549, 1549, w^3 + 2/3*w^2 - 35/3*w - 13],\ [1549, 1549, -2/3*w^3 + 5*w^2 + 17/3*w - 36],\ [1549, 1549, -2/3*w^3 - 3*w^2 + 41/3*w + 26],\ [1549, 1549, -w^3 + 11/3*w^2 + 22/3*w - 23],\ [1571, 1571, -w^3 + 3*w^2 + 7*w - 23],\ [1571, 1571, -1/3*w^3 - 2*w^2 + 4/3*w + 17],\ [1571, 1571, -1/3*w^3 + 1/3*w^2 + 6*w - 13],\ [1571, 1571, -2/3*w^3 + 4*w^2 + 8/3*w - 23],\ [1601, 1601, -w^3 + 4/3*w^2 + 26/3*w - 11],\ [1601, 1601, -w^3 + 8/3*w^2 + 25/3*w - 24],\ [1601, 1601, -1/3*w^3 - 7/3*w^2 + 23/3*w + 18],\ [1601, 1601, -w^3 + 5/3*w^2 + 25/3*w + 2],\ [1609, 1609, -5/3*w^3 + 2/3*w^2 + 12*w - 8],\ [1609, 1609, 2/3*w^3 + 4/3*w^2 - 7*w - 17],\ [1619, 1619, w^3 - 4/3*w^2 - 23/3*w - 3],\ [1619, 1619, -w^3 + 5/3*w^2 + 22/3*w - 11],\ [1621, 1621, 7/3*w^2 - 13/3*w - 11],\ [1621, 1621, -2/3*w^3 + 8/3*w^2 + 6*w - 17],\ [1669, 1669, 5/3*w^2 + 1/3*w - 16],\ [1669, 1669, 5/3*w^2 - 11/3*w - 14],\ [1681, 41, 2*w^2 - 2*w - 17],\ [1681, 41, 2*w^2 - 2*w - 13],\ [1699, 1699, 1/3*w^3 - 2*w^2 + 5/3*w + 11],\ [1699, 1699, -1/3*w^3 - w^2 + 4/3*w + 11],\ [1721, 1721, 1/3*w^2 + 8/3*w - 11],\ [1721, 1721, 1/3*w^2 - 10/3*w - 8],\ [1789, 1789, -2/3*w^2 - 7/3*w - 4],\ [1789, 1789, -w^3 + 2*w^2 + 8*w - 13],\ [1789, 1789, 4/3*w^2 - 13/3*w - 8],\ [1789, 1789, 2/3*w^2 - 11/3*w + 7],\ [1811, 1811, 2/3*w^2 - 11/3*w - 9],\ [1811, 1811, 2/3*w^2 + 7/3*w - 12],\ [1831, 1831, 4/3*w^2 + 5/3*w - 9],\ [1831, 1831, -w^3 + 5/3*w^2 + 25/3*w - 2],\ [1861, 1861, 14/3*w^2 + 1/3*w - 33],\ [1861, 1861, 14/3*w^2 - 29/3*w - 28],\ [1871, 1871, -w^3 + 2/3*w^2 + 28/3*w - 3],\ [1871, 1871, 1/3*w^3 + w^2 - 22/3*w - 7],\ [1871, 1871, -1/3*w^3 + 2*w^2 + 13/3*w - 13],\ [1871, 1871, -w^3 + 7/3*w^2 + 23/3*w - 6],\ [1879, 1879, -w^3 + 8/3*w^2 + 22/3*w - 13],\ [1879, 1879, -w^3 + 1/3*w^2 + 29/3*w + 4],\ [1889, 1889, -5/3*w^3 + 2*w^2 + 38/3*w - 16],\ [1889, 1889, 5/3*w^3 - 3*w^2 - 35/3*w - 3],\ [1901, 1901, w^2 - 3*w - 11],\ [1901, 1901, w^2 + w - 13],\ [1931, 1931, 2/3*w^3 + 2*w^2 - 38/3*w - 21],\ [1931, 1931, w^3 - 2/3*w^2 - 25/3*w - 9],\ [1931, 1931, -w^3 + 7/3*w^2 + 20/3*w - 17],\ [1931, 1931, -2/3*w^3 + 4*w^2 + 20/3*w - 31],\ [1949, 1949, 2/3*w^3 + 5/3*w^2 - 28/3*w - 21],\ [1949, 1949, -1/3*w^3 + 3*w^2 + 1/3*w - 17],\ [1951, 1951, -1/3*w^3 + 8/3*w^2 + 2/3*w - 19],\ [1951, 1951, 1/3*w^3 + 5/3*w^2 - 5*w - 16],\ [1999, 1999, -5/3*w^3 + 3*w^2 + 38/3*w - 23],\ [1999, 1999, -1/3*w^3 - 5/3*w^2 + 4*w + 19],\ [1999, 1999, 1/3*w^3 - 8/3*w^2 + 1/3*w + 21],\ [1999, 1999, 5/3*w^3 - 2*w^2 - 41/3*w - 9]] primes = [ZF.ideal(I) for I in primes_array] heckePol = x^2 + 3*x + 1 K. = NumberField(heckePol) hecke_eigenvalues_array = [e, e, e + 4, e + 4, -4*e - 8, -4*e - 3, 2*e + 8, 2*e + 8, -3*e - 7, -3*e - 7, -2*e, -2*e, -e + 1, -e + 1, 8*e + 12, 8*e + 12, -5*e - 7, 8*e + 14, 8*e + 14, -5*e - 7, 4*e + 4, -4*e - 6, -4*e - 6, -7*e - 10, -7*e - 10, 7*e + 13, 7*e + 13, -e + 18, -2*e - 10, -2*e - 10, -2*e + 10, -2*e + 10, 9*e + 6, 9*e + 6, 11*e + 6, 11*e + 6, 10*e + 22, -2*e - 16, -2*e - 16, 10*e + 22, 12*e + 18, 12*e + 18, 12*e + 18, 12*e + 18, 7*e + 8, 7*e + 8, -22*e - 36, -22*e - 36, 9*e + 19, -5*e - 7, -5*e - 7, 9*e + 19, -20*e - 30, -20*e - 30, -14*e - 24, -14*e - 24, -8*e - 32, -8*e - 32, -5*e + 18, -13*e - 27, -13*e - 27, 5*e - 2, 5*e - 2, -e - 24, -e - 24, 20*e + 38, 20*e + 38, -2*e + 4, -2*e + 4, -9*e + 9, -9*e + 9, -15*e - 42, -4*e + 2, -4*e + 2, -15*e - 42, -22*e - 48, 8*e - 8, 8*e - 8, -22*e - 48, -10*e + 2, -10*e + 2, -10*e + 2, -10*e + 2, -8*e - 2, -22*e - 28, -22*e - 28, -8*e - 2, 25*e + 30, -9*e - 41, -9*e - 41, 25*e + 30, -9*e - 29, -24*e - 38, -24*e - 38, -9*e - 29, 9*e - 7, -9*e - 9, -9*e - 9, 9*e - 7, 16*e + 34, 16*e + 34, -12*e - 16, -12*e - 16, 6*e + 14, 6*e + 14, -3*e + 15, -9*e - 48, -9*e - 48, -3*e + 15, 4*e + 46, 4*e + 46, -22*e - 50, -22*e - 50, 18*e + 2, 18*e + 2, -5*e + 32, -5*e + 32, -24*e - 44, -24*e - 44, -5*e - 27, 9*e - 1, 9*e - 1, -5*e - 27, 23*e + 22, 23*e + 22, 24*e + 26, -18*e - 52, -18*e - 52, 24*e + 26, -4*e - 6, -4*e - 6, -10*e - 2, -10*e - 2, -5*e - 33, -27*e - 55, -27*e - 55, -5*e - 33, -3*e + 18, -e + 6, -e + 6, -3*e + 18, 30*e + 38, 30*e + 38, -15*e - 12, -15*e - 12, 24*e + 36, -6*e - 4, -6*e - 4, 24*e + 36, -16*e + 14, -2*e - 8, -2*e - 8, 20*e + 22, 20*e + 22, 2*e + 28, 16*e + 54, 16*e + 54, 2*e + 28, 15*e + 38, 15*e + 38, e + 21, 20*e + 38, 24*e + 58, 24*e + 58, 20*e + 38, -26*e - 62, -26*e - 62, 31*e + 54, 31*e + 54, 18*e + 32, 18*e + 32, 27*e + 46, 33*e + 65, 33*e + 65, 27*e + 46, 6*e + 6, 6*e + 6, -36*e - 54, -36*e - 54, -40*e - 72, -40*e - 72, 31*e + 51, 31*e + 51, -3*e + 43, -3*e + 43, 25*e + 25, 25*e + 25, 3*e - 43, 3*e - 43, -14*e - 18, -14*e - 18, 10*e + 12, 10*e + 12, -45*e - 68, -19*e - 48, -19*e - 48, -45*e - 68, 20*e + 12, 20*e + 12, 7*e - 2, e + 34, e + 34, 7*e - 2, 10*e - 10, 10*e - 10, -34*e - 56, -4*e - 16, -4*e - 16, -34*e - 56, -5*e + 55, -32*e - 58, -32*e - 58, -5*e + 55, 22*e + 16, 22*e + 16, -39*e - 48, -39*e - 48, -46*e - 54, 18*e + 2, 18*e + 2, -46*e - 54, -45*e - 73, -45*e - 73, -3*e + 13, -3*e + 13, 9*e + 8, 9*e + 8, 22*e + 58, 22*e + 58, -16*e - 14, -16*e - 14, -18*e - 24, -8*e - 40, -8*e - 40, -18*e - 24, 36*e + 34, 22*e + 8, 22*e + 8, 36*e + 34, 12*e + 36, 8*e + 60, 8*e + 60, 12*e + 36, -41*e - 79, -41*e - 79, 40*e + 82, 40*e + 82, -31*e - 79, 10, 10, -31*e - 79, 20*e + 22, 28*e + 40, 28*e + 40, 20*e + 22, -24*e - 14, 29*e + 53, 29*e + 53, -24*e - 14, 8*e + 22, 8*e + 22, -50*e - 60, -50*e - 60, -29*e - 74, -29*e - 74, 3*e - 53, 3*e - 53, -44*e - 34, 44*e + 98, 12*e - 22, 12*e - 22, 39*e + 58, 39*e + 58, 39*e + 71, 23*e + 2, 23*e + 2, 39*e + 71, 30*e + 48, 30*e + 48, -38, -38, -33*e - 85, -33*e - 85, -6*e - 6, 36*e + 72, 36*e + 72, -6*e - 6, -32*e - 18, -32*e - 18, 7*e + 33, 7*e + 33, 15*e + 8, 15*e + 8, 22*e + 40, 24*e + 28, 24*e + 28, 22*e + 40, -4*e - 6, -4*e - 6, 20*e + 28, 20*e + 28, -14*e - 6, -54*e - 96, -54*e - 96, -14*e - 6] hecke_eigenvalues = {} for i in range(len(hecke_eigenvalues_array)): hecke_eigenvalues[primes[i]] = hecke_eigenvalues_array[i] AL_eigenvalues = {} # EXAMPLE: # pp = ZF.ideal(2).factor()[0][0] # hecke_eigenvalues[pp]