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

Theorem stoweidlem43 42322
Description: This lemma is used to prove the existence of a function pt as in Lemma 1 of [BrosowskiDeutsh] p. 90 (at the beginning of Lemma 1): for all t in T - U, there exists a function pt in the subalgebra, such that pt( t0 ) = 0 , pt ( t ) > 0, and 0 <= pt <= 1. Hera Z is used for t0 , S is used for t e. T - U , h is used for pt. (Contributed by Glauco Siliprandi, 20-Apr-2017.)
Hypotheses
Ref Expression
stoweidlem43.1 𝑔𝜑
stoweidlem43.2 𝑡𝜑
stoweidlem43.3 𝑄
stoweidlem43.4 𝐾 = (topGen‘ran (,))
stoweidlem43.5 𝑄 = {𝐴 ∣ ((𝑍) = 0 ∧ ∀𝑡𝑇 (0 ≤ (𝑡) ∧ (𝑡) ≤ 1))}
stoweidlem43.6 𝑇 = 𝐽
stoweidlem43.7 (𝜑𝐽 ∈ Comp)
stoweidlem43.8 (𝜑𝐴 ⊆ (𝐽 Cn 𝐾))
stoweidlem43.9 ((𝜑𝑓𝐴𝑙𝐴) → (𝑡𝑇 ↦ ((𝑓𝑡) + (𝑙𝑡))) ∈ 𝐴)
stoweidlem43.10 ((𝜑𝑓𝐴𝑙𝐴) → (𝑡𝑇 ↦ ((𝑓𝑡) · (𝑙𝑡))) ∈ 𝐴)
stoweidlem43.11 ((𝜑𝑥 ∈ ℝ) → (𝑡𝑇𝑥) ∈ 𝐴)
stoweidlem43.12 ((𝜑 ∧ (𝑟𝑇𝑡𝑇𝑟𝑡)) → ∃𝑔𝐴 (𝑔𝑟) ≠ (𝑔𝑡))
stoweidlem43.13 (𝜑𝑈𝐽)
stoweidlem43.14 (𝜑𝑍𝑈)
stoweidlem43.15 (𝜑𝑆 ∈ (𝑇𝑈))
Assertion
Ref Expression
stoweidlem43 (𝜑 → ∃(𝑄 ∧ 0 < (𝑆)))
Distinct variable groups:   𝑓,𝑔,𝑙,𝑡,𝐴   𝑓,,𝑇,𝑡   𝑇,𝑙   𝑓,𝑟,𝑔,𝑡,𝐴   𝑥,𝑓,𝑔,𝑡,𝐴   𝑄,𝑓   𝑆,𝑓,𝑔,𝑙,𝑡   𝑓,𝑍,𝑔,𝑙,𝑡   𝜑,𝑓,𝑙   𝐴,   𝑆,   ,𝑍   𝑇,𝑟   𝑆,𝑟   𝜑,𝑟   𝑥,𝑇   𝑥,𝑆   𝑥,𝑍   𝜑,𝑥
Allowed substitution hints:   𝜑(𝑡,𝑔,)   𝑄(𝑥,𝑡,𝑔,,𝑟,𝑙)   𝑇(𝑔)   𝑈(𝑥,𝑡,𝑓,𝑔,,𝑟,𝑙)   𝐽(𝑥,𝑡,𝑓,𝑔,,𝑟,𝑙)   𝐾(𝑥,𝑡,𝑓,𝑔,,𝑟,𝑙)   𝑍(𝑟)

