Theorem htth 30640

Description: Hellinger-Toeplitz Theorem: any self-adjoint linear operator defined on all of Hilbert space is bounded. Theorem 10.1-1 of [Kreyszig] p. 525. Discovered by E. Hellinger and O. Toeplitz in 1910, "it aroused both admiration and puzzlement since the theorem establishes a relation between properties of two different kinds, namely, the properties of being defined everywhere and being bounded." (Contributed by NM, 11-Jan-2008.) (Revised by Mario Carneiro, 23-Aug-2014.) (New usage is discouraged.)

Hypotheses

Ref	Expression
htth.1	⊢ 𝑋 = (BaseSet‘𝑈)
htth.2	⊢ 𝑃 = (·𝑖OLD‘𝑈)
htth.3	⊢ 𝐿 = (𝑈 LnOp 𝑈)
htth.4	⊢ 𝐵 = (𝑈 BLnOp 𝑈)

Assertion

Ref	Expression
htth	⊢ ((𝑈 ∈ CHilOLD ∧ 𝑇 ∈ 𝐿 ∧ ∀𝑥 ∈ 𝑋 ∀𝑦 ∈ 𝑋 (𝑥𝑃(𝑇‘𝑦)) = ((𝑇‘𝑥)𝑃𝑦)) → 𝑇 ∈ 𝐵)

Distinct variable groups:   𝑥,𝑦,𝑇   𝑥,𝑈,𝑦   𝑥,𝑋,𝑦

Allowed substitution hints:   𝐵(𝑥,𝑦)   𝑃(𝑥,𝑦)   𝐿(𝑥,𝑦)

Proof of Theorem htth

