∀ {X : Type u_1} [inst : TopologicalSpace X] (p : Fin (0 + 1) → X) (G : (k : Fin 0) → Path (p k.castSucc) (p k.succ)),
  (Path.refl (p 0)).Homotopy (Path.concat p G) = (Path.refl (p 0)).Homotopy (Path.refl (p 0))