Theorem lnophm 32075

Description: A linear operator is Hermitian if 𝑥 ·_ih (𝑇‘𝑥) takes only real values. Remark in [ReedSimon] p. 195. (Contributed by NM, 24-Jan-2006.) (New usage is discouraged.)

Assertion

Ref	Expression
lnophm	⊢ ((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ) → 𝑇 ∈ HrmOp)

Distinct variable group:   𝑥,𝑇

Proof of Theorem lnophm

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		eleq1 2823	. 2 ⊢ (𝑇 = if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) → (𝑇 ∈ HrmOp ↔ if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) ∈ HrmOp))
2		eleq1 2823	. . . . . 6 ⊢ (𝑇 = if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) → (𝑇 ∈ LinOp ↔ if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) ∈ LinOp))
3		id 22	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → 𝑥 = 𝑦)
4		fveq2 6833	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → (𝑇‘𝑥) = (𝑇‘𝑦))
5	3, 4	oveq12d 7376	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (𝑥 ·ih (𝑇‘𝑥)) = (𝑦 ·ih (𝑇‘𝑦)))
6	5	eleq1d 2820	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → ((𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ ↔ (𝑦 ·ih (𝑇‘𝑦)) ∈ ℝ))
7	6	cbvralvw 3213	. . . . . . 7 ⊢ (∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ ↔ ∀𝑦 ∈ ℋ (𝑦 ·ih (𝑇‘𝑦)) ∈ ℝ)
8		fveq1 6832	. . . . . . . . . 10 ⊢ (𝑇 = if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) → (𝑇‘𝑦) = (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ))‘𝑦))
9	8	oveq2d 7374	. . . . . . . . 9 ⊢ (𝑇 = if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) → (𝑦 ·ih (𝑇‘𝑦)) = (𝑦 ·ih (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ))‘𝑦)))
10	9	eleq1d 2820	. . . . . . . 8 ⊢ (𝑇 = if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) → ((𝑦 ·ih (𝑇‘𝑦)) ∈ ℝ ↔ (𝑦 ·ih (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ))‘𝑦)) ∈ ℝ))
11	10	ralbidv 3158	. . . . . . 7 ⊢ (𝑇 = if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) → (∀𝑦 ∈ ℋ (𝑦 ·ih (𝑇‘𝑦)) ∈ ℝ ↔ ∀𝑦 ∈ ℋ (𝑦 ·ih (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ))‘𝑦)) ∈ ℝ))
12	7, 11	bitrid 283	. . . . . 6 ⊢ (𝑇 = if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) → (∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ ↔ ∀𝑦 ∈ ℋ (𝑦 ·ih (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ))‘𝑦)) ∈ ℝ))
13	2, 12	anbi12d 633	. . . . 5 ⊢ (𝑇 = if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) → ((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ) ↔ (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) ∈ LinOp ∧ ∀𝑦 ∈ ℋ (𝑦 ·ih (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ))‘𝑦)) ∈ ℝ)))
14		eleq1 2823	. . . . . 6 ⊢ (( I ↾ ℋ) = if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) → (( I ↾ ℋ) ∈ LinOp ↔ if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) ∈ LinOp))
15		fveq1 6832	. . . . . . . . 9 ⊢ (( I ↾ ℋ) = if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) → (( I ↾ ℋ)‘𝑦) = (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ))‘𝑦))
16	15	oveq2d 7374	. . . . . . . 8 ⊢ (( I ↾ ℋ) = if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) → (𝑦 ·ih (( I ↾ ℋ)‘𝑦)) = (𝑦 ·ih (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ))‘𝑦)))
17	16	eleq1d 2820	. . . . . . 7 ⊢ (( I ↾ ℋ) = if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) → ((𝑦 ·ih (( I ↾ ℋ)‘𝑦)) ∈ ℝ ↔ (𝑦 ·ih (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ))‘𝑦)) ∈ ℝ))
18	17	ralbidv 3158	. . . . . 6 ⊢ (( I ↾ ℋ) = if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) → (∀𝑦 ∈ ℋ (𝑦 ·ih (( I ↾ ℋ)‘𝑦)) ∈ ℝ ↔ ∀𝑦 ∈ ℋ (𝑦 ·ih (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ))‘𝑦)) ∈ ℝ))
19	14, 18	anbi12d 633	. . . . 5 ⊢ (( I ↾ ℋ) = if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) → ((( I ↾ ℋ) ∈ LinOp ∧ ∀𝑦 ∈ ℋ (𝑦 ·ih (( I ↾ ℋ)‘𝑦)) ∈ ℝ) ↔ (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) ∈ LinOp ∧ ∀𝑦 ∈ ℋ (𝑦 ·ih (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ))‘𝑦)) ∈ ℝ)))
20		idlnop 32048	. . . . . 6 ⊢ ( I ↾ ℋ) ∈ LinOp
21		fvresi 7119	. . . . . . . . 9 ⊢ (𝑦 ∈ ℋ → (( I ↾ ℋ)‘𝑦) = 𝑦)
22	21	oveq2d 7374	. . . . . . . 8 ⊢ (𝑦 ∈ ℋ → (𝑦 ·ih (( I ↾ ℋ)‘𝑦)) = (𝑦 ·ih 𝑦))
23		hiidrcl 31151	. . . . . . . 8 ⊢ (𝑦 ∈ ℋ → (𝑦 ·ih 𝑦) ∈ ℝ)
24	22, 23	eqeltrd 2835	. . . . . . 7 ⊢ (𝑦 ∈ ℋ → (𝑦 ·ih (( I ↾ ℋ)‘𝑦)) ∈ ℝ)
25	24	rgen 3052	. . . . . 6 ⊢ ∀𝑦 ∈ ℋ (𝑦 ·ih (( I ↾ ℋ)‘𝑦)) ∈ ℝ
26	20, 25	pm3.2i 470	. . . . 5 ⊢ (( I ↾ ℋ) ∈ LinOp ∧ ∀𝑦 ∈ ℋ (𝑦 ·ih (( I ↾ ℋ)‘𝑦)) ∈ ℝ)
27	13, 19, 26	elimhyp 4544	. . . 4 ⊢ (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) ∈ LinOp ∧ ∀𝑦 ∈ ℋ (𝑦 ·ih (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ))‘𝑦)) ∈ ℝ)
28	27	simpli 483	. . 3 ⊢ if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) ∈ LinOp
29	27	simpri 485	. . 3 ⊢ ∀𝑦 ∈ ℋ (𝑦 ·ih (if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ))‘𝑦)) ∈ ℝ
30	28, 29	lnophmi 32074	. 2 ⊢ if((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ), 𝑇, ( I ↾ ℋ)) ∈ HrmOp
31	1, 30	dedth 4537	1 ⊢ ((𝑇 ∈ LinOp ∧ ∀𝑥 ∈ ℋ (𝑥 ·ih (𝑇‘𝑥)) ∈ ℝ) → 𝑇 ∈ HrmOp)

