apply ih
case insert
V : Type u_1
inst✝ : Finite V
motive : Digraph V → Prop
hbot : motive ⊥
hdelete : ∀ (G : Digraph V) (v w : V), G.Adj v w → motive (deleteEdges G {(v, w)}) → motive G
this✝ : Fintype V
e : V × V
s : Finset (V × V)
he : ¬e ∈ s
ih : ∀ (G : Digraph V), Set.toFinset (edgeSet G) = s → motive G
G : Digraph V
hs : Set.toFinset (edgeSet G) = insert e s
this : e ∈ edgeSet G
⊢ motive (deleteEdges G {(e.fst, e.snd)})
case insert.hs
V : Type u_1
inst✝ : Finite V
motive : Digraph V → Prop
hbot : motive ⊥
hdelete : ∀ (G : Digraph V) (v w : V), G.Adj v w → motive (deleteEdges G {(v, w)}) → motive G
this✝ : Fintype V
e : V × V
s : Finset (V × V)
he : ¬e ∈ s
ih : ∀ (G : Digraph V), Set.toFinset (edgeSet G) = s → motive G
G : Digraph V
hs : Set.toFinset (edgeSet G) = insert e s
this : e ∈ edgeSet G
⊢ Set.toFinset (edgeSet (deleteEdges G {(e.fst, e.snd)})) = s