Proof of Theorem stoweidlem43
Dummy variables 𝑠 𝑘 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 stoweidlem43.1 . . 3 𝑔𝜑
2 nfv 1911 . . 3 𝑔𝑓(𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0)
3 stoweidlem43.15 . . . . . 6 (𝜑𝑆 ∈ (𝑇𝑈))
43eldifad 3947 . . . . 5 (𝜑𝑆𝑇)
5 stoweidlem43.14 . . . . . . 7 (𝜑𝑍𝑈)
6 stoweidlem43.13 . . . . . . 7 (𝜑𝑈𝐽)
7 elunii 4836 . . . . . . 7 ((𝑍𝑈𝑈𝐽) → 𝑍 𝐽)
85, 6, 7syl2anc 586 . . . . . 6 (𝜑𝑍 𝐽)
9 stoweidlem43.6 . . . . . 6 𝑇 = 𝐽
108, 9eleqtrrdi 2924 . . . . 5 (𝜑𝑍𝑇)
113eldifbd 3948 . . . . . . 7 (𝜑 → ¬ 𝑆𝑈)
12 nelne2 3115 . . . . . . 7 ((𝑍𝑈 ∧ ¬ 𝑆𝑈) → 𝑍𝑆)
135, 11, 12syl2anc 586 . . . . . 6 (𝜑𝑍𝑆)
1413necomd 3071 . . . . 5 (𝜑𝑆𝑍)
154, 10, 143jca 1124 . . . 4 (𝜑 → (𝑆𝑇𝑍𝑇𝑆𝑍))
16 simpr2 1191 . . . . . 6 ((𝜑 ∧ (𝑆𝑇𝑍𝑇𝑆𝑍)) → 𝑍𝑇)
17 stoweidlem43.2 . . . . . . . . 9 𝑡𝜑
18 nfv 1911 . . . . . . . . 9 𝑡(𝑆𝑇𝑍𝑇𝑆𝑍)
1917, 18nfan 1896 . . . . . . . 8 𝑡(𝜑 ∧ (𝑆𝑇𝑍𝑇𝑆𝑍))
20 nfv 1911 . . . . . . . 8 𝑡𝑔𝐴 (𝑔𝑆) ≠ (𝑔𝑍)
2119, 20nfim 1893 . . . . . . 7 𝑡((𝜑 ∧ (𝑆𝑇𝑍𝑇𝑆𝑍)) → ∃𝑔𝐴 (𝑔𝑆) ≠ (𝑔𝑍))
22 eleq1 2900 . . . . . . . . . 10 (𝑡 = 𝑍 → (𝑡𝑇𝑍𝑇))
23 neeq2 3079 . . . . . . . . . 10 (𝑡 = 𝑍 → (𝑆𝑡𝑆𝑍))
2422, 233anbi23d 1435 . . . . . . . . 9 (𝑡 = 𝑍 → ((𝑆𝑇𝑡𝑇𝑆𝑡) ↔ (𝑆𝑇𝑍𝑇𝑆𝑍)))
2524anbi2d 630 . . . . . . . 8 (𝑡 = 𝑍 → ((𝜑 ∧ (𝑆𝑇𝑡𝑇𝑆𝑡)) ↔ (𝜑 ∧ (𝑆𝑇𝑍𝑇𝑆𝑍))))
26 fveq2 6664 . . . . . . . . . 10 (𝑡 = 𝑍 → (𝑔𝑡) = (𝑔𝑍))
2726neeq2d 3076 . . . . . . . . 9 (𝑡 = 𝑍 → ((𝑔𝑆) ≠ (𝑔𝑡) ↔ (𝑔𝑆) ≠ (𝑔𝑍)))
2827rexbidv 3297 . . . . . . . 8 (𝑡 = 𝑍 → (∃𝑔𝐴 (𝑔𝑆) ≠ (𝑔𝑡) ↔ ∃𝑔𝐴 (𝑔𝑆) ≠ (𝑔𝑍)))
2925, 28imbi12d 347 . . . . . . 7 (𝑡 = 𝑍 → (((𝜑 ∧ (𝑆𝑇𝑡𝑇𝑆𝑡)) → ∃𝑔𝐴 (𝑔𝑆) ≠ (𝑔𝑡)) ↔ ((𝜑 ∧ (𝑆𝑇𝑍𝑇𝑆𝑍)) → ∃𝑔𝐴 (𝑔𝑆) ≠ (𝑔𝑍))))
30 simpr1 1190 . . . . . . . 8 ((𝜑 ∧ (𝑆𝑇𝑡𝑇𝑆𝑡)) → 𝑆𝑇)
31 eleq1 2900 . . . . . . . . . . . 12 (𝑟 = 𝑆 → (𝑟𝑇𝑆𝑇))
32 neeq1 3078 . . . . . . . . . . . 12 (𝑟 = 𝑆 → (𝑟𝑡𝑆𝑡))
3331, 323anbi13d 1434 . . . . . . . . . . 11 (𝑟 = 𝑆 → ((𝑟𝑇𝑡𝑇𝑟𝑡) ↔ (𝑆𝑇𝑡𝑇𝑆𝑡)))
3433anbi2d 630 . . . . . . . . . 10 (𝑟 = 𝑆 → ((𝜑 ∧ (𝑟𝑇𝑡𝑇𝑟𝑡)) ↔ (𝜑 ∧ (𝑆𝑇𝑡𝑇𝑆𝑡))))
35 fveq2 6664 . . . . . . . . . . . 12 (𝑟 = 𝑆 → (𝑔𝑟) = (𝑔𝑆))
3635neeq1d 3075 . . . . . . . . . . 11 (𝑟 = 𝑆 → ((𝑔𝑟) ≠ (𝑔𝑡) ↔ (𝑔𝑆) ≠ (𝑔𝑡)))
3736rexbidv 3297 . . . . . . . . . 10 (𝑟 = 𝑆 → (∃𝑔𝐴 (𝑔𝑟) ≠ (𝑔𝑡) ↔ ∃𝑔𝐴 (𝑔𝑆) ≠ (𝑔𝑡)))
3834, 37imbi12d 347 . . . . . . . . 9 (𝑟 = 𝑆 → (((𝜑 ∧ (𝑟𝑇𝑡𝑇𝑟𝑡)) → ∃𝑔𝐴 (𝑔𝑟) ≠ (𝑔𝑡)) ↔ ((𝜑 ∧ (𝑆𝑇𝑡𝑇𝑆𝑡)) → ∃𝑔𝐴 (𝑔𝑆) ≠ (𝑔𝑡))))
39 stoweidlem43.12 . . . . . . . . . 10 ((𝜑 ∧ (𝑟𝑇𝑡𝑇𝑟𝑡)) → ∃𝑔𝐴 (𝑔𝑟) ≠ (𝑔𝑡))
4039a1i 11 . . . . . . . . 9 (𝑟𝑇 → ((𝜑 ∧ (𝑟𝑇𝑡𝑇𝑟𝑡)) → ∃𝑔𝐴 (𝑔𝑟) ≠ (𝑔𝑡)))
4138, 40vtoclga 3573 . . . . . . . 8 (𝑆𝑇 → ((𝜑 ∧ (𝑆𝑇𝑡𝑇𝑆𝑡)) → ∃𝑔𝐴 (𝑔𝑆) ≠ (𝑔𝑡)))
4230, 41mpcom 38 . . . . . . 7 ((𝜑 ∧ (𝑆𝑇𝑡𝑇𝑆𝑡)) → ∃𝑔𝐴 (𝑔𝑆) ≠ (𝑔𝑡))
4321, 29, 42vtoclg1f 3566 . . . . . 6 (𝑍𝑇 → ((𝜑 ∧ (𝑆𝑇𝑍𝑇𝑆𝑍)) → ∃𝑔𝐴 (𝑔𝑆) ≠ (𝑔𝑍)))
4416, 43mpcom 38 . . . . 5 ((𝜑 ∧ (𝑆𝑇𝑍𝑇𝑆𝑍)) → ∃𝑔𝐴 (𝑔𝑆) ≠ (𝑔𝑍))
45 df-rex 3144 . . . . 5 (∃𝑔𝐴 (𝑔𝑆) ≠ (𝑔𝑍) ↔ ∃𝑔(𝑔𝐴 ∧ (𝑔𝑆) ≠ (𝑔𝑍)))
4644, 45sylib 220 . . . 4 ((𝜑 ∧ (𝑆𝑇𝑍𝑇𝑆𝑍)) → ∃𝑔(𝑔𝐴 ∧ (𝑔𝑆) ≠ (𝑔𝑍)))
4715, 46mpdan 685 . . 3 (𝜑 → ∃𝑔(𝑔𝐴 ∧ (𝑔𝑆) ≠ (𝑔𝑍)))
48 nfv 1911 . . . . . 6 𝑡(𝑔𝐴 ∧ (𝑔𝑆) ≠ (𝑔𝑍))
4917, 48nfan 1896 . . . . 5 𝑡(𝜑 ∧ (𝑔𝐴 ∧ (𝑔𝑆) ≠ (𝑔𝑍)))
50 nfcv 2977 . . . . 5 𝑡𝑔
51 eqid 2821 . . . . 5 (𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍))) = (𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))
52 stoweidlem43.4 . . . . . . 7 𝐾 = (topGen‘ran (,))
53 eqid 2821 . . . . . . 7 (𝐽 Cn 𝐾) = (𝐽 Cn 𝐾)
54 stoweidlem43.8 . . . . . . . 8 (𝜑𝐴 ⊆ (𝐽 Cn 𝐾))
5554sselda 3966 . . . . . . 7 ((𝜑𝑓𝐴) → 𝑓 ∈ (𝐽 Cn 𝐾))
5652, 9, 53, 55fcnre 41275 . . . . . 6 ((𝜑𝑓𝐴) → 𝑓:𝑇⟶ℝ)
5756adantlr 713 . . . . 5 (((𝜑 ∧ (𝑔𝐴 ∧ (𝑔𝑆) ≠ (𝑔𝑍))) ∧ 𝑓𝐴) → 𝑓:𝑇⟶ℝ)
58 stoweidlem43.9 . . . . . 6 ((𝜑𝑓𝐴𝑙𝐴) → (𝑡𝑇 ↦ ((𝑓𝑡) + (𝑙𝑡))) ∈ 𝐴)
59583adant1r 1173 . . . . 5 (((𝜑 ∧ (𝑔𝐴 ∧ (𝑔𝑆) ≠ (𝑔𝑍))) ∧ 𝑓𝐴𝑙𝐴) → (𝑡𝑇 ↦ ((𝑓𝑡) + (𝑙𝑡))) ∈ 𝐴)
60 stoweidlem43.11 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → (𝑡𝑇𝑥) ∈ 𝐴)
6160adantlr 713 . . . . 5 (((𝜑 ∧ (𝑔𝐴 ∧ (𝑔𝑆) ≠ (𝑔𝑍))) ∧ 𝑥 ∈ ℝ) → (𝑡𝑇𝑥) ∈ 𝐴)
624adantr 483 . . . . 5 ((𝜑 ∧ (𝑔𝐴 ∧ (𝑔𝑆) ≠ (𝑔𝑍))) → 𝑆𝑇)
6310adantr 483 . . . . 5 ((𝜑 ∧ (𝑔𝐴 ∧ (𝑔𝑆) ≠ (𝑔𝑍))) → 𝑍𝑇)
64 simprl 769 . . . . 5 ((𝜑 ∧ (𝑔𝐴 ∧ (𝑔𝑆) ≠ (𝑔𝑍))) → 𝑔𝐴)
65 simprr 771 . . . . 5 ((𝜑 ∧ (𝑔𝐴 ∧ (𝑔𝑆) ≠ (𝑔𝑍))) → (𝑔𝑆) ≠ (𝑔𝑍))
6649, 50, 51, 57, 59, 61, 62, 63, 64, 65stoweidlem23 42302 . . . 4 ((𝜑 ∧ (𝑔𝐴 ∧ (𝑔𝑆) ≠ (𝑔𝑍))) → ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍))) ∈ 𝐴 ∧ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑆) ≠ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑍) ∧ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑍) = 0))
67 eleq1 2900 . . . . . . . 8 (𝑓 = (𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍))) → (𝑓𝐴 ↔ (𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍))) ∈ 𝐴))
68 fveq1 6663 . . . . . . . . 9 (𝑓 = (𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍))) → (𝑓𝑆) = ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑆))
69 fveq1 6663 . . . . . . . . 9 (𝑓 = (𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍))) → (𝑓𝑍) = ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑍))
7068, 69neeq12d 3077 . . . . . . . 8 (𝑓 = (𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍))) → ((𝑓𝑆) ≠ (𝑓𝑍) ↔ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑆) ≠ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑍)))
7169eqeq1d 2823 . . . . . . . 8 (𝑓 = (𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍))) → ((𝑓𝑍) = 0 ↔ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑍) = 0))
7267, 70, 713anbi123d 1432 . . . . . . 7 (𝑓 = (𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍))) → ((𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0) ↔ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍))) ∈ 𝐴 ∧ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑆) ≠ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑍) ∧ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑍) = 0)))
7372spcegv 3596 . . . . . 6 ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍))) ∈ 𝐴 → (((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍))) ∈ 𝐴 ∧ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑆) ≠ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑍) ∧ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑍) = 0) → ∃𝑓(𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0)))
74733ad2ant1 1129 . . . . 5 (((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍))) ∈ 𝐴 ∧ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑆) ≠ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑍) ∧ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑍) = 0) → (((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍))) ∈ 𝐴 ∧ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑆) ≠ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑍) ∧ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑍) = 0) → ∃𝑓(𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0)))
7574pm2.43i 52 . . . 4 (((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍))) ∈ 𝐴 ∧ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑆) ≠ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑍) ∧ ((𝑡𝑇 ↦ ((𝑔𝑡) − (𝑔𝑍)))‘𝑍) = 0) → ∃𝑓(𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0))
7666, 75syl 17 . . 3 ((𝜑 ∧ (𝑔𝐴 ∧ (𝑔𝑆) ≠ (𝑔𝑍))) → ∃𝑓(𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0))
771, 2, 47, 76exlimdd 2216 . 2 (𝜑 → ∃𝑓(𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0))
78 stoweidlem43.3 . . . . 5 𝑄
79 nfmpt1 5156 . . . . 5 𝑡(𝑡𝑇 ↦ (((𝑠𝑇 ↦ ((𝑓𝑠) · (𝑓𝑠)))‘𝑡) / sup(ran (𝑠𝑇 ↦ ((𝑓𝑠) · (𝑓𝑠))), ℝ, < )))
80 nfcv 2977 . . . . 5 𝑡𝑓
81 nfcv 2977 . . . . 5 𝑡(𝑠𝑇 ↦ ((𝑓𝑠) · (𝑓𝑠)))
82 nfv 1911 . . . . . 6 𝑡(𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0)
8317, 82nfan 1896 . . . . 5 𝑡(𝜑 ∧ (𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0))
84 stoweidlem43.5 . . . . 5 𝑄 = {𝐴 ∣ ((𝑍) = 0 ∧ ∀𝑡𝑇 (0 ≤ (𝑡) ∧ (𝑡) ≤ 1))}
85 fveq2 6664 . . . . . . 7 (𝑠 = 𝑡 → (𝑓𝑠) = (𝑓𝑡))
8685, 85oveq12d 7168 . . . . . 6 (𝑠 = 𝑡 → ((𝑓𝑠) · (𝑓𝑠)) = ((𝑓𝑡) · (𝑓𝑡)))
8786cbvmptv 5161 . . . . 5 (𝑠𝑇 ↦ ((𝑓𝑠) · (𝑓𝑠))) = (𝑡𝑇 ↦ ((𝑓𝑡) · (𝑓𝑡)))
88 eqid 2821 . . . . 5 sup(ran (𝑠𝑇 ↦ ((𝑓𝑠) · (𝑓𝑠))), ℝ, < ) = sup(ran (𝑠𝑇 ↦ ((𝑓𝑠) · (𝑓𝑠))), ℝ, < )
89 eqid 2821 . . . . 5 (𝑡𝑇 ↦ (((𝑠𝑇 ↦ ((𝑓𝑠) · (𝑓𝑠)))‘𝑡) / sup(ran (𝑠𝑇 ↦ ((𝑓𝑠) · (𝑓𝑠))), ℝ, < ))) = (𝑡𝑇 ↦ (((𝑠𝑇 ↦ ((𝑓𝑠) · (𝑓𝑠)))‘𝑡) / sup(ran (𝑠𝑇 ↦ ((𝑓𝑠) · (𝑓𝑠))), ℝ, < )))
90 stoweidlem43.7 . . . . . 6 (𝜑𝐽 ∈ Comp)
9190adantr 483 . . . . 5 ((𝜑 ∧ (𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0)) → 𝐽 ∈ Comp)
9254adantr 483 . . . . 5 ((𝜑 ∧ (𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0)) → 𝐴 ⊆ (𝐽 Cn 𝐾))
93 eleq1 2900 . . . . . . . . 9 (𝑓 = 𝑘 → (𝑓𝐴𝑘𝐴))
94933anbi2d 1437 . . . . . . . 8 (𝑓 = 𝑘 → ((𝜑𝑓𝐴𝑙𝐴) ↔ (𝜑𝑘𝐴𝑙𝐴)))
95 fveq1 6663 . . . . . . . . . . 11 (𝑓 = 𝑘 → (𝑓𝑡) = (𝑘𝑡))
9695oveq1d 7165 . . . . . . . . . 10 (𝑓 = 𝑘 → ((𝑓𝑡) · (𝑙𝑡)) = ((𝑘𝑡) · (𝑙𝑡)))
9796mpteq2dv 5154 . . . . . . . . 9 (𝑓 = 𝑘 → (𝑡𝑇 ↦ ((𝑓𝑡) · (𝑙𝑡))) = (𝑡𝑇 ↦ ((𝑘𝑡) · (𝑙𝑡))))
9897eleq1d 2897 . . . . . . . 8 (𝑓 = 𝑘 → ((𝑡𝑇 ↦ ((𝑓𝑡) · (𝑙𝑡))) ∈ 𝐴 ↔ (𝑡𝑇 ↦ ((𝑘𝑡) · (𝑙𝑡))) ∈ 𝐴))
9994, 98imbi12d 347 . . . . . . 7 (𝑓 = 𝑘 → (((𝜑𝑓𝐴𝑙𝐴) → (𝑡𝑇 ↦ ((𝑓𝑡) · (𝑙𝑡))) ∈ 𝐴) ↔ ((𝜑𝑘𝐴𝑙𝐴) → (𝑡𝑇 ↦ ((𝑘𝑡) · (𝑙𝑡))) ∈ 𝐴)))
100 stoweidlem43.10 . . . . . . 7 ((𝜑𝑓𝐴𝑙𝐴) → (𝑡𝑇 ↦ ((𝑓𝑡) · (𝑙𝑡))) ∈ 𝐴)
10199, 100chvarvv 2001 . . . . . 6 ((𝜑𝑘𝐴𝑙𝐴) → (𝑡𝑇 ↦ ((𝑘𝑡) · (𝑙𝑡))) ∈ 𝐴)
1021013adant1r 1173 . . . . 5 (((𝜑 ∧ (𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0)) ∧ 𝑘𝐴𝑙𝐴) → (𝑡𝑇 ↦ ((𝑘𝑡) · (𝑙𝑡))) ∈ 𝐴)
10360adantlr 713 . . . . 5 (((𝜑 ∧ (𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0)) ∧ 𝑥 ∈ ℝ) → (𝑡𝑇𝑥) ∈ 𝐴)
1044adantr 483 . . . . 5 ((𝜑 ∧ (𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0)) → 𝑆𝑇)
10510adantr 483 . . . . 5 ((𝜑 ∧ (𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0)) → 𝑍𝑇)
106 simpr1 1190 . . . . 5 ((𝜑 ∧ (𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0)) → 𝑓𝐴)
107 simpr2 1191 . . . . 5 ((𝜑 ∧ (𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0)) → (𝑓𝑆) ≠ (𝑓𝑍))
108 simpr3 1192 . . . . 5 ((𝜑 ∧ (𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0)) → (𝑓𝑍) = 0)
10978, 79, 80, 81, 83, 52, 84, 9, 87, 88, 89, 91, 92, 102, 103, 104, 105, 106, 107, 108stoweidlem36 42315 . . . 4 ((𝜑 ∧ (𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0)) → ∃(𝑄 ∧ 0 < (𝑆)))
110109ex 415 . . 3 (𝜑 → ((𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0) → ∃(𝑄 ∧ 0 < (𝑆))))
111110exlimdv 1930 . 2 (𝜑 → (∃𝑓(𝑓𝐴 ∧ (𝑓𝑆) ≠ (𝑓𝑍) ∧ (𝑓𝑍) = 0) → ∃(𝑄 ∧ 0 < (𝑆))))
11277, 111mpd 15 1 (𝜑 → ∃(𝑄 ∧ 0 < (𝑆)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 398  w3a 1083   = wceq 1533  wex 1776  wnf 1780  wcel 2110  wnfc 2961  wne 3016  wral 3138  wrex 3139  {crab 3142  cdif 3932  wss 3935   cuni 4831   class class class wbr 5058  cmpt 5138  ran crn 5550  wf 6345  cfv 6349  (class class class)co 7150  supcsup 8898  cr 10530  0cc0 10531  1c1 10532   + caddc 10534   · cmul 10536   < clt 10669  cle 10670  cmin 10864   / cdiv 11291  (,)cioo 12732  topGenctg 16705   Cn ccn 21826  Compccmp 21988
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-rep 5182  ax-sep 5195  ax-nul 5202  ax-pow 5258  ax-pr 5321  ax-un 7455  ax-cnex 10587  ax-resscn 10588  ax-1cn 10589  ax-icn 10590  ax-addcl 10591  ax-addrcl 10592  ax-mulcl 10593  ax-mulrcl 10594  ax-mulcom 10595  ax-addass 10596  ax-mulass 10597  ax-distr 10598  ax-i2m1 10599  ax-1ne0 10600  ax-1rid 10601  ax-rnegex 10602  ax-rrecex 10603  ax-cnre 10604  ax-pre-lttri 10605  ax-pre-lttrn 10606  ax-pre-ltadd 10607  ax-pre-mulgt0 10608  ax-pre-sup 10609  ax-mulf 10611
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1536  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3772  df-csb 3883  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-pss 3953  df-nul 4291  df-if 4467  df-pw 4540  df-sn 4561  df-pr 4563  df-tp 4565  df-op 4567  df-uni 4832  df-int 4869  df-iun 4913  df-iin 4914  df-br 5059  df-opab 5121  df-mpt 5139  df-tr 5165  df-id 5454  df-eprel 5459  df-po 5468  df-so 5469  df-fr 5508  df-se 5509  df-we 5510  df-xp 5555  df-rel 5556  df-cnv 5557  df-co 5558  df-dm 5559  df-rn 5560  df-res 5561  df-ima 5562  df-pred 6142  df-ord 6188  df-on 6189  df-lim 6190  df-suc 6191  df-iota 6308  df-fun 6351  df-fn 6352  df-f 6353  df-f1 6354  df-fo 6355  df-f1o 6356  df-fv 6357  df-isom 6358  df-riota 7108  df-ov 7153  df-oprab 7154  df-mpo 7155  df-of 7403  df-om 7575  df-1st 7683  df-2nd 7684  df-supp 7825  df-wrecs 7941  df-recs 8002  df-rdg 8040  df-1o 8096  df-2o 8097  df-oadd 8100  df-er 8283  df-map 8402  df-ixp 8456  df-en 8504  df-dom 8505  df-sdom 8506  df-fin 8507  df-fsupp 8828  df-fi 8869  df-sup 8900  df-inf 8901  df-oi 8968  df-card 9362  df-pnf 10671  df-mnf 10672  df-xr 10673  df-ltxr 10674  df-le 10675  df-sub 10866  df-neg 10867  df-div 11292  df-nn 11633  df-2 11694  df-3 11695  df-4 11696  df-5 11697  df-6 11698  df-7 11699  df-8 11700  df-9 11701  df-n0 11892  df-z 11976  df-dec 12093  df-uz 12238  df-q 12343  df-rp 12384  df-xneg 12501  df-xadd 12502  df-xmul 12503  df-ioo 12736  df-icc 12739  df-fz 12887  df-fzo 13028  df-seq 13364  df-exp 13424  df-hash 13685  df-cj 14452  df-re 14453  df-im 14454  df-sqrt 14588  df-abs 14589  df-struct 16479  df-ndx 16480  df-slot 16481  df-base 16483  df-sets 16484  df-ress 16485  df-plusg 16572  df-mulr 16573  df-starv 16574  df-sca 16575  df-vsca 16576  df-ip 16577  df-tset 16578  df-ple 16579  df-ds 16581  df-unif 16582  df-hom 16583  df-cco 16584  df-rest 16690  df-topn 16691  df-0g 16709  df-gsum 16710  df-topgen 16711  df-pt 16712  df-prds 16715  df-xrs 16769  df-qtop 16774  df-imas 16775  df-xps 16777  df-mre 16851  df-mrc 16852  df-acs 16854  df-mgm 17846  df-sgrp 17895  df-mnd 17906  df-submnd 17951  df-mulg 18219  df-cntz 18441  df-cmn 18902  df-psmet 20531  df-xmet 20532  df-met 20533  df-bl 20534  df-mopn 20535  df-cnfld 20540  df-top 21496  df-topon 21513  df-topsp 21535  df-bases 21548  df-cn 21829  df-cnp 21830  df-cmp 21989  df-tx 22164  df-hmeo 22357  df-xms 22924  df-ms 22925  df-tms 22926
This theorem is referenced by:  stoweidlem46  42325
  Copyright terms: Public domain W3C validator