Lemma trivialTorsorAuto_mult (G:gr) (g h:G) : composeActionIso (trivialTorsorAuto G g) (trivialTorsorAuto G h) = (trivialTorsorAuto G (op g h)). Proof. intros. simple refine (subtypePath _ _). { intro; apply is_equivariant_isaprop. } { simple refine (subtypePath _ _). { intro; apply isapropisweq. } { apply funextsec; intro x; simpl. exact (assocax _ x g h). } } Defined.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.Propositions. Require Import UniMath.MoreFoundations.Notations. Require Import UniMath.MoreFoundations.Univalence. Require Import UniMath.MoreFoundations.Tactics. Require Import UniMath.Algebra.Monoids. Require Import UniMath.Algebra.Groups. Require Import UniMath.OrderTheory.OrderedSets.OrderedSets. Import UniMath.MoreFoundations.PartA.