fact: CoInductive psplit z x y : Path x y -> Prop := PSplit (p1 : Path x z) (p2 : Path z y) : psplit z (pcat p1 p2).
imports: HB(structures) Coq(Setoid CMorphisms) mathcomp(all_ssreflect) GraphTheory(edone preliminaries bij)