{A B} (f : A <~>* B) : B <~>* A. Proof. snrapply Build_pEquiv. 1: apply (Build_pMap _ _ f^-1). 1: apply moveR_equiv_V; symmetry; apply point_eq. exact _. Defined.
Require Import Basics Types. Require Import Homotopy.IdentitySystems. Require Import WildCat. Require Import Truncations.Core. Require Import ReflectiveSubuniverse. Require Import Extensions.