Theorem fpwwe2lem7 10634

Description: Lemma for fpwwe2 10640. Show by induction that the two isometries 𝑀 and 𝑁 agree on their common domain. (Contributed by Mario Carneiro, 15-May-2015.) (Proof shortened by Peter Mazsa, 23-Sep-2022.) (Revised by AV, 20-Jul-2024.)

Hypotheses

Ref	Expression
fpwwe2.1	⊢ 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦 ∈ 𝑥 [(◡𝑟 “ {𝑦}) / 𝑢](𝑢𝐹(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦))}
fpwwe2.2	⊢ (𝜑 → 𝐴 ∈ 𝑉)
fpwwe2.3	⊢ ((𝜑 ∧ (𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥)) → (𝑥𝐹𝑟) ∈ 𝐴)
fpwwe2lem8.x	⊢ (𝜑 → 𝑋𝑊𝑅)
fpwwe2lem8.y	⊢ (𝜑 → 𝑌𝑊𝑆)
fpwwe2lem8.m	⊢ 𝑀 = OrdIso(𝑅, 𝑋)
fpwwe2lem8.n	⊢ 𝑁 = OrdIso(𝑆, 𝑌)
fpwwe2lem8.s	⊢ (𝜑 → dom 𝑀 ⊆ dom 𝑁)

Assertion

Ref	Expression
fpwwe2lem7	⊢ (𝜑 → 𝑀 = (𝑁 ↾ dom 𝑀))

Distinct variable groups:   𝑦,𝑢,𝑟,𝑥,𝐹   𝑋,𝑟,𝑢,𝑥,𝑦   𝑀,𝑟,𝑢,𝑥,𝑦   𝑁,𝑟,𝑢,𝑥,𝑦   𝜑,𝑟,𝑢,𝑥,𝑦   𝐴,𝑟,𝑥   𝑅,𝑟,𝑢,𝑥,𝑦   𝑌,𝑟,𝑢,𝑥,𝑦   𝑆,𝑟,𝑢,𝑥,𝑦   𝑊,𝑟,𝑢,𝑥,𝑦

Allowed substitution hints:   𝐴(𝑦,𝑢)   𝑉(𝑥,𝑦,𝑢,𝑟)

Proof of Theorem fpwwe2lem7

