Proof of Theorem nosepon
Step | Hyp | Ref
| Expression |
1 | | df-ne 2944 |
. . . . . . . 8
⊢ ((𝐴‘𝑥) ≠ (𝐵‘𝑥) ↔ ¬ (𝐴‘𝑥) = (𝐵‘𝑥)) |
2 | 1 | rexbii 3181 |
. . . . . . 7
⊢
(∃𝑥 ∈ On
(𝐴‘𝑥) ≠ (𝐵‘𝑥) ↔ ∃𝑥 ∈ On ¬ (𝐴‘𝑥) = (𝐵‘𝑥)) |
3 | 2 | notbii 320 |
. . . . . 6
⊢ (¬
∃𝑥 ∈ On (𝐴‘𝑥) ≠ (𝐵‘𝑥) ↔ ¬ ∃𝑥 ∈ On ¬ (𝐴‘𝑥) = (𝐵‘𝑥)) |
4 | | dfral2 3168 |
. . . . . 6
⊢
(∀𝑥 ∈ On
(𝐴‘𝑥) = (𝐵‘𝑥) ↔ ¬ ∃𝑥 ∈ On ¬ (𝐴‘𝑥) = (𝐵‘𝑥)) |
5 | 3, 4 | bitr4i 277 |
. . . . 5
⊢ (¬
∃𝑥 ∈ On (𝐴‘𝑥) ≠ (𝐵‘𝑥) ↔ ∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥)) |
6 | | nodmord 33856 |
. . . . . . . . . . . . 13
⊢ (𝐴 ∈
No → Ord dom 𝐴) |
7 | | nodmord 33856 |
. . . . . . . . . . . . 13
⊢ (𝐵 ∈
No → Ord dom 𝐵) |
8 | | ordtri3or 6298 |
. . . . . . . . . . . . 13
⊢ ((Ord dom
𝐴 ∧ Ord dom 𝐵) → (dom 𝐴 ∈ dom 𝐵 ∨ dom 𝐴 = dom 𝐵 ∨ dom 𝐵 ∈ dom 𝐴)) |
9 | 6, 7, 8 | syl2an 596 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ) → (dom 𝐴 ∈ dom 𝐵 ∨ dom 𝐴 = dom 𝐵 ∨ dom 𝐵 ∈ dom 𝐴)) |
10 | | 3orass 1089 |
. . . . . . . . . . . . 13
⊢ ((dom
𝐴 ∈ dom 𝐵 ∨ dom 𝐴 = dom 𝐵 ∨ dom 𝐵 ∈ dom 𝐴) ↔ (dom 𝐴 ∈ dom 𝐵 ∨ (dom 𝐴 = dom 𝐵 ∨ dom 𝐵 ∈ dom 𝐴))) |
11 | | or12 918 |
. . . . . . . . . . . . 13
⊢ ((dom
𝐴 ∈ dom 𝐵 ∨ (dom 𝐴 = dom 𝐵 ∨ dom 𝐵 ∈ dom 𝐴)) ↔ (dom 𝐴 = dom 𝐵 ∨ (dom 𝐴 ∈ dom 𝐵 ∨ dom 𝐵 ∈ dom 𝐴))) |
12 | 10, 11 | bitri 274 |
. . . . . . . . . . . 12
⊢ ((dom
𝐴 ∈ dom 𝐵 ∨ dom 𝐴 = dom 𝐵 ∨ dom 𝐵 ∈ dom 𝐴) ↔ (dom 𝐴 = dom 𝐵 ∨ (dom 𝐴 ∈ dom 𝐵 ∨ dom 𝐵 ∈ dom 𝐴))) |
13 | 9, 12 | sylib 217 |
. . . . . . . . . . 11
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ) → (dom 𝐴 = dom 𝐵 ∨ (dom 𝐴 ∈ dom 𝐵 ∨ dom 𝐵 ∈ dom 𝐴))) |
14 | 13 | ord 861 |
. . . . . . . . . 10
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ) → (¬ dom 𝐴 = dom 𝐵 → (dom 𝐴 ∈ dom 𝐵 ∨ dom 𝐵 ∈ dom 𝐴))) |
15 | | noseponlem 33867 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ∧ dom 𝐴 ∈ dom 𝐵) → ¬ ∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥)) |
16 | 15 | 3expia 1120 |
. . . . . . . . . . 11
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ) → (dom 𝐴 ∈ dom 𝐵 → ¬ ∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥))) |
17 | | noseponlem 33867 |
. . . . . . . . . . . . . 14
⊢ ((𝐵 ∈
No ∧ 𝐴 ∈
No ∧ dom 𝐵 ∈ dom 𝐴) → ¬ ∀𝑥 ∈ On (𝐵‘𝑥) = (𝐴‘𝑥)) |
18 | | eqcom 2745 |
. . . . . . . . . . . . . . 15
⊢ ((𝐴‘𝑥) = (𝐵‘𝑥) ↔ (𝐵‘𝑥) = (𝐴‘𝑥)) |
19 | 18 | ralbii 3092 |
. . . . . . . . . . . . . 14
⊢
(∀𝑥 ∈ On
(𝐴‘𝑥) = (𝐵‘𝑥) ↔ ∀𝑥 ∈ On (𝐵‘𝑥) = (𝐴‘𝑥)) |
20 | 17, 19 | sylnibr 329 |
. . . . . . . . . . . . 13
⊢ ((𝐵 ∈
No ∧ 𝐴 ∈
No ∧ dom 𝐵 ∈ dom 𝐴) → ¬ ∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥)) |
21 | 20 | 3expia 1120 |
. . . . . . . . . . . 12
⊢ ((𝐵 ∈
No ∧ 𝐴 ∈
No ) → (dom 𝐵 ∈ dom 𝐴 → ¬ ∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥))) |
22 | 21 | ancoms 459 |
. . . . . . . . . . 11
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ) → (dom 𝐵 ∈ dom 𝐴 → ¬ ∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥))) |
23 | 16, 22 | jaod 856 |
. . . . . . . . . 10
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ) → ((dom 𝐴 ∈ dom 𝐵 ∨ dom 𝐵 ∈ dom 𝐴) → ¬ ∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥))) |
24 | 14, 23 | syld 47 |
. . . . . . . . 9
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ) → (¬ dom 𝐴 = dom 𝐵 → ¬ ∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥))) |
25 | 24 | con4d 115 |
. . . . . . . 8
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ) → (∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥) → dom 𝐴 = dom 𝐵)) |
26 | 25 | 3impia 1116 |
. . . . . . 7
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ∧ ∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥)) → dom 𝐴 = dom 𝐵) |
27 | | ordsson 7633 |
. . . . . . . . . 10
⊢ (Ord dom
𝐴 → dom 𝐴 ⊆ On) |
28 | | ssralv 3987 |
. . . . . . . . . 10
⊢ (dom
𝐴 ⊆ On →
(∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥) → ∀𝑥 ∈ dom 𝐴(𝐴‘𝑥) = (𝐵‘𝑥))) |
29 | 6, 27, 28 | 3syl 18 |
. . . . . . . . 9
⊢ (𝐴 ∈
No → (∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥) → ∀𝑥 ∈ dom 𝐴(𝐴‘𝑥) = (𝐵‘𝑥))) |
30 | 29 | adantr 481 |
. . . . . . . 8
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ) → (∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥) → ∀𝑥 ∈ dom 𝐴(𝐴‘𝑥) = (𝐵‘𝑥))) |
31 | 30 | 3impia 1116 |
. . . . . . 7
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ∧ ∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥)) → ∀𝑥 ∈ dom 𝐴(𝐴‘𝑥) = (𝐵‘𝑥)) |
32 | | nofun 33852 |
. . . . . . . . 9
⊢ (𝐴 ∈
No → Fun 𝐴) |
33 | 32 | 3ad2ant1 1132 |
. . . . . . . 8
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ∧ ∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥)) → Fun 𝐴) |
34 | | nofun 33852 |
. . . . . . . . 9
⊢ (𝐵 ∈
No → Fun 𝐵) |
35 | 34 | 3ad2ant2 1133 |
. . . . . . . 8
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ∧ ∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥)) → Fun 𝐵) |
36 | | eqfunfv 6914 |
. . . . . . . 8
⊢ ((Fun
𝐴 ∧ Fun 𝐵) → (𝐴 = 𝐵 ↔ (dom 𝐴 = dom 𝐵 ∧ ∀𝑥 ∈ dom 𝐴(𝐴‘𝑥) = (𝐵‘𝑥)))) |
37 | 33, 35, 36 | syl2anc 584 |
. . . . . . 7
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ∧ ∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥)) → (𝐴 = 𝐵 ↔ (dom 𝐴 = dom 𝐵 ∧ ∀𝑥 ∈ dom 𝐴(𝐴‘𝑥) = (𝐵‘𝑥)))) |
38 | 26, 31, 37 | mpbir2and 710 |
. . . . . 6
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ∧ ∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥)) → 𝐴 = 𝐵) |
39 | 38 | 3expia 1120 |
. . . . 5
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ) → (∀𝑥 ∈ On (𝐴‘𝑥) = (𝐵‘𝑥) → 𝐴 = 𝐵)) |
40 | 5, 39 | syl5bi 241 |
. . . 4
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ) → (¬ ∃𝑥 ∈ On (𝐴‘𝑥) ≠ (𝐵‘𝑥) → 𝐴 = 𝐵)) |
41 | 40 | necon1ad 2960 |
. . 3
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ) → (𝐴 ≠ 𝐵 → ∃𝑥 ∈ On (𝐴‘𝑥) ≠ (𝐵‘𝑥))) |
42 | 41 | 3impia 1116 |
. 2
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ∧ 𝐴 ≠ 𝐵) → ∃𝑥 ∈ On (𝐴‘𝑥) ≠ (𝐵‘𝑥)) |
43 | | onintrab2 7647 |
. 2
⊢
(∃𝑥 ∈ On
(𝐴‘𝑥) ≠ (𝐵‘𝑥) ↔ ∩ {𝑥 ∈ On ∣ (𝐴‘𝑥) ≠ (𝐵‘𝑥)} ∈ On) |
44 | 42, 43 | sylib 217 |
1
⊢ ((𝐴 ∈
No ∧ 𝐵 ∈
No ∧ 𝐴 ≠ 𝐵) → ∩ {𝑥 ∈ On ∣ (𝐴‘𝑥) ≠ (𝐵‘𝑥)} ∈ On) |