Dummy variables 𝑤 𝑧 𝑣 𝑢 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		htth.3	. . . . . . 7 ⊢ 𝐿 = (𝑈 LnOp 𝑈)
2		oveq12 7410	. . . . . . . 8 ⊢ ((𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) ∧ 𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) → (𝑈 LnOp 𝑈) = (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) LnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)))
3	2	anidms 566	. . . . . . 7 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → (𝑈 LnOp 𝑈) = (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) LnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)))
4	1, 3	eqtrid 2776	. . . . . 6 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → 𝐿 = (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) LnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)))
5	4	eleq2d 2811	. . . . 5 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → (𝑇 ∈ 𝐿 ↔ 𝑇 ∈ (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) LnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))))
6		htth.1	. . . . . . 7 ⊢ 𝑋 = (BaseSet‘𝑈)
7		fveq2 6881	. . . . . . 7 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → (BaseSet‘𝑈) = (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)))
8	6, 7	eqtrid 2776	. . . . . 6 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → 𝑋 = (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)))
9		htth.2	. . . . . . . . . 10 ⊢ 𝑃 = (·𝑖OLD‘𝑈)
10		fveq2 6881	. . . . . . . . . 10 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → (·𝑖OLD‘𝑈) = (·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)))
11	9, 10	eqtrid 2776	. . . . . . . . 9 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → 𝑃 = (·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)))
12	11	oveqd 7418	. . . . . . . 8 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → (𝑥𝑃(𝑇‘𝑦)) = (𝑥(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)))
13	11	oveqd 7418	. . . . . . . 8 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → ((𝑇‘𝑥)𝑃𝑦) = ((𝑇‘𝑥)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦))
14	12, 13	eqeq12d 2740	. . . . . . 7 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → ((𝑥𝑃(𝑇‘𝑦)) = ((𝑇‘𝑥)𝑃𝑦) ↔ (𝑥(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = ((𝑇‘𝑥)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦)))
15	8, 14	raleqbidv 3334	. . . . . 6 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → (∀𝑦 ∈ 𝑋 (𝑥𝑃(𝑇‘𝑦)) = ((𝑇‘𝑥)𝑃𝑦) ↔ ∀𝑦 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑥(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = ((𝑇‘𝑥)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦)))
16	8, 15	raleqbidv 3334	. . . . 5 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → (∀𝑥 ∈ 𝑋 ∀𝑦 ∈ 𝑋 (𝑥𝑃(𝑇‘𝑦)) = ((𝑇‘𝑥)𝑃𝑦) ↔ ∀𝑥 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))∀𝑦 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑥(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = ((𝑇‘𝑥)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦)))
17	5, 16	anbi12d 630	. . . 4 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → ((𝑇 ∈ 𝐿 ∧ ∀𝑥 ∈ 𝑋 ∀𝑦 ∈ 𝑋 (𝑥𝑃(𝑇‘𝑦)) = ((𝑇‘𝑥)𝑃𝑦)) ↔ (𝑇 ∈ (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) LnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ∧ ∀𝑥 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))∀𝑦 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑥(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = ((𝑇‘𝑥)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦))))
18		htth.4	. . . . . 6 ⊢ 𝐵 = (𝑈 BLnOp 𝑈)
19		oveq12 7410	. . . . . . 7 ⊢ ((𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) ∧ 𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) → (𝑈 BLnOp 𝑈) = (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) BLnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)))
20	19	anidms 566	. . . . . 6 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → (𝑈 BLnOp 𝑈) = (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) BLnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)))
21	18, 20	eqtrid 2776	. . . . 5 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → 𝐵 = (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) BLnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)))
22	21	eleq2d 2811	. . . 4 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → (𝑇 ∈ 𝐵 ↔ 𝑇 ∈ (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) BLnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))))
23	17, 22	imbi12d 344	. . 3 ⊢ (𝑈 = if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) → (((𝑇 ∈ 𝐿 ∧ ∀𝑥 ∈ 𝑋 ∀𝑦 ∈ 𝑋 (𝑥𝑃(𝑇‘𝑦)) = ((𝑇‘𝑥)𝑃𝑦)) → 𝑇 ∈ 𝐵) ↔ ((𝑇 ∈ (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) LnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ∧ ∀𝑥 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))∀𝑦 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑥(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = ((𝑇‘𝑥)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦)) → 𝑇 ∈ (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) BLnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)))))
24		eqid 2724	. . . 4 ⊢ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) = (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))
25		eqid 2724	. . . 4 ⊢ (·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) = (·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))
26		eqid 2724	. . . 4 ⊢ (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) LnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) = (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) LnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))
27		eqid 2724	. . . 4 ⊢ (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) BLnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) = (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) BLnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))
28		eqid 2724	. . . 4 ⊢ (normCV‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) = (normCV‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))
29		eqid 2724	. . . . . 6 ⊢ ⟨⟨ + , · ⟩, abs⟩ = ⟨⟨ + , · ⟩, abs⟩
30	29	cnchl 30638	. . . . 5 ⊢ ⟨⟨ + , · ⟩, abs⟩ ∈ CHilOLD
31	30	elimel 4589	. . . 4 ⊢ if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) ∈ CHilOLD
32		simpl 482	. . . 4 ⊢ ((𝑇 ∈ (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) LnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ∧ ∀𝑥 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))∀𝑦 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑥(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = ((𝑇‘𝑥)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦)) → 𝑇 ∈ (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) LnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)))
33		simpr 484	. . . . 5 ⊢ ((𝑇 ∈ (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) LnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ∧ ∀𝑥 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))∀𝑦 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑥(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = ((𝑇‘𝑥)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦)) → ∀𝑥 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))∀𝑦 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑥(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = ((𝑇‘𝑥)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦))
34		oveq1 7408	. . . . . . 7 ⊢ (𝑥 = 𝑢 → (𝑥(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = (𝑢(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)))
35		fveq2 6881	. . . . . . . 8 ⊢ (𝑥 = 𝑢 → (𝑇‘𝑥) = (𝑇‘𝑢))
36	35	oveq1d 7416	. . . . . . 7 ⊢ (𝑥 = 𝑢 → ((𝑇‘𝑥)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦) = ((𝑇‘𝑢)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦))
37	34, 36	eqeq12d 2740	. . . . . 6 ⊢ (𝑥 = 𝑢 → ((𝑥(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = ((𝑇‘𝑥)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦) ↔ (𝑢(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = ((𝑇‘𝑢)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦)))
38		fveq2 6881	. . . . . . . 8 ⊢ (𝑦 = 𝑣 → (𝑇‘𝑦) = (𝑇‘𝑣))
39	38	oveq2d 7417	. . . . . . 7 ⊢ (𝑦 = 𝑣 → (𝑢(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = (𝑢(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑣)))
40		oveq2 7409	. . . . . . 7 ⊢ (𝑦 = 𝑣 → ((𝑇‘𝑢)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦) = ((𝑇‘𝑢)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑣))
41	39, 40	eqeq12d 2740	. . . . . 6 ⊢ (𝑦 = 𝑣 → ((𝑢(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = ((𝑇‘𝑢)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦) ↔ (𝑢(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑣)) = ((𝑇‘𝑢)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑣)))
42	37, 41	cbvral2vw 3230	. . . . 5 ⊢ (∀𝑥 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))∀𝑦 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑥(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = ((𝑇‘𝑥)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦) ↔ ∀𝑢 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))∀𝑣 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑢(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑣)) = ((𝑇‘𝑢)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑣))
43	33, 42	sylib 217	. . . 4 ⊢ ((𝑇 ∈ (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) LnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ∧ ∀𝑥 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))∀𝑦 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑥(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = ((𝑇‘𝑥)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦)) → ∀𝑢 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))∀𝑣 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑢(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑣)) = ((𝑇‘𝑢)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑣))
44		oveq1 7408	. . . . . . 7 ⊢ (𝑦 = 𝑤 → (𝑦(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑥)) = (𝑤(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑥)))
45	44	cbvmptv 5251	. . . . . 6 ⊢ (𝑦 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ↦ (𝑦(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑥))) = (𝑤 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ↦ (𝑤(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑥)))
46		fveq2 6881	. . . . . . . 8 ⊢ (𝑥 = 𝑧 → (𝑇‘𝑥) = (𝑇‘𝑧))
47	46	oveq2d 7417	. . . . . . 7 ⊢ (𝑥 = 𝑧 → (𝑤(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑥)) = (𝑤(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑧)))
48	47	mpteq2dv 5240	. . . . . 6 ⊢ (𝑥 = 𝑧 → (𝑤 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ↦ (𝑤(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑥))) = (𝑤 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ↦ (𝑤(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑧))))
49	45, 48	eqtrid 2776	. . . . 5 ⊢ (𝑥 = 𝑧 → (𝑦 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ↦ (𝑦(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑥))) = (𝑤 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ↦ (𝑤(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑧))))
50	49	cbvmptv 5251	. . . 4 ⊢ (𝑥 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ↦ (𝑦 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ↦ (𝑦(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑥)))) = (𝑧 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ↦ (𝑤 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ↦ (𝑤(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑧))))
51		fveq2 6881	. . . . . . 7 ⊢ (𝑥 = 𝑧 → ((normCV‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))‘𝑥) = ((normCV‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))‘𝑧))
52	51	breq1d 5148	. . . . . 6 ⊢ (𝑥 = 𝑧 → (((normCV‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))‘𝑥) ≤ 1 ↔ ((normCV‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))‘𝑧) ≤ 1))
53	52	cbvrabv 3434	. . . . 5 ⊢ {𝑥 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ∣ ((normCV‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))‘𝑥) ≤ 1} = {𝑧 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ∣ ((normCV‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))‘𝑧) ≤ 1}
54	53	imaeq2i 6047	. . . 4 ⊢ ((𝑥 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ↦ (𝑦 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ↦ (𝑦(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑥)))) “ {𝑥 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ∣ ((normCV‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))‘𝑥) ≤ 1}) = ((𝑥 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ↦ (𝑦 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ↦ (𝑦(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑥)))) “ {𝑧 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ∣ ((normCV‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))‘𝑧) ≤ 1})
55	24, 25, 26, 27, 28, 31, 29, 32, 43, 50, 54	htthlem 30639	. . 3 ⊢ ((𝑇 ∈ (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) LnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)) ∧ ∀𝑥 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))∀𝑦 ∈ (BaseSet‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑥(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))(𝑇‘𝑦)) = ((𝑇‘𝑥)(·𝑖OLD‘if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩))𝑦)) → 𝑇 ∈ (if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩) BLnOp if(𝑈 ∈ CHilOLD, 𝑈, ⟨⟨ + , · ⟩, abs⟩)))
56	23, 55	dedth 4578	. 2 ⊢ (𝑈 ∈ CHilOLD → ((𝑇 ∈ 𝐿 ∧ ∀𝑥 ∈ 𝑋 ∀𝑦 ∈ 𝑋 (𝑥𝑃(𝑇‘𝑦)) = ((𝑇‘𝑥)𝑃𝑦)) → 𝑇 ∈ 𝐵))
57	56	3impib 1113	1 ⊢ ((𝑈 ∈ CHilOLD ∧ 𝑇 ∈ 𝐿 ∧ ∀𝑥 ∈ 𝑋 ∀𝑦 ∈ 𝑋 (𝑥𝑃(𝑇‘𝑦)) = ((𝑇‘𝑥)𝑃𝑦)) → 𝑇 ∈ 𝐵)

