ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  eupth2lemsfi GIF version

Theorem eupth2lemsfi 16702
Description: Lemma for eupth2fi 16703 (induction step): The only vertices of odd degree in a graph with an Eulerian path are the endpoints, and then only if the endpoints are distinct, if the Eulerian path shortened by one edge has this property. (Contributed by Mario Carneiro, 8-Apr-2015.) (Revised by AV, 26-Feb-2021.)
Hypotheses
Ref Expression
eupth2.v 𝑉 = (Vtx‘𝐺)
eupth2.i 𝐼 = (iEdg‘𝐺)
eupth2fi.g (𝜑𝐺 ∈ UMGraph)
eupth2.f (𝜑 → Fun 𝐼)
eupth2.p (𝜑𝐹(EulerPaths‘𝐺)𝑃)
eupth2fi.fi (𝜑𝑉 ∈ Fin)
Assertion
Ref Expression
eupth2lemsfi ((𝜑𝑛 ∈ ℕ0) → ((𝑛 ≤ (♯‘𝐹) → {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)})) → ((𝑛 + 1) ≤ (♯‘𝐹) → {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃‘(𝑛 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑛 + 1))}))))
Distinct variable groups:   𝜑,𝑥   𝑥,𝐹   𝑥,𝐼   𝑥,𝑉   𝑥,𝑛
Allowed substitution hints:   𝜑(𝑛)   𝑃(𝑥,𝑛)   𝐹(𝑛)   𝐺(𝑥,𝑛)   𝐼(𝑛)   𝑉(𝑛)

