Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  fourierdlem10 Structured version   Visualization version   GIF version

Theorem fourierdlem10 46563
Description: Condition on the bounds of a nonempty subinterval. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
fourierdlem10.1 (𝜑𝐴 ∈ ℝ)
fourierdlem10.2 (𝜑𝐵 ∈ ℝ)
fourierdlem10.3 (𝜑𝐶 ∈ ℝ)
fourierdlem10.4 (𝜑𝐷 ∈ ℝ)
fourierdlem10.5 (𝜑𝐶 < 𝐷)
fourierdlem10.6 (𝜑 → (𝐶(,)𝐷) ⊆ (𝐴(,)𝐵))
Assertion
Ref Expression
fourierdlem10 (𝜑 → (𝐴𝐶𝐷𝐵))

Proof of Theorem fourierdlem10
StepHypRef Expression
1 fourierdlem10.1 . . 3 (𝜑𝐴 ∈ ℝ)
2 fourierdlem10.3 . . 3 (𝜑𝐶 ∈ ℝ)
3 fourierdlem10.6 . . . . 5 (𝜑 → (𝐶(,)𝐷) ⊆ (𝐴(,)𝐵))
43adantr 480 . . . 4 ((𝜑𝐶 < 𝐴) → (𝐶(,)𝐷) ⊆ (𝐴(,)𝐵))
52rexrd 11186 . . . . . . 7 (𝜑𝐶 ∈ ℝ*)
65adantr 480 . . . . . 6 ((𝜑𝐶 < 𝐴) → 𝐶 ∈ ℝ*)
7 fourierdlem10.4 . . . . . . . 8 (𝜑𝐷 ∈ ℝ)
87rexrd 11186 . . . . . . 7 (𝜑𝐷 ∈ ℝ*)
98adantr 480 . . . . . 6 ((𝜑𝐶 < 𝐴) → 𝐷 ∈ ℝ*)
102, 1readdcld 11165 . . . . . . . . 9 (𝜑 → (𝐶 + 𝐴) ∈ ℝ)
1110rehalfcld 12415 . . . . . . . 8 (𝜑 → ((𝐶 + 𝐴) / 2) ∈ ℝ)
122, 7readdcld 11165 . . . . . . . . 9 (𝜑 → (𝐶 + 𝐷) ∈ ℝ)
1312rehalfcld 12415 . . . . . . . 8 (𝜑 → ((𝐶 + 𝐷) / 2) ∈ ℝ)
1411, 13ifcld 4514 . . . . . . 7 (𝜑 → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ)
1514adantr 480 . . . . . 6 ((𝜑𝐶 < 𝐴) → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ)
16 simplr 769 . . . . . . . . 9 (((𝜑𝐶 < 𝐴) ∧ 𝐴𝐷) → 𝐶 < 𝐴)
172ad2antrr 727 . . . . . . . . . 10 (((𝜑𝐶 < 𝐴) ∧ 𝐴𝐷) → 𝐶 ∈ ℝ)
181ad2antrr 727 . . . . . . . . . 10 (((𝜑𝐶 < 𝐴) ∧ 𝐴𝐷) → 𝐴 ∈ ℝ)
19 avglt1 12406 . . . . . . . . . 10 ((𝐶 ∈ ℝ ∧ 𝐴 ∈ ℝ) → (𝐶 < 𝐴𝐶 < ((𝐶 + 𝐴) / 2)))
2017, 18, 19syl2anc 585 . . . . . . . . 9 (((𝜑𝐶 < 𝐴) ∧ 𝐴𝐷) → (𝐶 < 𝐴𝐶 < ((𝐶 + 𝐴) / 2)))
2116, 20mpbid 232 . . . . . . . 8 (((𝜑𝐶 < 𝐴) ∧ 𝐴𝐷) → 𝐶 < ((𝐶 + 𝐴) / 2))
22 iftrue 4473 . . . . . . . . 9 (𝐴𝐷 → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐶 + 𝐴) / 2))
2322adantl 481 . . . . . . . 8 (((𝜑𝐶 < 𝐴) ∧ 𝐴𝐷) → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐶 + 𝐴) / 2))
2421, 23breqtrrd 5114 . . . . . . 7 (((𝜑𝐶 < 𝐴) ∧ 𝐴𝐷) → 𝐶 < if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)))
25 fourierdlem10.5 . . . . . . . . . . 11 (𝜑𝐶 < 𝐷)
2625adantr 480 . . . . . . . . . 10 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐶 < 𝐷)
272adantr 480 . . . . . . . . . . 11 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐶 ∈ ℝ)
287adantr 480 . . . . . . . . . . 11 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐷 ∈ ℝ)
29 avglt1 12406 . . . . . . . . . . 11 ((𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ) → (𝐶 < 𝐷𝐶 < ((𝐶 + 𝐷) / 2)))
3027, 28, 29syl2anc 585 . . . . . . . . . 10 ((𝜑 ∧ ¬ 𝐴𝐷) → (𝐶 < 𝐷𝐶 < ((𝐶 + 𝐷) / 2)))
3126, 30mpbid 232 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐶 < ((𝐶 + 𝐷) / 2))
32 iffalse 4476 . . . . . . . . . . 11 𝐴𝐷 → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐶 + 𝐷) / 2))
3332eqcomd 2743 . . . . . . . . . 10 𝐴𝐷 → ((𝐶 + 𝐷) / 2) = if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)))
3433adantl 481 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝐴𝐷) → ((𝐶 + 𝐷) / 2) = if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)))
3531, 34breqtrd 5112 . . . . . . . 8 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐶 < if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)))
3635adantlr 716 . . . . . . 7 (((𝜑𝐶 < 𝐴) ∧ ¬ 𝐴𝐷) → 𝐶 < if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)))
3724, 36pm2.61dan 813 . . . . . 6 ((𝜑𝐶 < 𝐴) → 𝐶 < if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)))
3822adantl 481 . . . . . . . . . 10 ((𝜑𝐴𝐷) → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐶 + 𝐴) / 2))
3910adantr 480 . . . . . . . . . . 11 ((𝜑𝐴𝐷) → (𝐶 + 𝐴) ∈ ℝ)
4012adantr 480 . . . . . . . . . . 11 ((𝜑𝐴𝐷) → (𝐶 + 𝐷) ∈ ℝ)
41 2rp 12938 . . . . . . . . . . . 12 2 ∈ ℝ+
4241a1i 11 . . . . . . . . . . 11 ((𝜑𝐴𝐷) → 2 ∈ ℝ+)
431adantr 480 . . . . . . . . . . . 12 ((𝜑𝐴𝐷) → 𝐴 ∈ ℝ)
447adantr 480 . . . . . . . . . . . 12 ((𝜑𝐴𝐷) → 𝐷 ∈ ℝ)
452adantr 480 . . . . . . . . . . . 12 ((𝜑𝐴𝐷) → 𝐶 ∈ ℝ)
46 simpr 484 . . . . . . . . . . . 12 ((𝜑𝐴𝐷) → 𝐴𝐷)
4743, 44, 45, 46leadd2dd 11756 . . . . . . . . . . 11 ((𝜑𝐴𝐷) → (𝐶 + 𝐴) ≤ (𝐶 + 𝐷))
4839, 40, 42, 47lediv1dd 13035 . . . . . . . . . 10 ((𝜑𝐴𝐷) → ((𝐶 + 𝐴) / 2) ≤ ((𝐶 + 𝐷) / 2))
4938, 48eqbrtrd 5108 . . . . . . . . 9 ((𝜑𝐴𝐷) → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ≤ ((𝐶 + 𝐷) / 2))
5032adantl 481 . . . . . . . . . 10 ((𝜑 ∧ ¬ 𝐴𝐷) → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐶 + 𝐷) / 2))
5113leidd 11707 . . . . . . . . . . 11 (𝜑 → ((𝐶 + 𝐷) / 2) ≤ ((𝐶 + 𝐷) / 2))
5251adantr 480 . . . . . . . . . 10 ((𝜑 ∧ ¬ 𝐴𝐷) → ((𝐶 + 𝐷) / 2) ≤ ((𝐶 + 𝐷) / 2))
5350, 52eqbrtrd 5108 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝐴𝐷) → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ≤ ((𝐶 + 𝐷) / 2))
5449, 53pm2.61dan 813 . . . . . . . 8 (𝜑 → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ≤ ((𝐶 + 𝐷) / 2))
55 avglt2 12407 . . . . . . . . . 10 ((𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ) → (𝐶 < 𝐷 ↔ ((𝐶 + 𝐷) / 2) < 𝐷))
562, 7, 55syl2anc 585 . . . . . . . . 9 (𝜑 → (𝐶 < 𝐷 ↔ ((𝐶 + 𝐷) / 2) < 𝐷))
5725, 56mpbid 232 . . . . . . . 8 (𝜑 → ((𝐶 + 𝐷) / 2) < 𝐷)
5814, 13, 7, 54, 57lelttrd 11295 . . . . . . 7 (𝜑 → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) < 𝐷)
5958adantr 480 . . . . . 6 ((𝜑𝐶 < 𝐴) → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) < 𝐷)
606, 9, 15, 37, 59eliood 45946 . . . . 5 ((𝜑𝐶 < 𝐴) → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐶(,)𝐷))
611adantr 480 . . . . . . . 8 ((𝜑𝐶 < 𝐴) → 𝐴 ∈ ℝ)
6211adantr 480 . . . . . . . . 9 ((𝜑𝐶 < 𝐴) → ((𝐶 + 𝐴) / 2) ∈ ℝ)
6314adantr 480 . . . . . . . . . . . 12 ((𝜑𝐴𝐷) → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ)
6463, 38eqled 11240 . . . . . . . . . . 11 ((𝜑𝐴𝐷) → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ≤ ((𝐶 + 𝐴) / 2))
6514adantr 480 . . . . . . . . . . . 12 ((𝜑 ∧ ¬ 𝐴𝐷) → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ)
6611adantr 480 . . . . . . . . . . . 12 ((𝜑 ∧ ¬ 𝐴𝐷) → ((𝐶 + 𝐴) / 2) ∈ ℝ)
67 simpr 484 . . . . . . . . . . . . . . 15 ((𝜑 ∧ ¬ 𝐴𝐷) → ¬ 𝐴𝐷)
681adantr 480 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐴 ∈ ℝ)
6928, 68ltnled 11284 . . . . . . . . . . . . . . 15 ((𝜑 ∧ ¬ 𝐴𝐷) → (𝐷 < 𝐴 ↔ ¬ 𝐴𝐷))
7067, 69mpbird 257 . . . . . . . . . . . . . 14 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐷 < 𝐴)
7112adantr 480 . . . . . . . . . . . . . . 15 ((𝜑𝐷 < 𝐴) → (𝐶 + 𝐷) ∈ ℝ)
7210adantr 480 . . . . . . . . . . . . . . 15 ((𝜑𝐷 < 𝐴) → (𝐶 + 𝐴) ∈ ℝ)
7341a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝐷 < 𝐴) → 2 ∈ ℝ+)
747adantr 480 . . . . . . . . . . . . . . . 16 ((𝜑𝐷 < 𝐴) → 𝐷 ∈ ℝ)
751adantr 480 . . . . . . . . . . . . . . . 16 ((𝜑𝐷 < 𝐴) → 𝐴 ∈ ℝ)
762adantr 480 . . . . . . . . . . . . . . . 16 ((𝜑𝐷 < 𝐴) → 𝐶 ∈ ℝ)
77 simpr 484 . . . . . . . . . . . . . . . 16 ((𝜑𝐷 < 𝐴) → 𝐷 < 𝐴)
7874, 75, 76, 77ltadd2dd 11296 . . . . . . . . . . . . . . 15 ((𝜑𝐷 < 𝐴) → (𝐶 + 𝐷) < (𝐶 + 𝐴))
7971, 72, 73, 78ltdiv1dd 13034 . . . . . . . . . . . . . 14 ((𝜑𝐷 < 𝐴) → ((𝐶 + 𝐷) / 2) < ((𝐶 + 𝐴) / 2))
8070, 79syldan 592 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ 𝐴𝐷) → ((𝐶 + 𝐷) / 2) < ((𝐶 + 𝐴) / 2))
8150, 80eqbrtrd 5108 . . . . . . . . . . . 12 ((𝜑 ∧ ¬ 𝐴𝐷) → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) < ((𝐶 + 𝐴) / 2))
8265, 66, 81ltled 11285 . . . . . . . . . . 11 ((𝜑 ∧ ¬ 𝐴𝐷) → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ≤ ((𝐶 + 𝐴) / 2))
8364, 82pm2.61dan 813 . . . . . . . . . 10 (𝜑 → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ≤ ((𝐶 + 𝐴) / 2))
8483adantr 480 . . . . . . . . 9 ((𝜑𝐶 < 𝐴) → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ≤ ((𝐶 + 𝐴) / 2))
85 simpr 484 . . . . . . . . . 10 ((𝜑𝐶 < 𝐴) → 𝐶 < 𝐴)
862adantr 480 . . . . . . . . . . 11 ((𝜑𝐶 < 𝐴) → 𝐶 ∈ ℝ)
87 avglt2 12407 . . . . . . . . . . 11 ((𝐶 ∈ ℝ ∧ 𝐴 ∈ ℝ) → (𝐶 < 𝐴 ↔ ((𝐶 + 𝐴) / 2) < 𝐴))
8886, 61, 87syl2anc 585 . . . . . . . . . 10 ((𝜑𝐶 < 𝐴) → (𝐶 < 𝐴 ↔ ((𝐶 + 𝐴) / 2) < 𝐴))
8985, 88mpbid 232 . . . . . . . . 9 ((𝜑𝐶 < 𝐴) → ((𝐶 + 𝐴) / 2) < 𝐴)
9015, 62, 61, 84, 89lelttrd 11295 . . . . . . . 8 ((𝜑𝐶 < 𝐴) → if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) < 𝐴)
9115, 61, 90ltnsymd 11286 . . . . . . 7 ((𝜑𝐶 < 𝐴) → ¬ 𝐴 < if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)))
9291intn3an2d 1483 . . . . . 6 ((𝜑𝐶 < 𝐴) → ¬ (if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ ∧ 𝐴 < if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∧ if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) < 𝐵))
931rexrd 11186 . . . . . . . 8 (𝜑𝐴 ∈ ℝ*)
9493adantr 480 . . . . . . 7 ((𝜑𝐶 < 𝐴) → 𝐴 ∈ ℝ*)
95 fourierdlem10.2 . . . . . . . . 9 (𝜑𝐵 ∈ ℝ)
9695rexrd 11186 . . . . . . . 8 (𝜑𝐵 ∈ ℝ*)
9796adantr 480 . . . . . . 7 ((𝜑𝐶 < 𝐴) → 𝐵 ∈ ℝ*)
98 elioo2 13330 . . . . . . 7 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → (if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵) ↔ (if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ ∧ 𝐴 < if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∧ if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) < 𝐵)))
9994, 97, 98syl2anc 585 . . . . . 6 ((𝜑𝐶 < 𝐴) → (if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵) ↔ (if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ ∧ 𝐴 < if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∧ if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) < 𝐵)))
10092, 99mtbird 325 . . . . 5 ((𝜑𝐶 < 𝐴) → ¬ if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵))
101 nelss 3988 . . . . 5 ((if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐶(,)𝐷) ∧ ¬ if(𝐴𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵)) → ¬ (𝐶(,)𝐷) ⊆ (𝐴(,)𝐵))
10260, 100, 101syl2anc 585 . . . 4 ((𝜑𝐶 < 𝐴) → ¬ (𝐶(,)𝐷) ⊆ (𝐴(,)𝐵))
1034, 102pm2.65da 817 . . 3 (𝜑 → ¬ 𝐶 < 𝐴)
1041, 2, 103nltled 11287 . 2 (𝜑𝐴𝐶)
1053adantr 480 . . . 4 ((𝜑𝐵 < 𝐷) → (𝐶(,)𝐷) ⊆ (𝐴(,)𝐵))
1065adantr 480 . . . . . 6 ((𝜑𝐵 < 𝐷) → 𝐶 ∈ ℝ*)
1078adantr 480 . . . . . 6 ((𝜑𝐵 < 𝐷) → 𝐷 ∈ ℝ*)
10895, 7readdcld 11165 . . . . . . . . 9 (𝜑 → (𝐵 + 𝐷) ∈ ℝ)
109108rehalfcld 12415 . . . . . . . 8 (𝜑 → ((𝐵 + 𝐷) / 2) ∈ ℝ)
110109, 13ifcld 4514 . . . . . . 7 (𝜑 → if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ)
111110adantr 480 . . . . . 6 ((𝜑𝐵 < 𝐷) → if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ)
1122adantr 480 . . . . . . . . 9 ((𝜑𝐶𝐵) → 𝐶 ∈ ℝ)
11313adantr 480 . . . . . . . . 9 ((𝜑𝐶𝐵) → ((𝐶 + 𝐷) / 2) ∈ ℝ)
114110adantr 480 . . . . . . . . 9 ((𝜑𝐶𝐵) → if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ)
1152, 7, 29syl2anc 585 . . . . . . . . . . 11 (𝜑 → (𝐶 < 𝐷𝐶 < ((𝐶 + 𝐷) / 2)))
11625, 115mpbid 232 . . . . . . . . . 10 (𝜑𝐶 < ((𝐶 + 𝐷) / 2))
117116adantr 480 . . . . . . . . 9 ((𝜑𝐶𝐵) → 𝐶 < ((𝐶 + 𝐷) / 2))
11812adantr 480 . . . . . . . . . . 11 ((𝜑𝐶𝐵) → (𝐶 + 𝐷) ∈ ℝ)
119108adantr 480 . . . . . . . . . . 11 ((𝜑𝐶𝐵) → (𝐵 + 𝐷) ∈ ℝ)
12041a1i 11 . . . . . . . . . . 11 ((𝜑𝐶𝐵) → 2 ∈ ℝ+)
12195adantr 480 . . . . . . . . . . . 12 ((𝜑𝐶𝐵) → 𝐵 ∈ ℝ)
1227adantr 480 . . . . . . . . . . . 12 ((𝜑𝐶𝐵) → 𝐷 ∈ ℝ)
123 simpr 484 . . . . . . . . . . . 12 ((𝜑𝐶𝐵) → 𝐶𝐵)
124112, 121, 122, 123leadd1dd 11755 . . . . . . . . . . 11 ((𝜑𝐶𝐵) → (𝐶 + 𝐷) ≤ (𝐵 + 𝐷))
125118, 119, 120, 124lediv1dd 13035 . . . . . . . . . 10 ((𝜑𝐶𝐵) → ((𝐶 + 𝐷) / 2) ≤ ((𝐵 + 𝐷) / 2))
126 iftrue 4473 . . . . . . . . . . 11 (𝐶𝐵 → if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐵 + 𝐷) / 2))
127126adantl 481 . . . . . . . . . 10 ((𝜑𝐶𝐵) → if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐵 + 𝐷) / 2))
128125, 127breqtrrd 5114 . . . . . . . . 9 ((𝜑𝐶𝐵) → ((𝐶 + 𝐷) / 2) ≤ if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
129112, 113, 114, 117, 128ltletrd 11297 . . . . . . . 8 ((𝜑𝐶𝐵) → 𝐶 < if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
130116adantr 480 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝐶𝐵) → 𝐶 < ((𝐶 + 𝐷) / 2))
131 iffalse 4476 . . . . . . . . . . 11 𝐶𝐵 → if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐶 + 𝐷) / 2))
132131eqcomd 2743 . . . . . . . . . 10 𝐶𝐵 → ((𝐶 + 𝐷) / 2) = if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
133132adantl 481 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝐶𝐵) → ((𝐶 + 𝐷) / 2) = if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
134130, 133breqtrd 5112 . . . . . . . 8 ((𝜑 ∧ ¬ 𝐶𝐵) → 𝐶 < if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
135129, 134pm2.61dan 813 . . . . . . 7 (𝜑𝐶 < if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
136135adantr 480 . . . . . 6 ((𝜑𝐵 < 𝐷) → 𝐶 < if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
137126adantl 481 . . . . . . . 8 (((𝜑𝐵 < 𝐷) ∧ 𝐶𝐵) → if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐵 + 𝐷) / 2))
138 simpr 484 . . . . . . . . . 10 ((𝜑𝐵 < 𝐷) → 𝐵 < 𝐷)
13995adantr 480 . . . . . . . . . . 11 ((𝜑𝐵 < 𝐷) → 𝐵 ∈ ℝ)
1407adantr 480 . . . . . . . . . . 11 ((𝜑𝐵 < 𝐷) → 𝐷 ∈ ℝ)
141 avglt2 12407 . . . . . . . . . . 11 ((𝐵 ∈ ℝ ∧ 𝐷 ∈ ℝ) → (𝐵 < 𝐷 ↔ ((𝐵 + 𝐷) / 2) < 𝐷))
142139, 140, 141syl2anc 585 . . . . . . . . . 10 ((𝜑𝐵 < 𝐷) → (𝐵 < 𝐷 ↔ ((𝐵 + 𝐷) / 2) < 𝐷))
143138, 142mpbid 232 . . . . . . . . 9 ((𝜑𝐵 < 𝐷) → ((𝐵 + 𝐷) / 2) < 𝐷)
144143adantr 480 . . . . . . . 8 (((𝜑𝐵 < 𝐷) ∧ 𝐶𝐵) → ((𝐵 + 𝐷) / 2) < 𝐷)
145137, 144eqbrtrd 5108 . . . . . . 7 (((𝜑𝐵 < 𝐷) ∧ 𝐶𝐵) → if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐷)
146131adantl 481 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝐶𝐵) → if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐶 + 𝐷) / 2))
14757adantr 480 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝐶𝐵) → ((𝐶 + 𝐷) / 2) < 𝐷)
148146, 147eqbrtrd 5108 . . . . . . . 8 ((𝜑 ∧ ¬ 𝐶𝐵) → if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐷)
149148adantlr 716 . . . . . . 7 (((𝜑𝐵 < 𝐷) ∧ ¬ 𝐶𝐵) → if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐷)
150145, 149pm2.61dan 813 . . . . . 6 ((𝜑𝐵 < 𝐷) → if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐷)
151106, 107, 111, 136, 150eliood 45946 . . . . 5 ((𝜑𝐵 < 𝐷) → if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐶(,)𝐷))
152109adantr 480 . . . . . . . . . . . 12 ((𝜑𝐵 < 𝐷) → ((𝐵 + 𝐷) / 2) ∈ ℝ)
153 avglt1 12406 . . . . . . . . . . . . . 14 ((𝐵 ∈ ℝ ∧ 𝐷 ∈ ℝ) → (𝐵 < 𝐷𝐵 < ((𝐵 + 𝐷) / 2)))
154139, 140, 153syl2anc 585 . . . . . . . . . . . . 13 ((𝜑𝐵 < 𝐷) → (𝐵 < 𝐷𝐵 < ((𝐵 + 𝐷) / 2)))
155138, 154mpbid 232 . . . . . . . . . . . 12 ((𝜑𝐵 < 𝐷) → 𝐵 < ((𝐵 + 𝐷) / 2))
156139, 152, 155ltled 11285 . . . . . . . . . . 11 ((𝜑𝐵 < 𝐷) → 𝐵 ≤ ((𝐵 + 𝐷) / 2))
157156adantr 480 . . . . . . . . . 10 (((𝜑𝐵 < 𝐷) ∧ 𝐶𝐵) → 𝐵 ≤ ((𝐵 + 𝐷) / 2))
158157, 137breqtrrd 5114 . . . . . . . . 9 (((𝜑𝐵 < 𝐷) ∧ 𝐶𝐵) → 𝐵 ≤ if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
15995adantr 480 . . . . . . . . . . . 12 ((𝜑 ∧ ¬ 𝐶𝐵) → 𝐵 ∈ ℝ)
16013adantr 480 . . . . . . . . . . . 12 ((𝜑 ∧ ¬ 𝐶𝐵) → ((𝐶 + 𝐷) / 2) ∈ ℝ)
1612adantr 480 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ 𝐶𝐵) → 𝐶 ∈ ℝ)
162 simpr 484 . . . . . . . . . . . . . 14 ((𝜑 ∧ ¬ 𝐶𝐵) → ¬ 𝐶𝐵)
163159, 161ltnled 11284 . . . . . . . . . . . . . 14 ((𝜑 ∧ ¬ 𝐶𝐵) → (𝐵 < 𝐶 ↔ ¬ 𝐶𝐵))
164162, 163mpbird 257 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ 𝐶𝐵) → 𝐵 < 𝐶)
165159, 161, 160, 164, 130lttrd 11298 . . . . . . . . . . . 12 ((𝜑 ∧ ¬ 𝐶𝐵) → 𝐵 < ((𝐶 + 𝐷) / 2))
166159, 160, 165ltled 11285 . . . . . . . . . . 11 ((𝜑 ∧ ¬ 𝐶𝐵) → 𝐵 ≤ ((𝐶 + 𝐷) / 2))
167166, 133breqtrd 5112 . . . . . . . . . 10 ((𝜑 ∧ ¬ 𝐶𝐵) → 𝐵 ≤ if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
168167adantlr 716 . . . . . . . . 9 (((𝜑𝐵 < 𝐷) ∧ ¬ 𝐶𝐵) → 𝐵 ≤ if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
169158, 168pm2.61dan 813 . . . . . . . 8 ((𝜑𝐵 < 𝐷) → 𝐵 ≤ if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
170139, 111, 169lensymd 11288 . . . . . . 7 ((𝜑𝐵 < 𝐷) → ¬ if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐵)
171170intn3an3d 1484 . . . . . 6 ((𝜑𝐵 < 𝐷) → ¬ (if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ ∧ 𝐴 < if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∧ if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐵))
17293adantr 480 . . . . . . 7 ((𝜑𝐵 < 𝐷) → 𝐴 ∈ ℝ*)
17396adantr 480 . . . . . . 7 ((𝜑𝐵 < 𝐷) → 𝐵 ∈ ℝ*)
174 elioo2 13330 . . . . . . 7 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → (if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵) ↔ (if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ ∧ 𝐴 < if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∧ if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐵)))
175172, 173, 174syl2anc 585 . . . . . 6 ((𝜑𝐵 < 𝐷) → (if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵) ↔ (if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ ∧ 𝐴 < if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∧ if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐵)))
176171, 175mtbird 325 . . . . 5 ((𝜑𝐵 < 𝐷) → ¬ if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵))
177 nelss 3988 . . . . 5 ((if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐶(,)𝐷) ∧ ¬ if(𝐶𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵)) → ¬ (𝐶(,)𝐷) ⊆ (𝐴(,)𝐵))
178151, 176, 177syl2anc 585 . . . 4 ((𝜑𝐵 < 𝐷) → ¬ (𝐶(,)𝐷) ⊆ (𝐴(,)𝐵))
179105, 178pm2.65da 817 . . 3 (𝜑 → ¬ 𝐵 < 𝐷)
1807, 95, 179nltled 11287 . 2 (𝜑𝐷𝐵)
181104, 180jca 511 1 (𝜑 → (𝐴𝐶𝐷𝐵))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  w3a 1087   = wceq 1542  wcel 2114  wss 3890  ifcif 4467   class class class wbr 5086  (class class class)co 7360  cr 11028   + caddc 11032  *cxr 11169   < clt 11170  cle 11171   / cdiv 11798  2c2 12227  +crp 12933  (,)cioo 13289
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-sep 5231  ax-nul 5241  ax-pow 5302  ax-pr 5370  ax-un 7682  ax-cnex 11085  ax-resscn 11086  ax-1cn 11087  ax-icn 11088  ax-addcl 11089  ax-addrcl 11090  ax-mulcl 11091  ax-mulrcl 11092  ax-mulcom 11093  ax-addass 11094  ax-mulass 11095  ax-distr 11096  ax-i2m1 11097  ax-1ne0 11098  ax-1rid 11099  ax-rnegex 11100  ax-rrecex 11101  ax-cnre 11102  ax-pre-lttri 11103  ax-pre-lttrn 11104  ax-pre-ltadd 11105  ax-pre-mulgt0 11106
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-riota 7317  df-ov 7363  df-oprab 7364  df-mpo 7365  df-om 7811  df-1st 7935  df-2nd 7936  df-frecs 8224  df-wrecs 8255  df-recs 8304  df-rdg 8342  df-er 8636  df-en 8887  df-dom 8888  df-sdom 8889  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371  df-div 11799  df-nn 12166  df-2 12235  df-rp 12934  df-ioo 13293
This theorem is referenced by:  fourierdlem32  46585  fourierdlem33  46586  fourierdlem46  46598  fourierdlem50  46602  fourierdlem72  46624  fourierdlem76  46628  fourierdlem89  46641  fourierdlem91  46643  fourierdlem103  46655  fourierdlem104  46656
  Copyright terms: Public domain W3C validator