"Source: Text/Basics/RngPol.text";
"Line: 512";
"Date: Tue Aug  3 18:56:32 2021";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Basics/RngPol.text, line: 512
// Example: H24E4 ()
print "Example: H24E4";
ei := GetEchoInput();
SetEchoInput(true);
Z := Integers();
P<x> := PolynomialRing(Z);
Re := RealField(20);
half := hom< P -> Re | 1/2 >;
half(x^3-3*x+5);
SetEchoInput(ei);
