Proof of Theorem wemapsolem
Step | Hyp | Ref
| Expression |
1 | | wemapsolem.1 |
. . 3
⊢ 𝑈 ⊆ (𝐵 ↑𝑚 𝐴) |
2 | | wemapsolem.2 |
. . . 4
⊢ (𝜑 → 𝐴 ∈ V) |
3 | | wemapsolem.3 |
. . . 4
⊢ (𝜑 → 𝑅 Or 𝐴) |
4 | | wemapsolem.4 |
. . . . 5
⊢ (𝜑 → 𝑆 Or 𝐵) |
5 | | sopo 5052 |
. . . . 5
⊢ (𝑆 Or 𝐵 → 𝑆 Po 𝐵) |
6 | 4, 5 | syl 17 |
. . . 4
⊢ (𝜑 → 𝑆 Po 𝐵) |
7 | | wemapso.t |
. . . . 5
⊢ 𝑇 = {〈𝑥, 𝑦〉 ∣ ∃𝑧 ∈ 𝐴 ((𝑥‘𝑧)𝑆(𝑦‘𝑧) ∧ ∀𝑤 ∈ 𝐴 (𝑤𝑅𝑧 → (𝑥‘𝑤) = (𝑦‘𝑤)))} |
8 | 7 | wemappo 8454 |
. . . 4
⊢ ((𝐴 ∈ V ∧ 𝑅 Or 𝐴 ∧ 𝑆 Po 𝐵) → 𝑇 Po (𝐵 ↑𝑚 𝐴)) |
9 | 2, 3, 6, 8 | syl3anc 1326 |
. . 3
⊢ (𝜑 → 𝑇 Po (𝐵 ↑𝑚 𝐴)) |
10 | | poss 5037 |
. . 3
⊢ (𝑈 ⊆ (𝐵 ↑𝑚 𝐴) → (𝑇 Po (𝐵 ↑𝑚 𝐴) → 𝑇 Po 𝑈)) |
11 | 1, 9, 10 | mpsyl 68 |
. 2
⊢ (𝜑 → 𝑇 Po 𝑈) |
12 | | df-ne 2795 |
. . . . 5
⊢ (𝑎 ≠ 𝑏 ↔ ¬ 𝑎 = 𝑏) |
13 | | wemapsolem.5 |
. . . . . . . . 9
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → ∃𝑐 ∈ dom (𝑎 ∖ 𝑏)∀𝑑 ∈ dom (𝑎 ∖ 𝑏) ¬ 𝑑𝑅𝑐) |
14 | | simprll 802 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → 𝑎 ∈ 𝑈) |
15 | 1, 14 | sseldi 3601 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → 𝑎 ∈ (𝐵 ↑𝑚 𝐴)) |
16 | | elmapi 7879 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑎 ∈ (𝐵 ↑𝑚 𝐴) → 𝑎:𝐴⟶𝐵) |
17 | 15, 16 | syl 17 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → 𝑎:𝐴⟶𝐵) |
18 | | ffn 6045 |
. . . . . . . . . . . . . . . 16
⊢ (𝑎:𝐴⟶𝐵 → 𝑎 Fn 𝐴) |
19 | 17, 18 | syl 17 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → 𝑎 Fn 𝐴) |
20 | | simprlr 803 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → 𝑏 ∈ 𝑈) |
21 | 1, 20 | sseldi 3601 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → 𝑏 ∈ (𝐵 ↑𝑚 𝐴)) |
22 | | elmapi 7879 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑏 ∈ (𝐵 ↑𝑚 𝐴) → 𝑏:𝐴⟶𝐵) |
23 | 21, 22 | syl 17 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → 𝑏:𝐴⟶𝐵) |
24 | | ffn 6045 |
. . . . . . . . . . . . . . . 16
⊢ (𝑏:𝐴⟶𝐵 → 𝑏 Fn 𝐴) |
25 | 23, 24 | syl 17 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → 𝑏 Fn 𝐴) |
26 | | fndmdif 6321 |
. . . . . . . . . . . . . . 15
⊢ ((𝑎 Fn 𝐴 ∧ 𝑏 Fn 𝐴) → dom (𝑎 ∖ 𝑏) = {𝑥 ∈ 𝐴 ∣ (𝑎‘𝑥) ≠ (𝑏‘𝑥)}) |
27 | 19, 25, 26 | syl2anc 693 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → dom (𝑎 ∖ 𝑏) = {𝑥 ∈ 𝐴 ∣ (𝑎‘𝑥) ≠ (𝑏‘𝑥)}) |
28 | 27 | eleq2d 2687 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → (𝑐 ∈ dom (𝑎 ∖ 𝑏) ↔ 𝑐 ∈ {𝑥 ∈ 𝐴 ∣ (𝑎‘𝑥) ≠ (𝑏‘𝑥)})) |
29 | | nesym 2850 |
. . . . . . . . . . . . . . 15
⊢ ((𝑎‘𝑥) ≠ (𝑏‘𝑥) ↔ ¬ (𝑏‘𝑥) = (𝑎‘𝑥)) |
30 | | fveq2 6191 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑥 = 𝑐 → (𝑏‘𝑥) = (𝑏‘𝑐)) |
31 | | fveq2 6191 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑥 = 𝑐 → (𝑎‘𝑥) = (𝑎‘𝑐)) |
32 | 30, 31 | eqeq12d 2637 |
. . . . . . . . . . . . . . . 16
⊢ (𝑥 = 𝑐 → ((𝑏‘𝑥) = (𝑎‘𝑥) ↔ (𝑏‘𝑐) = (𝑎‘𝑐))) |
33 | 32 | notbid 308 |
. . . . . . . . . . . . . . 15
⊢ (𝑥 = 𝑐 → (¬ (𝑏‘𝑥) = (𝑎‘𝑥) ↔ ¬ (𝑏‘𝑐) = (𝑎‘𝑐))) |
34 | 29, 33 | syl5bb 272 |
. . . . . . . . . . . . . 14
⊢ (𝑥 = 𝑐 → ((𝑎‘𝑥) ≠ (𝑏‘𝑥) ↔ ¬ (𝑏‘𝑐) = (𝑎‘𝑐))) |
35 | 34 | elrab 3363 |
. . . . . . . . . . . . 13
⊢ (𝑐 ∈ {𝑥 ∈ 𝐴 ∣ (𝑎‘𝑥) ≠ (𝑏‘𝑥)} ↔ (𝑐 ∈ 𝐴 ∧ ¬ (𝑏‘𝑐) = (𝑎‘𝑐))) |
36 | 28, 35 | syl6bb 276 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → (𝑐 ∈ dom (𝑎 ∖ 𝑏) ↔ (𝑐 ∈ 𝐴 ∧ ¬ (𝑏‘𝑐) = (𝑎‘𝑐)))) |
37 | 27 | eleq2d 2687 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → (𝑑 ∈ dom (𝑎 ∖ 𝑏) ↔ 𝑑 ∈ {𝑥 ∈ 𝐴 ∣ (𝑎‘𝑥) ≠ (𝑏‘𝑥)})) |
38 | | fveq2 6191 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝑥 = 𝑑 → (𝑏‘𝑥) = (𝑏‘𝑑)) |
39 | | fveq2 6191 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝑥 = 𝑑 → (𝑎‘𝑥) = (𝑎‘𝑑)) |
40 | 38, 39 | eqeq12d 2637 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝑥 = 𝑑 → ((𝑏‘𝑥) = (𝑎‘𝑥) ↔ (𝑏‘𝑑) = (𝑎‘𝑑))) |
41 | 40 | notbid 308 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑥 = 𝑑 → (¬ (𝑏‘𝑥) = (𝑎‘𝑥) ↔ ¬ (𝑏‘𝑑) = (𝑎‘𝑑))) |
42 | 29, 41 | syl5bb 272 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑥 = 𝑑 → ((𝑎‘𝑥) ≠ (𝑏‘𝑥) ↔ ¬ (𝑏‘𝑑) = (𝑎‘𝑑))) |
43 | 42 | elrab 3363 |
. . . . . . . . . . . . . . . 16
⊢ (𝑑 ∈ {𝑥 ∈ 𝐴 ∣ (𝑎‘𝑥) ≠ (𝑏‘𝑥)} ↔ (𝑑 ∈ 𝐴 ∧ ¬ (𝑏‘𝑑) = (𝑎‘𝑑))) |
44 | 37, 43 | syl6bb 276 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → (𝑑 ∈ dom (𝑎 ∖ 𝑏) ↔ (𝑑 ∈ 𝐴 ∧ ¬ (𝑏‘𝑑) = (𝑎‘𝑑)))) |
45 | 44 | imbi1d 331 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → ((𝑑 ∈ dom (𝑎 ∖ 𝑏) → ¬ 𝑑𝑅𝑐) ↔ ((𝑑 ∈ 𝐴 ∧ ¬ (𝑏‘𝑑) = (𝑎‘𝑑)) → ¬ 𝑑𝑅𝑐))) |
46 | | impexp 462 |
. . . . . . . . . . . . . . 15
⊢ (((𝑑 ∈ 𝐴 ∧ ¬ (𝑏‘𝑑) = (𝑎‘𝑑)) → ¬ 𝑑𝑅𝑐) ↔ (𝑑 ∈ 𝐴 → (¬ (𝑏‘𝑑) = (𝑎‘𝑑) → ¬ 𝑑𝑅𝑐))) |
47 | | con34b 306 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑)) ↔ (¬ (𝑏‘𝑑) = (𝑎‘𝑑) → ¬ 𝑑𝑅𝑐)) |
48 | 47 | imbi2i 326 |
. . . . . . . . . . . . . . 15
⊢ ((𝑑 ∈ 𝐴 → (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))) ↔ (𝑑 ∈ 𝐴 → (¬ (𝑏‘𝑑) = (𝑎‘𝑑) → ¬ 𝑑𝑅𝑐))) |
49 | 46, 48 | bitr4i 267 |
. . . . . . . . . . . . . 14
⊢ (((𝑑 ∈ 𝐴 ∧ ¬ (𝑏‘𝑑) = (𝑎‘𝑑)) → ¬ 𝑑𝑅𝑐) ↔ (𝑑 ∈ 𝐴 → (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑)))) |
50 | 45, 49 | syl6bb 276 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → ((𝑑 ∈ dom (𝑎 ∖ 𝑏) → ¬ 𝑑𝑅𝑐) ↔ (𝑑 ∈ 𝐴 → (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))))) |
51 | 50 | ralbidv2 2984 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → (∀𝑑 ∈ dom (𝑎 ∖ 𝑏) ¬ 𝑑𝑅𝑐 ↔ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑)))) |
52 | 36, 51 | anbi12d 747 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → ((𝑐 ∈ dom (𝑎 ∖ 𝑏) ∧ ∀𝑑 ∈ dom (𝑎 ∖ 𝑏) ¬ 𝑑𝑅𝑐) ↔ ((𝑐 ∈ 𝐴 ∧ ¬ (𝑏‘𝑐) = (𝑎‘𝑐)) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))))) |
53 | | anass 681 |
. . . . . . . . . . 11
⊢ (((𝑐 ∈ 𝐴 ∧ ¬ (𝑏‘𝑐) = (𝑎‘𝑐)) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))) ↔ (𝑐 ∈ 𝐴 ∧ (¬ (𝑏‘𝑐) = (𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))))) |
54 | 52, 53 | syl6bb 276 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → ((𝑐 ∈ dom (𝑎 ∖ 𝑏) ∧ ∀𝑑 ∈ dom (𝑎 ∖ 𝑏) ¬ 𝑑𝑅𝑐) ↔ (𝑐 ∈ 𝐴 ∧ (¬ (𝑏‘𝑐) = (𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑)))))) |
55 | 54 | rexbidv2 3048 |
. . . . . . . . 9
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → (∃𝑐 ∈ dom (𝑎 ∖ 𝑏)∀𝑑 ∈ dom (𝑎 ∖ 𝑏) ¬ 𝑑𝑅𝑐 ↔ ∃𝑐 ∈ 𝐴 (¬ (𝑏‘𝑐) = (𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))))) |
56 | 13, 55 | mpbid 222 |
. . . . . . . 8
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → ∃𝑐 ∈ 𝐴 (¬ (𝑏‘𝑐) = (𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑)))) |
57 | 4 | ad2antrr 762 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) ∧ 𝑐 ∈ 𝐴) → 𝑆 Or 𝐵) |
58 | 23 | ffvelrnda 6359 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) ∧ 𝑐 ∈ 𝐴) → (𝑏‘𝑐) ∈ 𝐵) |
59 | 17 | ffvelrnda 6359 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) ∧ 𝑐 ∈ 𝐴) → (𝑎‘𝑐) ∈ 𝐵) |
60 | | sotrieq 5062 |
. . . . . . . . . . . . 13
⊢ ((𝑆 Or 𝐵 ∧ ((𝑏‘𝑐) ∈ 𝐵 ∧ (𝑎‘𝑐) ∈ 𝐵)) → ((𝑏‘𝑐) = (𝑎‘𝑐) ↔ ¬ ((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∨ (𝑎‘𝑐)𝑆(𝑏‘𝑐)))) |
61 | 60 | con2bid 344 |
. . . . . . . . . . . 12
⊢ ((𝑆 Or 𝐵 ∧ ((𝑏‘𝑐) ∈ 𝐵 ∧ (𝑎‘𝑐) ∈ 𝐵)) → (((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∨ (𝑎‘𝑐)𝑆(𝑏‘𝑐)) ↔ ¬ (𝑏‘𝑐) = (𝑎‘𝑐))) |
62 | 61 | biimprd 238 |
. . . . . . . . . . 11
⊢ ((𝑆 Or 𝐵 ∧ ((𝑏‘𝑐) ∈ 𝐵 ∧ (𝑎‘𝑐) ∈ 𝐵)) → (¬ (𝑏‘𝑐) = (𝑎‘𝑐) → ((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∨ (𝑎‘𝑐)𝑆(𝑏‘𝑐)))) |
63 | 57, 58, 59, 62 | syl12anc 1324 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) ∧ 𝑐 ∈ 𝐴) → (¬ (𝑏‘𝑐) = (𝑎‘𝑐) → ((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∨ (𝑎‘𝑐)𝑆(𝑏‘𝑐)))) |
64 | 63 | anim1d 588 |
. . . . . . . . 9
⊢ (((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) ∧ 𝑐 ∈ 𝐴) → ((¬ (𝑏‘𝑐) = (𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))) → (((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∨ (𝑎‘𝑐)𝑆(𝑏‘𝑐)) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))))) |
65 | 64 | reximdva 3017 |
. . . . . . . 8
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → (∃𝑐 ∈ 𝐴 (¬ (𝑏‘𝑐) = (𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))) → ∃𝑐 ∈ 𝐴 (((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∨ (𝑎‘𝑐)𝑆(𝑏‘𝑐)) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))))) |
66 | 56, 65 | mpd 15 |
. . . . . . 7
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → ∃𝑐 ∈ 𝐴 (((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∨ (𝑎‘𝑐)𝑆(𝑏‘𝑐)) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑)))) |
67 | | vex 3203 |
. . . . . . . . . 10
⊢ 𝑏 ∈ V |
68 | | vex 3203 |
. . . . . . . . . 10
⊢ 𝑎 ∈ V |
69 | 7 | wemaplem1 8451 |
. . . . . . . . . 10
⊢ ((𝑏 ∈ V ∧ 𝑎 ∈ V) → (𝑏𝑇𝑎 ↔ ∃𝑐 ∈ 𝐴 ((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))))) |
70 | 67, 68, 69 | mp2an 708 |
. . . . . . . . 9
⊢ (𝑏𝑇𝑎 ↔ ∃𝑐 ∈ 𝐴 ((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑)))) |
71 | 7 | wemaplem1 8451 |
. . . . . . . . . 10
⊢ ((𝑎 ∈ V ∧ 𝑏 ∈ V) → (𝑎𝑇𝑏 ↔ ∃𝑐 ∈ 𝐴 ((𝑎‘𝑐)𝑆(𝑏‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑎‘𝑑) = (𝑏‘𝑑))))) |
72 | 68, 67, 71 | mp2an 708 |
. . . . . . . . 9
⊢ (𝑎𝑇𝑏 ↔ ∃𝑐 ∈ 𝐴 ((𝑎‘𝑐)𝑆(𝑏‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑎‘𝑑) = (𝑏‘𝑑)))) |
73 | 70, 72 | orbi12i 543 |
. . . . . . . 8
⊢ ((𝑏𝑇𝑎 ∨ 𝑎𝑇𝑏) ↔ (∃𝑐 ∈ 𝐴 ((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))) ∨ ∃𝑐 ∈ 𝐴 ((𝑎‘𝑐)𝑆(𝑏‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑎‘𝑑) = (𝑏‘𝑑))))) |
74 | | r19.43 3093 |
. . . . . . . 8
⊢
(∃𝑐 ∈
𝐴 (((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))) ∨ ((𝑎‘𝑐)𝑆(𝑏‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑎‘𝑑) = (𝑏‘𝑑)))) ↔ (∃𝑐 ∈ 𝐴 ((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))) ∨ ∃𝑐 ∈ 𝐴 ((𝑎‘𝑐)𝑆(𝑏‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑎‘𝑑) = (𝑏‘𝑑))))) |
75 | | andir 912 |
. . . . . . . . . 10
⊢ ((((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∨ (𝑎‘𝑐)𝑆(𝑏‘𝑐)) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))) ↔ (((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))) ∨ ((𝑎‘𝑐)𝑆(𝑏‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))))) |
76 | | eqcom 2629 |
. . . . . . . . . . . . . 14
⊢ ((𝑏‘𝑑) = (𝑎‘𝑑) ↔ (𝑎‘𝑑) = (𝑏‘𝑑)) |
77 | 76 | imbi2i 326 |
. . . . . . . . . . . . 13
⊢ ((𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑)) ↔ (𝑑𝑅𝑐 → (𝑎‘𝑑) = (𝑏‘𝑑))) |
78 | 77 | ralbii 2980 |
. . . . . . . . . . . 12
⊢
(∀𝑑 ∈
𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑)) ↔ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑎‘𝑑) = (𝑏‘𝑑))) |
79 | 78 | anbi2i 730 |
. . . . . . . . . . 11
⊢ (((𝑎‘𝑐)𝑆(𝑏‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))) ↔ ((𝑎‘𝑐)𝑆(𝑏‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑎‘𝑑) = (𝑏‘𝑑)))) |
80 | 79 | orbi2i 541 |
. . . . . . . . . 10
⊢ ((((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))) ∨ ((𝑎‘𝑐)𝑆(𝑏‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑)))) ↔ (((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))) ∨ ((𝑎‘𝑐)𝑆(𝑏‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑎‘𝑑) = (𝑏‘𝑑))))) |
81 | 75, 80 | bitr2i 265 |
. . . . . . . . 9
⊢ ((((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))) ∨ ((𝑎‘𝑐)𝑆(𝑏‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑎‘𝑑) = (𝑏‘𝑑)))) ↔ (((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∨ (𝑎‘𝑐)𝑆(𝑏‘𝑐)) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑)))) |
82 | 81 | rexbii 3041 |
. . . . . . . 8
⊢
(∃𝑐 ∈
𝐴 (((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑))) ∨ ((𝑎‘𝑐)𝑆(𝑏‘𝑐) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑎‘𝑑) = (𝑏‘𝑑)))) ↔ ∃𝑐 ∈ 𝐴 (((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∨ (𝑎‘𝑐)𝑆(𝑏‘𝑐)) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑)))) |
83 | 73, 74, 82 | 3bitr2i 288 |
. . . . . . 7
⊢ ((𝑏𝑇𝑎 ∨ 𝑎𝑇𝑏) ↔ ∃𝑐 ∈ 𝐴 (((𝑏‘𝑐)𝑆(𝑎‘𝑐) ∨ (𝑎‘𝑐)𝑆(𝑏‘𝑐)) ∧ ∀𝑑 ∈ 𝐴 (𝑑𝑅𝑐 → (𝑏‘𝑑) = (𝑎‘𝑑)))) |
84 | 66, 83 | sylibr 224 |
. . . . . 6
⊢ ((𝜑 ∧ ((𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈) ∧ 𝑎 ≠ 𝑏)) → (𝑏𝑇𝑎 ∨ 𝑎𝑇𝑏)) |
85 | 84 | expr 643 |
. . . . 5
⊢ ((𝜑 ∧ (𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈)) → (𝑎 ≠ 𝑏 → (𝑏𝑇𝑎 ∨ 𝑎𝑇𝑏))) |
86 | 12, 85 | syl5bir 233 |
. . . 4
⊢ ((𝜑 ∧ (𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈)) → (¬ 𝑎 = 𝑏 → (𝑏𝑇𝑎 ∨ 𝑎𝑇𝑏))) |
87 | 86 | orrd 393 |
. . 3
⊢ ((𝜑 ∧ (𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈)) → (𝑎 = 𝑏 ∨ (𝑏𝑇𝑎 ∨ 𝑎𝑇𝑏))) |
88 | | 3orrot 1044 |
. . . 4
⊢ ((𝑎𝑇𝑏 ∨ 𝑎 = 𝑏 ∨ 𝑏𝑇𝑎) ↔ (𝑎 = 𝑏 ∨ 𝑏𝑇𝑎 ∨ 𝑎𝑇𝑏)) |
89 | | 3orass 1040 |
. . . 4
⊢ ((𝑎 = 𝑏 ∨ 𝑏𝑇𝑎 ∨ 𝑎𝑇𝑏) ↔ (𝑎 = 𝑏 ∨ (𝑏𝑇𝑎 ∨ 𝑎𝑇𝑏))) |
90 | 88, 89 | bitr2i 265 |
. . 3
⊢ ((𝑎 = 𝑏 ∨ (𝑏𝑇𝑎 ∨ 𝑎𝑇𝑏)) ↔ (𝑎𝑇𝑏 ∨ 𝑎 = 𝑏 ∨ 𝑏𝑇𝑎)) |
91 | 87, 90 | sylib 208 |
. 2
⊢ ((𝜑 ∧ (𝑎 ∈ 𝑈 ∧ 𝑏 ∈ 𝑈)) → (𝑎𝑇𝑏 ∨ 𝑎 = 𝑏 ∨ 𝑏𝑇𝑎)) |
92 | 11, 91 | issod 5065 |
1
⊢ (𝜑 → 𝑇 Or 𝑈) |