Dummy variables 𝑤 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fpwwe2lem8.m	. . . 4 ⊢ 𝑀 = OrdIso(𝑅, 𝑋)
2	1	oif 9527	. . 3 ⊢ 𝑀:dom 𝑀⟶𝑋
3		ffn 6717	. . 3 ⊢ (𝑀:dom 𝑀⟶𝑋 → 𝑀 Fn dom 𝑀)
4	2, 3	mp1i 13	. 2 ⊢ (𝜑 → 𝑀 Fn dom 𝑀)
5		fpwwe2lem8.n	. . . . 5 ⊢ 𝑁 = OrdIso(𝑆, 𝑌)
6	5	oif 9527	. . . 4 ⊢ 𝑁:dom 𝑁⟶𝑌
7		ffn 6717	. . . 4 ⊢ (𝑁:dom 𝑁⟶𝑌 → 𝑁 Fn dom 𝑁)
8	6, 7	mp1i 13	. . 3 ⊢ (𝜑 → 𝑁 Fn dom 𝑁)
9		fpwwe2lem8.s	. . 3 ⊢ (𝜑 → dom 𝑀 ⊆ dom 𝑁)
10	8, 9	fnssresd 6674	. 2 ⊢ (𝜑 → (𝑁 ↾ dom 𝑀) Fn dom 𝑀)
11	1	oicl 9526	. . . . . 6 ⊢ Ord dom 𝑀
12		ordelon 6388	. . . . . 6 ⊢ ((Ord dom 𝑀 ∧ 𝑤 ∈ dom 𝑀) → 𝑤 ∈ On)
13	11, 12	mpan 688	. . . . 5 ⊢ (𝑤 ∈ dom 𝑀 → 𝑤 ∈ On)
14		eleq1w 2816	. . . . . . . . 9 ⊢ (𝑤 = 𝑦 → (𝑤 ∈ dom 𝑀 ↔ 𝑦 ∈ dom 𝑀))
15		fveq2 6891	. . . . . . . . . 10 ⊢ (𝑤 = 𝑦 → (𝑀‘𝑤) = (𝑀‘𝑦))
16		fveq2 6891	. . . . . . . . . 10 ⊢ (𝑤 = 𝑦 → (𝑁‘𝑤) = (𝑁‘𝑦))
17	15, 16	eqeq12d 2748	. . . . . . . . 9 ⊢ (𝑤 = 𝑦 → ((𝑀‘𝑤) = (𝑁‘𝑤) ↔ (𝑀‘𝑦) = (𝑁‘𝑦)))
18	14, 17	imbi12d 344	. . . . . . . 8 ⊢ (𝑤 = 𝑦 → ((𝑤 ∈ dom 𝑀 → (𝑀‘𝑤) = (𝑁‘𝑤)) ↔ (𝑦 ∈ dom 𝑀 → (𝑀‘𝑦) = (𝑁‘𝑦))))
19	18	imbi2d 340	. . . . . . 7 ⊢ (𝑤 = 𝑦 → ((𝜑 → (𝑤 ∈ dom 𝑀 → (𝑀‘𝑤) = (𝑁‘𝑤))) ↔ (𝜑 → (𝑦 ∈ dom 𝑀 → (𝑀‘𝑦) = (𝑁‘𝑦)))))
20		r19.21v 3179	. . . . . . . . 9 ⊢ (∀𝑦 ∈ 𝑤 (𝜑 → (𝑦 ∈ dom 𝑀 → (𝑀‘𝑦) = (𝑁‘𝑦))) ↔ (𝜑 → ∀𝑦 ∈ 𝑤 (𝑦 ∈ dom 𝑀 → (𝑀‘𝑦) = (𝑁‘𝑦))))
21	11	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → Ord dom 𝑀)
22		ordelss 6380	. . . . . . . . . . . . . . . . 17 ⊢ ((Ord dom 𝑀 ∧ 𝑤 ∈ dom 𝑀) → 𝑤 ⊆ dom 𝑀)
23	21, 22	sylan 580	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → 𝑤 ⊆ dom 𝑀)
24	23	sselda 3982	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ 𝑦 ∈ 𝑤) → 𝑦 ∈ dom 𝑀)
25		pm2.27 42	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ dom 𝑀 → ((𝑦 ∈ dom 𝑀 → (𝑀‘𝑦) = (𝑁‘𝑦)) → (𝑀‘𝑦) = (𝑁‘𝑦)))
26	24, 25	syl 17	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ 𝑦 ∈ 𝑤) → ((𝑦 ∈ dom 𝑀 → (𝑀‘𝑦) = (𝑁‘𝑦)) → (𝑀‘𝑦) = (𝑁‘𝑦)))
27	26	ralimdva 3167	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → (∀𝑦 ∈ 𝑤 (𝑦 ∈ dom 𝑀 → (𝑀‘𝑦) = (𝑁‘𝑦)) → ∀𝑦 ∈ 𝑤 (𝑀‘𝑦) = (𝑁‘𝑦)))
28		fnssres 6673	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑀 Fn dom 𝑀 ∧ 𝑤 ⊆ dom 𝑀) → (𝑀 ↾ 𝑤) Fn 𝑤)
29	4, 23, 28	syl2an2r 683	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → (𝑀 ↾ 𝑤) Fn 𝑤)
30	9	adantr 481	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → dom 𝑀 ⊆ dom 𝑁)
31	23, 30	sstrd 3992	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → 𝑤 ⊆ dom 𝑁)
32		fnssres 6673	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 Fn dom 𝑁 ∧ 𝑤 ⊆ dom 𝑁) → (𝑁 ↾ 𝑤) Fn 𝑤)
33	8, 31, 32	syl2an2r 683	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → (𝑁 ↾ 𝑤) Fn 𝑤)
34		eqfnfv 7032	. . . . . . . . . . . . . . . 16 ⊢ (((𝑀 ↾ 𝑤) Fn 𝑤 ∧ (𝑁 ↾ 𝑤) Fn 𝑤) → ((𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤) ↔ ∀𝑦 ∈ 𝑤 ((𝑀 ↾ 𝑤)‘𝑦) = ((𝑁 ↾ 𝑤)‘𝑦)))
35	29, 33, 34	syl2anc 584	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → ((𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤) ↔ ∀𝑦 ∈ 𝑤 ((𝑀 ↾ 𝑤)‘𝑦) = ((𝑁 ↾ 𝑤)‘𝑦)))
36		fvres 6910	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ 𝑤 → ((𝑀 ↾ 𝑤)‘𝑦) = (𝑀‘𝑦))
37		fvres 6910	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ 𝑤 → ((𝑁 ↾ 𝑤)‘𝑦) = (𝑁‘𝑦))
38	36, 37	eqeq12d 2748	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ 𝑤 → (((𝑀 ↾ 𝑤)‘𝑦) = ((𝑁 ↾ 𝑤)‘𝑦) ↔ (𝑀‘𝑦) = (𝑁‘𝑦)))
39	38	ralbiia 3091	. . . . . . . . . . . . . . 15 ⊢ (∀𝑦 ∈ 𝑤 ((𝑀 ↾ 𝑤)‘𝑦) = ((𝑁 ↾ 𝑤)‘𝑦) ↔ ∀𝑦 ∈ 𝑤 (𝑀‘𝑦) = (𝑁‘𝑦))
40	35, 39	bitrdi 286	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → ((𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤) ↔ ∀𝑦 ∈ 𝑤 (𝑀‘𝑦) = (𝑁‘𝑦)))
41		fpwwe2.1	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦 ∈ 𝑥 [(◡𝑟 “ {𝑦}) / 𝑢](𝑢𝐹(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦))}
42		fpwwe2.2	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → 𝐴 ∈ 𝑉)
43	42	ad2antrr 724	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → 𝐴 ∈ 𝑉)
44		simpll 765	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → 𝜑)
45		fpwwe2.3	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ (𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥)) → (𝑥𝐹𝑟) ∈ 𝐴)
46	44, 45	sylan 580	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) ∧ (𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥)) → (𝑥𝐹𝑟) ∈ 𝐴)
47		fpwwe2lem8.x	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → 𝑋𝑊𝑅)
48	47	ad2antrr 724	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → 𝑋𝑊𝑅)
49		fpwwe2lem8.y	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → 𝑌𝑊𝑆)
50	49	ad2antrr 724	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → 𝑌𝑊𝑆)
51		simplr 767	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → 𝑤 ∈ dom 𝑀)
52	9	sselda 3982	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → 𝑤 ∈ dom 𝑁)
53	52	adantr 481	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → 𝑤 ∈ dom 𝑁)
54		simpr 485	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤))
55	41, 43, 46, 48, 50, 1, 5, 51, 53, 54	fpwwe2lem6 10633	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) ∧ 𝑦𝑅(𝑀‘𝑤)) → (𝑦𝑆(𝑁‘𝑤) ∧ (𝑧𝑅(𝑀‘𝑤) → (𝑦𝑅𝑧 ↔ 𝑦𝑆𝑧))))
56	55	simpld 495	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) ∧ 𝑦𝑅(𝑀‘𝑤)) → 𝑦𝑆(𝑁‘𝑤))
57	54	eqcomd 2738	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → (𝑁 ↾ 𝑤) = (𝑀 ↾ 𝑤))
58	41, 43, 46, 50, 48, 5, 1, 53, 51, 57	fpwwe2lem6 10633	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) ∧ 𝑦𝑆(𝑁‘𝑤)) → (𝑦𝑅(𝑀‘𝑤) ∧ (𝑧𝑆(𝑁‘𝑤) → (𝑦𝑆𝑧 ↔ 𝑦𝑅𝑧))))
59	58	simpld 495	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) ∧ 𝑦𝑆(𝑁‘𝑤)) → 𝑦𝑅(𝑀‘𝑤))
60	56, 59	impbida 799	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → (𝑦𝑅(𝑀‘𝑤) ↔ 𝑦𝑆(𝑁‘𝑤)))
61		fvex 6904	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑀‘𝑤) ∈ V
62		vex 3478	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 𝑦 ∈ V
63	62	eliniseg 6093	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑀‘𝑤) ∈ V → (𝑦 ∈ (◡𝑅 “ {(𝑀‘𝑤)}) ↔ 𝑦𝑅(𝑀‘𝑤)))
64	61, 63	ax-mp 5	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ (◡𝑅 “ {(𝑀‘𝑤)}) ↔ 𝑦𝑅(𝑀‘𝑤))
65		fvex 6904	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑁‘𝑤) ∈ V
66	62	eliniseg 6093	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑁‘𝑤) ∈ V → (𝑦 ∈ (◡𝑆 “ {(𝑁‘𝑤)}) ↔ 𝑦𝑆(𝑁‘𝑤)))
67	65, 66	ax-mp 5	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ (◡𝑆 “ {(𝑁‘𝑤)}) ↔ 𝑦𝑆(𝑁‘𝑤))
68	60, 64, 67	3bitr4g 313	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → (𝑦 ∈ (◡𝑅 “ {(𝑀‘𝑤)}) ↔ 𝑦 ∈ (◡𝑆 “ {(𝑁‘𝑤)})))
69	68	eqrdv 2730	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → (◡𝑅 “ {(𝑀‘𝑤)}) = (◡𝑆 “ {(𝑁‘𝑤)}))
70		relinxp 5814	. . . . . . . . . . . . . . . . . . 19 ⊢ Rel (𝑅 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)})))
71		relinxp 5814	. . . . . . . . . . . . . . . . . . 19 ⊢ Rel (𝑆 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)})))
72		vex 3478	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ 𝑧 ∈ V
73	72	eliniseg 6093	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑀‘𝑤) ∈ V → (𝑧 ∈ (◡𝑅 “ {(𝑀‘𝑤)}) ↔ 𝑧𝑅(𝑀‘𝑤)))
74	63, 73	anbi12d 631	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑀‘𝑤) ∈ V → ((𝑦 ∈ (◡𝑅 “ {(𝑀‘𝑤)}) ∧ 𝑧 ∈ (◡𝑅 “ {(𝑀‘𝑤)})) ↔ (𝑦𝑅(𝑀‘𝑤) ∧ 𝑧𝑅(𝑀‘𝑤))))
75	61, 74	ax-mp 5	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑦 ∈ (◡𝑅 “ {(𝑀‘𝑤)}) ∧ 𝑧 ∈ (◡𝑅 “ {(𝑀‘𝑤)})) ↔ (𝑦𝑅(𝑀‘𝑤) ∧ 𝑧𝑅(𝑀‘𝑤)))
76	55	simprd 496	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) ∧ 𝑦𝑅(𝑀‘𝑤)) → (𝑧𝑅(𝑀‘𝑤) → (𝑦𝑅𝑧 ↔ 𝑦𝑆𝑧)))
77	76	impr 455	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) ∧ (𝑦𝑅(𝑀‘𝑤) ∧ 𝑧𝑅(𝑀‘𝑤))) → (𝑦𝑅𝑧 ↔ 𝑦𝑆𝑧))
78	75, 77	sylan2b 594	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) ∧ (𝑦 ∈ (◡𝑅 “ {(𝑀‘𝑤)}) ∧ 𝑧 ∈ (◡𝑅 “ {(𝑀‘𝑤)}))) → (𝑦𝑅𝑧 ↔ 𝑦𝑆𝑧))
79	78	pm5.32da 579	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → (((𝑦 ∈ (◡𝑅 “ {(𝑀‘𝑤)}) ∧ 𝑧 ∈ (◡𝑅 “ {(𝑀‘𝑤)})) ∧ 𝑦𝑅𝑧) ↔ ((𝑦 ∈ (◡𝑅 “ {(𝑀‘𝑤)}) ∧ 𝑧 ∈ (◡𝑅 “ {(𝑀‘𝑤)})) ∧ 𝑦𝑆𝑧)))
80		df-br 5149	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑦(𝑅 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)})))𝑧 ↔ ⟨𝑦, 𝑧⟩ ∈ (𝑅 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)}))))
81		brinxp2 5753	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑦(𝑅 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)})))𝑧 ↔ ((𝑦 ∈ (◡𝑅 “ {(𝑀‘𝑤)}) ∧ 𝑧 ∈ (◡𝑅 “ {(𝑀‘𝑤)})) ∧ 𝑦𝑅𝑧))
82	80, 81	bitr3i 276	. . . . . . . . . . . . . . . . . . . 20 ⊢ (⟨𝑦, 𝑧⟩ ∈ (𝑅 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)}))) ↔ ((𝑦 ∈ (◡𝑅 “ {(𝑀‘𝑤)}) ∧ 𝑧 ∈ (◡𝑅 “ {(𝑀‘𝑤)})) ∧ 𝑦𝑅𝑧))
83		df-br 5149	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑦(𝑆 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)})))𝑧 ↔ ⟨𝑦, 𝑧⟩ ∈ (𝑆 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)}))))
84		brinxp2 5753	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑦(𝑆 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)})))𝑧 ↔ ((𝑦 ∈ (◡𝑅 “ {(𝑀‘𝑤)}) ∧ 𝑧 ∈ (◡𝑅 “ {(𝑀‘𝑤)})) ∧ 𝑦𝑆𝑧))
85	83, 84	bitr3i 276	. . . . . . . . . . . . . . . . . . . 20 ⊢ (⟨𝑦, 𝑧⟩ ∈ (𝑆 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)}))) ↔ ((𝑦 ∈ (◡𝑅 “ {(𝑀‘𝑤)}) ∧ 𝑧 ∈ (◡𝑅 “ {(𝑀‘𝑤)})) ∧ 𝑦𝑆𝑧))
86	79, 82, 85	3bitr4g 313	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → (⟨𝑦, 𝑧⟩ ∈ (𝑅 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)}))) ↔ ⟨𝑦, 𝑧⟩ ∈ (𝑆 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)})))))
87	70, 71, 86	eqrelrdv 5792	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → (𝑅 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)}))) = (𝑆 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)}))))
88	69	sqxpeqd 5708	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)})) = ((◡𝑆 “ {(𝑁‘𝑤)}) × (◡𝑆 “ {(𝑁‘𝑤)})))
89	88	ineq2d 4212	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → (𝑆 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)}))) = (𝑆 ∩ ((◡𝑆 “ {(𝑁‘𝑤)}) × (◡𝑆 “ {(𝑁‘𝑤)}))))
90	87, 89	eqtrd 2772	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → (𝑅 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)}))) = (𝑆 ∩ ((◡𝑆 “ {(𝑁‘𝑤)}) × (◡𝑆 “ {(𝑁‘𝑤)}))))
91	69, 90	oveq12d 7429	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → ((◡𝑅 “ {(𝑀‘𝑤)})𝐹(𝑅 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)})))) = ((◡𝑆 “ {(𝑁‘𝑤)})𝐹(𝑆 ∩ ((◡𝑆 “ {(𝑁‘𝑤)}) × (◡𝑆 “ {(𝑁‘𝑤)})))))
92	2	ffvelcdmi 7085	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑤 ∈ dom 𝑀 → (𝑀‘𝑤) ∈ 𝑋)
93	92	adantl 482	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → (𝑀‘𝑤) ∈ 𝑋)
94	93	adantr 481	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → (𝑀‘𝑤) ∈ 𝑋)
95	41, 42, 47	fpwwe2lem3 10630	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑀‘𝑤) ∈ 𝑋) → ((◡𝑅 “ {(𝑀‘𝑤)})𝐹(𝑅 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)})))) = (𝑀‘𝑤))
96	44, 94, 95	syl2anc 584	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → ((◡𝑅 “ {(𝑀‘𝑤)})𝐹(𝑅 ∩ ((◡𝑅 “ {(𝑀‘𝑤)}) × (◡𝑅 “ {(𝑀‘𝑤)})))) = (𝑀‘𝑤))
97	6	ffvelcdmi 7085	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑤 ∈ dom 𝑁 → (𝑁‘𝑤) ∈ 𝑌)
98	52, 97	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → (𝑁‘𝑤) ∈ 𝑌)
99	98	adantr 481	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → (𝑁‘𝑤) ∈ 𝑌)
100	41, 42, 49	fpwwe2lem3 10630	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑁‘𝑤) ∈ 𝑌) → ((◡𝑆 “ {(𝑁‘𝑤)})𝐹(𝑆 ∩ ((◡𝑆 “ {(𝑁‘𝑤)}) × (◡𝑆 “ {(𝑁‘𝑤)})))) = (𝑁‘𝑤))
101	44, 99, 100	syl2anc 584	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → ((◡𝑆 “ {(𝑁‘𝑤)})𝐹(𝑆 ∩ ((◡𝑆 “ {(𝑁‘𝑤)}) × (◡𝑆 “ {(𝑁‘𝑤)})))) = (𝑁‘𝑤))
102	91, 96, 101	3eqtr3d 2780	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑤 ∈ dom 𝑀) ∧ (𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤)) → (𝑀‘𝑤) = (𝑁‘𝑤))
103	102	ex 413	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → ((𝑀 ↾ 𝑤) = (𝑁 ↾ 𝑤) → (𝑀‘𝑤) = (𝑁‘𝑤)))
104	40, 103	sylbird 259	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → (∀𝑦 ∈ 𝑤 (𝑀‘𝑦) = (𝑁‘𝑦) → (𝑀‘𝑤) = (𝑁‘𝑤)))
105	27, 104	syld 47	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → (∀𝑦 ∈ 𝑤 (𝑦 ∈ dom 𝑀 → (𝑀‘𝑦) = (𝑁‘𝑦)) → (𝑀‘𝑤) = (𝑁‘𝑤)))
106	105	ex 413	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑤 ∈ dom 𝑀 → (∀𝑦 ∈ 𝑤 (𝑦 ∈ dom 𝑀 → (𝑀‘𝑦) = (𝑁‘𝑦)) → (𝑀‘𝑤) = (𝑁‘𝑤))))
107	106	com23 86	. . . . . . . . . 10 ⊢ (𝜑 → (∀𝑦 ∈ 𝑤 (𝑦 ∈ dom 𝑀 → (𝑀‘𝑦) = (𝑁‘𝑦)) → (𝑤 ∈ dom 𝑀 → (𝑀‘𝑤) = (𝑁‘𝑤))))
108	107	a2i 14	. . . . . . . . 9 ⊢ ((𝜑 → ∀𝑦 ∈ 𝑤 (𝑦 ∈ dom 𝑀 → (𝑀‘𝑦) = (𝑁‘𝑦))) → (𝜑 → (𝑤 ∈ dom 𝑀 → (𝑀‘𝑤) = (𝑁‘𝑤))))
109	20, 108	sylbi 216	. . . . . . . 8 ⊢ (∀𝑦 ∈ 𝑤 (𝜑 → (𝑦 ∈ dom 𝑀 → (𝑀‘𝑦) = (𝑁‘𝑦))) → (𝜑 → (𝑤 ∈ dom 𝑀 → (𝑀‘𝑤) = (𝑁‘𝑤))))
110	109	a1i 11	. . . . . . 7 ⊢ (𝑤 ∈ On → (∀𝑦 ∈ 𝑤 (𝜑 → (𝑦 ∈ dom 𝑀 → (𝑀‘𝑦) = (𝑁‘𝑦))) → (𝜑 → (𝑤 ∈ dom 𝑀 → (𝑀‘𝑤) = (𝑁‘𝑤)))))
111	19, 110	tfis2 7848	. . . . . 6 ⊢ (𝑤 ∈ On → (𝜑 → (𝑤 ∈ dom 𝑀 → (𝑀‘𝑤) = (𝑁‘𝑤))))
112	111	com3l 89	. . . . 5 ⊢ (𝜑 → (𝑤 ∈ dom 𝑀 → (𝑤 ∈ On → (𝑀‘𝑤) = (𝑁‘𝑤))))
113	13, 112	mpdi 45	. . . 4 ⊢ (𝜑 → (𝑤 ∈ dom 𝑀 → (𝑀‘𝑤) = (𝑁‘𝑤)))
114	113	imp 407	. . 3 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → (𝑀‘𝑤) = (𝑁‘𝑤))
115		fvres 6910	. . . 4 ⊢ (𝑤 ∈ dom 𝑀 → ((𝑁 ↾ dom 𝑀)‘𝑤) = (𝑁‘𝑤))
116	115	adantl 482	. . 3 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → ((𝑁 ↾ dom 𝑀)‘𝑤) = (𝑁‘𝑤))
117	114, 116	eqtr4d 2775	. 2 ⊢ ((𝜑 ∧ 𝑤 ∈ dom 𝑀) → (𝑀‘𝑤) = ((𝑁 ↾ dom 𝑀)‘𝑤))
118	4, 10, 117	eqfnfvd 7035	1 ⊢ (𝜑 → 𝑀 = (𝑁 ↾ dom 𝑀))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 396   ∧ w3a 1087   = wceq 1541   ∈ wcel 2106  ∀wral 3061  Vcvv 3474  [wsbc 3777   ∩ cin 3947   ⊆ wss 3948  {csn 4628  ⟨cop 4634   class class class wbr 5148  {copab 5210   We wwe 5630   × cxp 5674  ^◡ccnv 5675  dom cdm 5676   ↾ cres 5678   “ cima 5679  Ord word 6363  Oncon0 6364   Fn wfn 6538  ⟶wf 6539  ‘cfv 6543  (class class class)co 7411  OrdIsocoi 9506

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 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2703  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7727

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-ral 3062  df-rex 3071  df-rmo 3376  df-reu 3377  df-rab 3433  df-v 3476  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-iun 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-se 5632  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6300  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6495  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-isom 6552  df-riota 7367  df-ov 7414  df-2nd 7978  df-frecs 8268  df-wrecs 8299  df-recs 8373  df-oi 9507

This theorem is referenced by:  fpwwe2lem8  10635