"Source: Text/Basics/RngMPol.text";
"Line: 546";
"Date: Thu Sep 25 14:47:46 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Basics/RngMPol.text, line: 546
// Example: H25E3 ()
print "Example: H25E3";
ei := GetEchoInput();
SetEchoInput(true);
Q := RationalField();
R<x, y> := PolynomialRing(Q, 2);
A<a> := PolynomialRing(IntegerRing());
N<z, w> := NumberField([a^3-2, a^2+5]);
h := hom< R -> N | z, w >;
h(x^11*y^3-x+4/5*y-13/4);
SetEchoInput(ei);
