Proof of Theorem sineq0
| Step | Hyp | Ref
| Expression |
| 1 | | recnt 5325 |
. . . . . 6
⊢ (A ∈ ℝ → A
∈ ℂ) |
| 2 | | pire 8672 |
. . . . . . . 8
⊢ π ∈ ℝ |
| 3 | 2 | recn 5326 |
. . . . . . 7
⊢ π ∈ ℂ |
| 4 | | pipos 8673 |
. . . . . . . 8
⊢ 0 <
π |
| 5 | 2, 4 | gt0ne0i 5629 |
. . . . . . 7
⊢ π ≠
0 |
| 6 | | divcan1t 5732 |
. . . . . . 7
⊢ ((A ∈ ℂ ⋀ π
∈ ℂ ⋀ π ≠ 0) → ((A / π) · π) = A) |
| 7 | 3, 5, 6 | mp3an23 910 |
. . . . . 6
⊢ (A ∈ ℂ → ((A /
π) · π) = A) |
| 8 | 1, 7 | syl 10 |
. . . . 5
⊢ (A ∈ ℝ → ((A /
π) · π) = A) |
| 9 | | redivclt 5802 |
. . . . . . . . 9
⊢ ((A ∈ ℝ ⋀ π
∈ ℝ ⋀ π ≠ 0) → (A / π) ∈
ℝ) |
| 10 | 2, 5, 9 | mp3an23 910 |
. . . . . . . 8
⊢ (A ∈ ℝ → (A /
π) ∈ ℝ) |
| 11 | | eqid 1478 |
. . . . . . . . . 10
⊢ (⌊ ‘(A / π)) = (⌊ ‘(A / π)) |
| 12 | | eqid 1478 |
. . . . . . . . . 10
⊢ ((A / π) − (⌊ ‘(A / π))) = ((A / π) − (⌊ ‘(A / π))) |
| 13 | 11, 12 | intfrac 6254 |
. . . . . . . . 9
⊢ ((A / π) ∈
ℝ → (0 ≤ ((A / π) − (⌊ ‘(A / π))) ⋀ ((A /
π) − (⌊ ‘(A /
π))) < 1 ⋀ (A / π) = ((⌊ ‘(A / π)) + ((A / π) − (⌊ ‘(A / π)))))) |
| 14 | 13 | 3simp3d 798 |
. . . . . . . 8
⊢ ((A / π) ∈
ℝ → (A / π) = ((⌊ ‘(A / π)) + ((A / π) − (⌊ ‘(A / π))))) |
| 15 | 10, 14 | syl 10 |
. . . . . . 7
⊢ (A ∈ ℝ → (A /
π) = ((⌊ ‘(A /
π)) + ((A / π) −
(⌊ ‘(A /
π))))) |
| 16 | 15 | opreq1d 3981 |
. . . . . 6
⊢ (A ∈ ℝ → ((A /
π) · π) = (((⌊ ‘(A / π)) + ((A / π) − (⌊ ‘(A / π)))) · π)) |
| 17 | | adddirt 5331 |
. . . . . . . 8
⊢ (((⌊
‘(A / π)) ∈ ℂ ⋀ ((A /
π) − (⌊ ‘(A /
π))) ∈ ℂ ⋀ π
∈ ℂ)
→ (((⌊ ‘(A / π))
+ ((A / π) − (⌊
‘(A / π)))) ·
π) = (((⌊ ‘(A /
π)) · π) + (((A
/ π) − (⌊ ‘(A /
π))) · π))) |
| 18 | 3, 17 | mp3an3 907 |
. . . . . . 7
⊢ (((⌊
‘(A / π)) ∈ ℂ ⋀ ((A /
π) − (⌊ ‘(A /
π))) ∈ ℂ) → (((⌊ ‘(A / π)) + ((A / π) − (⌊ ‘(A / π)))) · π) =
(((⌊ ‘(A / π))
· π) + (((A / π)
− (⌊ ‘(A / π)))
· π))) |
| 19 | | flreclt 6229 |
. . . . . . . . 9
⊢ ((A / π) ∈
ℝ → (⌊ ‘(A / π)) ∈ ℝ) |
| 20 | 10, 19 | syl 10 |
. . . . . . . 8
⊢ (A ∈ ℝ → (⌊ ‘(A / π)) ∈ ℝ) |
| 21 | 20 | recnd 5327 |
. . . . . . 7
⊢ (A ∈ ℝ → (⌊ ‘(A / π)) ∈ ℂ) |
| 22 | | resubclt 5450 |
. . . . . . . . 9
⊢ (((A / π) ∈
ℝ ⋀
(⌊ ‘(A / π)) ∈ ℝ) →
((A / π) − (⌊
‘(A / π))) ∈ ℝ) |
| 23 | 22, 10, 20 | sylanc 473 |
. . . . . . . 8
⊢ (A ∈ ℝ → ((A /
π) − (⌊ ‘(A /
π))) ∈ ℝ) |
| 24 | 23 | recnd 5327 |
. . . . . . 7
⊢ (A ∈ ℝ → ((A /
π) − (⌊ ‘(A /
π))) ∈ ℂ) |
| 25 | 18, 21, 24 | sylanc 473 |
. . . . . 6
⊢ (A ∈ ℝ → (((⌊ ‘(A / π)) + ((A / π) − (⌊ ‘(A / π)))) · π) =
(((⌊ ‘(A / π))
· π) + (((A / π)
− (⌊ ‘(A / π)))
· π))) |
| 26 | 16, 25 | eqtrd 1510 |
. . . . 5
⊢ (A ∈ ℝ → ((A /
π) · π) = (((⌊ ‘(A / π)) · π) +
(((A / π) − (⌊
‘(A / π))) ·
π))) |
| 27 | 8, 26 | eqtr3d 1512 |
. . . 4
⊢ (A ∈ ℝ → A =
(((⌊ ‘(A / π))
· π) + (((A / π)
− (⌊ ‘(A / π)))
· π))) |
| 28 | 27 | adantr 391 |
. . 3
⊢ ((A ∈ ℝ ⋀ (sin
‘A) = 0) → A = (((⌊ ‘(A / π)) · π) +
(((A / π) − (⌊
‘(A / π))) ·
π))) |
| 29 | | addcomt 5317 |
. . . . . . . . . . . . 13
⊢ ((((⌊
‘(A / π)) ·
π) ∈ ℂ ⋀ (((A / π) − (⌊ ‘(A / π))) · π) ∈ ℂ) →
(((⌊ ‘(A / π))
· π) + (((A / π)
− (⌊ ‘(A / π)))
· π)) = ((((A /
π) − (⌊ ‘(A /
π))) · π) + ((⌊ ‘(A / π)) · π))) |
| 30 | | remulclt 5316 |
. . . . . . . . . . . . . . . 16
⊢ (((⌊
‘(A / π)) ∈ ℝ ⋀ π ∈
ℝ) → ((⌊ ‘(A / π)) · π) ∈ ℝ) |
| 31 | 2, 30 | mpan2 698 |
. . . . . . . . . . . . . . 15
⊢ ((⌊ ‘(A / π)) ∈ ℝ →
((⌊ ‘(A / π))
· π) ∈ ℝ) |
| 32 | 20, 31 | syl 10 |
. . . . . . . . . . . . . 14
⊢ (A ∈ ℝ → ((⌊ ‘(A / π)) · π) ∈ ℝ) |
| 33 | 32 | recnd 5327 |
. . . . . . . . . . . . 13
⊢ (A ∈ ℝ → ((⌊ ‘(A / π)) · π) ∈ ℂ) |
| 34 | | remulclt 5316 |
. . . . . . . . . . . . . . . 16
⊢ ((((A / π) − (⌊ ‘(A / π))) ∈ ℝ ⋀ π ∈
ℝ) → (((A / π) − (⌊ ‘(A / π))) · π) ∈ ℝ) |
| 35 | 2, 34 | mpan2 698 |
. . . . . . . . . . . . . . 15
⊢ (((A / π) − (⌊ ‘(A / π))) ∈ ℝ →
(((A / π) − (⌊
‘(A / π))) ·
π) ∈ ℝ) |
| 36 | 23, 35 | syl 10 |
. . . . . . . . . . . . . 14
⊢ (A ∈ ℝ → (((A
/ π) − (⌊ ‘(A /
π))) · π) ∈ ℝ) |
| 37 | 36 | recnd 5327 |
. . . . . . . . . . . . 13
⊢ (A ∈ ℝ → (((A
/ π) − (⌊ ‘(A /
π))) · π) ∈ ℂ) |
| 38 | 29, 33, 37 | sylanc 473 |
. . . . . . . . . . . 12
⊢ (A ∈ ℝ → (((⌊ ‘(A / π)) · π) +
(((A / π) − (⌊
‘(A / π))) ·
π)) = ((((A / π)
− (⌊ ‘(A / π)))
· π) + ((⌊ ‘(A
/ π)) · π))) |
| 39 | 27, 38 | eqtrd 1510 |
. . . . . . . . . . 11
⊢ (A ∈ ℝ → A =
((((A / π) − (⌊
‘(A / π))) ·
π) + ((⌊ ‘(A /
π)) · π))) |
| 40 | 39 | fveq2d 3734 |
. . . . . . . . . 10
⊢ (A ∈ ℝ → (sin ‘A) = (sin ‘((((A / π) − (⌊ ‘(A / π))) · π) + ((⌊
‘(A / π)) ·
π)))) |
| 41 | 40 | fveq2d 3734 |
. . . . . . . . 9
⊢ (A ∈ ℝ → (abs ‘(sin ‘A)) = (abs ‘(sin ‘((((A / π) − (⌊ ‘(A / π))) · π) + ((⌊
‘(A / π)) ·
π))))) |
| 42 | | abssinper 8707 |
. . . . . . . . . 10
⊢ (((((A / π) − (⌊ ‘(A / π))) · π) ∈ ℂ ⋀ (⌊ ‘(A / π)) ∈ ℤ) → (abs
‘(sin ‘((((A / π)
− (⌊ ‘(A / π)))
· π) + ((⌊ ‘(A
/ π)) · π)))) = (abs ‘(sin ‘(((A / π) − (⌊ ‘(A / π))) ·
π)))) |
| 43 | | flclt 6228 |
. . . . . . . . . . 11
⊢ ((A / π) ∈
ℝ → (⌊ ‘(A / π)) ∈ ℤ) |
| 44 | 10, 43 | syl 10 |
. . . . . . . . . 10
⊢ (A ∈ ℝ → (⌊ ‘(A / π)) ∈ ℤ) |
| 45 | 42, 37, 44 | sylanc 473 |
. . . . . . . . 9
⊢ (A ∈ ℝ → (abs ‘(sin ‘((((A / π) − (⌊ ‘(A / π))) · π) + ((⌊
‘(A / π)) ·
π)))) = (abs ‘(sin ‘(((A / π) − (⌊ ‘(A / π))) ·
π)))) |
| 46 | 41, 45 | eqtr2d 1511 |
. . . . . . . 8
⊢ (A ∈ ℝ → (abs ‘(sin ‘(((A / π) − (⌊ ‘(A / π))) · π))) = (abs
‘(sin ‘A))) |
| 47 | 46 | adantr 391 |
. . . . . . 7
⊢ ((A ∈ ℝ ⋀ (sin
‘A) = 0) → (abs ‘(sin
‘(((A / π) − (⌊
‘(A / π))) ·
π))) = (abs ‘(sin ‘A))) |
| 48 | | resinclt 7438 |
. . . . . . . . . 10
⊢ (A ∈ ℝ → (sin ‘A) ∈ ℝ) |
| 49 | 48 | recnd 5327 |
. . . . . . . . 9
⊢ (A ∈ ℝ → (sin ‘A) ∈ ℂ) |
| 50 | | abs00t 6853 |
. . . . . . . . 9
⊢ ((sin ‘A) ∈ ℂ → ((abs ‘(sin ‘A)) = 0 ↔ (sin ‘A) = 0)) |
| 51 | 49, 50 | syl 10 |
. . . . . . . 8
⊢ (A ∈ ℝ → ((abs ‘(sin ‘A)) = 0 ↔ (sin ‘A) = 0)) |
| 52 | 51 | biimpar 419 |
. . . . . . 7
⊢ ((A ∈ ℝ ⋀ (sin
‘A) = 0) → (abs ‘(sin
‘A)) = 0) |
| 53 | 47, 52 | eqtrd 1510 |
. . . . . 6
⊢ ((A ∈ ℝ ⋀ (sin
‘A) = 0) → (abs ‘(sin
‘(((A / π) − (⌊
‘(A / π))) ·
π))) = 0) |
| 54 | | resinclt 7438 |
. . . . . . . . . 10
⊢ ((((A / π) − (⌊ ‘(A / π))) · π) ∈ ℝ → (sin
‘(((A / π) − (⌊
‘(A / π))) ·
π)) ∈ ℝ) |
| 55 | 36, 54 | syl 10 |
. . . . . . . . 9
⊢ (A ∈ ℝ → (sin ‘(((A / π) − (⌊ ‘(A / π))) · π)) ∈ ℝ) |
| 56 | 55 | recnd 5327 |
. . . . . . . 8
⊢ (A ∈ ℝ → (sin ‘(((A / π) − (⌊ ‘(A / π))) · π)) ∈ ℂ) |
| 57 | | abs00t 6853 |
. . . . . . . 8
⊢ ((sin ‘(((A / π) − (⌊ ‘(A / π))) · π)) ∈ ℂ → ((abs
‘(sin ‘(((A / π)
− (⌊ ‘(A / π)))
· π))) = 0 ↔ (sin ‘(((A / π) − (⌊ ‘(A / π))) · π)) =
0)) |
| 58 | 56, 57 | syl 10 |
. . . . . . 7
⊢ (A ∈ ℝ → ((abs ‘(sin ‘(((A / π) − (⌊ ‘(A / π))) · π))) = 0
↔ (sin ‘(((A / π)
− (⌊ ‘(A / π)))
· π)) = 0)) |
| 59 | 58 | adantr 391 |
. . . . . 6
⊢ ((A ∈ ℝ ⋀ (sin
‘A) = 0) → ((abs ‘(sin
‘(((A / π) − (⌊
‘(A / π))) ·
π))) = 0 ↔ (sin ‘(((A
/ π) − (⌊ ‘(A /
π))) · π)) = 0)) |
| 60 | 53, 59 | mpbid 195 |
. . . . 5
⊢ ((A ∈ ℝ ⋀ (sin
‘A) = 0) → (sin
‘(((A / π) − (⌊
‘(A / π))) ·
π)) = 0) |
| 61 | | gt0ne0t 5630 |
. . . . . . . . 9
⊢ (((sin ‘(((A / π) − (⌊ ‘(A / π))) · π)) ∈ ℝ ⋀ 0 < (sin ‘(((A / π) − (⌊ ‘(A / π))) · π))) →
(sin ‘(((A / π) −
(⌊ ‘(A / π)))
· π)) ≠ 0) |
| 62 | 55 | adantr 391 |
. . . . . . . . 9
⊢ ((A ∈ ℝ ⋀ (((A / π) − (⌊ ‘(A / π))) · π) ≠ 0)
→ (sin ‘(((A / π)
− (⌊ ‘(A / π)))
· π)) ∈ ℝ) |
| 63 | | ne0gt0t 5631 |
. . . . . . . . . . . . . 14
⊢ (((((A / π) − (⌊ ‘(A / π))) · π) ∈ ℝ ⋀ 0 ≤ (((A
/ π) − (⌊ ‘(A /
π))) · π)) → ((((A / π) − (⌊ ‘(A / π))) · π) ≠ 0
↔ 0 < (((A / π) −
(⌊ ‘(A / π)))
· π))) |
| 64 | | 0re 5452 |
. . . . . . . . . . . . . . . . . 18
⊢ 0 ∈ ℝ |
| 65 | 64, 2, 4 | ltlei 5593 |
. . . . . . . . . . . . . . . . 17
⊢ 0 ≤
π |
| 66 | | mulge0t 5691 |
. . . . . . . . . . . . . . . . 17
⊢ (((((A / π) − (⌊ ‘(A / π))) ∈ ℝ ⋀ π ∈
ℝ) ⋀ (0
≤ ((A / π) − (⌊
‘(A / π))) ⋀ 0 ≤ π)) → 0 ≤ (((A / π) − (⌊ ‘(A / π))) · π)) |
| 67 | 65, 66 | mpanr2 712 |
. . . . . . . . . . . . . . . 16
⊢ (((((A / π) − (⌊ ‘(A / π))) ∈ ℝ ⋀ π ∈
ℝ) ⋀ 0
≤ ((A / π) − (⌊
‘(A / π)))) → 0 ≤
(((A / π) − (⌊
‘(A / π))) ·
π)) |
| 68 | 2, 67 | mpanl2 709 |
. . . . . . . . . . . . . . 15
⊢ ((((A / π) − (⌊ ‘(A / π))) ∈ ℝ ⋀ 0 ≤ ((A /
π) − (⌊ ‘(A /
π)))) → 0 ≤ (((A /
π) − (⌊ ‘(A /
π))) · π)) |
| 69 | | fracge0t 6234 |
. . . . . . . . . . . . . . . 16
⊢ ((A / π) ∈
ℝ → 0 ≤ ((A / π) − (⌊ ‘(A / π)))) |
| 70 | 10, 69 | syl 10 |
. . . . . . . . . . . . . . 15
⊢ (A ∈ ℝ → 0 ≤ ((A / π) − (⌊ ‘(A / π)))) |
| 71 | 68, 23, 70 | sylanc 473 |
. . . . . . . . . . . . . 14
⊢ (A ∈ ℝ → 0 ≤ (((A / π) − (⌊ ‘(A / π))) · π)) |
| 72 | 63, 36, 71 | sylanc 473 |
. . . . . . . . . . . . 13
⊢ (A ∈ ℝ → ((((A
/ π) − (⌊ ‘(A /
π))) · π) ≠ 0 ↔ 0 < (((A / π) − (⌊ ‘(A / π))) · π))) |
| 73 | 72 | biimpa 418 |
. . . . . . . . . . . 12
⊢ ((A ∈ ℝ ⋀ (((A / π) − (⌊ ‘(A / π))) · π) ≠ 0)
→ 0 < (((A / π) −
(⌊ ‘(A / π)))
· π)) |
| 74 | | fraclt1t 6233 |
. . . . . . . . . . . . . . . 16
⊢ ((A / π) ∈
ℝ → ((A / π) − (⌊ ‘(A / π))) < 1) |
| 75 | 10, 74 | syl 10 |
. . . . . . . . . . . . . . 15
⊢ (A ∈ ℝ → ((A /
π) − (⌊ ‘(A /
π))) < 1) |
| 76 | | 1re 5447 |
. . . . . . . . . . . . . . . . 17
⊢ 1 ∈ ℝ |
| 77 | | ltmul1t 5832 |
. . . . . . . . . . . . . . . . . 18
⊢ (((((A / π) − (⌊ ‘(A / π))) ∈ ℝ ⋀ 1 ∈ ℝ ⋀ π
∈ ℝ) ⋀ 0 < π) → (((A / π) − (⌊ ‘(A / π))) < 1 ↔ (((A / π) − (⌊ ‘(A / π))) · π) < (1
· π))) |
| 78 | 4, 77 | mpan2 698 |
. . . . . . . . . . . . . . . . 17
⊢ ((((A / π) − (⌊ ‘(A / π))) ∈ ℝ ⋀ 1 ∈ ℝ ⋀ π
∈ ℝ)
→ (((A / π) − (⌊
‘(A / π))) < 1 ↔
(((A / π) − (⌊
‘(A / π))) ·
π) < (1 · π))) |
| 79 | 76, 2, 78 | mp3an23 910 |
. . . . . . . . . . . . . . . 16
⊢ (((A / π) − (⌊ ‘(A / π))) ∈ ℝ →
(((A / π) − (⌊
‘(A / π))) < 1 ↔
(((A / π) − (⌊
‘(A / π))) ·
π) < (1 · π))) |
| 80 | 23, 79 | syl 10 |
. . . . . . . . . . . . . . 15
⊢ (A ∈ ℝ → (((A
/ π) − (⌊ ‘(A /
π))) < 1 ↔ (((A /
π) − (⌊ ‘(A /
π))) · π) < (1 · π))) |
| 81 | 75, 80 | mpbid 195 |
. . . . . . . . . . . . . 14
⊢ (A ∈ ℝ → (((A
/ π) − (⌊ ‘(A /
π))) · π) < (1 · π)) |
| 82 | 3 | mulid2 5345 |
. . . . . . . . . . . . . 14
⊢ (1 · π) =
π |
| 83 | 81, 82 | syl6breq 2659 |
. . . . . . . . . . . . 13
⊢ (A ∈ ℝ → (((A
/ π) − (⌊ ‘(A /
π))) · π) < π) |
| 84 | 83 | adantr 391 |
. . . . . . . . . . . 12
⊢ ((A ∈ ℝ ⋀ (((A / π) − (⌊ ‘(A / π))) · π) ≠ 0)
→ (((A / π) − (⌊
‘(A / π))) ·
π) < π) |
| 85 | 73, 84 | jca 288 |
. . . . . . . . . . 11
⊢ ((A ∈ ℝ ⋀ (((A / π) − (⌊ ‘(A / π))) · π) ≠ 0)
→ (0 < (((A / π) −
(⌊ ‘(A / π)))
· π) ⋀ (((A / π) − (⌊ ‘(A / π))) · π) <
π)) |
| 86 | | rexrt 5511 |
. . . . . . . . . . . . . 14
⊢ ((((A / π) − (⌊ ‘(A / π))) · π) ∈ ℝ →
(((A / π) − (⌊
‘(A / π))) ·
π) ∈ ℝ*) |
| 87 | 36, 86 | syl 10 |
. . . . . . . . . . . . 13
⊢ (A ∈ ℝ → (((A
/ π) − (⌊ ‘(A /
π))) · π) ∈ ℝ*) |
| 88 | | rexrt 5511 |
. . . . . . . . . . . . . . 15
⊢ (0 ∈ ℝ → 0
∈ ℝ*) |
| 89 | 64, 88 | ax-mp 7 |
. . . . . . . . . . . . . 14
⊢ 0 ∈ ℝ* |
| 90 | | rexrt 5511 |
. . . . . . . . . . . . . . 15
⊢ (π ∈ ℝ →
π ∈ ℝ*) |
| 91 | 2, 90 | ax-mp 7 |
. . . . . . . . . . . . . 14
⊢ π ∈ ℝ* |
| 92 | | elioo5t 6385 |
. . . . . . . . . . . . . 14
⊢ ((0 ∈ ℝ*
⋀ π ∈ ℝ*
⋀ (((A /
π) − (⌊ ‘(A /
π))) · π) ∈ ℝ*) → ((((A / π) − (⌊ ‘(A / π))) · π) ∈ (0(,)π) ↔ (0 < (((A / π) − (⌊ ‘(A / π))) · π) ⋀ (((A /
π) − (⌊ ‘(A /
π))) · π) < π))) |
| 93 | 89, 91, 92 | mp3an12 908 |
. . . . . . . . . . . . 13
⊢ ((((A / π) − (⌊ ‘(A / π))) · π) ∈ ℝ*
→ ((((A / π) −
(⌊ ‘(A / π)))
· π) ∈ (0(,)π)
↔ (0 < (((A / π) −
(⌊ ‘(A / π)))
· π) ⋀ (((A / π) − (⌊ ‘(A / π))) · π) <
π))) |
| 94 | 87, 93 | syl 10 |
. . . . . . . . . . . 12
⊢ (A ∈ ℝ → ((((A
/ π) − (⌊ ‘(A /
π))) · π) ∈
(0(,)π) ↔ (0 < (((A /
π) − (⌊ ‘(A /
π))) · π) ⋀
(((A / π) − (⌊
‘(A / π))) ·
π) < π))) |
| 95 | 94 | adantr 391 |
. . . . . . . . . . 11
⊢ ((A ∈ ℝ ⋀ (((A / π) − (⌊ ‘(A / π))) · π) ≠ 0)
→ ((((A / π) −
(⌊ ‘(A / π)))
· π) ∈ (0(,)π)
↔ (0 < (((A / π) −
(⌊ ‘(A / π)))
· π) ⋀ (((A / π) − (⌊ ‘(A / π))) · π) <
π))) |
| 96 | 85, 95 | mpbird 196 |
. . . . . . . . . 10
⊢ ((A ∈ ℝ ⋀ (((A / π) − (⌊ ‘(A / π))) · π) ≠ 0)
→ (((A / π) − (⌊
‘(A / π))) ·
π) ∈ (0(,)π)) |
| 97 | | sinq12gt0t 8703 |
. . . . . . . . . 10
⊢ ((((A / π) − (⌊ ‘(A / π))) · π) ∈ (0(,)π) → 0 < (sin
‘(((A / π) − (⌊
‘(A / π))) ·
π))) |
| 98 | 96, 97 | syl 10 |
. . . . . . . . 9
⊢ ((A ∈ ℝ ⋀ (((A / π) − (⌊ ‘(A / π))) · π) ≠ 0)
→ 0 < (sin ‘(((A /
π) − (⌊ ‘(A /
π))) · π))) |
| 99 | 61, 62, 98 | sylanc 473 |
. . . . . . . 8
⊢ ((A ∈ ℝ ⋀ (((A / π) − (⌊ ‘(A / π))) · π) ≠ 0)
→ (sin ‘(((A / π)
− (⌊ ‘(A / π)))
· π)) ≠ 0) |
| 100 | 99 | ex 373 |
. . . . . . 7
⊢ (A ∈ ℝ → ((((A
/ π) − (⌊ ‘(A /
π))) · π) ≠ 0 → (sin ‘(((A / π) − (⌊ ‘(A / π))) · π)) ≠
0)) |
| 101 | 100 | necon4d 1631 |
. . . . . 6
⊢ (A ∈ ℝ → ((sin ‘(((A / π) − (⌊ ‘(A / π))) · π)) = 0 →
(((A / π) − (⌊
‘(A / π))) ·
π) = 0)) |
| 102 | 101 | adantr 391 |
. . . . 5
⊢ ((A ∈ ℝ ⋀ (sin
‘A) = 0) → ((sin
‘(((A / π) − (⌊
‘(A / π))) ·
π)) = 0 → (((A /
π) − (⌊ ‘(A /
π))) · π) = 0)) |
| 103 | 60, 102 | mpd 26 |
. . . 4
⊢ ((A ∈ ℝ ⋀ (sin
‘A) = 0) → (((A / π) − (⌊ ‘(A / π))) · π) =
0) |
| 104 | 103 | opreq2d 3982 |
. . 3
⊢ ((A ∈ ℝ ⋀ (sin
‘A) = 0) → (((⌊
‘(A / π)) ·
π) + (((A / π) −
(⌊ ‘(A / π)))
· π)) = (((⌊ ‘(A / π)) · π) +
0)) |
| 105 | 28, 104 | eqtrd 1510 |
. 2
⊢ ((A ∈ ℝ ⋀ (sin
‘A) = 0) → A = (((⌊ ‘(A / π)) · π) +
0)) |
| 106 | | addid1t 5322 |
. . . 4
⊢ (((⌊
‘(A / π)) ·
π) ∈ ℂ → (((⌊ ‘(A / π)) · π) + 0) =
((⌊ ‘(A / π))
· π)) |
| 107 | 33, 106 | syl 10 |
. . 3
⊢ (A ∈ ℝ → (((⌊ ‘(A / π)) · π) + 0) =
((⌊ ‘(A / π))
· π)) |
| 108 | 107 | adantr 391 |
. 2
⊢ ((A ∈ ℝ ⋀ (sin
‘A) = 0) → (((⌊
‘(A / π)) ·
π) + 0) = ((⌊ ‘(A /
π)) · π)) |
| 109 | 105, 108 | eqtrd 1510 |
1
⊢ ((A ∈ ℝ ⋀ (sin
‘A) = 0) → A = ((⌊ ‘(A / π)) · π)) |