isuspgrim0 - Mathbox for Alexander van der Vekens

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

Theorem isuspgrim0 48370

Description: An isomorphism of simple pseudographs is a bijection between their vertices which induces a bijection between their edges. (Contributed by AV, 21-Apr-2025.)

**Hypotheses**
Ref	Expression
isusgrim.v	⊢ 𝑉 = (Vtx‘𝐺)
isusgrim.w	⊢ 𝑊 = (Vtx‘𝐻)
isusgrim.e	⊢ 𝐸 = (Edg‘𝐺)
isusgrim.d	⊢ 𝐷 = (Edg‘𝐻)

**Assertion**
Ref	Expression
isuspgrim0	⊢ ((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) → (𝐹 ∈ (𝐺 GraphIso 𝐻) ↔ (𝐹:𝑉–1-1-onto→𝑊 ∧ (𝑒 ∈ 𝐸 ↦ (𝐹 “ 𝑒)):𝐸–1-1-onto→𝐷)))

Distinct variable groups: 𝐷,𝑒 𝑒,𝐸 𝑒,𝐹 𝑒,𝐺 𝑒,𝐻 𝑒,𝑉 𝑒,𝑊 𝑒,𝑋

Proof of Theorem isuspgrim0 Dummy variables 𝑑 𝑖 𝑥 𝑗 𝑘 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		isusgrim.v	. . 3 ⊢ 𝑉 = (Vtx‘𝐺)
2		isusgrim.w	. . 3 ⊢ 𝑊 = (Vtx‘𝐻)
3		eqid 2736	. . 3 ⊢ (iEdg‘𝐺) = (iEdg‘𝐺)
4		eqid 2736	. . 3 ⊢ (iEdg‘𝐻) = (iEdg‘𝐻)
5	1, 2, 3, 4	isgrim 48358	. 2 ⊢ ((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) → (𝐹 ∈ (𝐺 GraphIso 𝐻) ↔ (𝐹:𝑉–1-1-onto→𝑊 ∧ ∃𝑗(𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖))))))
6		isusgrim.e	. . . . . . . . . . . . . . 15 ⊢ 𝐸 = (Edg‘𝐺)
7	6	eleq2i 2828	. . . . . . . . . . . . . 14 ⊢ (𝑒 ∈ 𝐸 ↔ 𝑒 ∈ (Edg‘𝐺))
8		uspgruhgr 29253	. . . . . . . . . . . . . . 15 ⊢ (𝐺 ∈ USPGraph → 𝐺 ∈ UHGraph)
9	3	uhgredgiedgb 29195	. . . . . . . . . . . . . . 15 ⊢ (𝐺 ∈ UHGraph → (𝑒 ∈ (Edg‘𝐺) ↔ ∃𝑘 ∈ dom (iEdg‘𝐺)𝑒 = ((iEdg‘𝐺)‘𝑘)))
10	8, 9	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝐺 ∈ USPGraph → (𝑒 ∈ (Edg‘𝐺) ↔ ∃𝑘 ∈ dom (iEdg‘𝐺)𝑒 = ((iEdg‘𝐺)‘𝑘)))
11	7, 10	bitrid 283	. . . . . . . . . . . . 13 ⊢ (𝐺 ∈ USPGraph → (𝑒 ∈ 𝐸 ↔ ∃𝑘 ∈ dom (iEdg‘𝐺)𝑒 = ((iEdg‘𝐺)‘𝑘)))
12	11	3ad2ant1 1134	. . . . . . . . . . . 12 ⊢ ((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) → (𝑒 ∈ 𝐸 ↔ ∃𝑘 ∈ dom (iEdg‘𝐺)𝑒 = ((iEdg‘𝐺)‘𝑘)))
13	12	ad2antrr 727	. . . . . . . . . . 11 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) → (𝑒 ∈ 𝐸 ↔ ∃𝑘 ∈ dom (iEdg‘𝐺)𝑒 = ((iEdg‘𝐺)‘𝑘)))
14	13	biimpa 476	. . . . . . . . . 10 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑒 ∈ 𝐸) → ∃𝑘 ∈ dom (iEdg‘𝐺)𝑒 = ((iEdg‘𝐺)‘𝑘))
15		2fveq3 6845	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑖 = 𝑘 → ((iEdg‘𝐻)‘(𝑗‘𝑖)) = ((iEdg‘𝐻)‘(𝑗‘𝑘)))
16		fveq2 6840	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑖 = 𝑘 → ((iEdg‘𝐺)‘𝑖) = ((iEdg‘𝐺)‘𝑘))
17	16	imaeq2d 6025	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑖 = 𝑘 → (𝐹 “ ((iEdg‘𝐺)‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑘)))
18	15, 17	eqeq12d 2752	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑖 = 𝑘 → (((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)) ↔ ((iEdg‘𝐻)‘(𝑗‘𝑘)) = (𝐹 “ ((iEdg‘𝐺)‘𝑘))))
19	18	rspcv 3560	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ dom (iEdg‘𝐺) → (∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)) → ((iEdg‘𝐻)‘(𝑗‘𝑘)) = (𝐹 “ ((iEdg‘𝐺)‘𝑘))))
20	19	adantl 481	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ 𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻)) ∧ 𝑘 ∈ dom (iEdg‘𝐺)) → (∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)) → ((iEdg‘𝐻)‘(𝑗‘𝑘)) = (𝐹 “ ((iEdg‘𝐺)‘𝑘))))
21		uspgruhgr 29253	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝐻 ∈ USPGraph → 𝐻 ∈ UHGraph)
22	4	uhgrfun 29135	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝐻 ∈ UHGraph → Fun (iEdg‘𝐻))
23	21, 22	syl 17	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝐻 ∈ USPGraph → Fun (iEdg‘𝐻))
24	23	3ad2ant2 1135	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) → Fun (iEdg‘𝐻))
25	24	ad3antrrr 731	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ 𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻)) ∧ 𝑘 ∈ dom (iEdg‘𝐺)) → Fun (iEdg‘𝐻))
26		f1of 6780	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) → 𝑗:dom (iEdg‘𝐺)⟶dom (iEdg‘𝐻))
27	26	adantl 481	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ 𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻)) → 𝑗:dom (iEdg‘𝐺)⟶dom (iEdg‘𝐻))
28	27	ffvelcdmda 7036	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ 𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻)) ∧ 𝑘 ∈ dom (iEdg‘𝐺)) → (𝑗‘𝑘) ∈ dom (iEdg‘𝐻))
29	4	iedgedg 29119	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((Fun (iEdg‘𝐻) ∧ (𝑗‘𝑘) ∈ dom (iEdg‘𝐻)) → ((iEdg‘𝐻)‘(𝑗‘𝑘)) ∈ (Edg‘𝐻))
30	25, 28, 29	syl2anc 585	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ 𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻)) ∧ 𝑘 ∈ dom (iEdg‘𝐺)) → ((iEdg‘𝐻)‘(𝑗‘𝑘)) ∈ (Edg‘𝐻))
31		isusgrim.d	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 𝐷 = (Edg‘𝐻)
32	31	eleq2i 2828	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((iEdg‘𝐻)‘(𝑗‘𝑘)) ∈ 𝐷 ↔ ((iEdg‘𝐻)‘(𝑗‘𝑘)) ∈ (Edg‘𝐻))
33	30, 32	sylibr 234	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ 𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻)) ∧ 𝑘 ∈ dom (iEdg‘𝐺)) → ((iEdg‘𝐻)‘(𝑗‘𝑘)) ∈ 𝐷)
34		eleq1 2824	. . . . . . . . . . . . . . . . . . 19 ⊢ (((iEdg‘𝐻)‘(𝑗‘𝑘)) = (𝐹 “ ((iEdg‘𝐺)‘𝑘)) → (((iEdg‘𝐻)‘(𝑗‘𝑘)) ∈ 𝐷 ↔ (𝐹 “ ((iEdg‘𝐺)‘𝑘)) ∈ 𝐷))
35	33, 34	syl5ibcom 245	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ 𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻)) ∧ 𝑘 ∈ dom (iEdg‘𝐺)) → (((iEdg‘𝐻)‘(𝑗‘𝑘)) = (𝐹 “ ((iEdg‘𝐺)‘𝑘)) → (𝐹 “ ((iEdg‘𝐺)‘𝑘)) ∈ 𝐷))
36	20, 35	syld 47	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ 𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻)) ∧ 𝑘 ∈ dom (iEdg‘𝐺)) → (∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)) → (𝐹 “ ((iEdg‘𝐺)‘𝑘)) ∈ 𝐷))
37	36	ex 412	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ 𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻)) → (𝑘 ∈ dom (iEdg‘𝐺) → (∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)) → (𝐹 “ ((iEdg‘𝐺)‘𝑘)) ∈ 𝐷)))
38	37	com23 86	. . . . . . . . . . . . . . 15 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ 𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻)) → (∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)) → (𝑘 ∈ dom (iEdg‘𝐺) → (𝐹 “ ((iEdg‘𝐺)‘𝑘)) ∈ 𝐷)))
39	38	impr 454	. . . . . . . . . . . . . 14 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) → (𝑘 ∈ dom (iEdg‘𝐺) → (𝐹 “ ((iEdg‘𝐺)‘𝑘)) ∈ 𝐷))
40	39	adantr 480	. . . . . . . . . . . . 13 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑒 ∈ 𝐸) → (𝑘 ∈ dom (iEdg‘𝐺) → (𝐹 “ ((iEdg‘𝐺)‘𝑘)) ∈ 𝐷))
41	40	imp 406	. . . . . . . . . . . 12 ⊢ ((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑒 ∈ 𝐸) ∧ 𝑘 ∈ dom (iEdg‘𝐺)) → (𝐹 “ ((iEdg‘𝐺)‘𝑘)) ∈ 𝐷)
42		imaeq2 6021	. . . . . . . . . . . . 13 ⊢ (𝑒 = ((iEdg‘𝐺)‘𝑘) → (𝐹 “ 𝑒) = (𝐹 “ ((iEdg‘𝐺)‘𝑘)))
43	42	eleq1d 2821	. . . . . . . . . . . 12 ⊢ (𝑒 = ((iEdg‘𝐺)‘𝑘) → ((𝐹 “ 𝑒) ∈ 𝐷 ↔ (𝐹 “ ((iEdg‘𝐺)‘𝑘)) ∈ 𝐷))
44	41, 43	syl5ibrcom 247	. . . . . . . . . . 11 ⊢ ((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑒 ∈ 𝐸) ∧ 𝑘 ∈ dom (iEdg‘𝐺)) → (𝑒 = ((iEdg‘𝐺)‘𝑘) → (𝐹 “ 𝑒) ∈ 𝐷))
45	44	rexlimdva 3138	. . . . . . . . . 10 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑒 ∈ 𝐸) → (∃𝑘 ∈ dom (iEdg‘𝐺)𝑒 = ((iEdg‘𝐺)‘𝑘) → (𝐹 “ 𝑒) ∈ 𝐷))
46	14, 45	mpd 15	. . . . . . . . 9 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑒 ∈ 𝐸) → (𝐹 “ 𝑒) ∈ 𝐷)
47	46	ralrimiva 3129	. . . . . . . 8 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) → ∀𝑒 ∈ 𝐸 (𝐹 “ 𝑒) ∈ 𝐷)
48	31	eleq2i 2828	. . . . . . . . . . . . 13 ⊢ (𝑑 ∈ 𝐷 ↔ 𝑑 ∈ (Edg‘𝐻))
49	4	uhgredgiedgb 29195	. . . . . . . . . . . . . 14 ⊢ (𝐻 ∈ UHGraph → (𝑑 ∈ (Edg‘𝐻) ↔ ∃𝑘 ∈ dom (iEdg‘𝐻)𝑑 = ((iEdg‘𝐻)‘𝑘)))
50	21, 49	syl 17	. . . . . . . . . . . . 13 ⊢ (𝐻 ∈ USPGraph → (𝑑 ∈ (Edg‘𝐻) ↔ ∃𝑘 ∈ dom (iEdg‘𝐻)𝑑 = ((iEdg‘𝐻)‘𝑘)))
51	48, 50	bitrid 283	. . . . . . . . . . . 12 ⊢ (𝐻 ∈ USPGraph → (𝑑 ∈ 𝐷 ↔ ∃𝑘 ∈ dom (iEdg‘𝐻)𝑑 = ((iEdg‘𝐻)‘𝑘)))
52	51	3ad2ant2 1135	. . . . . . . . . . 11 ⊢ ((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) → (𝑑 ∈ 𝐷 ↔ ∃𝑘 ∈ dom (iEdg‘𝐻)𝑑 = ((iEdg‘𝐻)‘𝑘)))
53	52	ad2antrr 727	. . . . . . . . . 10 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) → (𝑑 ∈ 𝐷 ↔ ∃𝑘 ∈ dom (iEdg‘𝐻)𝑑 = ((iEdg‘𝐻)‘𝑘)))
54		simprl 771	. . . . . . . . . . . . 13 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) → 𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻))
55		f1ocnvdm 7240	. . . . . . . . . . . . 13 ⊢ ((𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → (^◡𝑗‘𝑘) ∈ dom (iEdg‘𝐺))
56	54, 55	sylan 581	. . . . . . . . . . . 12 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → (^◡𝑗‘𝑘) ∈ dom (iEdg‘𝐺))
57		2fveq3 6845	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑖 = (^◡𝑗‘𝑘) → ((iEdg‘𝐻)‘(𝑗‘𝑖)) = ((iEdg‘𝐻)‘(𝑗‘(^◡𝑗‘𝑘))))
58		fveq2 6840	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑖 = (^◡𝑗‘𝑘) → ((iEdg‘𝐺)‘𝑖) = ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))
59	58	imaeq2d 6025	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑖 = (^◡𝑗‘𝑘) → (𝐹 “ ((iEdg‘𝐺)‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))))
60	57, 59	eqeq12d 2752	. . . . . . . . . . . . . . . . 17 ⊢ (𝑖 = (^◡𝑗‘𝑘) → (((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)) ↔ ((iEdg‘𝐻)‘(𝑗‘(^◡𝑗‘𝑘))) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))))
61	60	rspccv 3561	. . . . . . . . . . . . . . . 16 ⊢ (∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)) → ((^◡𝑗‘𝑘) ∈ dom (iEdg‘𝐺) → ((iEdg‘𝐻)‘(𝑗‘(^◡𝑗‘𝑘))) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))))
62	61	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖))) → ((^◡𝑗‘𝑘) ∈ dom (iEdg‘𝐺) → ((iEdg‘𝐻)‘(𝑗‘(^◡𝑗‘𝑘))) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))))
63	62	adantl 481	. . . . . . . . . . . . . 14 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) → ((^◡𝑗‘𝑘) ∈ dom (iEdg‘𝐺) → ((iEdg‘𝐻)‘(𝑗‘(^◡𝑗‘𝑘))) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))))
64	63	adantr 480	. . . . . . . . . . . . 13 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → ((^◡𝑗‘𝑘) ∈ dom (iEdg‘𝐺) → ((iEdg‘𝐻)‘(𝑗‘(^◡𝑗‘𝑘))) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))))
65		f1ocnvfv2 7232	. . . . . . . . . . . . . . . 16 ⊢ ((𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → (𝑗‘(^◡𝑗‘𝑘)) = 𝑘)
66	54, 65	sylan 581	. . . . . . . . . . . . . . 15 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → (𝑗‘(^◡𝑗‘𝑘)) = 𝑘)
67	66	fveqeq2d 6848	. . . . . . . . . . . . . 14 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → (((iEdg‘𝐻)‘(𝑗‘(^◡𝑗‘𝑘))) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))) ↔ ((iEdg‘𝐻)‘𝑘) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))))
68		eqeq2 2748	. . . . . . . . . . . . . . . . 17 ⊢ (((iEdg‘𝐻)‘𝑘) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))) → (𝑑 = ((iEdg‘𝐻)‘𝑘) ↔ 𝑑 = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))))
69	68	adantl 481	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) ∧ ((iEdg‘𝐻)‘𝑘) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))) → (𝑑 = ((iEdg‘𝐻)‘𝑘) ↔ 𝑑 = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))))
70		simpll1 1214	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) → 𝐺 ∈ USPGraph)
71	6, 3	uspgriedgedg 29245	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐺 ∈ USPGraph ∧ (^◡𝑗‘𝑘) ∈ dom (iEdg‘𝐺)) → ∃!𝑒 ∈ 𝐸 𝑒 = ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))
72	70, 56, 71	syl2an2r 686	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → ∃!𝑒 ∈ 𝐸 𝑒 = ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))
73		eqcom 2743	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((iEdg‘𝐺)‘(^◡𝑗‘𝑘)) = 𝑒 ↔ 𝑒 = ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))
74	73	reubii 3351	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (∃!𝑒 ∈ 𝐸 ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)) = 𝑒 ↔ ∃!𝑒 ∈ 𝐸 𝑒 = ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))
75	72, 74	sylibr 234	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → ∃!𝑒 ∈ 𝐸 ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)) = 𝑒)
76		f1of1 6779	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝐹:𝑉–1-1-onto→𝑊 → 𝐹:𝑉–1-1→𝑊)
77	76	ad4antlr 734	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) ∧ 𝑒 ∈ 𝐸) → 𝐹:𝑉–1-1→𝑊)
78		uspgrupgr 29247	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝐺 ∈ USPGraph → 𝐺 ∈ UPGraph)
79	78	3ad2ant1 1134	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) → 𝐺 ∈ UPGraph)
80	79	ad3antrrr 731	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → 𝐺 ∈ UPGraph)
81	80, 56	jca 511	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → (𝐺 ∈ UPGraph ∧ (^◡𝑗‘𝑘) ∈ dom (iEdg‘𝐺)))
82	81	adantr 480	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) ∧ 𝑒 ∈ 𝐸) → (𝐺 ∈ UPGraph ∧ (^◡𝑗‘𝑘) ∈ dom (iEdg‘𝐺)))
83	1, 3	upgrss 29157	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝐺 ∈ UPGraph ∧ (^◡𝑗‘𝑘) ∈ dom (iEdg‘𝐺)) → ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)) ⊆ 𝑉)
84	82, 83	syl 17	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) ∧ 𝑒 ∈ 𝐸) → ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)) ⊆ 𝑉)
85	7	biimpi 216	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑒 ∈ 𝐸 → 𝑒 ∈ (Edg‘𝐺))
86		edgupgr 29203	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝐺 ∈ UPGraph ∧ 𝑒 ∈ (Edg‘𝐺)) → (𝑒 ∈ 𝒫 (Vtx‘𝐺) ∧ 𝑒 ≠ ∅ ∧ (♯‘𝑒) ≤ 2))
87	80, 85, 86	syl2an 597	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) ∧ 𝑒 ∈ 𝐸) → (𝑒 ∈ 𝒫 (Vtx‘𝐺) ∧ 𝑒 ≠ ∅ ∧ (♯‘𝑒) ≤ 2))
88	87	simp1d 1143	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) ∧ 𝑒 ∈ 𝐸) → 𝑒 ∈ 𝒫 (Vtx‘𝐺))
89	88	elpwid 4550	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) ∧ 𝑒 ∈ 𝐸) → 𝑒 ⊆ (Vtx‘𝐺))
90	89, 1	sseqtrrdi 3963	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) ∧ 𝑒 ∈ 𝐸) → 𝑒 ⊆ 𝑉)
91		f1imaeq 7220	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐹:𝑉–1-1→𝑊 ∧ (((iEdg‘𝐺)‘(^◡𝑗‘𝑘)) ⊆ 𝑉 ∧ 𝑒 ⊆ 𝑉)) → ((𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))) = (𝐹 “ 𝑒) ↔ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)) = 𝑒))
92	77, 84, 90, 91	syl12anc 837	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) ∧ 𝑒 ∈ 𝐸) → ((𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))) = (𝐹 “ 𝑒) ↔ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)) = 𝑒))
93	92	reubidva 3356	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → (∃!𝑒 ∈ 𝐸 (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))) = (𝐹 “ 𝑒) ↔ ∃!𝑒 ∈ 𝐸 ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)) = 𝑒))
94	75, 93	mpbird 257	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → ∃!𝑒 ∈ 𝐸 (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))) = (𝐹 “ 𝑒))
95	94	ad2antrr 727	. . . . . . . . . . . . . . . . . 18 ⊢ (((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) ∧ ((iEdg‘𝐻)‘𝑘) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))) ∧ 𝑑 = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))) → ∃!𝑒 ∈ 𝐸 (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))) = (𝐹 “ 𝑒))
96		eqeq1 2740	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑑 = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))) → (𝑑 = (𝐹 “ 𝑒) ↔ (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))) = (𝐹 “ 𝑒)))
97	96	reubidv 3358	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑑 = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))) → (∃!𝑒 ∈ 𝐸 𝑑 = (𝐹 “ 𝑒) ↔ ∃!𝑒 ∈ 𝐸 (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))) = (𝐹 “ 𝑒)))
98	97	adantl 481	. . . . . . . . . . . . . . . . . 18 ⊢ (((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) ∧ ((iEdg‘𝐻)‘𝑘) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))) ∧ 𝑑 = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))) → (∃!𝑒 ∈ 𝐸 𝑑 = (𝐹 “ 𝑒) ↔ ∃!𝑒 ∈ 𝐸 (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))) = (𝐹 “ 𝑒)))
99	95, 98	mpbird 257	. . . . . . . . . . . . . . . . 17 ⊢ (((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) ∧ ((iEdg‘𝐻)‘𝑘) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))) ∧ 𝑑 = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))) → ∃!𝑒 ∈ 𝐸 𝑑 = (𝐹 “ 𝑒))
100	99	ex 412	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) ∧ ((iEdg‘𝐻)‘𝑘) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))) → (𝑑 = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))) → ∃!𝑒 ∈ 𝐸 𝑑 = (𝐹 “ 𝑒)))
101	69, 100	sylbid 240	. . . . . . . . . . . . . . 15 ⊢ ((((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) ∧ ((iEdg‘𝐻)‘𝑘) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘)))) → (𝑑 = ((iEdg‘𝐻)‘𝑘) → ∃!𝑒 ∈ 𝐸 𝑑 = (𝐹 “ 𝑒)))
102	101	ex 412	. . . . . . . . . . . . . 14 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → (((iEdg‘𝐻)‘𝑘) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))) → (𝑑 = ((iEdg‘𝐻)‘𝑘) → ∃!𝑒 ∈ 𝐸 𝑑 = (𝐹 “ 𝑒))))
103	67, 102	sylbid 240	. . . . . . . . . . . . 13 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → (((iEdg‘𝐻)‘(𝑗‘(^◡𝑗‘𝑘))) = (𝐹 “ ((iEdg‘𝐺)‘(^◡𝑗‘𝑘))) → (𝑑 = ((iEdg‘𝐻)‘𝑘) → ∃!𝑒 ∈ 𝐸 𝑑 = (𝐹 “ 𝑒))))
104	64, 103	syld 47	. . . . . . . . . . . 12 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → ((^◡𝑗‘𝑘) ∈ dom (iEdg‘𝐺) → (𝑑 = ((iEdg‘𝐻)‘𝑘) → ∃!𝑒 ∈ 𝐸 𝑑 = (𝐹 “ 𝑒))))
105	56, 104	mpd 15	. . . . . . . . . . 11 ⊢ (((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ∧ 𝑘 ∈ dom (iEdg‘𝐻)) → (𝑑 = ((iEdg‘𝐻)‘𝑘) → ∃!𝑒 ∈ 𝐸 𝑑 = (𝐹 “ 𝑒)))
106	105	rexlimdva 3138	. . . . . . . . . 10 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) → (∃𝑘 ∈ dom (iEdg‘𝐻)𝑑 = ((iEdg‘𝐻)‘𝑘) → ∃!𝑒 ∈ 𝐸 𝑑 = (𝐹 “ 𝑒)))
107	53, 106	sylbid 240	. . . . . . . . 9 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) → (𝑑 ∈ 𝐷 → ∃!𝑒 ∈ 𝐸 𝑑 = (𝐹 “ 𝑒)))
108	107	ralrimiv 3128	. . . . . . . 8 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) → ∀𝑑 ∈ 𝐷 ∃!𝑒 ∈ 𝐸 𝑑 = (𝐹 “ 𝑒))
109		imaeq2 6021	. . . . . . . . . 10 ⊢ (𝑥 = 𝑒 → (𝐹 “ 𝑥) = (𝐹 “ 𝑒))
110	109	cbvmptv 5189	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥)) = (𝑒 ∈ 𝐸 ↦ (𝐹 “ 𝑒))
111	110	f1ompt 7063	. . . . . . . 8 ⊢ ((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥)):𝐸–1-1-onto→𝐷 ↔ (∀𝑒 ∈ 𝐸 (𝐹 “ 𝑒) ∈ 𝐷 ∧ ∀𝑑 ∈ 𝐷 ∃!𝑒 ∈ 𝐸 𝑑 = (𝐹 “ 𝑒)))
112	47, 108, 111	sylanbrc 584	. . . . . . 7 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) → (𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥)):𝐸–1-1-onto→𝐷)
113	112	ex 412	. . . . . 6 ⊢ (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) → ((𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖))) → (𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥)):𝐸–1-1-onto→𝐷))
114	113	exlimdv 1935	. . . . 5 ⊢ (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) → (∃𝑗(𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖))) → (𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥)):𝐸–1-1-onto→𝐷))
115		fvex 6853	. . . . . . . . . 10 ⊢ (iEdg‘𝐺) ∈ V
116	115	dmex 7860	. . . . . . . . 9 ⊢ dom (iEdg‘𝐺) ∈ V
117	116	mptex 7178	. . . . . . . 8 ⊢ (𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒)))) ∈ V
118	117	a1i 11	. . . . . . 7 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥)):𝐸–1-1-onto→𝐷) → (𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒)))) ∈ V)
119		eqid 2736	. . . . . . . 8 ⊢ (𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒)))) = (𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒))))
120	1, 2, 6, 31, 3, 4, 110, 119	isuspgrim0lem 48369	. . . . . . 7 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥)):𝐸–1-1-onto→𝐷) → ((𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒)))):dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘((𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒))))‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖))))
121		f1oeq1 6768	. . . . . . . 8 ⊢ (𝑗 = (𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒)))) → (𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ↔ (𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒)))):dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻)))
122		fveq1 6839	. . . . . . . . . 10 ⊢ (𝑗 = (𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒)))) → (𝑗‘𝑖) = ((𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒))))‘𝑖))
123	122	fveqeq2d 6848	. . . . . . . . 9 ⊢ (𝑗 = (𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒)))) → (((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)) ↔ ((iEdg‘𝐻)‘((𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒))))‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖))))
124	123	ralbidv 3160	. . . . . . . 8 ⊢ (𝑗 = (𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒)))) → (∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)) ↔ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘((𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒))))‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖))))
125	121, 124	anbi12d 633	. . . . . . 7 ⊢ (𝑗 = (𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒)))) → ((𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖))) ↔ ((𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒)))):dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘((𝑒 ∈ dom (iEdg‘𝐺) ↦ (^◡(iEdg‘𝐻)‘((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥))‘((iEdg‘𝐺)‘𝑒))))‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))))
126	118, 120, 125	spcedv 3540	. . . . . 6 ⊢ ((((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) ∧ (𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥)):𝐸–1-1-onto→𝐷) → ∃𝑗(𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖))))
127	126	ex 412	. . . . 5 ⊢ (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) → ((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥)):𝐸–1-1-onto→𝐷 → ∃𝑗(𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))))
128	114, 127	impbid 212	. . . 4 ⊢ (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) → (∃𝑗(𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖))) ↔ (𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥)):𝐸–1-1-onto→𝐷))
129		f1oeq1 6768	. . . . 5 ⊢ ((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥)) = (𝑒 ∈ 𝐸 ↦ (𝐹 “ 𝑒)) → ((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥)):𝐸–1-1-onto→𝐷 ↔ (𝑒 ∈ 𝐸 ↦ (𝐹 “ 𝑒)):𝐸–1-1-onto→𝐷))
130	110, 129	mp1i 13	. . . 4 ⊢ (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) → ((𝑥 ∈ 𝐸 ↦ (𝐹 “ 𝑥)):𝐸–1-1-onto→𝐷 ↔ (𝑒 ∈ 𝐸 ↦ (𝐹 “ 𝑒)):𝐸–1-1-onto→𝐷))
131	128, 130	bitrd 279	. . 3 ⊢ (((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) ∧ 𝐹:𝑉–1-1-onto→𝑊) → (∃𝑗(𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖))) ↔ (𝑒 ∈ 𝐸 ↦ (𝐹 “ 𝑒)):𝐸–1-1-onto→𝐷))
132	131	pm5.32da 579	. 2 ⊢ ((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) → ((𝐹:𝑉–1-1-onto→𝑊 ∧ ∃𝑗(𝑗:dom (iEdg‘𝐺)–1-1-onto→dom (iEdg‘𝐻) ∧ ∀𝑖 ∈ dom (iEdg‘𝐺)((iEdg‘𝐻)‘(𝑗‘𝑖)) = (𝐹 “ ((iEdg‘𝐺)‘𝑖)))) ↔ (𝐹:𝑉–1-1-onto→𝑊 ∧ (𝑒 ∈ 𝐸 ↦ (𝐹 “ 𝑒)):𝐸–1-1-onto→𝐷)))
133	5, 132	bitrd 279	1 ⊢ ((𝐺 ∈ USPGraph ∧ 𝐻 ∈ USPGraph ∧ 𝐹 ∈ 𝑋) → (𝐹 ∈ (𝐺 GraphIso 𝐻) ↔ (𝐹:𝑉–1-1-onto→𝑊 ∧ (𝑒 ∈ 𝐸 ↦ (𝐹 “ 𝑒)):𝐸–1-1-onto→𝐷)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1087 = wceq 1542 ∃wex 1781 ∈ wcel 2114 ≠ wne 2932 ∀wral 3051 ∃wrex 3061 ∃!wreu 3340 Vcvv 3429 ⊆ wss 3889 ∅c0 4273 𝒫 cpw 4541 class class class wbr 5085 ↦ cmpt 5166 ^◡ccnv 5630 dom cdm 5631 “ cima 5634 Fun wfun 6492 ⟶wf 6494 –1-1→wf1 6495 –1-1-onto→wf1o 6497 ‘cfv 6498 (class class class)co 7367 ≤ cle 11180 2c2 12236 ♯chash 14292 Vtxcvtx 29065 iEdgciedg 29066 Edgcedg 29116 UHGraphcuhgr 29125 UPGraphcupgr 29149 USPGraphcuspgr 29217 GraphIso cgrim 48351

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2708 ax-rep 5212 ax-sep 5231 ax-nul 5241 ax-pow 5307 ax-pr 5375 ax-un 7689

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2539 df-eu 2569 df-clab 2715 df-cleq 2728 df-clel 2811 df-nfc 2885 df-ne 2933 df-ral 3052 df-rex 3062 df-rmo 3342 df-reu 3343 df-rab 3390 df-v 3431 df-sbc 3729 df-csb 3838 df-dif 3892 df-un 3894 df-in 3896 df-ss 3906 df-nul 4274 df-if 4467 df-pw 4543 df-sn 4568 df-pr 4570 df-op 4574 df-uni 4851 df-iun 4935 df-br 5086 df-opab 5148 df-mpt 5167 df-id 5526 df-xp 5637 df-rel 5638 df-cnv 5639 df-co 5640 df-dm 5641 df-rn 5642 df-res 5643 df-ima 5644 df-iota 6454 df-fun 6500 df-fn 6501 df-f 6502 df-f1 6503 df-fo 6504 df-f1o 6505 df-fv 6506 df-ov 7370 df-oprab 7371 df-mpo 7372 df-map 8775 df-edg 29117 df-uhgr 29127 df-upgr 29151 df-uspgr 29219 df-grim 48354

This theorem is referenced by: isuspgrim 48372

W3C validator