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 48581
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 1210 . . 3 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐺 ∈ USPGraph)
2 simp1r 1211 . . 3 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐻 ∈ USPGraph)
3 simp2 1149 . . 3 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐹 ∈ (𝐺 GraphLocIso 𝐻))
4 eqid 2761 . . . 4 (Vtx‘𝐺) = (Vtx‘𝐺)
5 eqid 2761 . . . 4 (Vtx‘𝐻) = (Vtx‘𝐻)
6 eqid 2761 . . . 4 (𝐺 ClNeighbVtx 𝑣) = (𝐺 ClNeighbVtx 𝑣)
7 eqid 2761 . . . 4 (𝐻 ClNeighbVtx (𝐹𝑣)) = (𝐻 ClNeighbVtx (𝐹𝑣))
8 clnbgrvtxedg.i . . . 4 𝐼 = (Edg‘𝐺)
9 grlimedgclnbgr.j . . . 4 𝐽 = (Edg‘𝐻)
10 sseq1 3961 . . . . 5 (𝑥 = 𝑦 → (𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣) ↔ 𝑦 ⊆ (𝐺 ClNeighbVtx 𝑣)))
1110cbvrabv 3423 . . . 4 {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} = {𝑦𝐼𝑦 ⊆ (𝐺 ClNeighbVtx 𝑣)}
12 sseq1 3961 . . . . 5 (𝑥 = 𝑦 → (𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣)) ↔ 𝑦 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))))
1312cbvrabv 3423 . . . 4 {𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} = {𝑦𝐽𝑦 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))}
144, 5, 6, 7, 8, 9, 11, 13usgrlimprop 48579 . . 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 1389 . 2 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → (𝐹:(Vtx‘𝐺)–1-1-onto→(Vtx‘𝐻) ∧ ∀𝑣 ∈ (Vtx‘𝐺)∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒)))))
16 uspgruhgr 29331 . . . . . . . 8 (𝐺 ∈ USPGraph → 𝐺 ∈ UHGraph)
1716adantr 484 . . . . . . 7 ((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) → 𝐺 ∈ UHGraph)
18173ad2ant1 1145 . . . . . 6 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐺 ∈ UHGraph)
198eleq2i 2853 . . . . . . . 8 (𝐸𝐼𝐸 ∈ (Edg‘𝐺))
2019birani 507 . . . . . . 7 ((𝐸𝐼𝐴𝐸) → 𝐸 ∈ (Edg‘𝐺))
21203ad2ant3 1147 . . . . . 6 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐸 ∈ (Edg‘𝐺))
22 simp3r 1215 . . . . . 6 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐴𝐸)
23 uhgredgrnv 29277 . . . . . 6 ((𝐺 ∈ UHGraph ∧ 𝐸 ∈ (Edg‘𝐺) ∧ 𝐴𝐸) → 𝐴 ∈ (Vtx‘𝐺))
2418, 21, 22, 23syl3anc 1389 . . . . 5 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐴 ∈ (Vtx‘𝐺))
25 eqidd 2762 . . . . . . . . 9 (𝑣 = 𝐴𝑓 = 𝑓)
26 oveq2 7400 . . . . . . . . 9 (𝑣 = 𝐴 → (𝐺 ClNeighbVtx 𝑣) = (𝐺 ClNeighbVtx 𝐴))
27 fveq2 6863 . . . . . . . . . 10 (𝑣 = 𝐴 → (𝐹𝑣) = (𝐹𝐴))
2827oveq2d 7408 . . . . . . . . 9 (𝑣 = 𝐴 → (𝐻 ClNeighbVtx (𝐹𝑣)) = (𝐻 ClNeighbVtx (𝐹𝐴)))
2925, 26, 28f1oeq123d 6796 . . . . . . . 8 (𝑣 = 𝐴 → (𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ↔ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))))
30 eqidd 2762 . . . . . . . . . . 11 (𝑣 = 𝐴𝑔 = 𝑔)
3126sseq2d 3968 . . . . . . . . . . . 12 (𝑣 = 𝐴 → (𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣) ↔ 𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)))
3231rabbidv 3420 . . . . . . . . . . 11 (𝑣 = 𝐴 → {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} = {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)})
3328sseq2d 3968 . . . . . . . . . . . 12 (𝑣 = 𝐴 → (𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣)) ↔ 𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))))
3433rabbidv 3420 . . . . . . . . . . 11 (𝑣 = 𝐴 → {𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} = {𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))})
3530, 32, 34f1oeq123d 6796 . . . . . . . . . 10 (𝑣 = 𝐴 → (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ↔ 𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))}))
3632raleqdv 3319 . . . . . . . . . 10 (𝑣 = 𝐴 → (∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒) ↔ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)))
3735, 36anbi12d 641 . . . . . . . . 9 (𝑣 = 𝐴 → ((𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒)) ↔ (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))))
3837exbidv 1940 . . . . . . . 8 (𝑣 = 𝐴 → (∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒)) ↔ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))))
3929, 38anbi12d 641 . . . . . . 7 (𝑣 = 𝐴 → ((𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒))) ↔ (𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)))))
4039exbidv 1940 . . . . . 6 (𝑣 = 𝐴 → (∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝑣)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝑣)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝑣))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝑣)} (𝑓𝑒) = (𝑔𝑒))) ↔ ∃𝑓(𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)))))
4140rspcv 3577 . . . . 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 2761 . . . . . . . . . . . . 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 6796 . . . . . . . . . . . . 13 (𝑓 = 𝑓 → (𝑓:𝑁1-1-onto𝑀𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))))
5043, 49ax-mp 5 . . . . . . . . . . . 12 (𝑓:𝑁1-1-onto𝑀𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)))
5150biimpri 230 . . . . . . . . . . 11 (𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) → 𝑓:𝑁1-1-onto𝑀)
5251adantl 485 . . . . . . . . . 10 ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) → 𝑓:𝑁1-1-onto𝑀)
5352adantr 484 . . . . . . . . 9 (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) ∧ (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → 𝑓:𝑁1-1-onto𝑀)
54 eqid 2761 . . . . . . . . . . . . 13 𝑔 = 𝑔
55 id 22 . . . . . . . . . . . . . 14 (𝑔 = 𝑔𝑔 = 𝑔)
56 clnbgrvtxedg.k . . . . . . . . . . . . . . . 16 𝐾 = {𝑥𝐼𝑥𝑁}
5745sseq2i 3965 . . . . . . . . . . . . . . . 16 (𝑥𝑁𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴))
5856, 57rabbieq 3421 . . . . . . . . . . . . . . 15 𝐾 = {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}
5958a1i 11 . . . . . . . . . . . . . 14 (𝑔 = 𝑔𝐾 = {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)})
60 grlimedgclnbgr.l . . . . . . . . . . . . . . . 16 𝐿 = {𝑥𝐽𝑥𝑀}
6147sseq2i 3965 . . . . . . . . . . . . . . . 16 (𝑥𝑀𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴)))
6260, 61rabbieq 3421 . . . . . . . . . . . . . . 15 𝐿 = {𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))}
6362a1i 11 . . . . . . . . . . . . . 14 (𝑔 = 𝑔𝐿 = {𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))})
6455, 59, 63f1oeq123d 6796 . . . . . . . . . . . . 13 (𝑔 = 𝑔 → (𝑔:𝐾1-1-onto𝐿𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))}))
6554, 64ax-mp 5 . . . . . . . . . . . 12 (𝑔:𝐾1-1-onto𝐿𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))})
6665biimpri 230 . . . . . . . . . . 11 (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} → 𝑔:𝐾1-1-onto𝐿)
6766adantr 484 . . . . . . . . . 10 ((𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)) → 𝑔:𝐾1-1-onto𝐿)
6867adantl 485 . . . . . . . . 9 (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) ∧ (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → 𝑔:𝐾1-1-onto𝐿)
69 simp3l 1214 . . . . . . . . . . . . . 14 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐸𝐼)
70 eqid 2761 . . . . . . . . . . . . . . 15 (𝐺 ClNeighbVtx 𝐴) = (𝐺 ClNeighbVtx 𝐴)
71 eqid 2761 . . . . . . . . . . . . . . 15 {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} = {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}
7270, 8, 71clnbgrvtxedg 48580 . . . . . . . . . . . . . 14 ((𝐺 ∈ UHGraph ∧ 𝐸𝐼𝐴𝐸) → 𝐸 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)})
7318, 69, 22, 72syl3anc 1389 . . . . . . . . . . . . 13 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → 𝐸 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)})
74 imaeq2 6042 . . . . . . . . . . . . . . 15 (𝑒 = 𝐸 → (𝑓𝑒) = (𝑓𝐸))
75 fveq2 6863 . . . . . . . . . . . . . . 15 (𝑒 = 𝐸 → (𝑔𝑒) = (𝑔𝐸))
7674, 75eqeq12d 2777 . . . . . . . . . . . . . 14 (𝑒 = 𝐸 → ((𝑓𝑒) = (𝑔𝑒) ↔ (𝑓𝐸) = (𝑔𝐸)))
7776rspcv 3577 . . . . . . . . . . . . 13 (𝐸 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} → (∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒) → (𝑓𝐸) = (𝑔𝐸)))
7873, 77syl 17 . . . . . . . . . . . 12 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → (∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒) → (𝑓𝐸) = (𝑔𝐸)))
7978adantld 494 . . . . . . . . . . 11 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → ((𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)) → (𝑓𝐸) = (𝑔𝐸)))
8079adantr 484 . . . . . . . . . 10 ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) → ((𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)) → (𝑓𝐸) = (𝑔𝐸)))
8180imp 410 . . . . . . . . 9 (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) ∧ (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → (𝑓𝐸) = (𝑔𝐸))
8253, 68, 813jca 1140 . . . . . . . 8 (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) ∧ (𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → (𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸)))
8382ex 416 . . . . . . 7 ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) → ((𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)) → (𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸))))
8483eximdv 1936 . . . . . 6 ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) ∧ 𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴))) → (∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒)) → ∃𝑔(𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸))))
8584expimpd 457 . . . . 5 (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph) ∧ 𝐹 ∈ (𝐺 GraphLocIso 𝐻) ∧ (𝐸𝐼𝐴𝐸)) → ((𝑓:(𝐺 ClNeighbVtx 𝐴)–1-1-onto→(𝐻 ClNeighbVtx (𝐹𝐴)) ∧ ∃𝑔(𝑔:{𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)}–1-1-onto→{𝑥𝐽𝑥 ⊆ (𝐻 ClNeighbVtx (𝐹𝐴))} ∧ ∀𝑒 ∈ {𝑥𝐼𝑥 ⊆ (𝐺 ClNeighbVtx 𝐴)} (𝑓𝑒) = (𝑔𝑒))) → ∃𝑔(𝑓:𝑁1-1-onto𝑀𝑔:𝐾1-1-onto𝐿 ∧ (𝑓𝐸) = (𝑔𝐸))))
8685eximdv 1936 . . . 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 494 . 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 208  wa 399  w3a 1097   = wceq 1559  wex 1798  wcel 2141  wral 3075  {crab 3413  wss 3904  cima 5648  1-1-ontowf1o 6516  cfv 6517  (class class class)co 7392  Vtxcvtx 29143  Edgcedg 29194  UHGraphcuhgr 29203  USPGraphcuspgr 29295   ClNeighbVtx cclnbgr 48404   GraphLocIso cgrlim 48562
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1814  ax-4 1828  ax-5 1929  ax-6 1986  ax-7 2027  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-sep 5245  ax-nul 5255  ax-pow 5321  ax-pr 5389  ax-un 7714
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3an 1099  df-tru 1562  df-fal 1572  df-ex 1799  df-nf 1803  df-sb 2090  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3076  df-rex 3086  df-rab 3414  df-v 3455  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4582  df-pr 4584  df-op 4588  df-uni 4865  df-iun 4950  df-br 5100  df-opab 5162  df-mpt 5181  df-id 5540  df-xp 5651  df-rel 5652  df-cnv 5653  df-co 5654  df-dm 5655  df-rn 5656  df-res 5657  df-ima 5658  df-suc 6348  df-iota 6473  df-fun 6519  df-fn 6520  df-f 6521  df-f1 6522  df-fo 6523  df-f1o 6524  df-fv 6525  df-ov 7395  df-oprab 7396  df-mpo 7397  df-1st 7966  df-2nd 7967  df-1o 8432  df-map 8805  df-vtx 29145  df-iedg 29146  df-edg 29195  df-uhgr 29205  df-upgr 29229  df-uspgr 29297  df-clnbgr 48405  df-isubgr 48447  df-grim 48464  df-gric 48467  df-grlim 48564
This theorem is referenced by:  grlimprclnbgr  48582
  Copyright terms: Public domain W3C validator