i1 : isConstant 3 o1 = true
i2 : QQ[a,b][x,y];
i3 : isConstant (x+a-x) o3 = true
i4 : isConstant x o4 = false
-- ../../../../Macaulay2/m2/enginering.m2:530 isConstant RingElement := r -> r == 0 or all(degree r, i -> i === 0)