proposition: Lemma pequiv_torus_prod_circles `{Funext} : T <~>* S1 * S1.
proof: Proof. srapply Build_pEquiv'. 1: apply equiv_torus_prod_Circle. reflexivity. Defined.
imports: Basics Types Pointed WildCat Modalities.ReflectiveSubuniverse Truncations.Core Algebra.AbGroups Homotopy.HomotopyGroup Homotopy.PinSn Spaces.Int.Core Spaces.Circle Spaces.Torus.Torus Spaces.Torus.TorusEquivCircles