Users' Mathboxes Mathbox for Alexander van der Vekens < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  grlimedgclnbgr Structured version   Visualization version   GIF version

Theorem grlimedgclnbgr 48615
Description: For two locally isomorphic graphs 𝐺 and 𝐻 and a vertex 𝐴 of 𝐺 there are two bijections 𝑓 and 𝑔 mapping the closed neighborhood 𝑁 of 𝐴 onto the closed neighborhood 𝑀 of (𝐹𝐴) and the edges between the vertices in 𝑁 onto the edges between the vertices in 𝑀, so that the mapped vertices of an edge 𝐸 containing the vertex 𝐴 is an edge between the vertices in 𝑀. (Contributed by AV, 25-Dec-2025.)
Hypotheses
Ref Expression
clnbgrvtxedg.n 𝑁 = (𝐺 ClNeighbVtx 𝐴)
clnbgrvtxedg.i 𝐼 = (Edg‘𝐺)
clnbgrvtxedg.k 𝐾 = {𝑥𝐼𝑥𝑁}
grlimedgclnbgr.m 𝑀 = (𝐻 ClNeighbVtx (𝐹𝐴))
grlimedgclnbgr.j 𝐽 = (Edg‘𝐻)
grlimedgclnbgr.l 𝐿 = {𝑥𝐽𝑥𝑀}
Assertion
Ref Expression
grlimedgclnbgr (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → ∃𝑓𝑔(𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸)))
Distinct variable groups:   𝑥,𝐸   𝑥,𝐼   𝑥,𝑁   𝐴,𝑔,𝑥   𝐴,𝑓   𝑓,𝐸,𝑔   𝑔,𝐹,𝑓   𝑥,𝐹   𝑓,𝐺,𝑔   𝑥,𝐺   𝑓,𝐻,𝑔   𝑥,𝐻   𝑔,𝐼,𝑓   𝑔,𝐽,𝑥
Allowed substitution hints:   𝐽(𝑓)   𝐾(𝑥,𝑓,𝑔)   𝐿(𝑥,𝑓,𝑔)   𝑀(𝑥,𝑓,𝑔)   𝑁(𝑓,𝑔)

