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 48493
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 1204 . . 3 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐺 ∈ USPGraph)
2 simp1r 1205 . . 3 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐻 ∈ USPGraph)
3 simp2 1143 . . 3 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐹 ∈ (𝐺 GraphLocIso 𝐻))
4 eqid 2740 . . . 4 (Vtx‘𝐺) = (Vtx‘𝐺)
5 eqid 2740 . . . 4 (Vtx‘𝐻) = (Vtx‘𝐻)
6 eqid 2740 . . . 4 (𝐺 ClNeighbVtx 𝑣) = (𝐺 ClNeighbVtx 𝑣)
7 eqid 2740 . . . 4 (𝐻 ClNeighbVtx (𝐹𝑣)) = (𝐻 ClNeighbVtx (𝐹𝑣))
8 clnbgrvtxedg.i . . . 4 𝐼 = (Edg‘𝐺)
9 grlimedgclnbgr.j . . . 4 𝐽 = (Edg‘𝐻)
10 sseq1 3947 . . . . 5 (𝑥 = 𝑦 → (𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣) ↔ 𝑦 ⊆ (𝐺 ClNeighbVtx 𝑣)))
1110cbvrabv 3402 . . . 4 {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} = {𝑦𝐼𝑦 ⊆ (𝐺 ClNeighbVtx 𝑣)}
12 sseq1 3947 . . . . 5 (𝑥 = 𝑦 → (𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣)) ↔ 𝑦 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))))
1312cbvrabv 3402 . . . 4 {𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} = {𝑦𝐽𝑦 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))}
144, 5, 6, 7, 8, 9, 11, 13usgrlimprop 48491 . . 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 1379 . 2 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → (𝐹:(Vtx‘𝐺)–1-1-onto→(Vtx‘𝐻) ∧ ∀𝑣 ∈ (Vtx‘𝐺)∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒)))))
16 uspgruhgr 29278 . . . . . . . 8 (𝐺 ∈ USPGraph → 𝐺 ∈ UHGraph)
1716adantr 481 . . . . . . 7 ((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) → 𝐺 ∈ UHGraph)
18173ad2ant1 1139 . . . . . 6 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐺 ∈ UHGraph)
198eleq2i 2832 . . . . . . . 8 (𝐸𝐼𝐸 ∈ (Edg‘𝐺))
2019birani 504 . . . . . . 7 ((𝐸𝐼𝐴𝐸) → 𝐸 ∈ (Edg‘𝐺))
21203ad2ant3 1141 . . . . . 6 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐸 ∈ (Edg‘𝐺))
22 simp3r 1209 . . . . . 6 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐴𝐸)
23 uhgredgrnv 29224 . . . . . 6 ((𝐺 ∈ UHGraph ∧ 𝐸 ∈ (Edg‘𝐺) ∧ 𝐴𝐸) → 𝐴 ∈ (Vtx‘𝐺))
2418, 21, 22, 23syl3anc 1379 . . . . 5 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐴 ∈ (Vtx‘𝐺))
25 eqidd 2741 . . . . . . . . 9 (𝑣 = 𝐴𝑓 = 𝑓)
26 oveq2 7371 . . . . . . . . 9 (𝑣 = 𝐴 → (𝐺 ClNeighbVtx 𝑣) = (𝐺 ClNeighbVtx 𝐴))
27 fveq2 6834 . . . . . . . . . 10 (𝑣 = 𝐴 → (𝐹𝑣) = (𝐹𝐴))
2827oveq2d 7379 . . . . . . . . 9 (𝑣 = 𝐴 → (𝐻 ClNeighbVtx (𝐹𝑣)) = (𝐻 ClNeighbVtx (𝐹𝐴)))
2925, 26, 28f1oeq123d 6768 . . . . . . . 8 (𝑣 = 𝐴 → (𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ↔ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))))
30 eqidd 2741 . . . . . . . . . . 11 (𝑣 = 𝐴𝑔 = 𝑔)
3126sseq2d 3954 . . . . . . . . . . . 12 (𝑣 = 𝐴 → (𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣) ↔ 𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)))
3231rabbidv 3399 . . . . . . . . . . 11 (𝑣 = 𝐴 → {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} = {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)})
3328sseq2d 3954 . . . . . . . . . . . 12 (𝑣 = 𝐴 → (𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣)) ↔ 𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))))
3433rabbidv 3399 . . . . . . . . . . 11 (𝑣 = 𝐴 → {𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} = {𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))})
3530, 32, 34f1oeq123d 6768 . . . . . . . . . 10 (𝑣 = 𝐴 → (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ↔ 𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))}))
3632raleqdv 3298 . . . . . . . . . 10 (𝑣 = 𝐴 → (∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒) ↔ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)))
3735, 36anbi12d 638 . . . . . . . . 9 (𝑣 = 𝐴 → ((𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒)) ↔ (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))))
3837exbidv 1928 . . . . . . . 8 (𝑣 = 𝐴 → (∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒)) ↔ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))))
3929, 38anbi12d 638 . . . . . . 7 (𝑣 = 𝐴 → ((𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒))) ↔ (𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)))))
4039exbidv 1928 . . . . . 6 (𝑣 = 𝐴 → (∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒))) ↔ ∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)))))
4140rspcv 3563 . . . . 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 17 . . . 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 2740 . . . . . . . . . . . . 13 𝑓 = 𝑓
44 id 22 . . . . . . . . . . . . . 14 (𝑓 = 𝑓𝑓 = 𝑓)
45 clnbgrvtxedg.n . . . . . . . . . . . . . . 15 𝑁 = (𝐺 ClNeighbVtx 𝐴)
4645a1i 11 . . . . . . . . . . . . . 14 (𝑓 = 𝑓𝑁 = (𝐺 ClNeighbVtx 𝐴))
47 grlimedgclnbgr.m . . . . . . . . . . . . . . 15 𝑀 = (𝐻 ClNeighbVtx (𝐹𝐴))
4847a1i 11 . . . . . . . . . . . . . 14 (𝑓 = 𝑓𝑀 = (𝐻 ClNeighbVtx (𝐹𝐴)))
4944, 46, 48f1oeq123d 6768 . . . . . . . . . . . . 13 (𝑓 = 𝑓 → (𝑓:𝑁1-1-onto𝑀𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))))
5043, 49ax-mp 5 . . . . . . . . . . . 12 (𝑓:𝑁1-1-onto𝑀𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)))
5150biimpri 229 . . . . . . . . . . 11 (𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) → 𝑓:𝑁1-1-onto𝑀)
5251adantl 482 . . . . . . . . . 10 ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) → 𝑓:𝑁1-1-onto𝑀)
5352adantr 481 . . . . . . . . 9 (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) ∧ (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → 𝑓:𝑁1-1-onto𝑀)
54 eqid 2740 . . . . . . . . . . . . 13 𝑔 = 𝑔
55 id 22 . . . . . . . . . . . . . 14 (𝑔 = 𝑔𝑔 = 𝑔)
56 clnbgrvtxedg.k . . . . . . . . . . . . . . . 16 𝐾 = {𝑥𝐼𝑥𝑁}
5745sseq2i 3951 . . . . . . . . . . . . . . . 16 (𝑥𝑁𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴))
5856, 57rabbieq 3400 . . . . . . . . . . . . . . 15 𝐾 = {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}
5958a1i 11 . . . . . . . . . . . . . 14 (𝑔 = 𝑔𝐾 = {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)})
60 grlimedgclnbgr.l . . . . . . . . . . . . . . . 16 𝐿 = {𝑥𝐽𝑥𝑀}
6147sseq2i 3951 . . . . . . . . . . . . . . . 16 (𝑥𝑀𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴)))
6260, 61rabbieq 3400 . . . . . . . . . . . . . . 15 𝐿 = {𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))}
6362a1i 11 . . . . . . . . . . . . . 14 (𝑔 = 𝑔𝐿 = {𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))})
6455, 59, 63f1oeq123d 6768 . . . . . . . . . . . . 13 (𝑔 = 𝑔 → (𝑔:𝐾1-1-onto𝐿𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))}))
6554, 64ax-mp 5 . . . . . . . . . . . 12 (𝑔:𝐾1-1-onto𝐿𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))})
6665biimpri 229 . . . . . . . . . . 11 (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} → 𝑔:𝐾1-1-onto𝐿)
6766adantr 481 . . . . . . . . . 10 ((𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)) → 𝑔:𝐾1-1-onto𝐿)
6867adantl 482 . . . . . . . . 9 (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) ∧ (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → 𝑔:𝐾1-1-onto𝐿)
69 simp3l 1208 . . . . . . . . . . . . . 14 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐸𝐼)
70 eqid 2740 . . . . . . . . . . . . . . 15 (𝐺 ClNeighbVtx 𝐴) = (𝐺 ClNeighbVtx 𝐴)
71 eqid 2740 . . . . . . . . . . . . . . 15 {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} = {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}
7270, 8, 71clnbgrvtxedg 48492 . . . . . . . . . . . . . 14 ((𝐺 ∈ UHGraph ∧ 𝐸𝐼𝐴𝐸) → 𝐸 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)})
7318, 69, 22, 72syl3anc 1379 . . . . . . . . . . . . 13 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐸 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)})
74 imaeq2 6015 . . . . . . . . . . . . . . 15 (𝑒 = 𝐸 → (𝑓𝑒) = (𝑓𝐸))
75 fveq2 6834 . . . . . . . . . . . . . . 15 (𝑒 = 𝐸 → (𝑔𝑒) = (𝑔𝐸))
7674, 75eqeq12d 2756 . . . . . . . . . . . . . 14 (𝑒 = 𝐸 → ((𝑓𝑒) = (𝑔𝑒) ↔ (𝑓𝐸) = (𝑔𝐸)))
7776rspcv 3563 . . . . . . . . . . . . 13 (𝐸 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} → (∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒) → (𝑓𝐸) = (𝑔𝐸)))
7873, 77syl 17 . . . . . . . . . . . 12 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → (∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒) → (𝑓𝐸) = (𝑔𝐸)))
7978adantld 491 . . . . . . . . . . 11 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → ((𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)) → (𝑓𝐸) = (𝑔𝐸)))
8079adantr 481 . . . . . . . . . 10 ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) → ((𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)) → (𝑓𝐸) = (𝑔𝐸)))
8180imp 407 . . . . . . . . 9 (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) ∧ (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → (𝑓𝐸) = (𝑔𝐸))
8253, 68, 813jca 1134 . . . . . . . 8 (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) ∧ (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → (𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸)))
8382ex 413 . . . . . . 7 ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) → ((𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)) → (𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸))))
8483eximdv 1924 . . . . . 6 ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) → (∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)) → ∃𝑔(𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸))))
8584expimpd 454 . . . . 5 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → ((𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → ∃𝑔(𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸))))
8685eximdv 1924 . . . 4 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → (∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → ∃𝑓𝑔(𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸))))
8742, 86syld 47 . . 3 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → (∀𝑣 ∈ (Vtx‘𝐺)∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒))) → ∃𝑓𝑔(𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸))))
8887adantld 491 . 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 15 1 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → ∃𝑓𝑔(𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207  wa 396  w3a 1092   = wceq 1547  wex 1786  wcel 2119  wral 3054  {crab 3392  wss 3890  cima 5628  1-1-ontowf1o 6491  cfv 6492  (class class class)co 7363  Vtxcvtx 29090  Edgcedg 29141  UHGraphcuhgr 29150  USPGraphcuspgr 29242   ClNeighbVtx cclnbgr 48316   GraphLocIso cgrlim 48474
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2712  ax-sep 5225  ax-nul 5235  ax-pow 5301  ax-pr 5369  ax-un 7685
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2719  df-cleq 2732  df-clel 2815  df-nfc 2889  df-ne 2936  df-ral 3055  df-rex 3065  df-rab 3393  df-v 3434  df-sbc 3731  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-nul 4269  df-if 4462  df-pw 4538  df-sn 4563  df-pr 4565  df-op 4569  df-uni 4846  df-iun 4930  df-br 5080  df-opab 5142  df-mpt 5161  df-id 5520  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-ov 7366  df-oprab 7367  df-mpo 7368  df-1st 7938  df-2nd 7939  df-1o 8402  df-map 8772  df-vtx 29092  df-iedg 29093  df-edg 29142  df-uhgr 29152  df-upgr 29176  df-uspgr 29244  df-clnbgr 48317  df-isubgr 48359  df-grim 48376  df-gric 48379  df-grlim 48476
This theorem is referenced by:  grlimprclnbgr  48494
  Copyright terms: Public domain W3C validator