"Source: Text/Basics/RngPol.text";
"Line: 356";
"Date: Tue Aug  3 18:56:32 2021";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Basics/RngPol.text, line: 356
// Example: H24E3 ()
print "Example: H24E3";
ei := GetEchoInput();
SetEchoInput(true);
Z := Integers();
Q := RationalField();
P<x> := PolynomialRing(Z);
S<y>, h := ChangeRing(P, Q);
h(x^3-2*x+5);
S ! (x^3-2*x+5);
m := hom< Z -> Q | x :-> 3*x >;
S<y>, h := ChangeRing(P, Q, m);
h(x^3-2*x+5);
SetEchoInput(ei);
