induction p <;> simp [*, concat_nil]
V : Type u
V' : Type v
V'' : Type w
G : Digraph V
G' : Digraph V'
G'' : Digraph V''
u v w : V
p : Walk G u v
h : G.Adj v w
⊢ support (concat p h) = List.concat (support p) w
no goals