Poly.simp?
This PR adds `Poly.simp?` and improves the function for computing S-polynomials.
Std.Channel
Nat
BEq