// Genus 2 curves downloaded from the LMFDB on 27 January 2021.
// Query "{'abs_disc': 1452, 'cond': 726, 'class': '726.a'}" returned 1 curves.
// Below are two lists, one called labels, and one called data (in matching order).
// Each entry in the data list has the form:
// [[f coeffs],[h coeffs]]
// defining the hyperelliptic curve y^2+h(x)y=f(x).
//
// To create a list of curves, type "curves:= make_data();"
labels := [*\
"726.a.1452.1"*];
data := [*\
[*[*0, -1, -2, 6, 2, 2*], [*1, 0, 1*]*]*];
function make_data()
R:=PolynomialRing(Rationals());
return [HyperellipticCurve(R![c:c in r[1]],R![c:c in r[2]]):r in data];
end function;