fourierdlem10 - Mathbox for Glauco Siliprandi

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

Theorem fourierdlem10 43658

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**
Step	Hyp	Ref	Expression
1		fourierdlem10.1	. . 3 ⊢ (𝜑 → 𝐴 ∈ ℝ)
2		fourierdlem10.3	. . 3 ⊢ (𝜑 → 𝐶 ∈ ℝ)
3		fourierdlem10.6	. . . . 5 ⊢ (𝜑 → (𝐶(,)𝐷) ⊆ (𝐴(,)𝐵))
4	3	adantr 481	. . . 4 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → (𝐶(,)𝐷) ⊆ (𝐴(,)𝐵))
5	2	rexrd 11025	. . . . . . 7 ⊢ (𝜑 → 𝐶 ∈ ℝ^*)
6	5	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → 𝐶 ∈ ℝ^*)
7		fourierdlem10.4	. . . . . . . 8 ⊢ (𝜑 → 𝐷 ∈ ℝ)
8	7	rexrd 11025	. . . . . . 7 ⊢ (𝜑 → 𝐷 ∈ ℝ^*)
9	8	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → 𝐷 ∈ ℝ^*)
10	2, 1	readdcld 11004	. . . . . . . . 9 ⊢ (𝜑 → (𝐶 + 𝐴) ∈ ℝ)
11	10	rehalfcld 12220	. . . . . . . 8 ⊢ (𝜑 → ((𝐶 + 𝐴) / 2) ∈ ℝ)
12	2, 7	readdcld 11004	. . . . . . . . 9 ⊢ (𝜑 → (𝐶 + 𝐷) ∈ ℝ)
13	12	rehalfcld 12220	. . . . . . . 8 ⊢ (𝜑 → ((𝐶 + 𝐷) / 2) ∈ ℝ)
14	11, 13	ifcld 4505	. . . . . . 7 ⊢ (𝜑 → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ)
15	14	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ)
16		simplr 766	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝐶 < 𝐴) ∧ 𝐴 ≤ 𝐷) → 𝐶 < 𝐴)
17	2	ad2antrr 723	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝐶 < 𝐴) ∧ 𝐴 ≤ 𝐷) → 𝐶 ∈ ℝ)
18	1	ad2antrr 723	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝐶 < 𝐴) ∧ 𝐴 ≤ 𝐷) → 𝐴 ∈ ℝ)
19		avglt1 12211	. . . . . . . . . 10 ⊢ ((𝐶 ∈ ℝ ∧ 𝐴 ∈ ℝ) → (𝐶 < 𝐴 ↔ 𝐶 < ((𝐶 + 𝐴) / 2)))
20	17, 18, 19	syl2anc 584	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝐶 < 𝐴) ∧ 𝐴 ≤ 𝐷) → (𝐶 < 𝐴 ↔ 𝐶 < ((𝐶 + 𝐴) / 2)))
21	16, 20	mpbid 231	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐶 < 𝐴) ∧ 𝐴 ≤ 𝐷) → 𝐶 < ((𝐶 + 𝐴) / 2))
22		iftrue 4465	. . . . . . . . 9 ⊢ (𝐴 ≤ 𝐷 → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐶 + 𝐴) / 2))
23	22	adantl 482	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐶 < 𝐴) ∧ 𝐴 ≤ 𝐷) → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐶 + 𝐴) / 2))
24	21, 23	breqtrrd 5102	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐶 < 𝐴) ∧ 𝐴 ≤ 𝐷) → 𝐶 < if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)))
25		fourierdlem10.5	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐶 < 𝐷)
26	25	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → 𝐶 < 𝐷)
27	2	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → 𝐶 ∈ ℝ)
28	7	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → 𝐷 ∈ ℝ)
29		avglt1 12211	. . . . . . . . . . 11 ⊢ ((𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ) → (𝐶 < 𝐷 ↔ 𝐶 < ((𝐶 + 𝐷) / 2)))
30	27, 28, 29	syl2anc 584	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → (𝐶 < 𝐷 ↔ 𝐶 < ((𝐶 + 𝐷) / 2)))
31	26, 30	mpbid 231	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → 𝐶 < ((𝐶 + 𝐷) / 2))
32		iffalse 4468	. . . . . . . . . . 11 ⊢ (¬ 𝐴 ≤ 𝐷 → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐶 + 𝐷) / 2))
33	32	eqcomd 2744	. . . . . . . . . 10 ⊢ (¬ 𝐴 ≤ 𝐷 → ((𝐶 + 𝐷) / 2) = if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)))
34	33	adantl 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → ((𝐶 + 𝐷) / 2) = if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)))
35	31, 34	breqtrd 5100	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → 𝐶 < if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)))
36	35	adantlr 712	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐶 < 𝐴) ∧ ¬ 𝐴 ≤ 𝐷) → 𝐶 < if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)))
37	24, 36	pm2.61dan 810	. . . . . 6 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → 𝐶 < if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)))
38	22	adantl 482	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐷) → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐶 + 𝐴) / 2))
39	10	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐷) → (𝐶 + 𝐴) ∈ ℝ)
40	12	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐷) → (𝐶 + 𝐷) ∈ ℝ)
41		2rp 12735	. . . . . . . . . . . 12 ⊢ 2 ∈ ℝ⁺
42	41	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐷) → 2 ∈ ℝ⁺)
43	1	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐷) → 𝐴 ∈ ℝ)
44	7	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐷) → 𝐷 ∈ ℝ)
45	2	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐷) → 𝐶 ∈ ℝ)
46		simpr 485	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐷) → 𝐴 ≤ 𝐷)
47	43, 44, 45, 46	leadd2dd 11590	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐷) → (𝐶 + 𝐴) ≤ (𝐶 + 𝐷))
48	39, 40, 42, 47	lediv1dd 12830	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐷) → ((𝐶 + 𝐴) / 2) ≤ ((𝐶 + 𝐷) / 2))
49	38, 48	eqbrtrd 5096	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐷) → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ≤ ((𝐶 + 𝐷) / 2))
50	32	adantl 482	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐶 + 𝐷) / 2))
51	13	leidd 11541	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝐶 + 𝐷) / 2) ≤ ((𝐶 + 𝐷) / 2))
52	51	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → ((𝐶 + 𝐷) / 2) ≤ ((𝐶 + 𝐷) / 2))
53	50, 52	eqbrtrd 5096	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ≤ ((𝐶 + 𝐷) / 2))
54	49, 53	pm2.61dan 810	. . . . . . . 8 ⊢ (𝜑 → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ≤ ((𝐶 + 𝐷) / 2))
55		avglt2 12212	. . . . . . . . . 10 ⊢ ((𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ) → (𝐶 < 𝐷 ↔ ((𝐶 + 𝐷) / 2) < 𝐷))
56	2, 7, 55	syl2anc 584	. . . . . . . . 9 ⊢ (𝜑 → (𝐶 < 𝐷 ↔ ((𝐶 + 𝐷) / 2) < 𝐷))
57	25, 56	mpbid 231	. . . . . . . 8 ⊢ (𝜑 → ((𝐶 + 𝐷) / 2) < 𝐷)
58	14, 13, 7, 54, 57	lelttrd 11133	. . . . . . 7 ⊢ (𝜑 → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) < 𝐷)
59	58	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) < 𝐷)
60	6, 9, 15, 37, 59	eliood 43036	. . . . 5 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐶(,)𝐷))
61	1	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → 𝐴 ∈ ℝ)
62	11	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → ((𝐶 + 𝐴) / 2) ∈ ℝ)
63	14	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐷) → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ)
64	63, 38	eqled 11078	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐷) → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ≤ ((𝐶 + 𝐴) / 2))
65	14	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ)
66	11	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → ((𝐶 + 𝐴) / 2) ∈ ℝ)
67		simpr 485	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → ¬ 𝐴 ≤ 𝐷)
68	1	adantr 481	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → 𝐴 ∈ ℝ)
69	28, 68	ltnled 11122	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → (𝐷 < 𝐴 ↔ ¬ 𝐴 ≤ 𝐷))
70	67, 69	mpbird 256	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → 𝐷 < 𝐴)
71	12	adantr 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝐷 < 𝐴) → (𝐶 + 𝐷) ∈ ℝ)
72	10	adantr 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝐷 < 𝐴) → (𝐶 + 𝐴) ∈ ℝ)
73	41	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝐷 < 𝐴) → 2 ∈ ℝ⁺)
74	7	adantr 481	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝐷 < 𝐴) → 𝐷 ∈ ℝ)
75	1	adantr 481	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝐷 < 𝐴) → 𝐴 ∈ ℝ)
76	2	adantr 481	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝐷 < 𝐴) → 𝐶 ∈ ℝ)
77		simpr 485	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝐷 < 𝐴) → 𝐷 < 𝐴)
78	74, 75, 76, 77	ltadd2dd 11134	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝐷 < 𝐴) → (𝐶 + 𝐷) < (𝐶 + 𝐴))
79	71, 72, 73, 78	ltdiv1dd 12829	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝐷 < 𝐴) → ((𝐶 + 𝐷) / 2) < ((𝐶 + 𝐴) / 2))
80	70, 79	syldan 591	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → ((𝐶 + 𝐷) / 2) < ((𝐶 + 𝐴) / 2))
81	50, 80	eqbrtrd 5096	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) < ((𝐶 + 𝐴) / 2))
82	65, 66, 81	ltled 11123	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐷) → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ≤ ((𝐶 + 𝐴) / 2))
83	64, 82	pm2.61dan 810	. . . . . . . . . 10 ⊢ (𝜑 → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ≤ ((𝐶 + 𝐴) / 2))
84	83	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ≤ ((𝐶 + 𝐴) / 2))
85		simpr 485	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → 𝐶 < 𝐴)
86	2	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → 𝐶 ∈ ℝ)
87		avglt2 12212	. . . . . . . . . . 11 ⊢ ((𝐶 ∈ ℝ ∧ 𝐴 ∈ ℝ) → (𝐶 < 𝐴 ↔ ((𝐶 + 𝐴) / 2) < 𝐴))
88	86, 61, 87	syl2anc 584	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → (𝐶 < 𝐴 ↔ ((𝐶 + 𝐴) / 2) < 𝐴))
89	85, 88	mpbid 231	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → ((𝐶 + 𝐴) / 2) < 𝐴)
90	15, 62, 61, 84, 89	lelttrd 11133	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) < 𝐴)
91	15, 61, 90	ltnsymd 11124	. . . . . . 7 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → ¬ 𝐴 < if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)))
92	91	intn3an2d 1479	. . . . . 6 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → ¬ (if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ ∧ 𝐴 < if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∧ if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) < 𝐵))
93	1	rexrd 11025	. . . . . . . 8 ⊢ (𝜑 → 𝐴 ∈ ℝ^*)
94	93	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → 𝐴 ∈ ℝ^*)
95		fourierdlem10.2	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ∈ ℝ)
96	95	rexrd 11025	. . . . . . . 8 ⊢ (𝜑 → 𝐵 ∈ ℝ^*)
97	96	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → 𝐵 ∈ ℝ^*)
98		elioo2 13120	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → (if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵) ↔ (if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ ∧ 𝐴 < if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∧ if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) < 𝐵)))
99	94, 97, 98	syl2anc 584	. . . . . 6 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → (if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵) ↔ (if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ ∧ 𝐴 < if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∧ if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) < 𝐵)))
100	92, 99	mtbird 325	. . . . 5 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → ¬ if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵))
101		nelss 3984	. . . . 5 ⊢ ((if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐶(,)𝐷) ∧ ¬ if(𝐴 ≤ 𝐷, ((𝐶 + 𝐴) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵)) → ¬ (𝐶(,)𝐷) ⊆ (𝐴(,)𝐵))
102	60, 100, 101	syl2anc 584	. . . 4 ⊢ ((𝜑 ∧ 𝐶 < 𝐴) → ¬ (𝐶(,)𝐷) ⊆ (𝐴(,)𝐵))
103	4, 102	pm2.65da 814	. . 3 ⊢ (𝜑 → ¬ 𝐶 < 𝐴)
104	1, 2, 103	nltled 11125	. 2 ⊢ (𝜑 → 𝐴 ≤ 𝐶)
105	3	adantr 481	. . . 4 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → (𝐶(,)𝐷) ⊆ (𝐴(,)𝐵))
106	5	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → 𝐶 ∈ ℝ^*)
107	8	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → 𝐷 ∈ ℝ^*)
108	95, 7	readdcld 11004	. . . . . . . . 9 ⊢ (𝜑 → (𝐵 + 𝐷) ∈ ℝ)
109	108	rehalfcld 12220	. . . . . . . 8 ⊢ (𝜑 → ((𝐵 + 𝐷) / 2) ∈ ℝ)
110	109, 13	ifcld 4505	. . . . . . 7 ⊢ (𝜑 → if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ)
111	110	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ)
112	2	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝐶 ≤ 𝐵) → 𝐶 ∈ ℝ)
113	13	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝐶 ≤ 𝐵) → ((𝐶 + 𝐷) / 2) ∈ ℝ)
114	110	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝐶 ≤ 𝐵) → if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ)
115	2, 7, 29	syl2anc 584	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐶 < 𝐷 ↔ 𝐶 < ((𝐶 + 𝐷) / 2)))
116	25, 115	mpbid 231	. . . . . . . . . 10 ⊢ (𝜑 → 𝐶 < ((𝐶 + 𝐷) / 2))
117	116	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝐶 ≤ 𝐵) → 𝐶 < ((𝐶 + 𝐷) / 2))
118	12	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐶 ≤ 𝐵) → (𝐶 + 𝐷) ∈ ℝ)
119	108	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐶 ≤ 𝐵) → (𝐵 + 𝐷) ∈ ℝ)
120	41	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐶 ≤ 𝐵) → 2 ∈ ℝ⁺)
121	95	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝐶 ≤ 𝐵) → 𝐵 ∈ ℝ)
122	7	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝐶 ≤ 𝐵) → 𝐷 ∈ ℝ)
123		simpr 485	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝐶 ≤ 𝐵) → 𝐶 ≤ 𝐵)
124	112, 121, 122, 123	leadd1dd 11589	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐶 ≤ 𝐵) → (𝐶 + 𝐷) ≤ (𝐵 + 𝐷))
125	118, 119, 120, 124	lediv1dd 12830	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝐶 ≤ 𝐵) → ((𝐶 + 𝐷) / 2) ≤ ((𝐵 + 𝐷) / 2))
126		iftrue 4465	. . . . . . . . . . 11 ⊢ (𝐶 ≤ 𝐵 → if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐵 + 𝐷) / 2))
127	126	adantl 482	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝐶 ≤ 𝐵) → if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐵 + 𝐷) / 2))
128	125, 127	breqtrrd 5102	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝐶 ≤ 𝐵) → ((𝐶 + 𝐷) / 2) ≤ if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
129	112, 113, 114, 117, 128	ltletrd 11135	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝐶 ≤ 𝐵) → 𝐶 < if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
130	116	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝐶 ≤ 𝐵) → 𝐶 < ((𝐶 + 𝐷) / 2))
131		iffalse 4468	. . . . . . . . . . 11 ⊢ (¬ 𝐶 ≤ 𝐵 → if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐶 + 𝐷) / 2))
132	131	eqcomd 2744	. . . . . . . . . 10 ⊢ (¬ 𝐶 ≤ 𝐵 → ((𝐶 + 𝐷) / 2) = if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
133	132	adantl 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝐶 ≤ 𝐵) → ((𝐶 + 𝐷) / 2) = if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
134	130, 133	breqtrd 5100	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ 𝐶 ≤ 𝐵) → 𝐶 < if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
135	129, 134	pm2.61dan 810	. . . . . . 7 ⊢ (𝜑 → 𝐶 < if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
136	135	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → 𝐶 < if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
137	126	adantl 482	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐵 < 𝐷) ∧ 𝐶 ≤ 𝐵) → if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐵 + 𝐷) / 2))
138		simpr 485	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → 𝐵 < 𝐷)
139	95	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → 𝐵 ∈ ℝ)
140	7	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → 𝐷 ∈ ℝ)
141		avglt2 12212	. . . . . . . . . . 11 ⊢ ((𝐵 ∈ ℝ ∧ 𝐷 ∈ ℝ) → (𝐵 < 𝐷 ↔ ((𝐵 + 𝐷) / 2) < 𝐷))
142	139, 140, 141	syl2anc 584	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → (𝐵 < 𝐷 ↔ ((𝐵 + 𝐷) / 2) < 𝐷))
143	138, 142	mpbid 231	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → ((𝐵 + 𝐷) / 2) < 𝐷)
144	143	adantr 481	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐵 < 𝐷) ∧ 𝐶 ≤ 𝐵) → ((𝐵 + 𝐷) / 2) < 𝐷)
145	137, 144	eqbrtrd 5096	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐵 < 𝐷) ∧ 𝐶 ≤ 𝐵) → if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐷)
146	131	adantl 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝐶 ≤ 𝐵) → if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) = ((𝐶 + 𝐷) / 2))
147	57	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝐶 ≤ 𝐵) → ((𝐶 + 𝐷) / 2) < 𝐷)
148	146, 147	eqbrtrd 5096	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ 𝐶 ≤ 𝐵) → if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐷)
149	148	adantlr 712	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐵 < 𝐷) ∧ ¬ 𝐶 ≤ 𝐵) → if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐷)
150	145, 149	pm2.61dan 810	. . . . . 6 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐷)
151	106, 107, 111, 136, 150	eliood 43036	. . . . 5 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐶(,)𝐷))
152	109	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → ((𝐵 + 𝐷) / 2) ∈ ℝ)
153		avglt1 12211	. . . . . . . . . . . . . 14 ⊢ ((𝐵 ∈ ℝ ∧ 𝐷 ∈ ℝ) → (𝐵 < 𝐷 ↔ 𝐵 < ((𝐵 + 𝐷) / 2)))
154	139, 140, 153	syl2anc 584	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → (𝐵 < 𝐷 ↔ 𝐵 < ((𝐵 + 𝐷) / 2)))
155	138, 154	mpbid 231	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → 𝐵 < ((𝐵 + 𝐷) / 2))
156	139, 152, 155	ltled 11123	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → 𝐵 ≤ ((𝐵 + 𝐷) / 2))
157	156	adantr 481	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝐵 < 𝐷) ∧ 𝐶 ≤ 𝐵) → 𝐵 ≤ ((𝐵 + 𝐷) / 2))
158	157, 137	breqtrrd 5102	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝐵 < 𝐷) ∧ 𝐶 ≤ 𝐵) → 𝐵 ≤ if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
159	95	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ¬ 𝐶 ≤ 𝐵) → 𝐵 ∈ ℝ)
160	13	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ¬ 𝐶 ≤ 𝐵) → ((𝐶 + 𝐷) / 2) ∈ ℝ)
161	2	adantr 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ¬ 𝐶 ≤ 𝐵) → 𝐶 ∈ ℝ)
162		simpr 485	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ¬ 𝐶 ≤ 𝐵) → ¬ 𝐶 ≤ 𝐵)
163	159, 161	ltnled 11122	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ¬ 𝐶 ≤ 𝐵) → (𝐵 < 𝐶 ↔ ¬ 𝐶 ≤ 𝐵))
164	162, 163	mpbird 256	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ¬ 𝐶 ≤ 𝐵) → 𝐵 < 𝐶)
165	159, 161, 160, 164, 130	lttrd 11136	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ¬ 𝐶 ≤ 𝐵) → 𝐵 < ((𝐶 + 𝐷) / 2))
166	159, 160, 165	ltled 11123	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝐶 ≤ 𝐵) → 𝐵 ≤ ((𝐶 + 𝐷) / 2))
167	166, 133	breqtrd 5100	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝐶 ≤ 𝐵) → 𝐵 ≤ if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
168	167	adantlr 712	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝐵 < 𝐷) ∧ ¬ 𝐶 ≤ 𝐵) → 𝐵 ≤ if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
169	158, 168	pm2.61dan 810	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → 𝐵 ≤ if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)))
170	139, 111, 169	lensymd 11126	. . . . . . 7 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → ¬ if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐵)
171	170	intn3an3d 1480	. . . . . 6 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → ¬ (if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ ∧ 𝐴 < if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∧ if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐵))
172	93	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → 𝐴 ∈ ℝ^*)
173	96	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → 𝐵 ∈ ℝ^*)
174		elioo2 13120	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → (if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵) ↔ (if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ ∧ 𝐴 < if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∧ if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐵)))
175	172, 173, 174	syl2anc 584	. . . . . 6 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → (if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵) ↔ (if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ ℝ ∧ 𝐴 < if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∧ if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) < 𝐵)))
176	171, 175	mtbird 325	. . . . 5 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → ¬ if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵))
177		nelss 3984	. . . . 5 ⊢ ((if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐶(,)𝐷) ∧ ¬ if(𝐶 ≤ 𝐵, ((𝐵 + 𝐷) / 2), ((𝐶 + 𝐷) / 2)) ∈ (𝐴(,)𝐵)) → ¬ (𝐶(,)𝐷) ⊆ (𝐴(,)𝐵))
178	151, 176, 177	syl2anc 584	. . . 4 ⊢ ((𝜑 ∧ 𝐵 < 𝐷) → ¬ (𝐶(,)𝐷) ⊆ (𝐴(,)𝐵))
179	105, 178	pm2.65da 814	. . 3 ⊢ (𝜑 → ¬ 𝐵 < 𝐷)
180	7, 95, 179	nltled 11125	. 2 ⊢ (𝜑 → 𝐷 ≤ 𝐵)
181	104, 180	jca 512	1 ⊢ (𝜑 → (𝐴 ≤ 𝐶 ∧ 𝐷 ≤ 𝐵))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 396 ∧ w3a 1086 = wceq 1539 ∈ wcel 2106 ⊆ wss 3887 ifcif 4459 class class class wbr 5074 (class class class)co 7275 ℝcr 10870 + caddc 10874 ℝ^*cxr 11008 < clt 11009 ≤ cle 11010 / cdiv 11632 2c2 12028 ℝ⁺crp 12730 (,)cioo 13079

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1913 ax-6 1971 ax-7 2011 ax-8 2108 ax-9 2116 ax-10 2137 ax-11 2154 ax-12 2171 ax-ext 2709 ax-sep 5223 ax-nul 5230 ax-pow 5288 ax-pr 5352 ax-un 7588 ax-cnex 10927 ax-resscn 10928 ax-1cn 10929 ax-icn 10930 ax-addcl 10931 ax-addrcl 10932 ax-mulcl 10933 ax-mulrcl 10934 ax-mulcom 10935 ax-addass 10936 ax-mulass 10937 ax-distr 10938 ax-i2m1 10939 ax-1ne0 10940 ax-1rid 10941 ax-rnegex 10942 ax-rrecex 10943 ax-cnre 10944 ax-pre-lttri 10945 ax-pre-lttrn 10946 ax-pre-ltadd 10947 ax-pre-mulgt0 10948

