| Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
||
| Mirrors > Home > MPE Home > Th. List > eupth2lem3 | Structured version Visualization version GIF version | ||
| Description: Lemma for eupth2 30849. (Contributed by Mario Carneiro, 8-Apr-2015.) (Revised by AV, 26-Feb-2021.) |
| 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 | ⊢ (𝜑 → 𝑁 ∈ ℕ0) |
| eupth2.l | ⊢ (𝜑 → (𝑁 + 1) ≤ (♯‘𝐹)) |
| eupth2.u | ⊢ (𝜑 → 𝑈 ∈ 𝑉) |
| eupth2.o | ⊢ (𝜑 → {𝑥 ∈ 𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘𝐻)‘𝑥)} = if((𝑃‘0) = (𝑃‘𝑁), ∅, {(𝑃‘0), (𝑃‘𝑁)})) |
| Ref | Expression |
|---|---|
| eupth2lem3 | ⊢ (𝜑 → (¬ 2 ∥ ((VtxDeg‘𝑋)‘𝑈) ↔ 𝑈 ∈ if((𝑃‘0) = (𝑃‘(𝑁 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑁 + 1))}))) |
| Step | Hyp | Ref | Expression |
|---|---|---|---|
| 1 | eupth2.v | . 2 ⊢ 𝑉 = (Vtx‘𝐺) | |
| 2 | eupth2.i | . 2 ⊢ 𝐼 = (iEdg‘𝐺) | |
| 3 | eupth2.f | . 2 ⊢ (𝜑 → Fun 𝐼) | |
| 4 | eupth2.n | . . 3 ⊢ (𝜑 → 𝑁 ∈ ℕ0) | |
| 5 | eupth2.p | . . . 4 ⊢ (𝜑 → 𝐹(EulerPaths‘𝐺)𝑃) | |
| 6 | eupthiswlk 30822 | . . . 4 ⊢ (𝐹(EulerPaths‘𝐺)𝑃 → 𝐹(Walks‘𝐺)𝑃) | |
| 7 | wlkcl 30205 | . . . 4 ⊢ (𝐹(Walks‘𝐺)𝑃 → (♯‘𝐹) ∈ ℕ0) | |
| 8 | 5, 6, 7 | 3syl 19 | . . 3 ⊢ (𝜑 → (♯‘𝐹) ∈ ℕ0) |
| 9 | eupth2.l | . . 3 ⊢ (𝜑 → (𝑁 + 1) ≤ (♯‘𝐹)) | |
| 10 | nn0p1elfzo 13844 | . . 3 ⊢ ((𝑁 ∈ ℕ0 ∧ (♯‘𝐹) ∈ ℕ0 ∧ (𝑁 + 1) ≤ (♯‘𝐹)) → 𝑁 ∈ (0..^(♯‘𝐹))) | |
| 11 | 4, 8, 9, 10 | syl3anc 1398 | . 2 ⊢ (𝜑 → 𝑁 ∈ (0..^(♯‘𝐹))) |
| 12 | eupth2.u | . 2 ⊢ (𝜑 → 𝑈 ∈ 𝑉) | |
| 13 | eupthistrl 30821 | . . 3 ⊢ (𝐹(EulerPaths‘𝐺)𝑃 → 𝐹(Trails‘𝐺)𝑃) | |
| 14 | 5, 13 | syl 18 | . 2 ⊢ (𝜑 → 𝐹(Trails‘𝐺)𝑃) |
| 15 | eupth2.h | . . . . 5 ⊢ 𝐻 = 〈𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑁)))〉 | |
| 16 | 15 | fveq2i 6893 | . . . 4 ⊢ (Vtx‘𝐻) = (Vtx‘〈𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑁)))〉) |
| 17 | 1 | fvexi 6904 | . . . . 5 ⊢ 𝑉 ∈ V |
| 18 | 2 | fvexi 6904 | . . . . . 6 ⊢ 𝐼 ∈ V |
| 19 | 18 | resex 6020 | . . . . 5 ⊢ (𝐼 ↾ (𝐹 “ (0..^𝑁))) ∈ V |
| 20 | 17, 19 | opvtxfvi 29596 | . . . 4 ⊢ (Vtx‘〈𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑁)))〉) = 𝑉 |
| 21 | 16, 20 | eqtri 2783 | . . 3 ⊢ (Vtx‘𝐻) = 𝑉 |
| 22 | 21 | a1i 11 | . 2 ⊢ (𝜑 → (Vtx‘𝐻) = 𝑉) |
| 23 | snex 5397 | . . . 4 ⊢ {〈(𝐹‘𝑁), (𝐼‘(𝐹‘𝑁))〉} ∈ V | |
| 24 | 17, 23 | opvtxfvi 29596 | . . 3 ⊢ (Vtx‘〈𝑉, {〈(𝐹‘𝑁), (𝐼‘(𝐹‘𝑁))〉}〉) = 𝑉 |
| 25 | 24 | a1i 11 | . 2 ⊢ (𝜑 → (Vtx‘〈𝑉, {〈(𝐹‘𝑁), (𝐼‘(𝐹‘𝑁))〉}〉) = 𝑉) |
| 26 | eupth2.x | . . . . 5 ⊢ 𝑋 = 〈𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1))))〉 | |
| 27 | 26 | fveq2i 6893 | . . . 4 ⊢ (Vtx‘𝑋) = (Vtx‘〈𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1))))〉) |
| 28 | 18 | resex 6020 | . . . . 5 ⊢ (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1)))) ∈ V |
| 29 | 17, 28 | opvtxfvi 29596 | . . . 4 ⊢ (Vtx‘〈𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1))))〉) = 𝑉 |
| 30 | 27, 29 | eqtri 2783 | . . 3 ⊢ (Vtx‘𝑋) = 𝑉 |
| 31 | 30 | a1i 11 | . 2 ⊢ (𝜑 → (Vtx‘𝑋) = 𝑉) |
| 32 | 15 | fveq2i 6893 | . . . 4 ⊢ (iEdg‘𝐻) = (iEdg‘〈𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑁)))〉) |
| 33 | 17, 19 | opiedgfvi 29597 | . . . 4 ⊢ (iEdg‘〈𝑉, (𝐼 ↾ (𝐹 “ (0..^𝑁)))〉) = (𝐼 ↾ (𝐹 “ (0..^𝑁))) |
| 34 | 32, 33 | eqtri 2783 | . . 3 ⊢ (iEdg‘𝐻) = (𝐼 ↾ (𝐹 “ (0..^𝑁))) |
| 35 | 34 | a1i 11 | . 2 ⊢ (𝜑 → (iEdg‘𝐻) = (𝐼 ↾ (𝐹 “ (0..^𝑁)))) |
| 36 | 17, 23 | opiedgfvi 29597 | . . 3 ⊢ (iEdg‘〈𝑉, {〈(𝐹‘𝑁), (𝐼‘(𝐹‘𝑁))〉}〉) = {〈(𝐹‘𝑁), (𝐼‘(𝐹‘𝑁))〉} |
| 37 | 36 | a1i 11 | . 2 ⊢ (𝜑 → (iEdg‘〈𝑉, {〈(𝐹‘𝑁), (𝐼‘(𝐹‘𝑁))〉}〉) = {〈(𝐹‘𝑁), (𝐼‘(𝐹‘𝑁))〉}) |
| 38 | 26 | fveq2i 6893 | . . . 4 ⊢ (iEdg‘𝑋) = (iEdg‘〈𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1))))〉) |
| 39 | 17, 28 | opiedgfvi 29597 | . . . 4 ⊢ (iEdg‘〈𝑉, (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1))))〉) = (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1)))) |
| 40 | 38, 39 | eqtri 2783 | . . 3 ⊢ (iEdg‘𝑋) = (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1)))) |
| 41 | 4 | nn0zd 12725 | . . . . . 6 ⊢ (𝜑 → 𝑁 ∈ ℤ) |
| 42 | fzval3 13876 | . . . . . . 7 ⊢ (𝑁 ∈ ℤ → (0...𝑁) = (0..^(𝑁 + 1))) | |
| 43 | 42 | eqcomd 2766 | . . . . . 6 ⊢ (𝑁 ∈ ℤ → (0..^(𝑁 + 1)) = (0...𝑁)) |
| 44 | 41, 43 | syl 18 | . . . . 5 ⊢ (𝜑 → (0..^(𝑁 + 1)) = (0...𝑁)) |
| 45 | 44 | imaeq2d 6054 | . . . 4 ⊢ (𝜑 → (𝐹 “ (0..^(𝑁 + 1))) = (𝐹 “ (0...𝑁))) |
| 46 | 45 | reseq2d 5971 | . . 3 ⊢ (𝜑 → (𝐼 ↾ (𝐹 “ (0..^(𝑁 + 1)))) = (𝐼 ↾ (𝐹 “ (0...𝑁)))) |
| 47 | 40, 46 | eqtrid 2807 | . 2 ⊢ (𝜑 → (iEdg‘𝑋) = (𝐼 ↾ (𝐹 “ (0...𝑁)))) |
| 48 | eupth2.o | . 2 ⊢ (𝜑 → {𝑥 ∈ 𝑉 ∣ ¬ 2 ∥ ((VtxDeg‘𝐻)‘𝑥)} = if((𝑃‘0) = (𝑃‘𝑁), ∅, {(𝑃‘0), (𝑃‘𝑁)})) | |
| 49 | 2fveq3 6895 | . . . 4 ⊢ (𝑘 = 𝑁 → (𝐼‘(𝐹‘𝑘)) = (𝐼‘(𝐹‘𝑁))) | |
| 50 | fveq2 6890 | . . . . 5 ⊢ (𝑘 = 𝑁 → (𝑃‘𝑘) = (𝑃‘𝑁)) | |
| 51 | fvoveq1 7447 | . . . . 5 ⊢ (𝑘 = 𝑁 → (𝑃‘(𝑘 + 1)) = (𝑃‘(𝑁 + 1))) | |
| 52 | 50, 51 | preq12d 4698 | . . . 4 ⊢ (𝑘 = 𝑁 → {(𝑃‘𝑘), (𝑃‘(𝑘 + 1))} = {(𝑃‘𝑁), (𝑃‘(𝑁 + 1))}) |
| 53 | 49, 52 | eqeq12d 2776 | . . 3 ⊢ (𝑘 = 𝑁 → ((𝐼‘(𝐹‘𝑘)) = {(𝑃‘𝑘), (𝑃‘(𝑘 + 1))} ↔ (𝐼‘(𝐹‘𝑁)) = {(𝑃‘𝑁), (𝑃‘(𝑁 + 1))})) |
| 54 | eupth2.g | . . . 4 ⊢ (𝜑 → 𝐺 ∈ UPGraph) | |
| 55 | 5, 6 | syl 18 | . . . 4 ⊢ (𝜑 → 𝐹(Walks‘𝐺)𝑃) |
| 56 | 2 | upgrwlkedg 30231 | . . . 4 ⊢ ((𝐺 ∈ UPGraph ∧ 𝐹(Walks‘𝐺)𝑃) → ∀𝑘 ∈ (0..^(♯‘𝐹))(𝐼‘(𝐹‘𝑘)) = {(𝑃‘𝑘), (𝑃‘(𝑘 + 1))}) |
| 57 | 54, 55, 56 | syl2anc 596 | . . 3 ⊢ (𝜑 → ∀𝑘 ∈ (0..^(♯‘𝐹))(𝐼‘(𝐹‘𝑘)) = {(𝑃‘𝑘), (𝑃‘(𝑘 + 1))}) |
| 58 | 53, 57, 11 | rspcdva 3577 | . 2 ⊢ (𝜑 → (𝐼‘(𝐹‘𝑁)) = {(𝑃‘𝑁), (𝑃‘(𝑁 + 1))}) |
| 59 | 1, 2, 3, 11, 12, 14, 22, 25, 31, 35, 37, 47, 48, 58 | eupth2lem3lem7 30844 | 1 ⊢ (𝜑 → (¬ 2 ∥ ((VtxDeg‘𝑋)‘𝑈) ↔ 𝑈 ∈ if((𝑃‘0) = (𝑃‘(𝑁 + 1)), ∅, {(𝑃‘0), (𝑃‘(𝑁 + 1))}))) |
| Colors of variables: wff setvar class |
| This proof depends on syntax axioms: ¬ wn 3 → wi 4 ↔ wb 209 = wceq 1569 ∈ wcel 2144 ∀wral 3076 {crab 3412 ∅c0 4277 ifcif 4481 {csn 4584 {cpr 4586 〈cop 4834 class class class wbr 5102 ↾ cres 5653 “ cima 5654 Fun wfun 6537 ‘cfv 6543 (class class class)co 7424 0cc0 11207 1c1 11208 + caddc 11210 ≤ cle 11351 2c2 12404 ℕ0cn0 12613 ℤcz 12700 ...cfz 13646 ..^cfzo 13795 ♯chash 14481 ∥ cdvds 16431 Vtxcvtx 29583 iEdgciedg 29584 UPGraphcupgr 29667 VtxDegcvtxdg 30055 Walkscwlks 30186 Trailsctrls 30282 EulerPathsceupth 30807 |
| This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1827 ax-4 1841 ax-5 1942 ax-6 1999 ax-7 2040 ax-8 2146 ax-9 2154 ax-10 2177 ax-11 2193 ax-12 2212 ax-ext 2732 ax-rep 5231 ax-sep 5248 ax-nul 5259 ax-pow 5327 ax-pr 5391 ax-un 7755 ax-cnex 11263 ax-resscn 11264 ax-1cn 11265 ax-icn 11266 ax-addcl 11267 ax-addrcl 11268 ax-mulcl 11269 ax-mulrcl 11270 ax-mulcom 11271 ax-addass 11272 ax-mulass 11273 ax-distr 11274 ax-i2m1 11275 ax-1ne0 11276 ax-1rid 11277 ax-rnegex 11278 ax-rrecex 11279 ax-cnre 11280 ax-pre-lttri 11281 ax-pre-lttrn 11282 ax-pre-ltadd 11283 ax-pre-mulgt0 11284 ax-pre-sup 11285 |
| This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-ifp 1079 df-3or 1104 df-3an 1105 df-tru 1572 df-fal 1582 df-ex 1812 df-nf 1816 df-sb 2099 df-mo 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-nel 3062 df-ral 3077 df-rex 3087 df-rmo 3365 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3739 df-csb 3848 df-ss 3897 df-pss 4013 df-dif 4046 df-in 4090 df-un 4150 df-nul 4278 df-if 4482 df-pw 4558 df-sn 4585 df-pr 4587 df-op 4835 df-uni 4867 df-int 4907 df-iun 4952 df-br 5103 df-opab 5167 df-mpt 5186 df-tr 5212 df-id 5546 df-eprel 5551 df-po 5559 df-so 5560 df-fr 5604 df-we 5606 df-xp 5657 df-rel 5658 df-cnv 5659 df-co 5660 df-dm 5661 df-rn 5662 df-res 5663 df-ima 5664 df-pred 6307 df-ord 6368 df-on 6369 df-lim 6370 df-suc 6371 df-iota 6497 df-fun 6545 df-fn 6546 df-f 6547 df-f1 6548 df-fo 6549 df-f1o 6550 df-fv 6551 df-riota 7381 df-ov 7427 df-oprab 7428 df-mpo 7429 df-om 7882 df-1st 8005 df-2nd 8006 df-frecs 8306 df-wrecs 8337 df-recs 8386 df-rdg 8425 df-1o 8483 df-2o 8484 df-oadd 8487 df-er 8724 df-map 8856 df-pm 8857 df-en 8981 df-dom 8982 df-sdom 8983 df-fin 8984 df-sup 9441 df-inf 9442 df-dju 9989 df-card 10027 df-pnf 11352 df-mnf 11353 df-xr 11354 df-ltxr 11355 df-le 11356 df-sub 11550 df-neg 11551 df-div 11981 df-nn 12343 df-2 12412 df-3 12413 df-n0 12614 df-xnn0 12687 df-z 12701 df-uz 12973 df-rp 13128 df-xadd 13249 df-fz 13647 df-fzo 13796 df-seq 14152 df-exp 14212 df-hash 14482 df-word 14666 df-cj 15275 df-re 15276 df-im 15277 df-sqrt 15411 df-abs 15412 df-dvds 16432 df-vtx 29585 df-iedg 29586 df-edg 29635 df-uhgr 29645 df-ushgr 29646 df-upgr 29669 df-uspgr 29740 df-vtxdg 30056 df-wlks 30189 df-trls 30284 df-eupth 30808 |
| This theorem is used by: eupth2lems 30848 |
| Copyright terms: Public domain | W3C validator |