fact: Definition moveL_equiv_V_0gpd {G H : ZeroGpd} (f : G $<~> H) (x : H) (y : G) (p : equiv_fun_0gpd f y $== x) : y $== equiv_fun_0gpd f^-1$ x := (cat_eissect f y)^$ $@ fmap (equiv_fun_0gpd f^-1$) p.
imports: Basics.Overture Basics.Tactics WildCat.Core WildCat.Equiv WildCat.EquivGpd WildCat.Prod