"Source: Text/Geometry/RieSrf.text";
"Line: 704";
"Date: Thu Sep 25 14:47:45 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Geometry/RieSrf.text, line: 704
// Example: H127E8 ()
print "Example: H127E8";
ei := GetEchoInput();
SetEchoInput(true);
p<x> := BernoulliPolynomial(8);
p;
X := RiemannSurface(BernoulliPolynomial(8),8);
Genus(X);
HolomorphicDifferentials(X);
Genus(X) eq #HolomorphicDifferentials(X);
assert $1;
SetEchoInput(ei);
