fact: Definition step_order G H (s: ostep G H): nat := match s with | ostep_v0 _ _ _ _ => 0 | ostep_v1 _ _ _ _ _ _ _ _ => 1 | ostep_v2 _ _ _ _ _ _ _ _ _ _ _ _ _ _ => 2 | ostep_e0 _ _ _ _ => 3 | ostep_e2 _ _ _ _ _ _ _ _ _ => 4 end.
imports: HB(structures) Coq(Relation_Definitions Morphisms RelationClasses) mathcomp(all_ssreflect) GraphTheory(edone finite_quotient preliminaries bij equiv) GraphTheory(setoid_bigop structures pttdom rewriting) GraphTheory(finmap_plus)