"Source: Text/Ring/FldQuad.text";
"Line: 168";
"Date: Fri Sep 26 12:10:11 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Ring/FldQuad.text, line: 168
// Example: H37E2 ()
print "Example: H37E2";
ei := GetEchoInput();
SetEchoInput(true);
Q<w> := QuadraticField(5);
F<z> := CyclotomicField(5);
C<c> := PolynomialRing(F);
Factorization(c^2-5);
h := hom< Q -> F | -2*z^3 - 2*z^2 - 1 >;
h(w)^2;
assert $1 eq 5;
SetEchoInput(ei);
