(X : Type) : RetractOf X := Build_RetractOf X X idmap idmap (fun _ => 1).
Require Import HoTT.Basics HoTT.Types. Require Import HFiber Constant. Require Import Truncations.Core Modalities.Modality. Require Import Homotopy.IdentitySystems.