Proof of Theorem dfconngr1
Step | Hyp | Ref
| Expression |
1 | | df-conngr 41354 |
. 2
⊢ ConnGraph
= {𝑔 ∣
[(Vtx‘𝑔) /
𝑣]∀𝑘 ∈ 𝑣 ∀𝑛 ∈ 𝑣 ∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝} |
2 | | difsnid 4282 |
. . . . . . . . . 10
⊢ (𝑘 ∈ (Vtx‘𝑔) → (((Vtx‘𝑔) ∖ {𝑘}) ∪ {𝑘}) = (Vtx‘𝑔)) |
3 | 2 | eqcomd 2616 |
. . . . . . . . 9
⊢ (𝑘 ∈ (Vtx‘𝑔) → (Vtx‘𝑔) = (((Vtx‘𝑔) ∖ {𝑘}) ∪ {𝑘})) |
4 | 3 | raleqdv 3121 |
. . . . . . . 8
⊢ (𝑘 ∈ (Vtx‘𝑔) → (∀𝑛 ∈ (Vtx‘𝑔)∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ ∀𝑛 ∈ (((Vtx‘𝑔) ∖ {𝑘}) ∪ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝)) |
5 | | ralunb 3756 |
. . . . . . . 8
⊢
(∀𝑛 ∈
(((Vtx‘𝑔) ∖
{𝑘}) ∪ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ (∀𝑛 ∈ ((Vtx‘𝑔) ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ∧ ∀𝑛 ∈ {𝑘}∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝)) |
6 | 4, 5 | syl6bb 275 |
. . . . . . 7
⊢ (𝑘 ∈ (Vtx‘𝑔) → (∀𝑛 ∈ (Vtx‘𝑔)∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ (∀𝑛 ∈ ((Vtx‘𝑔) ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ∧ ∀𝑛 ∈ {𝑘}∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝))) |
7 | | eqid 2610 |
. . . . . . . . . 10
⊢
(Vtx‘𝑔) =
(Vtx‘𝑔) |
8 | 7 | 0pthonv-av 41297 |
. . . . . . . . 9
⊢ (𝑘 ∈ (Vtx‘𝑔) → ∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑘)𝑝) |
9 | | oveq2 6557 |
. . . . . . . . . . . 12
⊢ (𝑛 = 𝑘 → (𝑘(PathsOn‘𝑔)𝑛) = (𝑘(PathsOn‘𝑔)𝑘)) |
10 | 9 | breqd 4594 |
. . . . . . . . . . 11
⊢ (𝑛 = 𝑘 → (𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ 𝑓(𝑘(PathsOn‘𝑔)𝑘)𝑝)) |
11 | 10 | 2exbidv 1839 |
. . . . . . . . . 10
⊢ (𝑛 = 𝑘 → (∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ ∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑘)𝑝)) |
12 | 11 | ralsng 4165 |
. . . . . . . . 9
⊢ (𝑘 ∈ (Vtx‘𝑔) → (∀𝑛 ∈ {𝑘}∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ ∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑘)𝑝)) |
13 | 8, 12 | mpbird 246 |
. . . . . . . 8
⊢ (𝑘 ∈ (Vtx‘𝑔) → ∀𝑛 ∈ {𝑘}∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝) |
14 | 13 | biantrud 527 |
. . . . . . 7
⊢ (𝑘 ∈ (Vtx‘𝑔) → (∀𝑛 ∈ ((Vtx‘𝑔) ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ (∀𝑛 ∈ ((Vtx‘𝑔) ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ∧ ∀𝑛 ∈ {𝑘}∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝))) |
15 | 6, 14 | bitr4d 270 |
. . . . . 6
⊢ (𝑘 ∈ (Vtx‘𝑔) → (∀𝑛 ∈ (Vtx‘𝑔)∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ ∀𝑛 ∈ ((Vtx‘𝑔) ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝)) |
16 | 15 | ralbiia 2962 |
. . . . 5
⊢
(∀𝑘 ∈
(Vtx‘𝑔)∀𝑛 ∈ (Vtx‘𝑔)∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ ∀𝑘 ∈ (Vtx‘𝑔)∀𝑛 ∈ ((Vtx‘𝑔) ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝) |
17 | | fvex 6113 |
. . . . . 6
⊢
(Vtx‘𝑔) ∈
V |
18 | | raleq 3115 |
. . . . . . . 8
⊢ (𝑣 = (Vtx‘𝑔) → (∀𝑛 ∈ 𝑣 ∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ ∀𝑛 ∈ (Vtx‘𝑔)∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝)) |
19 | 18 | raleqbi1dv 3123 |
. . . . . . 7
⊢ (𝑣 = (Vtx‘𝑔) → (∀𝑘 ∈ 𝑣 ∀𝑛 ∈ 𝑣 ∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ ∀𝑘 ∈ (Vtx‘𝑔)∀𝑛 ∈ (Vtx‘𝑔)∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝)) |
20 | | difeq1 3683 |
. . . . . . . . 9
⊢ (𝑣 = (Vtx‘𝑔) → (𝑣 ∖ {𝑘}) = ((Vtx‘𝑔) ∖ {𝑘})) |
21 | 20 | raleqdv 3121 |
. . . . . . . 8
⊢ (𝑣 = (Vtx‘𝑔) → (∀𝑛 ∈ (𝑣 ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ ∀𝑛 ∈ ((Vtx‘𝑔) ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝)) |
22 | 21 | raleqbi1dv 3123 |
. . . . . . 7
⊢ (𝑣 = (Vtx‘𝑔) → (∀𝑘 ∈ 𝑣 ∀𝑛 ∈ (𝑣 ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ ∀𝑘 ∈ (Vtx‘𝑔)∀𝑛 ∈ ((Vtx‘𝑔) ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝)) |
23 | 19, 22 | bibi12d 334 |
. . . . . 6
⊢ (𝑣 = (Vtx‘𝑔) → ((∀𝑘 ∈ 𝑣 ∀𝑛 ∈ 𝑣 ∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ ∀𝑘 ∈ 𝑣 ∀𝑛 ∈ (𝑣 ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝) ↔ (∀𝑘 ∈ (Vtx‘𝑔)∀𝑛 ∈ (Vtx‘𝑔)∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ ∀𝑘 ∈ (Vtx‘𝑔)∀𝑛 ∈ ((Vtx‘𝑔) ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝))) |
24 | 17, 23 | sbcie 3437 |
. . . . 5
⊢
([(Vtx‘𝑔) / 𝑣](∀𝑘 ∈ 𝑣 ∀𝑛 ∈ 𝑣 ∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ ∀𝑘 ∈ 𝑣 ∀𝑛 ∈ (𝑣 ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝) ↔ (∀𝑘 ∈ (Vtx‘𝑔)∀𝑛 ∈ (Vtx‘𝑔)∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ ∀𝑘 ∈ (Vtx‘𝑔)∀𝑛 ∈ ((Vtx‘𝑔) ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝)) |
25 | 16, 24 | mpbir 220 |
. . . 4
⊢
[(Vtx‘𝑔) / 𝑣](∀𝑘 ∈ 𝑣 ∀𝑛 ∈ 𝑣 ∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ ∀𝑘 ∈ 𝑣 ∀𝑛 ∈ (𝑣 ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝) |
26 | | sbcbi1 3450 |
. . . 4
⊢
([(Vtx‘𝑔) / 𝑣](∀𝑘 ∈ 𝑣 ∀𝑛 ∈ 𝑣 ∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ ∀𝑘 ∈ 𝑣 ∀𝑛 ∈ (𝑣 ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝) → ([(Vtx‘𝑔) / 𝑣]∀𝑘 ∈ 𝑣 ∀𝑛 ∈ 𝑣 ∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ [(Vtx‘𝑔) / 𝑣]∀𝑘 ∈ 𝑣 ∀𝑛 ∈ (𝑣 ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝)) |
27 | 25, 26 | ax-mp 5 |
. . 3
⊢
([(Vtx‘𝑔) / 𝑣]∀𝑘 ∈ 𝑣 ∀𝑛 ∈ 𝑣 ∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝 ↔ [(Vtx‘𝑔) / 𝑣]∀𝑘 ∈ 𝑣 ∀𝑛 ∈ (𝑣 ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝) |
28 | 27 | abbii 2726 |
. 2
⊢ {𝑔 ∣
[(Vtx‘𝑔) /
𝑣]∀𝑘 ∈ 𝑣 ∀𝑛 ∈ 𝑣 ∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝} = {𝑔 ∣ [(Vtx‘𝑔) / 𝑣]∀𝑘 ∈ 𝑣 ∀𝑛 ∈ (𝑣 ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝} |
29 | 1, 28 | eqtri 2632 |
1
⊢ ConnGraph
= {𝑔 ∣
[(Vtx‘𝑔) /
𝑣]∀𝑘 ∈ 𝑣 ∀𝑛 ∈ (𝑣 ∖ {𝑘})∃𝑓∃𝑝 𝑓(𝑘(PathsOn‘𝑔)𝑛)𝑝} |