"""
  This code can be loaded, or copied and paste using cpaste, into Sage.
  It will load the data associated to the BMF, including
  the field, level, and Hecke and Atkin-Lehner eigenvalue data (if known).
"""

P = PolynomialRing(QQ, "x")
x = P.gen()
g = P([17, -1, 1])
F = NumberField(g, "a")
a = F.gen()
ZF = F.ring_of_integers()

NN = ZF.ideal((893, a + 381))

primes_array = [
(2,),(3,),(-a,),(a-1,),(a+1,),(a-2,),(a+2,),(a-3,),(5,),(a+3,),(a-4,),(a+4,),(a-5,),(a+5,),(a-6,),(7,),(a+6,),(a-7,),(-2*a+1,),(-2*a+3,),(2*a+1,),(a+7,),(a-8,),(-2*a+5,),(2*a+3,),(a+8,),(a-9,),(-2*a+7,),(2*a+5,),(a+9,),(a-10,),(11,),(a+10,),(a-11,),(-2*a+9,),(2*a+7,),(a+11,),(a-12,),(-3*a+1,),(3*a-2,),(-3*a+4,),(3*a+1,),(-3*a-2,),(3*a-5,),(-2*a+11,),(2*a+9,),(13,),(a+12,),(a-13,),(-3*a+7,),(3*a+4,),(-3*a-5,),(3*a-8,),(a+13,),(a-14,),(-2*a+13,),(2*a+11,),(-3*a+10,),(3*a+7,),(a+14,),(a-15,),(-3*a-8,),(3*a-11,),(a+15,),(a-16,),(-2*a+15,),(2*a+13,),(-4*a+1,),(4*a-3,),(-4*a+5,),(4*a+1,),(-3*a+13,),(3*a+10,),(-4*a-3,),(4*a-7,),(-3*a-11,),(3*a-14,),(-4*a+9,),(4*a+5,),(-4*a-7,),(4*a-11,),(a+18,),(a-19,),(-4*a+13,),(4*a+9,),(a+19,),(a-20,),(-5*a+3,),(-5*a+2,),(-5*a+1,),(5*a-4,),(-5*a+6,),(5*a+1,),(5*a+2,),(5*a-7,),(-5*a+8,),(-5*a-3,),(-3*a+19,),(3*a+16,),(-5*a-4,)]
primes = [ZF.ideal(I) for I in primes_array]

heckePol = x
K = QQ
e = 1

hecke_eigenvalues_array = [-1, 4, 0, -2, 1, 5, -1, 3, 8, 0, -2, 10, 3, -1, 6, 8, 14, -9, -13, 6, -1, -13, 8, 15, -6, 0, -14, 9, 4, 12, 4, 10, 17, 16, -4, 14, 9, 15, -12, -4, -23, -19, 5, -1, 5, 12, -8, 6, -22, 2, 13, -18, -15, -18, 10, 4, -3, -4, 22, 16, -12, 6, -10, 0, -3, 1, 16, -3, 6, -6, 22, 0, 4, -6, 16, 18, -1, 18, -11, -28, -19, 23, -37, -18, -15, -15, 18, 15, 15, -27, -6, -8, 27, 18, -11, -8, 26, 11, 5, -15]
hecke_eigenvalues = {}
for i in range(len(hecke_eigenvalues_array)):
    hecke_eigenvalues[primes[i]] = hecke_eigenvalues_array[i]

AL_eigenvalues = {}
AL_eigenvalues[ZF.ideal((a + 1,))] = -1
AL_eigenvalues[ZF.ideal((a + 5,))] = 1

# EXAMPLE:
# pp = ZF.ideal(2).factor()[0][0]
# hecke_eigenvalues[pp]