Proof of Theorem grlimedgclnbgr
Dummy variables 𝑒 𝑣 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simp1l 1214 . . 3 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐺 ∈ USPGraph)
2 simp1r 1215 . . 3 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐻 ∈ USPGraph)
3 simp2 1153 . . 3 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐹 ∈ (𝐺 GraphLocIso 𝐻))
4 eqid 2765 . . . 4 (Vtx‘𝐺) = (Vtx‘𝐺)
5 eqid 2765 . . . 4 (Vtx‘𝐻) = (Vtx‘𝐻)
6 eqid 2765 . . . 4 (𝐺 ClNeighbVtx 𝑣) = (𝐺 ClNeighbVtx 𝑣)
7 eqid 2765 . . . 4 (𝐻 ClNeighbVtx (𝐹𝑣)) = (𝐻 ClNeighbVtx (𝐹𝑣))
8 clnbgrvtxedg.i . . . 4 𝐼 = (Edg‘𝐺)
9 grlimedgclnbgr.j . . . 4 𝐽 = (Edg‘𝐻)
10 sseq1 3964 . . . . 5 (𝑥 = 𝑦 → (𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣) ↔ 𝑦 ⊆ (𝐺 ClNeighbVtx 𝑣)))
1110cbvrabv 3427 . . . 4 {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} = {𝑦𝐼𝑦 ⊆ (𝐺 ClNeighbVtx 𝑣)}
12 sseq1 3964 . . . . 5 (𝑥 = 𝑦 → (𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣)) ↔ 𝑦 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))))
1312cbvrabv 3427 . . . 4 {𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} = {𝑦𝐽𝑦 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))}
144, 5, 6, 7, 8, 9, 11, 13usgrlimprop 48613 . . 3 ((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻)) → (𝐹:(Vtx‘𝐺)–1-1-onto→(Vtx‘𝐻) ∧ ∀𝑣 ∈ (Vtx‘𝐺)∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒)))))
151, 2, 3, 14syl3anc 1394 . 2 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → (𝐹:(Vtx‘𝐺)–1-1-onto→(Vtx‘𝐻) ∧ ∀𝑣 ∈ (Vtx‘𝐺)∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒)))))
16 uspgruhgr 29443 . . . . . . . 8 (𝐺 ∈ USPGraph → 𝐺 ∈ UHGraph)
1716adantr 485 . . . . . . 7 ((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) → 𝐺 ∈ UHGraph)
18173ad2ant1 1149 . . . . . 6 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐺 ∈ UHGraph)
198eleq2i 2857 . . . . . . . 8 (𝐸𝐼𝐸 ∈ (Edg‘𝐺))
2019birani 508 . . . . . . 7 ((𝐸𝐼𝐴𝐸) → 𝐸 ∈ (Edg‘𝐺))
21203ad2ant3 1151 . . . . . 6 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐸 ∈ (Edg‘𝐺))
22 simp3r 1219 . . . . . 6 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐴𝐸)
23 uhgredgrnv 29389 . . . . . 6 ((𝐺 ∈ UHGraph ∧ 𝐸 ∈ (Edg‘𝐺) ∧ 𝐴𝐸) → 𝐴 ∈ (Vtx‘𝐺))
2418, 21, 22, 23syl3anc 1394 . . . . 5 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐴 ∈ (Vtx‘𝐺))
25 eqidd 2766 . . . . . . . . 9 (𝑣 = 𝐴𝑓 = 𝑓)
26 oveq2 7408 . . . . . . . . 9 (𝑣 = 𝐴 → (𝐺 ClNeighbVtx 𝑣) = (𝐺 ClNeighbVtx 𝐴))
27 fveq2 6871 . . . . . . . . . 10 (𝑣 = 𝐴 → (𝐹𝑣) = (𝐹𝐴))
2827oveq2d 7416 . . . . . . . . 9 (𝑣 = 𝐴 → (𝐻 ClNeighbVtx (𝐹𝑣)) = (𝐻 ClNeighbVtx (𝐹𝐴)))
2925, 26, 28f1oeq123d 6804 . . . . . . . 8 (𝑣 = 𝐴 → (𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ↔ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))))
30 eqidd 2766 . . . . . . . . . . 11 (𝑣 = 𝐴𝑔 = 𝑔)
3126sseq2d 3971 . . . . . . . . . . . 12 (𝑣 = 𝐴 → (𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣) ↔ 𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)))
3231rabbidv 3424 . . . . . . . . . . 11 (𝑣 = 𝐴 → {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} = {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)})
3328sseq2d 3971 . . . . . . . . . . . 12 (𝑣 = 𝐴 → (𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣)) ↔ 𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))))
3433rabbidv 3424 . . . . . . . . . . 11 (𝑣 = 𝐴 → {𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} = {𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))})
3530, 32, 34f1oeq123d 6804 . . . . . . . . . 10 (𝑣 = 𝐴 → (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ↔ 𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))}))
3632raleqdv 3323 . . . . . . . . . 10 (𝑣 = 𝐴 → (∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒) ↔ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)))
3735, 36anbi12d 643 . . . . . . . . 9 (𝑣 = 𝐴 → ((𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒)) ↔ (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))))
3837exbidv 1944 . . . . . . . 8 (𝑣 = 𝐴 → (∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒)) ↔ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))))
3929, 38anbi12d 643 . . . . . . 7 (𝑣 = 𝐴 → ((𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒))) ↔ (𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)))))
4039exbidv 1944 . . . . . 6 (𝑣 = 𝐴 → (∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒))) ↔ ∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)))))
4140rspcv 3580 . . . . 5 (𝐴 ∈ (Vtx‘𝐺) → (∀𝑣 ∈ (Vtx‘𝐺)∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒))) → ∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)))))
4224, 41syl 18 . . . 4 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → (∀𝑣 ∈ (Vtx‘𝐺)∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒))) → ∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)))))
43 eqid 2765 . . . . . . . . . . . . 13 𝑓 = 𝑓
44 id 23 . . . . . . . . . . . . . 14 (𝑓 = 𝑓𝑓 = 𝑓)
45 clnbgrvtxedg.n . . . . . . . . . . . . . . 15 𝑁 = (𝐺 ClNeighbVtx 𝐴)
4645a1i 11 . . . . . . . . . . . . . 14 (𝑓 = 𝑓𝑁 = (𝐺 ClNeighbVtx 𝐴))
47 grlimedgclnbgr.m . . . . . . . . . . . . . . 15 𝑀 = (𝐻 ClNeighbVtx (𝐹𝐴))
4847a1i 11 . . . . . . . . . . . . . 14 (𝑓 = 𝑓𝑀 = (𝐻 ClNeighbVtx (𝐹𝐴)))
4944, 46, 48f1oeq123d 6804 . . . . . . . . . . . . 13 (𝑓 = 𝑓 → (𝑓:𝑁1-1-onto𝑀𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))))
5043, 49ax-mp 5 . . . . . . . . . . . 12 (𝑓:𝑁1-1-onto𝑀𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)))
5150biimpri 231 . . . . . . . . . . 11 (𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) → 𝑓:𝑁1-1-onto𝑀)
5251adantl 486 . . . . . . . . . 10 ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) → 𝑓:𝑁1-1-onto𝑀)
5352adantr 485 . . . . . . . . 9 (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) ∧ (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → 𝑓:𝑁1-1-onto𝑀)
54 eqid 2765 . . . . . . . . . . . . 13 𝑔 = 𝑔
55 id 23 . . . . . . . . . . . . . 14 (𝑔 = 𝑔𝑔 = 𝑔)
56 clnbgrvtxedg.k . . . . . . . . . . . . . . . 16 𝐾 = {𝑥𝐼𝑥𝑁}
5745sseq2i 3968 . . . . . . . . . . . . . . . 16 (𝑥𝑁𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴))
5856, 57rabbieq 3425 . . . . . . . . . . . . . . 15 𝐾 = {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}
5958a1i 11 . . . . . . . . . . . . . 14 (𝑔 = 𝑔𝐾 = {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)})
60 grlimedgclnbgr.l . . . . . . . . . . . . . . . 16 𝐿 = {𝑥𝐽𝑥𝑀}
6147sseq2i 3968 . . . . . . . . . . . . . . . 16 (𝑥𝑀𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴)))
6260, 61rabbieq 3425 . . . . . . . . . . . . . . 15 𝐿 = {𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))}
6362a1i 11 . . . . . . . . . . . . . 14 (𝑔 = 𝑔𝐿 = {𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))})
6455, 59, 63f1oeq123d 6804 . . . . . . . . . . . . 13 (𝑔 = 𝑔 → (𝑔:𝐾1-1-onto𝐿𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))}))
6554, 64ax-mp 5 . . . . . . . . . . . 12 (𝑔:𝐾1-1-onto𝐿𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))})
6665biimpri 231 . . . . . . . . . . 11 (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} → 𝑔:𝐾1-1-onto𝐿)
6766adantr 485 . . . . . . . . . 10 ((𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)) → 𝑔:𝐾1-1-onto𝐿)
6867adantl 486 . . . . . . . . 9 (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) ∧ (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → 𝑔:𝐾1-1-onto𝐿)
69 simp3l 1218 . . . . . . . . . . . . . 14 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐸𝐼)
70 eqid 2765 . . . . . . . . . . . . . . 15 (𝐺 ClNeighbVtx 𝐴) = (𝐺 ClNeighbVtx 𝐴)
71 eqid 2765 . . . . . . . . . . . . . . 15 {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} = {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}
7270, 8, 71clnbgrvtxedg 48614 . . . . . . . . . . . . . 14 ((𝐺 ∈ UHGraph ∧ 𝐸𝐼𝐴𝐸) → 𝐸 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)})
7318, 69, 22, 72syl3anc 1394 . . . . . . . . . . . . 13 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐸 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)})
74 imaeq2 6049 . . . . . . . . . . . . . . 15 (𝑒 = 𝐸 → (𝑓𝑒) = (𝑓𝐸))
75 fveq2 6871 . . . . . . . . . . . . . . 15 (𝑒 = 𝐸 → (𝑔𝑒) = (𝑔𝐸))
7674, 75eqeq12d 2781 . . . . . . . . . . . . . 14 (𝑒 = 𝐸 → ((𝑓𝑒) = (𝑔𝑒) ↔ (𝑓𝐸) = (𝑔𝐸)))
7776rspcv 3580 . . . . . . . . . . . . 13 (𝐸 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} → (∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒) → (𝑓𝐸) = (𝑔𝐸)))
7873, 77syl 18 . . . . . . . . . . . 12 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → (∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒) → (𝑓𝐸) = (𝑔𝐸)))
7978adantld 495 . . . . . . . . . . 11 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → ((𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)) → (𝑓𝐸) = (𝑔𝐸)))
8079adantr 485 . . . . . . . . . 10 ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) → ((𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)) → (𝑓𝐸) = (𝑔𝐸)))
8180imp 411 . . . . . . . . 9 (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) ∧ (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → (𝑓𝐸) = (𝑔𝐸))
8253, 68, 813jca 1144 . . . . . . . 8 (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) ∧ (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → (𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸)))
8382ex 417 . . . . . . 7 ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) → ((𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)) → (𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸))))
8483eximdv 1940 . . . . . 6 ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) → (∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)) → ∃𝑔(𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸))))
8584expimpd 458 . . . . 5 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → ((𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → ∃𝑔(𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸))))
8685eximdv 1940 . . . 4 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → (∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → ∃𝑓𝑔(𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸))))
8742, 86syld 48 . . 3 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → (∀𝑣 ∈ (Vtx‘𝐺)∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒))) → ∃𝑓𝑔(𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸))))
8887adantld 495 . 2 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → ((𝐹:(Vtx‘𝐺)–1-1-onto→(Vtx‘𝐻) ∧ ∀𝑣 ∈ (Vtx‘𝐺)∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒)))) → ∃𝑓𝑔(𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸))))
8915, 88mpd 16 1 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → ∃𝑓𝑔(𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 400  w3a 1101   = wceq 1563  wex 1802  wcel 2145  wral 3079  {crab 3417  wss 3907  cima 5655  1-1-ontowf1o 6524  cfv 6525  (class class class)co 7400  Vtxcvtx 29255  Edgcedg 29306  UHGraphcuhgr 29315  USPGraphcuspgr 29407   ClNeighbVtx cclnbgr 48438   GraphLocIso cgrlim 48596
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-sep 5251  ax-nul 5261  ax-pow 5327  ax-pr 5395  ax-un 7722
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-ral 3080  df-rex 3090  df-rab 3418  df-v 3459  df-sbc 3748  df-csb 3856  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4869  df-iun 4954  df-br 5106  df-opab 5168  df-mpt 5187  df-id 5547  df-xp 5658  df-rel 5659  df-cnv 5660  df-co 5661  df-dm 5662  df-rn 5663  df-res 5664  df-ima 5665  df-suc 6356  df-iota 6481  df-fun 6527  df-fn 6528  df-f 6529  df-f1 6530  df-fo 6531  df-f1o 6532  df-fv 6533  df-ov 7403  df-oprab 7404  df-mpo 7405  df-1st 7974  df-2nd 7975  df-1o 8441  df-map 8814  df-vtx 29257  df-iedg 29258  df-edg 29307  df-uhgr 29317  df-upgr 29341  df-uspgr 29409  df-clnbgr 48439  df-isubgr 48481  df-grim 48498  df-gric 48501  df-grlim 48598
This theorem is referenced by:  grlimprclnbgr  48616
  Copyright terms: Public domain W3C validator