Proof of Theorem staddi
| Step | Hyp | Ref
| Expression |
| 1 | | stle.1 |
. . . . . . 7
⊢ 𝐴 ∈
Cℋ |
| 2 | | stcl 29075 |
. . . . . . 7
⊢ (𝑆 ∈ States → (𝐴 ∈
Cℋ → (𝑆‘𝐴) ∈ ℝ)) |
| 3 | 1, 2 | mpi 20 |
. . . . . 6
⊢ (𝑆 ∈ States → (𝑆‘𝐴) ∈ ℝ) |
| 4 | | stle.2 |
. . . . . . 7
⊢ 𝐵 ∈
Cℋ |
| 5 | | stcl 29075 |
. . . . . . 7
⊢ (𝑆 ∈ States → (𝐵 ∈
Cℋ → (𝑆‘𝐵) ∈ ℝ)) |
| 6 | 4, 5 | mpi 20 |
. . . . . 6
⊢ (𝑆 ∈ States → (𝑆‘𝐵) ∈ ℝ) |
| 7 | 3, 6 | readdcld 10069 |
. . . . 5
⊢ (𝑆 ∈ States → ((𝑆‘𝐴) + (𝑆‘𝐵)) ∈ ℝ) |
| 8 | | ltne 10134 |
. . . . . 6
⊢ ((((𝑆‘𝐴) + (𝑆‘𝐵)) ∈ ℝ ∧ ((𝑆‘𝐴) + (𝑆‘𝐵)) < 2) → 2 ≠ ((𝑆‘𝐴) + (𝑆‘𝐵))) |
| 9 | 8 | necomd 2849 |
. . . . 5
⊢ ((((𝑆‘𝐴) + (𝑆‘𝐵)) ∈ ℝ ∧ ((𝑆‘𝐴) + (𝑆‘𝐵)) < 2) → ((𝑆‘𝐴) + (𝑆‘𝐵)) ≠ 2) |
| 10 | 7, 9 | sylan 488 |
. . . 4
⊢ ((𝑆 ∈ States ∧ ((𝑆‘𝐴) + (𝑆‘𝐵)) < 2) → ((𝑆‘𝐴) + (𝑆‘𝐵)) ≠ 2) |
| 11 | 10 | ex 450 |
. . 3
⊢ (𝑆 ∈ States → (((𝑆‘𝐴) + (𝑆‘𝐵)) < 2 → ((𝑆‘𝐴) + (𝑆‘𝐵)) ≠ 2)) |
| 12 | 11 | necon2bd 2810 |
. 2
⊢ (𝑆 ∈ States → (((𝑆‘𝐴) + (𝑆‘𝐵)) = 2 → ¬ ((𝑆‘𝐴) + (𝑆‘𝐵)) < 2)) |
| 13 | | 1re 10039 |
. . . . . . . . 9
⊢ 1 ∈
ℝ |
| 14 | 13 | a1i 11 |
. . . . . . . 8
⊢ (𝑆 ∈ States → 1 ∈
ℝ) |
| 15 | | stle1 29084 |
. . . . . . . . 9
⊢ (𝑆 ∈ States → (𝐵 ∈
Cℋ → (𝑆‘𝐵) ≤ 1)) |
| 16 | 4, 15 | mpi 20 |
. . . . . . . 8
⊢ (𝑆 ∈ States → (𝑆‘𝐵) ≤ 1) |
| 17 | 6, 14, 3, 16 | leadd2dd 10642 |
. . . . . . 7
⊢ (𝑆 ∈ States → ((𝑆‘𝐴) + (𝑆‘𝐵)) ≤ ((𝑆‘𝐴) + 1)) |
| 18 | 17 | adantr 481 |
. . . . . 6
⊢ ((𝑆 ∈ States ∧ (𝑆‘𝐴) < 1) → ((𝑆‘𝐴) + (𝑆‘𝐵)) ≤ ((𝑆‘𝐴) + 1)) |
| 19 | | ltadd1 10495 |
. . . . . . . . 9
⊢ (((𝑆‘𝐴) ∈ ℝ ∧ 1 ∈ ℝ
∧ 1 ∈ ℝ) → ((𝑆‘𝐴) < 1 ↔ ((𝑆‘𝐴) + 1) < (1 + 1))) |
| 20 | 19 | biimpd 219 |
. . . . . . . 8
⊢ (((𝑆‘𝐴) ∈ ℝ ∧ 1 ∈ ℝ
∧ 1 ∈ ℝ) → ((𝑆‘𝐴) < 1 → ((𝑆‘𝐴) + 1) < (1 + 1))) |
| 21 | 3, 14, 14, 20 | syl3anc 1326 |
. . . . . . 7
⊢ (𝑆 ∈ States → ((𝑆‘𝐴) < 1 → ((𝑆‘𝐴) + 1) < (1 + 1))) |
| 22 | 21 | imp 445 |
. . . . . 6
⊢ ((𝑆 ∈ States ∧ (𝑆‘𝐴) < 1) → ((𝑆‘𝐴) + 1) < (1 + 1)) |
| 23 | | readdcl 10019 |
. . . . . . . . 9
⊢ (((𝑆‘𝐴) ∈ ℝ ∧ 1 ∈ ℝ)
→ ((𝑆‘𝐴) + 1) ∈
ℝ) |
| 24 | 3, 13, 23 | sylancl 694 |
. . . . . . . 8
⊢ (𝑆 ∈ States → ((𝑆‘𝐴) + 1) ∈ ℝ) |
| 25 | 13, 13 | readdcli 10053 |
. . . . . . . . 9
⊢ (1 + 1)
∈ ℝ |
| 26 | 25 | a1i 11 |
. . . . . . . 8
⊢ (𝑆 ∈ States → (1 + 1)
∈ ℝ) |
| 27 | | lelttr 10128 |
. . . . . . . 8
⊢ ((((𝑆‘𝐴) + (𝑆‘𝐵)) ∈ ℝ ∧ ((𝑆‘𝐴) + 1) ∈ ℝ ∧ (1 + 1) ∈
ℝ) → ((((𝑆‘𝐴) + (𝑆‘𝐵)) ≤ ((𝑆‘𝐴) + 1) ∧ ((𝑆‘𝐴) + 1) < (1 + 1)) → ((𝑆‘𝐴) + (𝑆‘𝐵)) < (1 + 1))) |
| 28 | 7, 24, 26, 27 | syl3anc 1326 |
. . . . . . 7
⊢ (𝑆 ∈ States → ((((𝑆‘𝐴) + (𝑆‘𝐵)) ≤ ((𝑆‘𝐴) + 1) ∧ ((𝑆‘𝐴) + 1) < (1 + 1)) → ((𝑆‘𝐴) + (𝑆‘𝐵)) < (1 + 1))) |
| 29 | 28 | adantr 481 |
. . . . . 6
⊢ ((𝑆 ∈ States ∧ (𝑆‘𝐴) < 1) → ((((𝑆‘𝐴) + (𝑆‘𝐵)) ≤ ((𝑆‘𝐴) + 1) ∧ ((𝑆‘𝐴) + 1) < (1 + 1)) → ((𝑆‘𝐴) + (𝑆‘𝐵)) < (1 + 1))) |
| 30 | 18, 22, 29 | mp2and 715 |
. . . . 5
⊢ ((𝑆 ∈ States ∧ (𝑆‘𝐴) < 1) → ((𝑆‘𝐴) + (𝑆‘𝐵)) < (1 + 1)) |
| 31 | | df-2 11079 |
. . . . 5
⊢ 2 = (1 +
1) |
| 32 | 30, 31 | syl6breqr 4695 |
. . . 4
⊢ ((𝑆 ∈ States ∧ (𝑆‘𝐴) < 1) → ((𝑆‘𝐴) + (𝑆‘𝐵)) < 2) |
| 33 | 32 | ex 450 |
. . 3
⊢ (𝑆 ∈ States → ((𝑆‘𝐴) < 1 → ((𝑆‘𝐴) + (𝑆‘𝐵)) < 2)) |
| 34 | 33 | con3d 148 |
. 2
⊢ (𝑆 ∈ States → (¬
((𝑆‘𝐴) + (𝑆‘𝐵)) < 2 → ¬ (𝑆‘𝐴) < 1)) |
| 35 | | stle1 29084 |
. . . . 5
⊢ (𝑆 ∈ States → (𝐴 ∈
Cℋ → (𝑆‘𝐴) ≤ 1)) |
| 36 | 1, 35 | mpi 20 |
. . . 4
⊢ (𝑆 ∈ States → (𝑆‘𝐴) ≤ 1) |
| 37 | | leloe 10124 |
. . . . 5
⊢ (((𝑆‘𝐴) ∈ ℝ ∧ 1 ∈ ℝ)
→ ((𝑆‘𝐴) ≤ 1 ↔ ((𝑆‘𝐴) < 1 ∨ (𝑆‘𝐴) = 1))) |
| 38 | 3, 13, 37 | sylancl 694 |
. . . 4
⊢ (𝑆 ∈ States → ((𝑆‘𝐴) ≤ 1 ↔ ((𝑆‘𝐴) < 1 ∨ (𝑆‘𝐴) = 1))) |
| 39 | 36, 38 | mpbid 222 |
. . 3
⊢ (𝑆 ∈ States → ((𝑆‘𝐴) < 1 ∨ (𝑆‘𝐴) = 1)) |
| 40 | 39 | ord 392 |
. 2
⊢ (𝑆 ∈ States → (¬
(𝑆‘𝐴) < 1 → (𝑆‘𝐴) = 1)) |
| 41 | 12, 34, 40 | 3syld 60 |
1
⊢ (𝑆 ∈ States → (((𝑆‘𝐴) + (𝑆‘𝐵)) = 2 → (𝑆‘𝐴) = 1)) |