Synopsis:
Code:
-- ../../../Macaulay2/m2/ofcm.m2:182-189 RingElement _ Ring := RingElement => (x,R) -> ( if ring x === R then x else try x * 1_R else try (baseName x)_R ---- we might enable the line below if map(R,S) would insist on finding every variable -- else try (map(R,ring x)) x else error "failed to interpret ring element in ring" )