Syntax hints:   → wi 4   ∧ wa 395   = wceq 1542   ∈ wcel 2114  ∀wral 3050  ifcif 4478   I cid 5517   ↾ cres 5625  ‘cfv 6491  (class class class)co 7358  ℝcr 11027   ℋchba 30975   ·_ih csp 30978  LinOpclo 31003  HrmOpcho 31006

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 2183  ax-ext 2707  ax-rep 5223  ax-sep 5240  ax-nul 5250  ax-pow 5309  ax-pr 5376  ax-un 7680  ax-resscn 11085  ax-1cn 11086  ax-icn 11087  ax-addcl 11088  ax-addrcl 11089  ax-mulcl 11090  ax-mulrcl 11091  ax-mulcom 11092  ax-addass 11093  ax-mulass 11094  ax-distr 11095  ax-i2m1 11096  ax-1ne0 11097  ax-1rid 11098  ax-rnegex 11099  ax-rrecex 11100  ax-cnre 11101  ax-pre-lttri 11102  ax-pre-lttrn 11103  ax-pre-ltadd 11104  ax-pre-mulgt0 11105  ax-hilex 31055  ax-hfvadd 31056  ax-hvcom 31057  ax-hvass 31058  ax-hv0cl 31059  ax-hvaddid 31060  ax-hfvmul 31061  ax-hvmulid 31062  ax-hvmulass 31063  ax-hvdistr1 31064  ax-hvdistr2 31065  ax-hvmul0 31066  ax-hfi 31135  ax-his1 31138  ax-his2 31139  ax-his3 31140  ax-his4 31141

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 2538  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2810  df-nfc 2884  df-ne 2932  df-nel 3036  df-ral 3051  df-rex 3060  df-rmo 3349  df-reu 3350  df-rab 3399  df-v 3441  df-sbc 3740  df-csb 3849  df-dif 3903  df-un 3905  df-in 3907  df-ss 3917  df-pss 3920  df-nul 4285  df-if 4479  df-pw 4555  df-sn 4580  df-pr 4582  df-op 4586  df-uni 4863  df-iun 4947  df-br 5098  df-opab 5160  df-mpt 5179  df-tr 5205  df-id 5518  df-eprel 5523  df-po 5531  df-so 5532  df-fr 5576  df-we 5578  df-xp 5629  df-rel 5630  df-cnv 5631  df-co 5632  df-dm 5633  df-rn 5634  df-res 5635  df-ima 5636  df-pred 6258  df-ord 6319  df-on 6320  df-lim 6321  df-suc 6322  df-iota 6447  df-fun 6493  df-fn 6494  df-f 6495  df-f1 6496  df-fo 6497  df-f1o 6498  df-fv 6499  df-riota 7315  df-ov 7361  df-oprab 7362  df-mpo 7363  df-om 7809  df-2nd 7934  df-frecs 8223  df-wrecs 8254  df-recs 8303  df-rdg 8341  df-er 8635  df-map 8767  df-en 8886  df-dom 8887  df-sdom 8888  df-pnf 11170  df-mnf 11171  df-xr 11172  df-ltxr 11173  df-le 11174  df-sub 11368  df-neg 11369  df-div 11797  df-nn 12148  df-2 12210  df-3 12211  df-4 12212  df-cj 15024  df-re 15025  df-im 15026  df-hvsub 31027  df-lnop 31897  df-unop 31899  df-hmop 31900

This theorem is referenced by: (None)