"Source: Text/Geometry/Scheme.text";
"Line: 5005";
"Date: Fri May 26 16:23:18 2023";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Geometry/Scheme.text, line: 5005
// Example: H119E32 ()
print "Example: H119E32";
ei := GetEchoInput();
SetEchoInput(true);
k := Rationals();
A<t> := AffineSpace(k,1);
B<x,y> := AffineSpace(k,2);
f := map< A -> B | [t^3 + t, t^2 - 3] >;
f;
Domain(f) eq A;
assert $1;
Codomain(f);
Image(f);
SetEchoInput(ei);
