filterOutIdentities :: Equations -> Equations
filterOutIdentities = filterOut isIdentity
filterOutIdentities :: Equations -> Equations
filterOutIdentities = filterOut isIdentity
filterOutIdentities = filterOut isIdentity