eupth2lem3 - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > eupth2lem3		Structured version Visualization version GIF version

Theorem eupth2lem3 30138

Description: Lemma for eupth2 30141. (Contributed by Mario Carneiro, 8-Apr-2015.) (Revised by AV, 26-Feb-2021.)

**Hypotheses**
Ref	Expression
eupth2.v	⊢ 𝑉 = (Vtx‘𝐺)
eupth2.i	⊢ 𝐼 = (iEdg‘𝐺)
eupth2.g	⊢ (𝜑 → 𝐺 ∈ UPGraph)
eupth2.f	⊢ (𝜑 → Fun 𝐼)
eupth2.p	⊢ (𝜑 → 𝐹(EulerPaths‘𝐺)𝑃)
eupth2.h	⊢ 𝐻 = ⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑁)))⟩
eupth2.x	⊢ 𝑋 = ⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1))))⟩
eupth2.n	⊢ (𝜑 → 𝑁 ∈ ℕ₀)
eupth2.l	⊢ (𝜑 → (𝑁 + 1) ≤ (♯‘𝐹))
eupth2.u	⊢ (𝜑 → 𝑈 ∈ 𝑉)
eupth2.o	⊢ (𝜑 → {𝑥 ∈ 𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘𝐻)‘𝑥)} = if((𝑃‘0) = (𝑃‘𝑁), ∅, {(𝑃‘0), (𝑃‘𝑁)}))

**Assertion**
Ref	Expression
eupth2lem3	⊢ (𝜑 → (¬ 2 ∥ ((VtxDeg‘𝑋)‘𝑈) ↔ 𝑈 ∈ if((𝑃‘0) = (𝑃‘(𝑁 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑁 + 1))})))

Distinct variable groups: 𝑥,𝐻 𝑥,𝑈 𝑥,𝑉 Allowed substitution hints: 𝜑(𝑥) 𝑃(𝑥) 𝐹(𝑥) 𝐺(𝑥) 𝐼(𝑥) 𝑁(𝑥) 𝑋(𝑥)

