{A} `{HasEquivs A} {a b : A} (f : a $<~> b) : a $-> b := @' A _ _ _ _ _ a b f.
Require Import Basics.Utf8 Basics.Overture Basics.Tactics Basics.Equivalences. Require Import WildCat.Core. Require Import WildCat.Opposite.