Proof of Theorem coseq0q4123
| Step | Hyp | Ref
 | Expression | 
| 1 |   | 0re 8026 | 
. . . . 5
⊢ 0 ∈
ℝ | 
| 2 | 1 | ltnri 8119 | 
. . . 4
⊢  ¬ 0
< 0 | 
| 3 |   | elioore 9987 | 
. . . . . . 7
⊢ (𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) → 𝐴 ∈ ℝ) | 
| 4 | 3 | adantr 276 | 
. . . . . 6
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) → 𝐴 ∈ ℝ) | 
| 5 |   | halfpire 15028 | 
. . . . . 6
⊢ (π /
2) ∈ ℝ | 
| 6 |   | reaplt 8615 | 
. . . . . 6
⊢ ((𝐴 ∈ ℝ ∧ (π / 2)
∈ ℝ) → (𝐴 #
(π / 2) ↔ (𝐴 <
(π / 2) ∨ (π / 2) < 𝐴))) | 
| 7 | 4, 5, 6 | sylancl 413 | 
. . . . 5
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) → (𝐴 # (π / 2) ↔ (𝐴 < (π / 2) ∨ (π / 2) < 𝐴))) | 
| 8 | 3 | adantr 276 | 
. . . . . . . . . . 11
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ 𝐴 < (π / 2)) → 𝐴 ∈ ℝ) | 
| 9 |   | neghalfpirx 15030 | 
. . . . . . . . . . . . . 14
⊢ -(π /
2) ∈ ℝ* | 
| 10 |   | 3re 9064 | 
. . . . . . . . . . . . . . . 16
⊢ 3 ∈
ℝ | 
| 11 | 10, 5 | remulcli 8040 | 
. . . . . . . . . . . . . . 15
⊢ (3
· (π / 2)) ∈ ℝ | 
| 12 | 11 | rexri 8084 | 
. . . . . . . . . . . . . 14
⊢ (3
· (π / 2)) ∈ ℝ* | 
| 13 |   | elioo2 9996 | 
. . . . . . . . . . . . . 14
⊢ ((-(π
/ 2) ∈ ℝ* ∧ (3 · (π / 2)) ∈
ℝ*) → (𝐴 ∈ (-(π / 2)(,)(3 · (π /
2))) ↔ (𝐴 ∈
ℝ ∧ -(π / 2) < 𝐴 ∧ 𝐴 < (3 · (π /
2))))) | 
| 14 | 9, 12, 13 | mp2an 426 | 
. . . . . . . . . . . . 13
⊢ (𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ↔ (𝐴 ∈ ℝ ∧ -(π / 2) < 𝐴 ∧ 𝐴 < (3 · (π /
2)))) | 
| 15 | 14 | simp2bi 1015 | 
. . . . . . . . . . . 12
⊢ (𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) → -(π / 2) < 𝐴) | 
| 16 | 15 | adantr 276 | 
. . . . . . . . . . 11
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ 𝐴 < (π / 2)) → -(π / 2) <
𝐴) | 
| 17 |   | simpr 110 | 
. . . . . . . . . . 11
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ 𝐴 < (π / 2)) → 𝐴 < (π / 2)) | 
| 18 | 9 | a1i 9 | 
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ 𝐴 < (π / 2)) → -(π / 2) ∈
ℝ*) | 
| 19 | 5 | rexri 8084 | 
. . . . . . . . . . . 12
⊢ (π /
2) ∈ ℝ* | 
| 20 |   | elioo2 9996 | 
. . . . . . . . . . . 12
⊢ ((-(π
/ 2) ∈ ℝ* ∧ (π / 2) ∈ ℝ*)
→ (𝐴 ∈ (-(π /
2)(,)(π / 2)) ↔ (𝐴
∈ ℝ ∧ -(π / 2) < 𝐴 ∧ 𝐴 < (π / 2)))) | 
| 21 | 18, 19, 20 | sylancl 413 | 
. . . . . . . . . . 11
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ 𝐴 < (π / 2)) → (𝐴 ∈ (-(π / 2)(,)(π / 2)) ↔
(𝐴 ∈ ℝ ∧
-(π / 2) < 𝐴 ∧
𝐴 < (π /
2)))) | 
| 22 | 8, 16, 17, 21 | mpbir3and 1182 | 
. . . . . . . . . 10
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ 𝐴 < (π / 2)) → 𝐴 ∈ (-(π / 2)(,)(π /
2))) | 
| 23 |   | cosq14gt0 15068 | 
. . . . . . . . . 10
⊢ (𝐴 ∈ (-(π / 2)(,)(π /
2)) → 0 < (cos‘𝐴)) | 
| 24 | 22, 23 | syl 14 | 
. . . . . . . . 9
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ 𝐴 < (π / 2)) → 0 <
(cos‘𝐴)) | 
| 25 | 24 | adantlr 477 | 
. . . . . . . 8
⊢ (((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) ∧ 𝐴 < (π / 2)) → 0 <
(cos‘𝐴)) | 
| 26 |   | simplr 528 | 
. . . . . . . 8
⊢ (((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) ∧ 𝐴 < (π / 2)) → (cos‘𝐴) = 0) | 
| 27 | 25, 26 | breqtrd 4059 | 
. . . . . . 7
⊢ (((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) ∧ 𝐴 < (π / 2)) → 0 <
0) | 
| 28 | 27 | ex 115 | 
. . . . . 6
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) → (𝐴 < (π / 2) → 0 <
0)) | 
| 29 |   | simplr 528 | 
. . . . . . . 8
⊢ (((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) ∧ (π / 2) < 𝐴) → (cos‘𝐴) = 0) | 
| 30 | 3 | adantr 276 | 
. . . . . . . . . . 11
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (π / 2) < 𝐴) → 𝐴 ∈ ℝ) | 
| 31 |   | simpr 110 | 
. . . . . . . . . . 11
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (π / 2) < 𝐴) → (π / 2) < 𝐴) | 
| 32 | 14 | simp3bi 1016 | 
. . . . . . . . . . . 12
⊢ (𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) → 𝐴 < (3 · (π /
2))) | 
| 33 | 32 | adantr 276 | 
. . . . . . . . . . 11
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (π / 2) < 𝐴) → 𝐴 < (3 · (π /
2))) | 
| 34 |   | elioo2 9996 | 
. . . . . . . . . . . 12
⊢ (((π /
2) ∈ ℝ* ∧ (3 · (π / 2)) ∈
ℝ*) → (𝐴 ∈ ((π / 2)(,)(3 · (π /
2))) ↔ (𝐴 ∈
ℝ ∧ (π / 2) < 𝐴 ∧ 𝐴 < (3 · (π /
2))))) | 
| 35 | 19, 12, 34 | mp2an 426 | 
. . . . . . . . . . 11
⊢ (𝐴 ∈ ((π / 2)(,)(3
· (π / 2))) ↔ (𝐴 ∈ ℝ ∧ (π / 2) < 𝐴 ∧ 𝐴 < (3 · (π /
2)))) | 
| 36 | 30, 31, 33, 35 | syl3anbrc 1183 | 
. . . . . . . . . 10
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (π / 2) < 𝐴) → 𝐴 ∈ ((π / 2)(,)(3 · (π /
2)))) | 
| 37 |   | cosq23lt0 15069 | 
. . . . . . . . . 10
⊢ (𝐴 ∈ ((π / 2)(,)(3
· (π / 2))) → (cos‘𝐴) < 0) | 
| 38 | 36, 37 | syl 14 | 
. . . . . . . . 9
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (π / 2) < 𝐴) → (cos‘𝐴) < 0) | 
| 39 | 38 | adantlr 477 | 
. . . . . . . 8
⊢ (((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) ∧ (π / 2) < 𝐴) → (cos‘𝐴) < 0) | 
| 40 | 29, 39 | eqbrtrrd 4057 | 
. . . . . . 7
⊢ (((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) ∧ (π / 2) < 𝐴) → 0 <
0) | 
| 41 | 40 | ex 115 | 
. . . . . 6
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) → ((π / 2) < 𝐴 → 0 <
0)) | 
| 42 | 28, 41 | jaod 718 | 
. . . . 5
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) → ((𝐴 < (π / 2) ∨ (π / 2) < 𝐴) → 0 <
0)) | 
| 43 | 7, 42 | sylbid 150 | 
. . . 4
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) → (𝐴 # (π / 2) → 0 <
0)) | 
| 44 | 2, 43 | mtoi 665 | 
. . 3
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) → ¬ 𝐴 # (π / 2)) | 
| 45 | 3 | recnd 8055 | 
. . . 4
⊢ (𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) → 𝐴 ∈ ℂ) | 
| 46 |   | picn 15023 | 
. . . . 5
⊢ π
∈ ℂ | 
| 47 |   | halfcl 9217 | 
. . . . 5
⊢ (π
∈ ℂ → (π / 2) ∈ ℂ) | 
| 48 | 46, 47 | mp1i 10 | 
. . . 4
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) → (π / 2) ∈
ℂ) | 
| 49 |   | apti 8649 | 
. . . 4
⊢ ((𝐴 ∈ ℂ ∧ (π / 2)
∈ ℂ) → (𝐴 =
(π / 2) ↔ ¬ 𝐴 #
(π / 2))) | 
| 50 | 45, 48, 49 | syl2an2r 595 | 
. . 3
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) → (𝐴 = (π / 2) ↔ ¬ 𝐴 # (π / 2))) | 
| 51 | 44, 50 | mpbird 167 | 
. 2
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ (cos‘𝐴) = 0) → 𝐴 = (π / 2)) | 
| 52 |   | fveq2 5558 | 
. . . 4
⊢ (𝐴 = (π / 2) →
(cos‘𝐴) =
(cos‘(π / 2))) | 
| 53 |   | coshalfpi 15033 | 
. . . 4
⊢
(cos‘(π / 2)) = 0 | 
| 54 | 52, 53 | eqtrdi 2245 | 
. . 3
⊢ (𝐴 = (π / 2) →
(cos‘𝐴) =
0) | 
| 55 | 54 | adantl 277 | 
. 2
⊢ ((𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) ∧ 𝐴 = (π / 2)) → (cos‘𝐴) = 0) | 
| 56 | 51, 55 | impbida 596 | 
1
⊢ (𝐴 ∈ (-(π / 2)(,)(3
· (π / 2))) → ((cos‘𝐴) = 0 ↔ 𝐴 = (π / 2))) |