fact: Example Contr_UIP (A : Type) (H : Contr A) : UIP A := _.
imports: Equations.Init Equations.CoreTactics HoTT.Basics.Trunc HoTT.HSet Equations.HoTT.Logic Equations.HoTT.Relation Equations.HoTT.Relation_Properties Equations.HoTT.WellFounded