domain(phi: RINGHOM): RING
/**/ P := NewPolyRing(RingQQ(), "alpha,beta"); /**/ phi := CanonicalHom(RingZZ(), P); /**/ domain(phi); ZZ /**/ psi := CoeffEmbeddingHom(P); /**/ domain(psi); QQ