Step | Hyp | Ref
| Expression |
1 | | vex 3176 |
. . . . . 6
⊢ 𝑥 ∈ V |
2 | | vex 3176 |
. . . . . 6
⊢ 𝑢 ∈ V |
3 | 1, 2 | breldm 5251 |
. . . . 5
⊢ (𝑥𝑔𝑢 → 𝑥 ∈ dom 𝑔) |
4 | | vex 3176 |
. . . . . 6
⊢ 𝑣 ∈ V |
5 | 1, 4 | breldm 5251 |
. . . . 5
⊢ (𝑥ℎ𝑣 → 𝑥 ∈ dom ℎ) |
6 | 3, 5 | anim12i 588 |
. . . 4
⊢ ((𝑥𝑔𝑢 ∧ 𝑥ℎ𝑣) → (𝑥 ∈ dom 𝑔 ∧ 𝑥 ∈ dom ℎ)) |
7 | | elin 3758 |
. . . 4
⊢ (𝑥 ∈ (dom 𝑔 ∩ dom ℎ) ↔ (𝑥 ∈ dom 𝑔 ∧ 𝑥 ∈ dom ℎ)) |
8 | 6, 7 | sylibr 223 |
. . 3
⊢ ((𝑥𝑔𝑢 ∧ 𝑥ℎ𝑣) → 𝑥 ∈ (dom 𝑔 ∩ dom ℎ)) |
9 | | anandir 868 |
. . . 4
⊢ (((𝑥𝑔𝑢 ∧ 𝑥ℎ𝑣) ∧ 𝑥 ∈ (dom 𝑔 ∩ dom ℎ)) ↔ ((𝑥𝑔𝑢 ∧ 𝑥 ∈ (dom 𝑔 ∩ dom ℎ)) ∧ (𝑥ℎ𝑣 ∧ 𝑥 ∈ (dom 𝑔 ∩ dom ℎ)))) |
10 | 2 | brres 5323 |
. . . . 5
⊢ (𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑢 ↔ (𝑥𝑔𝑢 ∧ 𝑥 ∈ (dom 𝑔 ∩ dom ℎ))) |
11 | 4 | brres 5323 |
. . . . 5
⊢ (𝑥(ℎ ↾ (dom 𝑔 ∩ dom ℎ))𝑣 ↔ (𝑥ℎ𝑣 ∧ 𝑥 ∈ (dom 𝑔 ∩ dom ℎ))) |
12 | 10, 11 | anbi12i 729 |
. . . 4
⊢ ((𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑢 ∧ 𝑥(ℎ ↾ (dom 𝑔 ∩ dom ℎ))𝑣) ↔ ((𝑥𝑔𝑢 ∧ 𝑥 ∈ (dom 𝑔 ∩ dom ℎ)) ∧ (𝑥ℎ𝑣 ∧ 𝑥 ∈ (dom 𝑔 ∩ dom ℎ)))) |
13 | 9, 12 | sylbb2 227 |
. . 3
⊢ (((𝑥𝑔𝑢 ∧ 𝑥ℎ𝑣) ∧ 𝑥 ∈ (dom 𝑔 ∩ dom ℎ)) → (𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑢 ∧ 𝑥(ℎ ↾ (dom 𝑔 ∩ dom ℎ))𝑣)) |
14 | 8, 13 | mpdan 699 |
. 2
⊢ ((𝑥𝑔𝑢 ∧ 𝑥ℎ𝑣) → (𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑢 ∧ 𝑥(ℎ ↾ (dom 𝑔 ∩ dom ℎ))𝑣)) |
15 | | frrlem5.3 |
. . . . . . . . 9
⊢ 𝐵 = {𝑓 ∣ ∃𝑥(𝑓 Fn 𝑥 ∧ (𝑥 ⊆ 𝐴 ∧ ∀𝑦 ∈ 𝑥 Pred(𝑅, 𝐴, 𝑦) ⊆ 𝑥 ∧ ∀𝑦 ∈ 𝑥 (𝑓‘𝑦) = (𝑦𝐺(𝑓 ↾ Pred(𝑅, 𝐴, 𝑦)))))} |
16 | 15 | frrlem3 31026 |
. . . . . . . 8
⊢ (𝑔 ∈ 𝐵 → dom 𝑔 ⊆ 𝐴) |
17 | | ssinss1 3803 |
. . . . . . . 8
⊢ (dom
𝑔 ⊆ 𝐴 → (dom 𝑔 ∩ dom ℎ) ⊆ 𝐴) |
18 | | frrlem5.1 |
. . . . . . . . . 10
⊢ 𝑅 Fr 𝐴 |
19 | | frss 5005 |
. . . . . . . . . 10
⊢ ((dom
𝑔 ∩ dom ℎ) ⊆ 𝐴 → (𝑅 Fr 𝐴 → 𝑅 Fr (dom 𝑔 ∩ dom ℎ))) |
20 | 18, 19 | mpi 20 |
. . . . . . . . 9
⊢ ((dom
𝑔 ∩ dom ℎ) ⊆ 𝐴 → 𝑅 Fr (dom 𝑔 ∩ dom ℎ)) |
21 | | frrlem5.2 |
. . . . . . . . . 10
⊢ 𝑅 Se 𝐴 |
22 | | sess2 5007 |
. . . . . . . . . 10
⊢ ((dom
𝑔 ∩ dom ℎ) ⊆ 𝐴 → (𝑅 Se 𝐴 → 𝑅 Se (dom 𝑔 ∩ dom ℎ))) |
23 | 21, 22 | mpi 20 |
. . . . . . . . 9
⊢ ((dom
𝑔 ∩ dom ℎ) ⊆ 𝐴 → 𝑅 Se (dom 𝑔 ∩ dom ℎ)) |
24 | 20, 23 | jca 553 |
. . . . . . . 8
⊢ ((dom
𝑔 ∩ dom ℎ) ⊆ 𝐴 → (𝑅 Fr (dom 𝑔 ∩ dom ℎ) ∧ 𝑅 Se (dom 𝑔 ∩ dom ℎ))) |
25 | 16, 17, 24 | 3syl 18 |
. . . . . . 7
⊢ (𝑔 ∈ 𝐵 → (𝑅 Fr (dom 𝑔 ∩ dom ℎ) ∧ 𝑅 Se (dom 𝑔 ∩ dom ℎ))) |
26 | 25 | adantr 480 |
. . . . . 6
⊢ ((𝑔 ∈ 𝐵 ∧ ℎ ∈ 𝐵) → (𝑅 Fr (dom 𝑔 ∩ dom ℎ) ∧ 𝑅 Se (dom 𝑔 ∩ dom ℎ))) |
27 | 15 | frrlem4 31027 |
. . . . . 6
⊢ ((𝑔 ∈ 𝐵 ∧ ℎ ∈ 𝐵) → ((𝑔 ↾ (dom 𝑔 ∩ dom ℎ)) Fn (dom 𝑔 ∩ dom ℎ) ∧ ∀𝑎 ∈ (dom 𝑔 ∩ dom ℎ)((𝑔 ↾ (dom 𝑔 ∩ dom ℎ))‘𝑎) = (𝑎𝐺((𝑔 ↾ (dom 𝑔 ∩ dom ℎ)) ↾ Pred(𝑅, (dom 𝑔 ∩ dom ℎ), 𝑎))))) |
28 | 15 | frrlem4 31027 |
. . . . . . . 8
⊢ ((ℎ ∈ 𝐵 ∧ 𝑔 ∈ 𝐵) → ((ℎ ↾ (dom ℎ ∩ dom 𝑔)) Fn (dom ℎ ∩ dom 𝑔) ∧ ∀𝑎 ∈ (dom ℎ ∩ dom 𝑔)((ℎ ↾ (dom ℎ ∩ dom 𝑔))‘𝑎) = (𝑎𝐺((ℎ ↾ (dom ℎ ∩ dom 𝑔)) ↾ Pred(𝑅, (dom ℎ ∩ dom 𝑔), 𝑎))))) |
29 | 28 | ancoms 468 |
. . . . . . 7
⊢ ((𝑔 ∈ 𝐵 ∧ ℎ ∈ 𝐵) → ((ℎ ↾ (dom ℎ ∩ dom 𝑔)) Fn (dom ℎ ∩ dom 𝑔) ∧ ∀𝑎 ∈ (dom ℎ ∩ dom 𝑔)((ℎ ↾ (dom ℎ ∩ dom 𝑔))‘𝑎) = (𝑎𝐺((ℎ ↾ (dom ℎ ∩ dom 𝑔)) ↾ Pred(𝑅, (dom ℎ ∩ dom 𝑔), 𝑎))))) |
30 | | incom 3767 |
. . . . . . . . . . 11
⊢ (dom
𝑔 ∩ dom ℎ) = (dom ℎ ∩ dom 𝑔) |
31 | 30 | reseq2i 5314 |
. . . . . . . . . 10
⊢ (ℎ ↾ (dom 𝑔 ∩ dom ℎ)) = (ℎ ↾ (dom ℎ ∩ dom 𝑔)) |
32 | 31 | fneq1i 5899 |
. . . . . . . . 9
⊢ ((ℎ ↾ (dom 𝑔 ∩ dom ℎ)) Fn (dom 𝑔 ∩ dom ℎ) ↔ (ℎ ↾ (dom ℎ ∩ dom 𝑔)) Fn (dom 𝑔 ∩ dom ℎ)) |
33 | 30 | fneq2i 5900 |
. . . . . . . . 9
⊢ ((ℎ ↾ (dom ℎ ∩ dom 𝑔)) Fn (dom 𝑔 ∩ dom ℎ) ↔ (ℎ ↾ (dom ℎ ∩ dom 𝑔)) Fn (dom ℎ ∩ dom 𝑔)) |
34 | 32, 33 | bitri 263 |
. . . . . . . 8
⊢ ((ℎ ↾ (dom 𝑔 ∩ dom ℎ)) Fn (dom 𝑔 ∩ dom ℎ) ↔ (ℎ ↾ (dom ℎ ∩ dom 𝑔)) Fn (dom ℎ ∩ dom 𝑔)) |
35 | 31 | fveq1i 6104 |
. . . . . . . . . 10
⊢ ((ℎ ↾ (dom 𝑔 ∩ dom ℎ))‘𝑎) = ((ℎ ↾ (dom ℎ ∩ dom 𝑔))‘𝑎) |
36 | | predeq2 5600 |
. . . . . . . . . . . . 13
⊢ ((dom
𝑔 ∩ dom ℎ) = (dom ℎ ∩ dom 𝑔) → Pred(𝑅, (dom 𝑔 ∩ dom ℎ), 𝑎) = Pred(𝑅, (dom ℎ ∩ dom 𝑔), 𝑎)) |
37 | 30, 36 | ax-mp 5 |
. . . . . . . . . . . 12
⊢
Pred(𝑅, (dom 𝑔 ∩ dom ℎ), 𝑎) = Pred(𝑅, (dom ℎ ∩ dom 𝑔), 𝑎) |
38 | 31, 37 | reseq12i 5315 |
. . . . . . . . . . 11
⊢ ((ℎ ↾ (dom 𝑔 ∩ dom ℎ)) ↾ Pred(𝑅, (dom 𝑔 ∩ dom ℎ), 𝑎)) = ((ℎ ↾ (dom ℎ ∩ dom 𝑔)) ↾ Pred(𝑅, (dom ℎ ∩ dom 𝑔), 𝑎)) |
39 | 38 | oveq2i 6560 |
. . . . . . . . . 10
⊢ (𝑎𝐺((ℎ ↾ (dom 𝑔 ∩ dom ℎ)) ↾ Pred(𝑅, (dom 𝑔 ∩ dom ℎ), 𝑎))) = (𝑎𝐺((ℎ ↾ (dom ℎ ∩ dom 𝑔)) ↾ Pred(𝑅, (dom ℎ ∩ dom 𝑔), 𝑎))) |
40 | 35, 39 | eqeq12i 2624 |
. . . . . . . . 9
⊢ (((ℎ ↾ (dom 𝑔 ∩ dom ℎ))‘𝑎) = (𝑎𝐺((ℎ ↾ (dom 𝑔 ∩ dom ℎ)) ↾ Pred(𝑅, (dom 𝑔 ∩ dom ℎ), 𝑎))) ↔ ((ℎ ↾ (dom ℎ ∩ dom 𝑔))‘𝑎) = (𝑎𝐺((ℎ ↾ (dom ℎ ∩ dom 𝑔)) ↾ Pred(𝑅, (dom ℎ ∩ dom 𝑔), 𝑎)))) |
41 | 30, 40 | raleqbii 2973 |
. . . . . . . 8
⊢
(∀𝑎 ∈
(dom 𝑔 ∩ dom ℎ)((ℎ ↾ (dom 𝑔 ∩ dom ℎ))‘𝑎) = (𝑎𝐺((ℎ ↾ (dom 𝑔 ∩ dom ℎ)) ↾ Pred(𝑅, (dom 𝑔 ∩ dom ℎ), 𝑎))) ↔ ∀𝑎 ∈ (dom ℎ ∩ dom 𝑔)((ℎ ↾ (dom ℎ ∩ dom 𝑔))‘𝑎) = (𝑎𝐺((ℎ ↾ (dom ℎ ∩ dom 𝑔)) ↾ Pred(𝑅, (dom ℎ ∩ dom 𝑔), 𝑎)))) |
42 | 34, 41 | anbi12i 729 |
. . . . . . 7
⊢ (((ℎ ↾ (dom 𝑔 ∩ dom ℎ)) Fn (dom 𝑔 ∩ dom ℎ) ∧ ∀𝑎 ∈ (dom 𝑔 ∩ dom ℎ)((ℎ ↾ (dom 𝑔 ∩ dom ℎ))‘𝑎) = (𝑎𝐺((ℎ ↾ (dom 𝑔 ∩ dom ℎ)) ↾ Pred(𝑅, (dom 𝑔 ∩ dom ℎ), 𝑎)))) ↔ ((ℎ ↾ (dom ℎ ∩ dom 𝑔)) Fn (dom ℎ ∩ dom 𝑔) ∧ ∀𝑎 ∈ (dom ℎ ∩ dom 𝑔)((ℎ ↾ (dom ℎ ∩ dom 𝑔))‘𝑎) = (𝑎𝐺((ℎ ↾ (dom ℎ ∩ dom 𝑔)) ↾ Pred(𝑅, (dom ℎ ∩ dom 𝑔), 𝑎))))) |
43 | 29, 42 | sylibr 223 |
. . . . . 6
⊢ ((𝑔 ∈ 𝐵 ∧ ℎ ∈ 𝐵) → ((ℎ ↾ (dom 𝑔 ∩ dom ℎ)) Fn (dom 𝑔 ∩ dom ℎ) ∧ ∀𝑎 ∈ (dom 𝑔 ∩ dom ℎ)((ℎ ↾ (dom 𝑔 ∩ dom ℎ))‘𝑎) = (𝑎𝐺((ℎ ↾ (dom 𝑔 ∩ dom ℎ)) ↾ Pred(𝑅, (dom 𝑔 ∩ dom ℎ), 𝑎))))) |
44 | | frr3g 31023 |
. . . . . 6
⊢ (((𝑅 Fr (dom 𝑔 ∩ dom ℎ) ∧ 𝑅 Se (dom 𝑔 ∩ dom ℎ)) ∧ ((𝑔 ↾ (dom 𝑔 ∩ dom ℎ)) Fn (dom 𝑔 ∩ dom ℎ) ∧ ∀𝑎 ∈ (dom 𝑔 ∩ dom ℎ)((𝑔 ↾ (dom 𝑔 ∩ dom ℎ))‘𝑎) = (𝑎𝐺((𝑔 ↾ (dom 𝑔 ∩ dom ℎ)) ↾ Pred(𝑅, (dom 𝑔 ∩ dom ℎ), 𝑎)))) ∧ ((ℎ ↾ (dom 𝑔 ∩ dom ℎ)) Fn (dom 𝑔 ∩ dom ℎ) ∧ ∀𝑎 ∈ (dom 𝑔 ∩ dom ℎ)((ℎ ↾ (dom 𝑔 ∩ dom ℎ))‘𝑎) = (𝑎𝐺((ℎ ↾ (dom 𝑔 ∩ dom ℎ)) ↾ Pred(𝑅, (dom 𝑔 ∩ dom ℎ), 𝑎))))) → (𝑔 ↾ (dom 𝑔 ∩ dom ℎ)) = (ℎ ↾ (dom 𝑔 ∩ dom ℎ))) |
45 | 26, 27, 43, 44 | syl3anc 1318 |
. . . . 5
⊢ ((𝑔 ∈ 𝐵 ∧ ℎ ∈ 𝐵) → (𝑔 ↾ (dom 𝑔 ∩ dom ℎ)) = (ℎ ↾ (dom 𝑔 ∩ dom ℎ))) |
46 | 45 | breqd 4594 |
. . . 4
⊢ ((𝑔 ∈ 𝐵 ∧ ℎ ∈ 𝐵) → (𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑣 ↔ 𝑥(ℎ ↾ (dom 𝑔 ∩ dom ℎ))𝑣)) |
47 | 46 | biimprd 237 |
. . 3
⊢ ((𝑔 ∈ 𝐵 ∧ ℎ ∈ 𝐵) → (𝑥(ℎ ↾ (dom 𝑔 ∩ dom ℎ))𝑣 → 𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑣)) |
48 | 15 | frrlem2 31025 |
. . . . 5
⊢ (𝑔 ∈ 𝐵 → Fun 𝑔) |
49 | | funres 5843 |
. . . . 5
⊢ (Fun
𝑔 → Fun (𝑔 ↾ (dom 𝑔 ∩ dom ℎ))) |
50 | | dffun2 5814 |
. . . . . 6
⊢ (Fun
(𝑔 ↾ (dom 𝑔 ∩ dom ℎ)) ↔ (Rel (𝑔 ↾ (dom 𝑔 ∩ dom ℎ)) ∧ ∀𝑥∀𝑢∀𝑣((𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑢 ∧ 𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑣) → 𝑢 = 𝑣))) |
51 | 50 | simprbi 479 |
. . . . 5
⊢ (Fun
(𝑔 ↾ (dom 𝑔 ∩ dom ℎ)) → ∀𝑥∀𝑢∀𝑣((𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑢 ∧ 𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑣) → 𝑢 = 𝑣)) |
52 | | 2sp 2044 |
. . . . . 6
⊢
(∀𝑢∀𝑣((𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑢 ∧ 𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑣) → 𝑢 = 𝑣) → ((𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑢 ∧ 𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑣) → 𝑢 = 𝑣)) |
53 | 52 | sps 2043 |
. . . . 5
⊢
(∀𝑥∀𝑢∀𝑣((𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑢 ∧ 𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑣) → 𝑢 = 𝑣) → ((𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑢 ∧ 𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑣) → 𝑢 = 𝑣)) |
54 | 48, 49, 51, 53 | 4syl 19 |
. . . 4
⊢ (𝑔 ∈ 𝐵 → ((𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑢 ∧ 𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑣) → 𝑢 = 𝑣)) |
55 | 54 | adantr 480 |
. . 3
⊢ ((𝑔 ∈ 𝐵 ∧ ℎ ∈ 𝐵) → ((𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑢 ∧ 𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑣) → 𝑢 = 𝑣)) |
56 | 47, 55 | sylan2d 498 |
. 2
⊢ ((𝑔 ∈ 𝐵 ∧ ℎ ∈ 𝐵) → ((𝑥(𝑔 ↾ (dom 𝑔 ∩ dom ℎ))𝑢 ∧ 𝑥(ℎ ↾ (dom 𝑔 ∩ dom ℎ))𝑣) → 𝑢 = 𝑣)) |
57 | 14, 56 | syl5 33 |
1
⊢ ((𝑔 ∈ 𝐵 ∧ ℎ ∈ 𝐵) → ((𝑥𝑔𝑢 ∧ 𝑥ℎ𝑣) → 𝑢 = 𝑣)) |