fact: Definition iscancelableif {X : hSet} (opp : binop X) (x : X) (isl : ∏ a b : X, paths (opp x a) (opp x b) -> a = b) (isr : ∏ a b : X, paths (opp a x) (opp b x) -> a = b) : iscancelable opp x := make_dirprod (islcancelableif opp x isl) (isrcancelableif opp x isr).
imports: UniMath.Algebra.Groups UniMath.Algebra.RigsAndRings