// Genus 2 curves downloaded from the LMFDB on 10 June 2023.
// Query "{'abs_disc': 800000, 'cond': 10000, 'class': '10000.b'}" 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 called curves, type "curves:= make_data();"
labels := [*
"10000.b.800000.1"*];
data := [*
[*[*1, 0, 0, 0, 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;