Syntax hints:   → wi 4   ∧ wa 395   ∧ w3a 1084   = wceq 1533   ∈ wcel 2098  ∀wral 3053  {crab 3424  ifcif 4520  ⟨cop 4626   class class class wbr 5138   ↦ cmpt 5221   “ cima 5669  ‘cfv 6533  (class class class)co 7401  1c1 11107   + caddc 11109   · cmul 11111   ≤ cle 11246  abscabs 15178  BaseSetcba 30308  norm_CVcnmcv 30312  ·_𝑖OLDcdip 30422   LnOp clno 30462   BLnOp cblo 30464  CHil_OLDchlo 30607

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5275  ax-sep 5289  ax-nul 5296  ax-pow 5353  ax-pr 5417  ax-un 7718  ax-inf2 9632  ax-dc 10437  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184  ax-addf 11185  ax-mulf 11186

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3770  df-csb 3886  df-dif 3943  df-un 3945  df-in 3947  df-ss 3957  df-pss 3959  df-nul 4315  df-if 4521  df-pw 4596  df-sn 4621  df-pr 4623  df-tp 4625  df-op 4627  df-uni 4900  df-int 4941  df-iun 4989  df-iin 4990  df-br 5139  df-opab 5201  df-mpt 5222  df-tr 5256  df-id 5564  df-eprel 5570  df-po 5578  df-so 5579  df-fr 5621  df-se 5622  df-we 5623  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6290  df-ord 6357  df-on 6358  df-lim 6359  df-suc 6360  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-isom 6542  df-riota 7357  df-ov 7404  df-oprab 7405  df-mpo 7406  df-of 7663  df-om 7849  df-1st 7968  df-2nd 7969  df-supp 8141  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-1o 8461  df-2o 8462  df-er 8699  df-map 8818  df-pm 8819  df-ixp 8888  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-fsupp 9358  df-fi 9402  df-sup 9433  df-inf 9434  df-oi 9501  df-card 9930  df-pnf 11247  df-mnf 11248  df-xr 11249  df-ltxr 11250  df-le 11251  df-sub 11443  df-neg 11444  df-div 11869  df-nn 12210  df-2 12272  df-3 12273  df-4 12274  df-5 12275  df-6 12276  df-7 12277  df-8 12278  df-9 12279  df-n0 12470  df-z 12556  df-dec 12675  df-uz 12820  df-q 12930  df-rp 12972  df-xneg 13089  df-xadd 13090  df-xmul 13091  df-ioo 13325  df-ico 13327  df-icc 13328  df-fz 13482  df-fzo 13625  df-seq 13964  df-exp 14025  df-hash 14288  df-cj 15043  df-re 15044  df-im 15045  df-sqrt 15179  df-abs 15180  df-clim 15429  df-sum 15630  df-struct 17079  df-sets 17096  df-slot 17114  df-ndx 17126  df-base 17144  df-ress 17173  df-plusg 17209  df-mulr 17210  df-starv 17211  df-sca 17212  df-vsca 17213  df-ip 17214  df-tset 17215  df-ple 17216  df-ds 17218  df-unif 17219  df-hom 17220  df-cco 17221  df-rest 17367  df-topn 17368  df-0g 17386  df-gsum 17387  df-topgen 17388  df-pt 17389  df-prds 17392  df-xrs 17447  df-qtop 17452  df-imas 17453  df-xps 17455  df-mre 17529  df-mrc 17530  df-acs 17532  df-mgm 18563  df-sgrp 18642  df-mnd 18658  df-submnd 18704  df-mulg 18986  df-cntz 19223  df-cmn 19692  df-psmet 21220  df-xmet 21221  df-met 21222  df-bl 21223  df-mopn 21224  df-fbas 21225  df-fg 21226  df-cnfld 21229  df-top 22718  df-topon 22735  df-topsp 22757  df-bases 22771  df-cld 22845  df-ntr 22846  df-cls 22847  df-nei 22924  df-cn 23053  df-cnp 23054  df-lm 23055  df-t1 23140  df-haus 23141  df-cmp 23213  df-tx 23388  df-hmeo 23581  df-fil 23672  df-fm 23764  df-flim 23765  df-flf 23766  df-fcls 23767  df-xms 24148  df-ms 24149  df-tms 24150  df-cncf 24720  df-cfil 25105  df-cau 25106  df-cmet 25107  df-grpo 30215  df-gid 30216  df-ginv 30217  df-gdiv 30218  df-ablo 30267  df-vc 30281  df-nv 30314  df-va 30317  df-ba 30318  df-sm 30319  df-0v 30320  df-vs 30321  df-nmcv 30322  df-ims 30323  df-dip 30423  df-lno 30466  df-nmoo 30467  df-blo 30468  df-0o 30469  df-ph 30535  df-cbn 30585  df-hlo 30608

This theorem is referenced by:  hmopbdoptHIL  31710