Proof of Theorem eupth2lemsfi
Dummy variable 𝑦 is distinct from all other variables.
StepHypRef Expression
1 nn0re 9555 . . . . . 6 (𝑛 ∈ ℕ0𝑛 ∈ ℝ)
21adantl 277 . . . . 5 ((𝜑𝑛 ∈ ℕ0) → 𝑛 ∈ ℝ)
32lep1d 9255 . . . 4 ((𝜑𝑛 ∈ ℕ0) → 𝑛 ≤ (𝑛 + 1))
4 peano2re 8456 . . . . . 6 (𝑛 ∈ ℝ → (𝑛 + 1) ∈ ℝ)
52, 4syl 14 . . . . 5 ((𝜑𝑛 ∈ ℕ0) → (𝑛 + 1) ∈ ℝ)
6 eupth2.p . . . . . . . 8 (𝜑𝐹(EulerPaths‘𝐺)𝑃)
7 eupthiswlk 16679 . . . . . . . 8 (𝐹(EulerPaths‘𝐺)𝑃𝐹(Walks‘𝐺)𝑃)
8 wlkcl 16556 . . . . . . . 8 (𝐹(Walks‘𝐺)𝑃 → (♯‘𝐹) ∈ ℕ0)
96, 7, 83syl 17 . . . . . . 7 (𝜑 → (♯‘𝐹) ∈ ℕ0)
109nn0red 9604 . . . . . 6 (𝜑 → (♯‘𝐹) ∈ ℝ)
1110adantr 276 . . . . 5 ((𝜑𝑛 ∈ ℕ0) → (♯‘𝐹) ∈ ℝ)
12 letr 8402 . . . . 5 ((𝑛 ∈ ℝ ∧ (𝑛 + 1) ∈ ℝ ∧ (♯‘𝐹) ∈ ℝ) → ((𝑛 ≤ (𝑛 + 1) ∧ (𝑛 + 1) ≤ (♯‘𝐹)) → 𝑛 ≤ (♯‘𝐹)))
132, 5, 11, 12syl3anc 1278 . . . 4 ((𝜑𝑛 ∈ ℕ0) → ((𝑛 ≤ (𝑛 + 1) ∧ (𝑛 + 1) ≤ (♯‘𝐹)) → 𝑛 ≤ (♯‘𝐹)))
143, 13mpand 433 . . 3 ((𝜑𝑛 ∈ ℕ0) → ((𝑛 + 1) ≤ (♯‘𝐹) → 𝑛 ≤ (♯‘𝐹)))
1514imim1d 75 . 2 ((𝜑𝑛 ∈ ℕ0) → ((𝑛 ≤ (♯‘𝐹) → {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)})) → ((𝑛 + 1) ≤ (♯‘𝐹) → {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))))
16 fveq2 5693 . . . . . . . . 9 (𝑥 = 𝑦 → ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑥) = ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑦))
1716breq2d 4140 . . . . . . . 8 (𝑥 = 𝑦 → (2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑥) ↔ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑦)))
1817notbid 677 . . . . . . 7 (𝑥 = 𝑦 → (¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑥) ↔ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑦)))
1918elrab 2982 . . . . . 6 (𝑦 ∈ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑥)} ↔ (𝑦𝑉 ∧ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑦)))
20 eupth2.v . . . . . . . . 9 𝑉 = (Vtx‘𝐺)
21 eupth2.i . . . . . . . . 9 𝐼 = (iEdg‘𝐺)
22 eupth2fi.g . . . . . . . . . 10 (𝜑𝐺 ∈ UMGraph)
2322ad3antrrr 496 . . . . . . . . 9 ((((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) ∧ 𝑦𝑉) → 𝐺 ∈ UMGraph)
24 eupth2.f . . . . . . . . . 10 (𝜑 → Fun 𝐼)
2524ad3antrrr 496 . . . . . . . . 9 ((((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) ∧ 𝑦𝑉) → Fun 𝐼)
266ad3antrrr 496 . . . . . . . . 9 ((((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) ∧ 𝑦𝑉) → 𝐹(EulerPaths‘𝐺)𝑃)
27 eupth2fi.fi . . . . . . . . . 10 (𝜑𝑉 ∈ Fin)
2827ad3antrrr 496 . . . . . . . . 9 ((((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) ∧ 𝑦𝑉) → 𝑉 ∈ Fin)
29 eqid 2238 . . . . . . . . 9 𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩ = ⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩
30 eqid 2238 . . . . . . . . 9 𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩ = ⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩
31 simpr 110 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ0) → 𝑛 ∈ ℕ0)
3231ad2antrr 492 . . . . . . . . 9 ((((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) ∧ 𝑦𝑉) → 𝑛 ∈ ℕ0)
33 simprl 535 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → (𝑛 + 1) ≤ (♯‘𝐹))
3433adantr 276 . . . . . . . . 9 ((((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) ∧ 𝑦𝑉) → (𝑛 + 1) ≤ (♯‘𝐹))
35 simpr 110 . . . . . . . . 9 ((((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) ∧ 𝑦𝑉) → 𝑦𝑉)
36 simplrr 542 . . . . . . . . 9 ((((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) ∧ 𝑦𝑉) → {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))
3720, 21, 23, 25, 26, 28, 29, 30, 32, 34, 35, 36eupth2lem3fi 16700 . . . . . . . 8 ((((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) ∧ 𝑦𝑉) → (¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑦) ↔ 𝑦 ∈ if((𝑃‘0) = (𝑃‘(𝑛 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑛 + 1))})))
3837pm5.32da 456 . . . . . . 7 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → ((𝑦𝑉 ∧ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑦)) ↔ (𝑦𝑉𝑦 ∈ if((𝑃‘0) = (𝑃‘(𝑛 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑛 + 1))}))))
39 0elpw 4299 . . . . . . . . . . . 12 ∅ ∈ 𝒫 𝑉
4039a1i 9 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → ∅ ∈ 𝒫 𝑉)
4120wlkepvtx 16599 . . . . . . . . . . . . . . . 16 (𝐹(Walks‘𝐺)𝑃 → ((𝑃‘0) ∈ 𝑉 ∧ (𝑃‘(♯‘𝐹)) ∈ 𝑉))
4241simpld 112 . . . . . . . . . . . . . . 15 (𝐹(Walks‘𝐺)𝑃 → (𝑃‘0) ∈ 𝑉)
436, 7, 423syl 17 . . . . . . . . . . . . . 14 (𝜑 → (𝑃‘0) ∈ 𝑉)
4443ad2antrr 492 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → (𝑃‘0) ∈ 𝑉)
4520wlkp 16558 . . . . . . . . . . . . . . . 16 (𝐹(Walks‘𝐺)𝑃𝑃:(0...(♯‘𝐹))⟶𝑉)
466, 7, 453syl 17 . . . . . . . . . . . . . . 15 (𝜑𝑃:(0...(♯‘𝐹))⟶𝑉)
4746ad2antrr 492 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → 𝑃:(0...(♯‘𝐹))⟶𝑉)
48 peano2nn0 9586 . . . . . . . . . . . . . . . . . . 19 (𝑛 ∈ ℕ0 → (𝑛 + 1) ∈ ℕ0)
4948adantl 277 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑛 ∈ ℕ0) → (𝑛 + 1) ∈ ℕ0)
5049adantr 276 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → (𝑛 + 1) ∈ ℕ0)
51 nn0uz 9940 . . . . . . . . . . . . . . . . 17 0 = (ℤ‘0)
5250, 51eleqtrdi 2331 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → (𝑛 + 1) ∈ (ℤ‘0))
539ad2antrr 492 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → (♯‘𝐹) ∈ ℕ0)
5453nn0zd 9749 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → (♯‘𝐹) ∈ ℤ)
55 elfz5 10403 . . . . . . . . . . . . . . . 16 (((𝑛 + 1) ∈ (ℤ‘0) ∧ (♯‘𝐹) ∈ ℤ) → ((𝑛 + 1) ∈ (0...(♯‘𝐹)) ↔ (𝑛 + 1) ≤ (♯‘𝐹)))
5652, 54, 55syl2anc 415 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → ((𝑛 + 1) ∈ (0...(♯‘𝐹)) ↔ (𝑛 + 1) ≤ (♯‘𝐹)))
5733, 56mpbird 167 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → (𝑛 + 1) ∈ (0...(♯‘𝐹)))
5847, 57ffvelcdmd 5838 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → (𝑃‘(𝑛 + 1)) ∈ 𝑉)
5944, 58prssd 3872 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → {(𝑃‘0), (𝑃‘(𝑛 + 1))} ⊆ 𝑉)
60 prexg 4347 . . . . . . . . . . . . . 14 (((𝑃‘0) ∈ 𝑉 ∧ (𝑃‘(𝑛 + 1)) ∈ 𝑉) → {(𝑃‘0), (𝑃‘(𝑛 + 1))} ∈ V)
6144, 58, 60syl2anc 415 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → {(𝑃‘0), (𝑃‘(𝑛 + 1))} ∈ V)
62 elpwg 3696 . . . . . . . . . . . . 13 ({(𝑃‘0), (𝑃‘(𝑛 + 1))} ∈ V → ({(𝑃‘0), (𝑃‘(𝑛 + 1))} ∈ 𝒫 𝑉 ↔ {(𝑃‘0), (𝑃‘(𝑛 + 1))} ⊆ 𝑉))
6361, 62syl 14 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → ({(𝑃‘0), (𝑃‘(𝑛 + 1))} ∈ 𝒫 𝑉 ↔ {(𝑃‘0), (𝑃‘(𝑛 + 1))} ⊆ 𝑉))
6459, 63mpbird 167 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → {(𝑃‘0), (𝑃‘(𝑛 + 1))} ∈ 𝒫 𝑉)
6527ad2antrr 492 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → 𝑉 ∈ Fin)
66 fidceq 7165 . . . . . . . . . . . 12 ((𝑉 ∈ Fin ∧ (𝑃‘0) ∈ 𝑉 ∧ (𝑃‘(𝑛 + 1)) ∈ 𝑉) → DECID (𝑃‘0) = (𝑃‘(𝑛 + 1)))
6765, 44, 58, 66syl3anc 1278 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → DECID (𝑃‘0) = (𝑃‘(𝑛 + 1)))
6840, 64, 67ifcldcd 3678 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → if((𝑃‘0) = (𝑃‘(𝑛 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑛 + 1))}) ∈ 𝒫 𝑉)
6968elpwid 3699 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → if((𝑃‘0) = (𝑃‘(𝑛 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑛 + 1))}) ⊆ 𝑉)
7069sseld 3247 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → (𝑦 ∈ if((𝑃‘0) = (𝑃‘(𝑛 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑛 + 1))}) → 𝑦𝑉))
7170pm4.71rd 398 . . . . . . 7 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → (𝑦 ∈ if((𝑃‘0) = (𝑃‘(𝑛 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑛 + 1))}) ↔ (𝑦𝑉𝑦 ∈ if((𝑃‘0) = (𝑃‘(𝑛 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑛 + 1))}))))
7238, 71bitr4d 191 . . . . . 6 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → ((𝑦𝑉 ∧ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑦)) ↔ 𝑦 ∈ if((𝑃‘0) = (𝑃‘(𝑛 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑛 + 1))})))
7319, 72bitrid 192 . . . . 5 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → (𝑦 ∈ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑥)} ↔ 𝑦 ∈ if((𝑃‘0) = (𝑃‘(𝑛 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑛 + 1))})))
7473eqrdv 2236 . . . 4 (((𝜑𝑛 ∈ ℕ0) ∧ ((𝑛 + 1) ≤ (♯‘𝐹) ∧ {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}))) → {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃‘(𝑛 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑛 + 1))}))
7574exp32 365 . . 3 ((𝜑𝑛 ∈ ℕ0) → ((𝑛 + 1) ≤ (♯‘𝐹) → ({𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)}) → {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃‘(𝑛 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑛 + 1))}))))
7675a2d 26 . 2 ((𝜑𝑛 ∈ ℕ0) → (((𝑛 + 1) ≤ (♯‘𝐹) → {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)})) → ((𝑛 + 1) ≤ (♯‘𝐹) → {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃‘(𝑛 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑛 + 1))}))))
7715, 76syld 45 1 ((𝜑𝑛 ∈ ℕ0) → ((𝑛 ≤ (♯‘𝐹) → {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑛)))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃𝑛), ∅, {(𝑃‘0), (𝑃𝑛)})) → ((𝑛 + 1) ≤ (♯‘𝐹) → {𝑥𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑛 + 1))))⟩)‘𝑥)} = if((𝑃‘0) = (𝑃‘(𝑛 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑛 + 1))}))))
Colors of variables: wff set class
Syntax hints:  ¬ wn 3  wi 4  wa 104  wb 105  DECID wdc 846   = wceq 1402  wcel 2209  {crab 2532  Vcvv 2821  wss 3220  c0 3520  ifcif 3638  𝒫 cpw 3688  {cpr 3709  cop 3711   class class class wbr 4128  cres 4774  cima 4775  Fun wfun 5369  wf 5371  cfv 5375  (class class class)co 6079  Fincfn 7016  cr 8172  0cc0 8173  1c1 8174   + caddc 8176  cle 8355  2c2 9338  0cn0 9546  cz 9627  cuz 9904  ...cfz 10394  ..^cfzo 10532  chash 11197  cdvds 12537  Vtxcvtx 16236  iEdgciedg 16237  UMGraphcumgr 16316  VtxDegcvtxdg 16510  Walkscwlks 16541  EulerPathsceupth 16666
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-coll 4244  ax-sep 4247  ax-nul 4257  ax-pow 4309  ax-pr 4344  ax-un 4576  ax-setind 4682  ax-iinf 4733  ax-cnex 8264  ax-resscn 8265  ax-1cn 8266  ax-1re 8267  ax-icn 8268  ax-addcl 8269  ax-addrcl 8270  ax-mulcl 8271  ax-mulrcl 8272  ax-addcom 8273  ax-mulcom 8274  ax-addass 8275  ax-mulass 8276  ax-distr 8277  ax-i2m1 8278  ax-0lt1 8279  ax-1rid 8280  ax-0id 8281  ax-rnegex 8282  ax-precex 8283  ax-cnre 8284  ax-pre-ltirr 8285  ax-pre-ltwlin 8286  ax-pre-lttrn 8287  ax-pre-apti 8288  ax-pre-ltadd 8289  ax-pre-mulgt0 8290  ax-pre-mulext 8291  ax-arch 8292
This theorem depends on definitions:  df-bi 117  df-stab 843  df-dc 847  df-ifp 991  df-3or 1010  df-3an 1011  df-tru 1405  df-fal 1408  df-xor 1425  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-nel 2516  df-ral 2533  df-rex 2534  df-reu 2535  df-rmo 2536  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-if 3639  df-pw 3690  df-sn 3714  df-pr 3715  df-op 3717  df-uni 3934  df-int 3969  df-iun 4012  df-br 4129  df-opab 4191  df-mpt 4192  df-tr 4228  df-id 4436  df-po 4439  df-iso 4440  df-iord 4509  df-on 4511  df-ilim 4512  df-suc 4514  df-iom 4736  df-xp 4778  df-rel 4779  df-cnv 4780  df-co 4781  df-dm 4782  df-rn 4783  df-res 4784  df-ima 4785  df-iota 5335  df-fun 5377  df-fn 5378  df-f 5379  df-f1 5380  df-fo 5381  df-f1o 5382  df-fv 5383  df-riota 6032  df-ov 6082  df-oprab 6083  df-mpo 6084  df-1st 6368  df-2nd 6369  df-recs 6570  df-irdg 6635  df-frec 6656  df-1o 6681  df-2o 6682  df-oadd 6685  df-er 6801  df-map 6918  df-en 7017  df-dom 7018  df-fin 7019  df-pnf 8356  df-mnf 8357  df-xr 8358  df-ltxr 8359  df-le 8360  df-sub 8493  df-neg 8494  df-reap 8897  df-ap 8904  df-div 8997  df-inn 9288  df-2 9346  df-3 9347  df-4 9348  df-5 9349  df-6 9350  df-7 9351  df-8 9352  df-9 9353  df-n0 9547  df-z 9628  df-dec 9761  df-uz 9905  df-q 10003  df-rp 10038  df-xadd 10158  df-fz 10395  df-fzo 10533  df-fl 10688  df-mod 10743  df-seqfrec 10868  df-exp 10959  df-ihash 11198  df-word 11288  df-cj 11590  df-re 11591  df-im 11592  df-rsqrt 11747  df-abs 11748  df-dvds 12538  df-ndx 13338  df-slot 13339  df-base 13341  df-edgf 16229  df-vtx 16238  df-iedg 16239  df-edg 16282  df-uhgrm 16293  df-ushgrm 16294  df-upgren 16317  df-umgren 16318  df-uspgren 16379  df-subgr 16478  df-vtxdg 16511  df-wlks 16542  df-trls 16605  df-eupth 16667
This theorem is referenced by:  eupth2fi  16703
  Copyright terms: Public domain W3C validator