| Step | Hyp | Ref
| Expression |
| 1 | | ballotth.r |
. . 3
⊢ 𝑅 = (𝑐 ∈ (𝑂 ∖ 𝐸) ↦ ((𝑆‘𝑐) “ 𝑐)) |
| 2 | 1 | funmpt2 5396 |
. 2
⊢ Fun 𝑅 |
| 3 | | ballotth.m |
. . 3
⊢ 𝑀 ∈ ℕ |
| 4 | | ballotth.n |
. . 3
⊢ 𝑁 ∈ ℕ |
| 5 | | ballotfilem.o |
. . 3
⊢ 𝑂 = {𝑐 ∈ (𝒫 (1...(𝑀 + 𝑁)) ∩ Fin) ∣ (♯‘𝑐) = 𝑀} |
| 6 | | ballotfilem.p |
. . 3
⊢ 𝑃 = (𝑥 ∈ (𝒫 𝑂 ∩ Fin) ↦ ((♯‘𝑥) / (♯‘𝑂))) |
| 7 | | ballotth.f |
. . 3
⊢ 𝐹 = (𝑐 ∈ 𝑂 ↦ (𝑖 ∈ ℤ ↦
((♯‘((1...𝑖)
∩ 𝑐)) −
(♯‘((1...𝑖)
∖ 𝑐))))) |
| 8 | | ballotth.e |
. . 3
⊢ 𝐸 = {𝑐 ∈ 𝑂 ∣ ∀𝑖 ∈ (1...(𝑀 + 𝑁))0 < ((𝐹‘𝑐)‘𝑖)} |
| 9 | | ballotth.mgtn |
. . 3
⊢ 𝑁 < 𝑀 |
| 10 | | ballotth.i |
. . 3
⊢ 𝐼 = (𝑐 ∈ (𝑂 ∖ 𝐸) ↦ inf({𝑘 ∈ (1...(𝑀 + 𝑁)) ∣ ((𝐹‘𝑐)‘𝑘) = 0}, ℝ, < )) |
| 11 | | ballotth.s |
. . 3
⊢ 𝑆 = (𝑐 ∈ (𝑂 ∖ 𝐸) ↦ (𝑖 ∈ (1...(𝑀 + 𝑁)) ↦ if(𝑖 ≤ (𝐼‘𝑐), (((𝐼‘𝑐) + 1) − 𝑖), 𝑖))) |
| 12 | 3, 4, 5, 6, 7, 8, 9, 10, 11, 1 | ballotfilemrinv 13221 |
. 2
⊢ ◡𝑅 = 𝑅 |
| 13 | | rabid 2721 |
. . . . . 6
⊢ (𝑐 ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} ↔ (𝑐 ∈ (𝑂 ∖ 𝐸) ∧ 1 ∈ 𝑐)) |
| 14 | 3, 4, 5, 6, 7, 8, 9, 10, 11, 1 | ballotfilemrc 13218 |
. . . . . . . 8
⊢ (𝑐 ∈ (𝑂 ∖ 𝐸) → (𝑅‘𝑐) ∈ (𝑂 ∖ 𝐸)) |
| 15 | 14 | adantr 276 |
. . . . . . 7
⊢ ((𝑐 ∈ (𝑂 ∖ 𝐸) ∧ 1 ∈ 𝑐) → (𝑅‘𝑐) ∈ (𝑂 ∖ 𝐸)) |
| 16 | 3, 4, 5, 6, 7, 8, 9, 10 | ballotfilem1c 13195 |
. . . . . . . . . 10
⊢ ((𝑐 ∈ (𝑂 ∖ 𝐸) ∧ 1 ∈ 𝑐) → ¬ (𝐼‘𝑐) ∈ 𝑐) |
| 17 | 16 | ex 115 |
. . . . . . . . 9
⊢ (𝑐 ∈ (𝑂 ∖ 𝐸) → (1 ∈ 𝑐 → ¬ (𝐼‘𝑐) ∈ 𝑐)) |
| 18 | 3, 4, 5, 6, 7, 8, 9, 10, 11, 1 | ballotfilem1ri 13222 |
. . . . . . . . . 10
⊢ (𝑐 ∈ (𝑂 ∖ 𝐸) → (1 ∈ (𝑅‘𝑐) ↔ (𝐼‘𝑐) ∈ 𝑐)) |
| 19 | 18 | notbid 673 |
. . . . . . . . 9
⊢ (𝑐 ∈ (𝑂 ∖ 𝐸) → (¬ 1 ∈ (𝑅‘𝑐) ↔ ¬ (𝐼‘𝑐) ∈ 𝑐)) |
| 20 | 17, 19 | sylibrd 169 |
. . . . . . . 8
⊢ (𝑐 ∈ (𝑂 ∖ 𝐸) → (1 ∈ 𝑐 → ¬ 1 ∈ (𝑅‘𝑐))) |
| 21 | 20 | imp 124 |
. . . . . . 7
⊢ ((𝑐 ∈ (𝑂 ∖ 𝐸) ∧ 1 ∈ 𝑐) → ¬ 1 ∈ (𝑅‘𝑐)) |
| 22 | 15, 21 | jca 306 |
. . . . . 6
⊢ ((𝑐 ∈ (𝑂 ∖ 𝐸) ∧ 1 ∈ 𝑐) → ((𝑅‘𝑐) ∈ (𝑂 ∖ 𝐸) ∧ ¬ 1 ∈ (𝑅‘𝑐))) |
| 23 | 13, 22 | sylbi 121 |
. . . . 5
⊢ (𝑐 ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} → ((𝑅‘𝑐) ∈ (𝑂 ∖ 𝐸) ∧ ¬ 1 ∈ (𝑅‘𝑐))) |
| 24 | 23 | rgen 2597 |
. . . 4
⊢
∀𝑐 ∈
{𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} ((𝑅‘𝑐) ∈ (𝑂 ∖ 𝐸) ∧ ¬ 1 ∈ (𝑅‘𝑐)) |
| 25 | | eleq2 2298 |
. . . . . . . 8
⊢ (𝑏 = (𝑅‘𝑐) → (1 ∈ 𝑏 ↔ 1 ∈ (𝑅‘𝑐))) |
| 26 | 25 | notbid 673 |
. . . . . . 7
⊢ (𝑏 = (𝑅‘𝑐) → (¬ 1 ∈ 𝑏 ↔ ¬ 1 ∈ (𝑅‘𝑐))) |
| 27 | 26 | elrab 2976 |
. . . . . 6
⊢ ((𝑅‘𝑐) ∈ {𝑏 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑏} ↔ ((𝑅‘𝑐) ∈ (𝑂 ∖ 𝐸) ∧ ¬ 1 ∈ (𝑅‘𝑐))) |
| 28 | | eleq2 2298 |
. . . . . . . . 9
⊢ (𝑏 = 𝑐 → (1 ∈ 𝑏 ↔ 1 ∈ 𝑐)) |
| 29 | 28 | notbid 673 |
. . . . . . . 8
⊢ (𝑏 = 𝑐 → (¬ 1 ∈ 𝑏 ↔ ¬ 1 ∈ 𝑐)) |
| 30 | 29 | cbvrabv 2814 |
. . . . . . 7
⊢ {𝑏 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑏} = {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} |
| 31 | 30 | eleq2i 2301 |
. . . . . 6
⊢ ((𝑅‘𝑐) ∈ {𝑏 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑏} ↔ (𝑅‘𝑐) ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐}) |
| 32 | 27, 31 | bitr3i 186 |
. . . . 5
⊢ (((𝑅‘𝑐) ∈ (𝑂 ∖ 𝐸) ∧ ¬ 1 ∈ (𝑅‘𝑐)) ↔ (𝑅‘𝑐) ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐}) |
| 33 | 32 | ralbii 2550 |
. . . 4
⊢
(∀𝑐 ∈
{𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} ((𝑅‘𝑐) ∈ (𝑂 ∖ 𝐸) ∧ ¬ 1 ∈ (𝑅‘𝑐)) ↔ ∀𝑐 ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} (𝑅‘𝑐) ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐}) |
| 34 | 24, 33 | mpbi 145 |
. . 3
⊢
∀𝑐 ∈
{𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} (𝑅‘𝑐) ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} |
| 35 | | ssrab2 3327 |
. . . . 5
⊢ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} ⊆ (𝑂 ∖ 𝐸) |
| 36 | 3, 4, 5 | ballotfilemofi 13163 |
. . . . . . . . . . 11
⊢ 𝑂 ∈ Fin |
| 37 | | difexg 4257 |
. . . . . . . . . . 11
⊢ (𝑂 ∈ Fin → (𝑂 ∖ 𝐸) ∈ V) |
| 38 | 36, 37 | ax-mp 5 |
. . . . . . . . . 10
⊢ (𝑂 ∖ 𝐸) ∈ V |
| 39 | 38 | mptex 5917 |
. . . . . . . . 9
⊢ (𝑐 ∈ (𝑂 ∖ 𝐸) ↦ (𝑖 ∈ (1...(𝑀 + 𝑁)) ↦ if(𝑖 ≤ (𝐼‘𝑐), (((𝐼‘𝑐) + 1) − 𝑖), 𝑖))) ∈ V |
| 40 | 11, 39 | eqeltri 2307 |
. . . . . . . 8
⊢ 𝑆 ∈ V |
| 41 | | vex 2818 |
. . . . . . . 8
⊢ 𝑐 ∈ V |
| 42 | 40, 41 | fvex 5695 |
. . . . . . 7
⊢ (𝑆‘𝑐) ∈ V |
| 43 | 42 | imaex 5121 |
. . . . . 6
⊢ ((𝑆‘𝑐) “ 𝑐) ∈ V |
| 44 | 43, 1 | dmmpti 5493 |
. . . . 5
⊢ dom 𝑅 = (𝑂 ∖ 𝐸) |
| 45 | 35, 44 | sseqtrri 3277 |
. . . 4
⊢ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} ⊆ dom 𝑅 |
| 46 | | nfrab1 2726 |
. . . . 5
⊢
Ⅎ𝑐{𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} |
| 47 | | nfrab1 2726 |
. . . . 5
⊢
Ⅎ𝑐{𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} |
| 48 | | nfmpt1 4208 |
. . . . . 6
⊢
Ⅎ𝑐(𝑐 ∈ (𝑂 ∖ 𝐸) ↦ ((𝑆‘𝑐) “ 𝑐)) |
| 49 | 1, 48 | nfcxfr 2383 |
. . . . 5
⊢
Ⅎ𝑐𝑅 |
| 50 | 46, 47, 49 | funimass4f 6332 |
. . . 4
⊢ ((Fun
𝑅 ∧ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} ⊆ dom 𝑅) → ((𝑅 “ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐}) ⊆ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} ↔ ∀𝑐 ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} (𝑅‘𝑐) ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐})) |
| 51 | 2, 45, 50 | mp2an 426 |
. . 3
⊢ ((𝑅 “ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐}) ⊆ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} ↔ ∀𝑐 ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} (𝑅‘𝑐) ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐}) |
| 52 | 34, 51 | mpbir 146 |
. 2
⊢ (𝑅 “ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐}) ⊆ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} |
| 53 | | rabid 2721 |
. . . . . 6
⊢ (𝑐 ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} ↔ (𝑐 ∈ (𝑂 ∖ 𝐸) ∧ ¬ 1 ∈ 𝑐)) |
| 54 | 14 | adantr 276 |
. . . . . . 7
⊢ ((𝑐 ∈ (𝑂 ∖ 𝐸) ∧ ¬ 1 ∈ 𝑐) → (𝑅‘𝑐) ∈ (𝑂 ∖ 𝐸)) |
| 55 | 3, 4, 5, 6, 7, 8, 9, 10 | ballotfilemic 13194 |
. . . . . . . . . 10
⊢ ((𝑐 ∈ (𝑂 ∖ 𝐸) ∧ ¬ 1 ∈ 𝑐) → (𝐼‘𝑐) ∈ 𝑐) |
| 56 | 55 | ex 115 |
. . . . . . . . 9
⊢ (𝑐 ∈ (𝑂 ∖ 𝐸) → (¬ 1 ∈ 𝑐 → (𝐼‘𝑐) ∈ 𝑐)) |
| 57 | 56, 18 | sylibrd 169 |
. . . . . . . 8
⊢ (𝑐 ∈ (𝑂 ∖ 𝐸) → (¬ 1 ∈ 𝑐 → 1 ∈ (𝑅‘𝑐))) |
| 58 | 57 | imp 124 |
. . . . . . 7
⊢ ((𝑐 ∈ (𝑂 ∖ 𝐸) ∧ ¬ 1 ∈ 𝑐) → 1 ∈ (𝑅‘𝑐)) |
| 59 | 54, 58 | jca 306 |
. . . . . 6
⊢ ((𝑐 ∈ (𝑂 ∖ 𝐸) ∧ ¬ 1 ∈ 𝑐) → ((𝑅‘𝑐) ∈ (𝑂 ∖ 𝐸) ∧ 1 ∈ (𝑅‘𝑐))) |
| 60 | 53, 59 | sylbi 121 |
. . . . 5
⊢ (𝑐 ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} → ((𝑅‘𝑐) ∈ (𝑂 ∖ 𝐸) ∧ 1 ∈ (𝑅‘𝑐))) |
| 61 | 60 | rgen 2597 |
. . . 4
⊢
∀𝑐 ∈
{𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} ((𝑅‘𝑐) ∈ (𝑂 ∖ 𝐸) ∧ 1 ∈ (𝑅‘𝑐)) |
| 62 | 25 | elrab 2976 |
. . . . . 6
⊢ ((𝑅‘𝑐) ∈ {𝑏 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑏} ↔ ((𝑅‘𝑐) ∈ (𝑂 ∖ 𝐸) ∧ 1 ∈ (𝑅‘𝑐))) |
| 63 | 28 | cbvrabv 2814 |
. . . . . . 7
⊢ {𝑏 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑏} = {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} |
| 64 | 63 | eleq2i 2301 |
. . . . . 6
⊢ ((𝑅‘𝑐) ∈ {𝑏 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑏} ↔ (𝑅‘𝑐) ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐}) |
| 65 | 62, 64 | bitr3i 186 |
. . . . 5
⊢ (((𝑅‘𝑐) ∈ (𝑂 ∖ 𝐸) ∧ 1 ∈ (𝑅‘𝑐)) ↔ (𝑅‘𝑐) ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐}) |
| 66 | 65 | ralbii 2550 |
. . . 4
⊢
(∀𝑐 ∈
{𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} ((𝑅‘𝑐) ∈ (𝑂 ∖ 𝐸) ∧ 1 ∈ (𝑅‘𝑐)) ↔ ∀𝑐 ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} (𝑅‘𝑐) ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐}) |
| 67 | 61, 66 | mpbi 145 |
. . 3
⊢
∀𝑐 ∈
{𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} (𝑅‘𝑐) ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} |
| 68 | | ssrab2 3327 |
. . . . 5
⊢ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} ⊆ (𝑂 ∖ 𝐸) |
| 69 | 68, 44 | sseqtrri 3277 |
. . . 4
⊢ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} ⊆ dom 𝑅 |
| 70 | 47, 46, 49 | funimass4f 6332 |
. . . 4
⊢ ((Fun
𝑅 ∧ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} ⊆ dom 𝑅) → ((𝑅 “ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐}) ⊆ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} ↔ ∀𝑐 ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} (𝑅‘𝑐) ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐})) |
| 71 | 2, 69, 70 | mp2an 426 |
. . 3
⊢ ((𝑅 “ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐}) ⊆ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} ↔ ∀𝑐 ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} (𝑅‘𝑐) ∈ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐}) |
| 72 | 67, 71 | mpbir 146 |
. 2
⊢ (𝑅 “ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐}) ⊆ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐} |
| 73 | 2, 12, 52, 72, 45, 69 | rinvf1o 6008 |
1
⊢ (𝑅 ↾ {𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐}):{𝑐 ∈ (𝑂 ∖ 𝐸) ∣ 1 ∈ 𝑐}–1-1-onto→{𝑐 ∈ (𝑂 ∖ 𝐸) ∣ ¬ 1 ∈ 𝑐} |