// Magma code for working with elliptic curve 4.4.18496.1-4.3-b1
// (Note that not all these functions may be available, and some may take a long time to execute.)


// Define the base number field: 
R<x> := PolynomialRing(Rationals()); K<a> := NumberField(R![2, 12, -11, -2, 1]);

// Define the curve: 
E := EllipticCurve([K![-32/9,5/9,2/3,-1/9],K![-22/9,-14/9,1/3,1/9],K![-11/3,11/3,1,-1/3],K![-179/9,170/9,11/3,-16/9],K![-196/9,142/9,10/3,-14/9]]);

// Compute the conductor: 
Conductor(E);

// Compute the norm of the conductor: 
Norm(Conductor(E));

// Compute the discriminant: 
Discriminant(E);

// Compute the norm of the discriminant: 
Norm(Discriminant(E));

// Compute the j-invariant: 
jInvariant(E);

// Test for Complex Multiplication: 
HasComplexMultiplication(E);

// Compute the Mordell-Weil rank: 
Rank(E);

// Compute the generators (of infinite order): 
gens := [P:P in Generators(E)|Order(P) eq 0]; gens;

// Compute the heights of the generators (of infinite order): 
[Height(P):P in gens];

// Compute the regulator: 
Regulator(gens);

// Compute the torsion subgroup: 
T,piT := TorsionSubgroup(E); Invariants(T);

// Compute the order of the torsion subgroup: 
Order(T);

// Compute the generators of the torsion subgroup: 
[piT(P) : P in Generators(T)];

// Compute the local reduction data at primes of bad reduction: 
LocalInformation(E);