This theorem depends on definitions: df-bi 206 df-an 397 df-or 845 df-3or 1087 df-3an 1088 df-tru 1542 df-fal 1552 df-ex 1783 df-nf 1787 df-sb 2068 df-mo 2540 df-eu 2569 df-clab 2716 df-cleq 2730 df-clel 2816 df-nfc 2889 df-ne 2944 df-nel 3050 df-ral 3069 df-rex 3070 df-rmo 3071 df-reu 3072 df-rab 3073 df-v 3434 df-sbc 3717 df-csb 3833 df-dif 3890 df-un 3892 df-in 3894 df-ss 3904 df-nul 4257 df-if 4460 df-pw 4535 df-sn 4562 df-pr 4564 df-op 4568 df-uni 4840 df-iun 4926 df-br 5075 df-opab 5137 df-mpt 5158 df-id 5489 df-po 5503 df-so 5504 df-xp 5595 df-rel 5596 df-cnv 5597 df-co 5598 df-dm 5599 df-rn 5600 df-res 5601 df-ima 5602 df-iota 6391 df-fun 6435 df-fn 6436 df-f 6437 df-f1 6438 df-fo 6439 df-f1o 6440 df-fv 6441 df-riota 7232 df-ov 7278 df-oprab 7279 df-mpo 7280 df-1st 7831 df-2nd 7832 df-er 8498 df-en 8734 df-dom 8735 df-sdom 8736 df-pnf 11011 df-mnf 11012 df-xr 11013 df-ltxr 11014 df-le 11015 df-sub 11207 df-neg 11208 df-div 11633 df-2 12036 df-rp 12731 df-ioo 13083

This theorem is referenced by: fourierdlem32 43680 fourierdlem33 43681 fourierdlem46 43693 fourierdlem50 43697 fourierdlem72 43719 fourierdlem76 43723 fourierdlem89 43736 fourierdlem91 43738 fourierdlem103 43750 fourierdlem104 43751

W3C validator