Proof of Theorem eupth2lem3 Dummy variable 𝑘 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		eupth2.v	. 2 ⊢ 𝑉 = (Vtx‘𝐺)
2		eupth2.i	. 2 ⊢ 𝐼 = (iEdg‘𝐺)
3		eupth2.f	. 2 ⊢ (𝜑 → Fun 𝐼)
4		eupth2.n	. . 3 ⊢ (𝜑 → 𝑁 ∈ ℕ₀)
5		eupth2.p	. . . 4 ⊢ (𝜑 → 𝐹(EulerPaths‘𝐺)𝑃)
6		eupthiswlk 30114	. . . 4 ⊢ (𝐹(EulerPaths‘𝐺)𝑃 → 𝐹(Walks‘𝐺)𝑃)
7		wlkcl 29519	. . . 4 ⊢ (𝐹(Walks‘𝐺)𝑃 → (♯‘𝐹) ∈ ℕ₀)
8	5, 6, 7	3syl 18	. . 3 ⊢ (𝜑 → (♯‘𝐹) ∈ ℕ₀)
9		eupth2.l	. . 3 ⊢ (𝜑 → (𝑁 + 1) ≤ (♯‘𝐹))
10		nn0p1elfzo 13639	. . 3 ⊢ ((𝑁 ∈ ℕ₀ ∧ (♯‘𝐹) ∈ ℕ₀ ∧ (𝑁 + 1) ≤ (♯‘𝐹)) → 𝑁 ∈ (0..^(♯‘𝐹)))
11	4, 8, 9, 10	syl3anc 1373	. 2 ⊢ (𝜑 → 𝑁 ∈ (0..^(♯‘𝐹)))
12		eupth2.u	. 2 ⊢ (𝜑 → 𝑈 ∈ 𝑉)
13		eupthistrl 30113	. . 3 ⊢ (𝐹(EulerPaths‘𝐺)𝑃 → 𝐹(Trails‘𝐺)𝑃)
14	5, 13	syl 17	. 2 ⊢ (𝜑 → 𝐹(Trails‘𝐺)𝑃)
15		eupth2.h	. . . . 5 ⊢ 𝐻 = ⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑁)))⟩
16	15	fveq2i 6843	. . . 4 ⊢ (Vtx‘𝐻) = (Vtx‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑁)))⟩)
17	1	fvexi 6854	. . . . 5 ⊢ 𝑉 ∈ V
18	2	fvexi 6854	. . . . . 6 ⊢ 𝐼 ∈ V
19	18	resex 5989	. . . . 5 ⊢ (𝐼 ↾ (𝐹 “ (0..^𝑁))) ∈ V
20	17, 19	opvtxfvi 28912	. . . 4 ⊢ (Vtx‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑁)))⟩) = 𝑉
21	16, 20	eqtri 2752	. . 3 ⊢ (Vtx‘𝐻) = 𝑉
22	21	a1i 11	. 2 ⊢ (𝜑 → (Vtx‘𝐻) = 𝑉)
23		snex 5386	. . . 4 ⊢ {⟨(𝐹‘𝑁), (𝐼‘(𝐹‘𝑁))⟩} ∈ V
24	17, 23	opvtxfvi 28912	. . 3 ⊢ (Vtx‘⟨𝑉, {⟨(𝐹‘𝑁), (𝐼‘(𝐹‘𝑁))⟩}⟩) = 𝑉
25	24	a1i 11	. 2 ⊢ (𝜑 → (Vtx‘⟨𝑉, {⟨(𝐹‘𝑁), (𝐼‘(𝐹‘𝑁))⟩}⟩) = 𝑉)
26		eupth2.x	. . . . 5 ⊢ 𝑋 = ⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1))))⟩
27	26	fveq2i 6843	. . . 4 ⊢ (Vtx‘𝑋) = (Vtx‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1))))⟩)
28	18	resex 5989	. . . . 5 ⊢ (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1)))) ∈ V
29	17, 28	opvtxfvi 28912	. . . 4 ⊢ (Vtx‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1))))⟩) = 𝑉
30	27, 29	eqtri 2752	. . 3 ⊢ (Vtx‘𝑋) = 𝑉
31	30	a1i 11	. 2 ⊢ (𝜑 → (Vtx‘𝑋) = 𝑉)
32	15	fveq2i 6843	. . . 4 ⊢ (iEdg‘𝐻) = (iEdg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑁)))⟩)
33	17, 19	opiedgfvi 28913	. . . 4 ⊢ (iEdg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑁)))⟩) = (𝐼 ↾ (𝐹 “ (0..^𝑁)))
34	32, 33	eqtri 2752	. . 3 ⊢ (iEdg‘𝐻) = (𝐼 ↾ (𝐹 “ (0..^𝑁)))
35	34	a1i 11	. 2 ⊢ (𝜑 → (iEdg‘𝐻) = (𝐼 ↾ (𝐹 “ (0..^𝑁))))
36	17, 23	opiedgfvi 28913	. . 3 ⊢ (iEdg‘⟨𝑉, {⟨(𝐹‘𝑁), (𝐼‘(𝐹‘𝑁))⟩}⟩) = {⟨(𝐹‘𝑁), (𝐼‘(𝐹‘𝑁))⟩}
37	36	a1i 11	. 2 ⊢ (𝜑 → (iEdg‘⟨𝑉, {⟨(𝐹‘𝑁), (𝐼‘(𝐹‘𝑁))⟩}⟩) = {⟨(𝐹‘𝑁), (𝐼‘(𝐹‘𝑁))⟩})
38	26	fveq2i 6843	. . . 4 ⊢ (iEdg‘𝑋) = (iEdg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1))))⟩)
39	17, 28	opiedgfvi 28913	. . . 4 ⊢ (iEdg‘⟨𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1))))⟩) = (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1))))
40	38, 39	eqtri 2752	. . 3 ⊢ (iEdg‘𝑋) = (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1))))
41	4	nn0zd 12531	. . . . . 6 ⊢ (𝜑 → 𝑁 ∈ ℤ)
42		fzval3 13671	. . . . . . 7 ⊢ (𝑁 ∈ ℤ → (0...𝑁) = (0..^(𝑁 + 1)))
43	42	eqcomd 2735	. . . . . 6 ⊢ (𝑁 ∈ ℤ → (0..^(𝑁 + 1)) = (0...𝑁))
44	41, 43	syl 17	. . . . 5 ⊢ (𝜑 → (0..^(𝑁 + 1)) = (0...𝑁))
45	44	imaeq2d 6020	. . . 4 ⊢ (𝜑 → (𝐹 “ (0..^(𝑁 + 1))) = (𝐹 “ (0...𝑁)))
46	45	reseq2d 5939	. . 3 ⊢ (𝜑 → (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1)))) = (𝐼 ↾ (𝐹 “ (0...𝑁))))
47	40, 46	eqtrid 2776	. 2 ⊢ (𝜑 → (iEdg‘𝑋) = (𝐼 ↾ (𝐹 “ (0...𝑁))))
48		eupth2.o	. 2 ⊢ (𝜑 → {𝑥 ∈ 𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘𝐻)‘𝑥)} = if((𝑃‘0) = (𝑃‘𝑁), ∅, {(𝑃‘0), (𝑃‘𝑁)}))
49		2fveq3 6845	. . . 4 ⊢ (𝑘 = 𝑁 → (𝐼‘(𝐹‘𝑘)) = (𝐼‘(𝐹‘𝑁)))
50		fveq2 6840	. . . . 5 ⊢ (𝑘 = 𝑁 → (𝑃‘𝑘) = (𝑃‘𝑁))
51		fvoveq1 7392	. . . . 5 ⊢ (𝑘 = 𝑁 → (𝑃‘(𝑘 + 1)) = (𝑃‘(𝑁 + 1)))
52	50, 51	preq12d 4701	. . . 4 ⊢ (𝑘 = 𝑁 → {(𝑃‘𝑘), (𝑃‘(𝑘 + 1))} = {(𝑃‘𝑁), (𝑃‘(𝑁 + 1))})
53	49, 52	eqeq12d 2745	. . 3 ⊢ (𝑘 = 𝑁 → ((𝐼‘(𝐹‘𝑘)) = {(𝑃‘𝑘), (𝑃‘(𝑘 + 1))} ↔ (𝐼‘(𝐹‘𝑁)) = {(𝑃‘𝑁), (𝑃‘(𝑁 + 1))}))
54		eupth2.g	. . . 4 ⊢ (𝜑 → 𝐺 ∈ UPGraph)
55	5, 6	syl 17	. . . 4 ⊢ (𝜑 → 𝐹(Walks‘𝐺)𝑃)
56	2	upgrwlkedg 29545	. . . 4 ⊢ ((𝐺 ∈ UPGraph ∧ 𝐹(Walks‘𝐺)𝑃) → ∀𝑘 ∈ (0..^(♯‘𝐹))(𝐼‘(𝐹‘𝑘)) = {(𝑃‘𝑘), (𝑃‘(𝑘 + 1))})
57	54, 55, 56	syl2anc 584	. . 3 ⊢ (𝜑 → ∀𝑘 ∈ (0..^(♯‘𝐹))(𝐼‘(𝐹‘𝑘)) = {(𝑃‘𝑘), (𝑃‘(𝑘 + 1))})
58	53, 57, 11	rspcdva 3586	. 2 ⊢ (𝜑 → (𝐼‘(𝐹‘𝑁)) = {(𝑃‘𝑁), (𝑃‘(𝑁 + 1))})
59	1, 2, 3, 11, 12, 14, 22, 25, 31, 35, 37, 47, 48, 58	eupth2lem3lem7 30136	1 ⊢ (𝜑 → (¬ 2 ∥ ((VtxDeg‘𝑋)‘𝑈) ↔ 𝑈 ∈ if((𝑃‘0) = (𝑃‘(𝑁 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑁 + 1))})))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 = wceq 1540 ∈ wcel 2109 ∀wral 3044 {crab 3402 ∅c0 4292 ifcif 4484 {csn 4585 {cpr 4587 ⟨cop 4591 class class class wbr 5102 ↾ cres 5633 “ cima 5634 Fun wfun 6493 ‘cfv 6499 (class class class)co 7369 0cc0 11044 1c1 11045 + caddc 11047 ≤ cle 11185 2c2 12217 ℕ₀cn0 12418 ℤcz 12505 ...cfz 13444 ..^cfzo 13591 ♯chash 14271 ∥ cdvds 16198 Vtxcvtx 28899 iEdgciedg 28900 UPGraphcupgr 28983 VtxDegcvtxdg 29369 Walkscwlks 29500 Trailsctrls 29592 EulerPathsceupth 30099

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2701 ax-rep 5229 ax-sep 5246 ax-nul 5256 ax-pow 5315 ax-pr 5382 ax-un 7691 ax-cnex 11100 ax-resscn 11101 ax-1cn 11102 ax-icn 11103 ax-addcl 11104 ax-addrcl 11105 ax-mulcl 11106 ax-mulrcl 11107 ax-mulcom 11108 ax-addass 11109 ax-mulass 11110 ax-distr 11111 ax-i2m1 11112 ax-1ne0 11113 ax-1rid 11114 ax-rnegex 11115 ax-rrecex 11116 ax-cnre 11117 ax-pre-lttri 11118 ax-pre-lttrn 11119 ax-pre-ltadd 11120 ax-pre-mulgt0 11121 ax-pre-sup 11122

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-ifp 1063 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2533 df-eu 2562 df-clab 2708 df-cleq 2721 df-clel 2803 df-nfc 2878 df-ne 2926 df-nel 3030 df-ral 3045 df-rex 3054 df-rmo 3351 df-reu 3352 df-rab 3403 df-v 3446 df-sbc 3751 df-csb 3860 df-dif 3914 df-un 3916 df-in 3918 df-ss 3928 df-pss 3931 df-nul 4293 df-if 4485 df-pw 4561 df-sn 4586 df-pr 4588 df-op 4592 df-uni 4868 df-int 4907 df-iun 4953 df-br 5103 df-opab 5165 df-mpt 5184 df-tr 5210 df-id 5526 df-eprel 5531 df-po 5539 df-so 5540 df-fr 5584 df-we 5586 df-xp 5637 df-rel 5638 df-cnv 5639 df-co 5640 df-dm 5641 df-rn 5642 df-res 5643 df-ima 5644 df-pred 6262 df-ord 6323 df-on 6324 df-lim 6325 df-suc 6326 df-iota 6452 df-fun 6501 df-fn 6502 df-f 6503 df-f1 6504 df-fo 6505 df-f1o 6506 df-fv 6507 df-riota 7326 df-ov 7372 df-oprab 7373 df-mpo 7374 df-om 7823 df-1st 7947 df-2nd 7948 df-frecs 8237 df-wrecs 8268 df-recs 8317 df-rdg 8355 df-1o 8411 df-2o 8412 df-oadd 8415 df-er 8648 df-map 8778 df-pm 8779 df-en 8896 df-dom 8897 df-sdom 8898 df-fin 8899 df-sup 9369 df-inf 9370 df-dju 9830 df-card 9868 df-pnf 11186 df-mnf 11187 df-xr 11188 df-ltxr 11189 df-le 11190 df-sub 11383 df-neg 11384 df-div 11812 df-nn 12163 df-2 12225 df-3 12226 df-n0 12419 df-xnn0 12492 df-z 12506 df-uz 12770 df-rp 12928 df-xadd 13049 df-fz 13445 df-fzo 13592 df-seq 13943 df-exp 14003 df-hash 14272 df-word 14455 df-cj 15041 df-re 15042 df-im 15043 df-sqrt 15177 df-abs 15178 df-dvds 16199 df-vtx 28901 df-iedg 28902 df-edg 28951 df-uhgr 28961 df-ushgr 28962 df-upgr 28985 df-uspgr 29053 df-vtxdg 29370 df-wlks 29503 df-trls 29594 df-eupth 30100

This theorem is referenced by: eupth2lems 30140

W3C validator