Given algebras A=K[x1,...,xm]/I and B=K[y1,...,yn]/J and homomorphism f:K[x]-->K[y], I'd like to check if f(I)⊆J, which would mean that f defines a homomorphism f: A-->B.
The code below returns an error, since f(I) is undefined. If p∈K[x], how can I calculate f(p)∈K[y]? I've tried subst(p,...); and imap(...), but without success.
Code:
LIB"algebra.lib";
ring A=0,(x,y,z,w),dp; ideal I=xy+zw,x+y+w+z,x2-w2;
ring B=0,(s,t),dp; ideal J=s2t2,st+1;
ideal ff=s4,s3t,st3,t4; map f=A,ff; reduce(f(I),J);
It would be desirable to be able to check f(I)⊆J automatically, i.e. at once (with a single command) and not manually (for each f(g_i) where g_i are generators of I).