MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  fpwwe2lem7 Structured version   Visualization version   GIF version

Theorem fpwwe2lem7 10675
Description: Lemma for fpwwe2 10681. 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.
StepHypRef Expression
1 fpwwe2lem8.m . . . 4 𝑀 = OrdIso(𝑅, 𝑋)
21oif 9568 . . 3 𝑀:dom 𝑀𝑋
3 ffn 6737 . . 3 (𝑀:dom 𝑀𝑋𝑀 Fn dom 𝑀)
42, 3mp1i 13 . 2 (𝜑𝑀 Fn dom 𝑀)
5 fpwwe2lem8.n . . . . 5 𝑁 = OrdIso(𝑆, 𝑌)
65oif 9568 . . . 4 𝑁:dom 𝑁𝑌
7 ffn 6737 . . . 4 (𝑁:dom 𝑁𝑌𝑁 Fn dom 𝑁)
86, 7mp1i 13 . . 3 (𝜑𝑁 Fn dom 𝑁)
9 fpwwe2lem8.s . . 3 (𝜑 → dom 𝑀 ⊆ dom 𝑁)
108, 9fnssresd 6693 . 2 (𝜑 → (𝑁 ↾ dom 𝑀) Fn dom 𝑀)
111oicl 9567 . . . . . 6 Ord dom 𝑀
12 ordelon 6410 . . . . . 6 ((Ord dom 𝑀𝑤 ∈ dom 𝑀) → 𝑤 ∈ On)
1311, 12mpan 690 . . . . 5 (𝑤 ∈ dom 𝑀𝑤 ∈ On)
14 eleq1w 2822 . . . . . . . . 9 (𝑤 = 𝑦 → (𝑤 ∈ dom 𝑀𝑦 ∈ dom 𝑀))
15 fveq2 6907 . . . . . . . . . 10 (𝑤 = 𝑦 → (𝑀𝑤) = (𝑀𝑦))
16 fveq2 6907 . . . . . . . . . 10 (𝑤 = 𝑦 → (𝑁𝑤) = (𝑁𝑦))
1715, 16eqeq12d 2751 . . . . . . . . 9 (𝑤 = 𝑦 → ((𝑀𝑤) = (𝑁𝑤) ↔ (𝑀𝑦) = (𝑁𝑦)))
1814, 17imbi12d 344 . . . . . . . 8 (𝑤 = 𝑦 → ((𝑤 ∈ dom 𝑀 → (𝑀𝑤) = (𝑁𝑤)) ↔ (𝑦 ∈ dom 𝑀 → (𝑀𝑦) = (𝑁𝑦))))
1918imbi2d 340 . . . . . . 7 (𝑤 = 𝑦 → ((𝜑 → (𝑤 ∈ dom 𝑀 → (𝑀𝑤) = (𝑁𝑤))) ↔ (𝜑 → (𝑦 ∈ dom 𝑀 → (𝑀𝑦) = (𝑁𝑦)))))
20 r19.21v 3178 . . . . . . . . 9 (∀𝑦𝑤 (𝜑 → (𝑦 ∈ dom 𝑀 → (𝑀𝑦) = (𝑁𝑦))) ↔ (𝜑 → ∀𝑦𝑤 (𝑦 ∈ dom 𝑀 → (𝑀𝑦) = (𝑁𝑦))))
2111a1i 11 . . . . . . . . . . . . . . . . 17 (𝜑 → Ord dom 𝑀)
22 ordelss 6402 . . . . . . . . . . . . . . . . 17 ((Ord dom 𝑀𝑤 ∈ dom 𝑀) → 𝑤 ⊆ dom 𝑀)
2321, 22sylan 580 . . . . . . . . . . . . . . . 16 ((𝜑𝑤 ∈ dom 𝑀) → 𝑤 ⊆ dom 𝑀)
2423sselda 3995 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ dom 𝑀) ∧ 𝑦𝑤) → 𝑦 ∈ dom 𝑀)
25 pm2.27 42 . . . . . . . . . . . . . . 15 (𝑦 ∈ dom 𝑀 → ((𝑦 ∈ dom 𝑀 → (𝑀𝑦) = (𝑁𝑦)) → (𝑀𝑦) = (𝑁𝑦)))
2624, 25syl 17 . . . . . . . . . . . . . 14 (((𝜑𝑤 ∈ dom 𝑀) ∧ 𝑦𝑤) → ((𝑦 ∈ dom 𝑀 → (𝑀𝑦) = (𝑁𝑦)) → (𝑀𝑦) = (𝑁𝑦)))
2726ralimdva 3165 . . . . . . . . . . . . 13 ((𝜑𝑤 ∈ dom 𝑀) → (∀𝑦𝑤 (𝑦 ∈ dom 𝑀 → (𝑀𝑦) = (𝑁𝑦)) → ∀𝑦𝑤 (𝑀𝑦) = (𝑁𝑦)))
28 fnssres 6692 . . . . . . . . . . . . . . . . 17 ((𝑀 Fn dom 𝑀𝑤 ⊆ dom 𝑀) → (𝑀𝑤) Fn 𝑤)
294, 23, 28syl2an2r 685 . . . . . . . . . . . . . . . 16 ((𝜑𝑤 ∈ dom 𝑀) → (𝑀𝑤) Fn 𝑤)
309adantr 480 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑤 ∈ dom 𝑀) → dom 𝑀 ⊆ dom 𝑁)
3123, 30sstrd 4006 . . . . . . . . . . . . . . . . 17 ((𝜑𝑤 ∈ dom 𝑀) → 𝑤 ⊆ dom 𝑁)
32 fnssres 6692 . . . . . . . . . . . . . . . . 17 ((𝑁 Fn dom 𝑁𝑤 ⊆ dom 𝑁) → (𝑁𝑤) Fn 𝑤)
338, 31, 32syl2an2r 685 . . . . . . . . . . . . . . . 16 ((𝜑𝑤 ∈ dom 𝑀) → (𝑁𝑤) Fn 𝑤)
34 eqfnfv 7051 . . . . . . . . . . . . . . . 16 (((𝑀𝑤) Fn 𝑤 ∧ (𝑁𝑤) Fn 𝑤) → ((𝑀𝑤) = (𝑁𝑤) ↔ ∀𝑦𝑤 ((𝑀𝑤)‘𝑦) = ((𝑁𝑤)‘𝑦)))
3529, 33, 34syl2anc 584 . . . . . . . . . . . . . . 15 ((𝜑𝑤 ∈ dom 𝑀) → ((𝑀𝑤) = (𝑁𝑤) ↔ ∀𝑦𝑤 ((𝑀𝑤)‘𝑦) = ((𝑁𝑤)‘𝑦)))
36 fvres 6926 . . . . . . . . . . . . . . . . 17 (𝑦𝑤 → ((𝑀𝑤)‘𝑦) = (𝑀𝑦))
37 fvres 6926 . . . . . . . . . . . . . . . . 17 (𝑦𝑤 → ((𝑁𝑤)‘𝑦) = (𝑁𝑦))
3836, 37eqeq12d 2751 . . . . . . . . . . . . . . . 16 (𝑦𝑤 → (((𝑀𝑤)‘𝑦) = ((𝑁𝑤)‘𝑦) ↔ (𝑀𝑦) = (𝑁𝑦)))
3938ralbiia 3089 . . . . . . . . . . . . . . 15 (∀𝑦𝑤 ((𝑀𝑤)‘𝑦) = ((𝑁𝑤)‘𝑦) ↔ ∀𝑦𝑤 (𝑀𝑦) = (𝑁𝑦))
4035, 39bitrdi 287 . . . . . . . . . . . . . 14 ((𝜑𝑤 ∈ dom 𝑀) → ((𝑀𝑤) = (𝑁𝑤) ↔ ∀𝑦𝑤 (𝑀𝑦) = (𝑁𝑦)))
41 fpwwe2.1 . . . . . . . . . . . . . . . . . . . . . 22 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦𝑥 [(𝑟 “ {𝑦}) / 𝑢](𝑢𝐹(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦))}
42 fpwwe2.2 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑𝐴𝑉)
4342ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → 𝐴𝑉)
44 simpll 767 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → 𝜑)
45 fpwwe2.3 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ (𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥)) → (𝑥𝐹𝑟) ∈ 𝐴)
4644, 45sylan 580 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) ∧ (𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥)) → (𝑥𝐹𝑟) ∈ 𝐴)
47 fpwwe2lem8.x . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑𝑋𝑊𝑅)
4847ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → 𝑋𝑊𝑅)
49 fpwwe2lem8.y . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑𝑌𝑊𝑆)
5049ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → 𝑌𝑊𝑆)
51 simplr 769 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → 𝑤 ∈ dom 𝑀)
529sselda 3995 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑤 ∈ dom 𝑀) → 𝑤 ∈ dom 𝑁)
5352adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → 𝑤 ∈ dom 𝑁)
54 simpr 484 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → (𝑀𝑤) = (𝑁𝑤))
5541, 43, 46, 48, 50, 1, 5, 51, 53, 54fpwwe2lem6 10674 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) ∧ 𝑦𝑅(𝑀𝑤)) → (𝑦𝑆(𝑁𝑤) ∧ (𝑧𝑅(𝑀𝑤) → (𝑦𝑅𝑧𝑦𝑆𝑧))))
5655simpld 494 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) ∧ 𝑦𝑅(𝑀𝑤)) → 𝑦𝑆(𝑁𝑤))
5754eqcomd 2741 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → (𝑁𝑤) = (𝑀𝑤))
5841, 43, 46, 50, 48, 5, 1, 53, 51, 57fpwwe2lem6 10674 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) ∧ 𝑦𝑆(𝑁𝑤)) → (𝑦𝑅(𝑀𝑤) ∧ (𝑧𝑆(𝑁𝑤) → (𝑦𝑆𝑧𝑦𝑅𝑧))))
5958simpld 494 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) ∧ 𝑦𝑆(𝑁𝑤)) → 𝑦𝑅(𝑀𝑤))
6056, 59impbida 801 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → (𝑦𝑅(𝑀𝑤) ↔ 𝑦𝑆(𝑁𝑤)))
61 fvex 6920 . . . . . . . . . . . . . . . . . . . 20 (𝑀𝑤) ∈ V
62 vex 3482 . . . . . . . . . . . . . . . . . . . . 21 𝑦 ∈ V
6362eliniseg 6115 . . . . . . . . . . . . . . . . . . . 20 ((𝑀𝑤) ∈ V → (𝑦 ∈ (𝑅 “ {(𝑀𝑤)}) ↔ 𝑦𝑅(𝑀𝑤)))
6461, 63ax-mp 5 . . . . . . . . . . . . . . . . . . 19 (𝑦 ∈ (𝑅 “ {(𝑀𝑤)}) ↔ 𝑦𝑅(𝑀𝑤))
65 fvex 6920 . . . . . . . . . . . . . . . . . . . 20 (𝑁𝑤) ∈ V
6662eliniseg 6115 . . . . . . . . . . . . . . . . . . . 20 ((𝑁𝑤) ∈ V → (𝑦 ∈ (𝑆 “ {(𝑁𝑤)}) ↔ 𝑦𝑆(𝑁𝑤)))
6765, 66ax-mp 5 . . . . . . . . . . . . . . . . . . 19 (𝑦 ∈ (𝑆 “ {(𝑁𝑤)}) ↔ 𝑦𝑆(𝑁𝑤))
6860, 64, 673bitr4g 314 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → (𝑦 ∈ (𝑅 “ {(𝑀𝑤)}) ↔ 𝑦 ∈ (𝑆 “ {(𝑁𝑤)})))
6968eqrdv 2733 . . . . . . . . . . . . . . . . 17 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → (𝑅 “ {(𝑀𝑤)}) = (𝑆 “ {(𝑁𝑤)}))
70 relinxp 5827 . . . . . . . . . . . . . . . . . . 19 Rel (𝑅 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)})))
71 relinxp 5827 . . . . . . . . . . . . . . . . . . 19 Rel (𝑆 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)})))
72 vex 3482 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑧 ∈ V
7372eliniseg 6115 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑀𝑤) ∈ V → (𝑧 ∈ (𝑅 “ {(𝑀𝑤)}) ↔ 𝑧𝑅(𝑀𝑤)))
7463, 73anbi12d 632 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑀𝑤) ∈ V → ((𝑦 ∈ (𝑅 “ {(𝑀𝑤)}) ∧ 𝑧 ∈ (𝑅 “ {(𝑀𝑤)})) ↔ (𝑦𝑅(𝑀𝑤) ∧ 𝑧𝑅(𝑀𝑤))))
7561, 74ax-mp 5 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑦 ∈ (𝑅 “ {(𝑀𝑤)}) ∧ 𝑧 ∈ (𝑅 “ {(𝑀𝑤)})) ↔ (𝑦𝑅(𝑀𝑤) ∧ 𝑧𝑅(𝑀𝑤)))
7655simprd 495 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) ∧ 𝑦𝑅(𝑀𝑤)) → (𝑧𝑅(𝑀𝑤) → (𝑦𝑅𝑧𝑦𝑆𝑧)))
7776impr 454 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) ∧ (𝑦𝑅(𝑀𝑤) ∧ 𝑧𝑅(𝑀𝑤))) → (𝑦𝑅𝑧𝑦𝑆𝑧))
7875, 77sylan2b 594 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) ∧ (𝑦 ∈ (𝑅 “ {(𝑀𝑤)}) ∧ 𝑧 ∈ (𝑅 “ {(𝑀𝑤)}))) → (𝑦𝑅𝑧𝑦𝑆𝑧))
7978pm5.32da 579 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → (((𝑦 ∈ (𝑅 “ {(𝑀𝑤)}) ∧ 𝑧 ∈ (𝑅 “ {(𝑀𝑤)})) ∧ 𝑦𝑅𝑧) ↔ ((𝑦 ∈ (𝑅 “ {(𝑀𝑤)}) ∧ 𝑧 ∈ (𝑅 “ {(𝑀𝑤)})) ∧ 𝑦𝑆𝑧)))
80 df-br 5149 . . . . . . . . . . . . . . . . . . . . 21 (𝑦(𝑅 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)})))𝑧 ↔ ⟨𝑦, 𝑧⟩ ∈ (𝑅 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)}))))
81 brinxp2 5766 . . . . . . . . . . . . . . . . . . . . 21 (𝑦(𝑅 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)})))𝑧 ↔ ((𝑦 ∈ (𝑅 “ {(𝑀𝑤)}) ∧ 𝑧 ∈ (𝑅 “ {(𝑀𝑤)})) ∧ 𝑦𝑅𝑧))
8280, 81bitr3i 277 . . . . . . . . . . . . . . . . . . . 20 (⟨𝑦, 𝑧⟩ ∈ (𝑅 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)}))) ↔ ((𝑦 ∈ (𝑅 “ {(𝑀𝑤)}) ∧ 𝑧 ∈ (𝑅 “ {(𝑀𝑤)})) ∧ 𝑦𝑅𝑧))
83 df-br 5149 . . . . . . . . . . . . . . . . . . . . 21 (𝑦(𝑆 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)})))𝑧 ↔ ⟨𝑦, 𝑧⟩ ∈ (𝑆 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)}))))
84 brinxp2 5766 . . . . . . . . . . . . . . . . . . . . 21 (𝑦(𝑆 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)})))𝑧 ↔ ((𝑦 ∈ (𝑅 “ {(𝑀𝑤)}) ∧ 𝑧 ∈ (𝑅 “ {(𝑀𝑤)})) ∧ 𝑦𝑆𝑧))
8583, 84bitr3i 277 . . . . . . . . . . . . . . . . . . . 20 (⟨𝑦, 𝑧⟩ ∈ (𝑆 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)}))) ↔ ((𝑦 ∈ (𝑅 “ {(𝑀𝑤)}) ∧ 𝑧 ∈ (𝑅 “ {(𝑀𝑤)})) ∧ 𝑦𝑆𝑧))
8679, 82, 853bitr4g 314 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → (⟨𝑦, 𝑧⟩ ∈ (𝑅 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)}))) ↔ ⟨𝑦, 𝑧⟩ ∈ (𝑆 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)})))))
8770, 71, 86eqrelrdv 5805 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → (𝑅 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)}))) = (𝑆 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)}))))
8869sqxpeqd 5721 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)})) = ((𝑆 “ {(𝑁𝑤)}) × (𝑆 “ {(𝑁𝑤)})))
8988ineq2d 4228 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → (𝑆 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)}))) = (𝑆 ∩ ((𝑆 “ {(𝑁𝑤)}) × (𝑆 “ {(𝑁𝑤)}))))
9087, 89eqtrd 2775 . . . . . . . . . . . . . . . . 17 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → (𝑅 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)}))) = (𝑆 ∩ ((𝑆 “ {(𝑁𝑤)}) × (𝑆 “ {(𝑁𝑤)}))))
9169, 90oveq12d 7449 . . . . . . . . . . . . . . . 16 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → ((𝑅 “ {(𝑀𝑤)})𝐹(𝑅 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)})))) = ((𝑆 “ {(𝑁𝑤)})𝐹(𝑆 ∩ ((𝑆 “ {(𝑁𝑤)}) × (𝑆 “ {(𝑁𝑤)})))))
922ffvelcdmi 7103 . . . . . . . . . . . . . . . . . . 19 (𝑤 ∈ dom 𝑀 → (𝑀𝑤) ∈ 𝑋)
9392adantl 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑤 ∈ dom 𝑀) → (𝑀𝑤) ∈ 𝑋)
9493adantr 480 . . . . . . . . . . . . . . . . 17 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → (𝑀𝑤) ∈ 𝑋)
9541, 42, 47fpwwe2lem3 10671 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑀𝑤) ∈ 𝑋) → ((𝑅 “ {(𝑀𝑤)})𝐹(𝑅 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)})))) = (𝑀𝑤))
9644, 94, 95syl2anc 584 . . . . . . . . . . . . . . . 16 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → ((𝑅 “ {(𝑀𝑤)})𝐹(𝑅 ∩ ((𝑅 “ {(𝑀𝑤)}) × (𝑅 “ {(𝑀𝑤)})))) = (𝑀𝑤))
976ffvelcdmi 7103 . . . . . . . . . . . . . . . . . . 19 (𝑤 ∈ dom 𝑁 → (𝑁𝑤) ∈ 𝑌)
9852, 97syl 17 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑤 ∈ dom 𝑀) → (𝑁𝑤) ∈ 𝑌)
9998adantr 480 . . . . . . . . . . . . . . . . 17 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → (𝑁𝑤) ∈ 𝑌)
10041, 42, 49fpwwe2lem3 10671 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑁𝑤) ∈ 𝑌) → ((𝑆 “ {(𝑁𝑤)})𝐹(𝑆 ∩ ((𝑆 “ {(𝑁𝑤)}) × (𝑆 “ {(𝑁𝑤)})))) = (𝑁𝑤))
10144, 99, 100syl2anc 584 . . . . . . . . . . . . . . . 16 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → ((𝑆 “ {(𝑁𝑤)})𝐹(𝑆 ∩ ((𝑆 “ {(𝑁𝑤)}) × (𝑆 “ {(𝑁𝑤)})))) = (𝑁𝑤))
10291, 96, 1013eqtr3d 2783 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ dom 𝑀) ∧ (𝑀𝑤) = (𝑁𝑤)) → (𝑀𝑤) = (𝑁𝑤))
103102ex 412 . . . . . . . . . . . . . 14 ((𝜑𝑤 ∈ dom 𝑀) → ((𝑀𝑤) = (𝑁𝑤) → (𝑀𝑤) = (𝑁𝑤)))
10440, 103sylbird 260 . . . . . . . . . . . . 13 ((𝜑𝑤 ∈ dom 𝑀) → (∀𝑦𝑤 (𝑀𝑦) = (𝑁𝑦) → (𝑀𝑤) = (𝑁𝑤)))
10527, 104syld 47 . . . . . . . . . . . 12 ((𝜑𝑤 ∈ dom 𝑀) → (∀𝑦𝑤 (𝑦 ∈ dom 𝑀 → (𝑀𝑦) = (𝑁𝑦)) → (𝑀𝑤) = (𝑁𝑤)))
106105ex 412 . . . . . . . . . . 11 (𝜑 → (𝑤 ∈ dom 𝑀 → (∀𝑦𝑤 (𝑦 ∈ dom 𝑀 → (𝑀𝑦) = (𝑁𝑦)) → (𝑀𝑤) = (𝑁𝑤))))
107106com23 86 . . . . . . . . . 10 (𝜑 → (∀𝑦𝑤 (𝑦 ∈ dom 𝑀 → (𝑀𝑦) = (𝑁𝑦)) → (𝑤 ∈ dom 𝑀 → (𝑀𝑤) = (𝑁𝑤))))
108107a2i 14 . . . . . . . . 9 ((𝜑 → ∀𝑦𝑤 (𝑦 ∈ dom 𝑀 → (𝑀𝑦) = (𝑁𝑦))) → (𝜑 → (𝑤 ∈ dom 𝑀 → (𝑀𝑤) = (𝑁𝑤))))
10920, 108sylbi 217 . . . . . . . 8 (∀𝑦𝑤 (𝜑 → (𝑦 ∈ dom 𝑀 → (𝑀𝑦) = (𝑁𝑦))) → (𝜑 → (𝑤 ∈ dom 𝑀 → (𝑀𝑤) = (𝑁𝑤))))
110109a1i 11 . . . . . . 7 (𝑤 ∈ On → (∀𝑦𝑤 (𝜑 → (𝑦 ∈ dom 𝑀 → (𝑀𝑦) = (𝑁𝑦))) → (𝜑 → (𝑤 ∈ dom 𝑀 → (𝑀𝑤) = (𝑁𝑤)))))
11119, 110tfis2 7878 . . . . . 6 (𝑤 ∈ On → (𝜑 → (𝑤 ∈ dom 𝑀 → (𝑀𝑤) = (𝑁𝑤))))
112111com3l 89 . . . . 5 (𝜑 → (𝑤 ∈ dom 𝑀 → (𝑤 ∈ On → (𝑀𝑤) = (𝑁𝑤))))
11313, 112mpdi 45 . . . 4 (𝜑 → (𝑤 ∈ dom 𝑀 → (𝑀𝑤) = (𝑁𝑤)))
114113imp 406 . . 3 ((𝜑𝑤 ∈ dom 𝑀) → (𝑀𝑤) = (𝑁𝑤))
115 fvres 6926 . . . 4 (𝑤 ∈ dom 𝑀 → ((𝑁 ↾ dom 𝑀)‘𝑤) = (𝑁𝑤))
116115adantl 481 . . 3 ((𝜑𝑤 ∈ dom 𝑀) → ((𝑁 ↾ dom 𝑀)‘𝑤) = (𝑁𝑤))
117114, 116eqtr4d 2778 . 2 ((𝜑𝑤 ∈ dom 𝑀) → (𝑀𝑤) = ((𝑁 ↾ dom 𝑀)‘𝑤))
1184, 10, 117eqfnfvd 7054 1 (𝜑𝑀 = (𝑁 ↾ dom 𝑀))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1537  wcel 2106  wral 3059  Vcvv 3478  [wsbc 3791  cin 3962  wss 3963  {csn 4631  cop 4637   class class class wbr 5148  {copab 5210   We wwe 5640   × cxp 5687  ccnv 5688  dom cdm 5689  cres 5691  cima 5692  Ord word 6385  Oncon0 6386   Fn wfn 6558  wf 6559  cfv 6563  (class class class)co 7431  OrdIsocoi 9547
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1908  ax-6 1965  ax-7 2005  ax-8 2108  ax-9 2116  ax-10 2139  ax-11 2155  ax-12 2175  ax-ext 2706  ax-rep 5285  ax-sep 5302  ax-nul 5312  ax-pow 5371  ax-pr 5438  ax-un 7754
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1540  df-fal 1550  df-ex 1777  df-nf 1781  df-sb 2063  df-mo 2538  df-eu 2567  df-clab 2713  df-cleq 2727  df-clel 2814  df-nfc 2890  df-ne 2939  df-ral 3060  df-rex 3069  df-rmo 3378  df-reu 3379  df-rab 3434  df-v 3480  df-sbc 3792  df-csb 3909  df-dif 3966  df-un 3968  df-in 3970  df-ss 3980  df-pss 3983  df-nul 4340  df-if 4532  df-pw 4607  df-sn 4632  df-pr 4634  df-op 4638  df-uni 4913  df-iun 4998  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5583  df-eprel 5589  df-po 5597  df-so 5598  df-fr 5641  df-se 5642  df-we 5643  df-xp 5695  df-rel 5696  df-cnv 5697  df-co 5698  df-dm 5699  df-rn 5700  df-res 5701  df-ima 5702  df-pred 6323  df-ord 6389  df-on 6390  df-lim 6391  df-suc 6392  df-iota 6516  df-fun 6565  df-fn 6566  df-f 6567  df-f1 6568  df-fo 6569  df-f1o 6570  df-fv 6571  df-isom 6572  df-riota 7388  df-ov 7434  df-2nd 8014  df-frecs 8305  df-wrecs 8336  df-recs 8410  df-oi 9548
This theorem is referenced by:  fpwwe2lem8  10676
  Copyright terms: Public domain W3C validator