Theorem bcs

Description: Bunjakovaskij-Cauchy-Schwarz inequality. Remark 3.4 of Beran p. 98. (Contributed by NM, 16-Feb-2006) (New usage is discouraged.)

	Ref	Expression
Assertion	bcs	⊢ ( ( 𝐴 ∈ ℋ ∧ 𝐵 ∈ ℋ ) → ( abs ‘ ( 𝐴 ·ih 𝐵 ) ) ≤ ( ( normℎ ‘ 𝐴 ) · ( normℎ ‘ 𝐵 ) ) )

Proof

Step	Hyp	Ref	Expression
1		fvoveq1	⊢ ( 𝐴 = if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) → ( abs ‘ ( 𝐴 ·ih 𝐵 ) ) = ( abs ‘ ( if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ·ih 𝐵 ) ) )
2		fveq2	⊢ ( 𝐴 = if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) → ( normℎ ‘ 𝐴 ) = ( normℎ ‘ if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ) )
3	2	oveq1d	⊢ ( 𝐴 = if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) → ( ( normℎ ‘ 𝐴 ) · ( normℎ ‘ 𝐵 ) ) = ( ( normℎ ‘ if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ) · ( normℎ ‘ 𝐵 ) ) )
4	1 3	breq12d	⊢ ( 𝐴 = if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) → ( ( abs ‘ ( 𝐴 ·ih 𝐵 ) ) ≤ ( ( normℎ ‘ 𝐴 ) · ( normℎ ‘ 𝐵 ) ) ↔ ( abs ‘ ( if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ·ih 𝐵 ) ) ≤ ( ( normℎ ‘ if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ) · ( normℎ ‘ 𝐵 ) ) ) )
5		oveq2	⊢ ( 𝐵 = if ( 𝐵 ∈ ℋ , 𝐵 , 0ℎ ) → ( if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ·ih 𝐵 ) = ( if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ·ih if ( 𝐵 ∈ ℋ , 𝐵 , 0ℎ ) ) )
6	5	fveq2d	⊢ ( 𝐵 = if ( 𝐵 ∈ ℋ , 𝐵 , 0ℎ ) → ( abs ‘ ( if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ·ih 𝐵 ) ) = ( abs ‘ ( if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ·ih if ( 𝐵 ∈ ℋ , 𝐵 , 0ℎ ) ) ) )
7		fveq2	⊢ ( 𝐵 = if ( 𝐵 ∈ ℋ , 𝐵 , 0ℎ ) → ( normℎ ‘ 𝐵 ) = ( normℎ ‘ if ( 𝐵 ∈ ℋ , 𝐵 , 0ℎ ) ) )
8	7	oveq2d	⊢ ( 𝐵 = if ( 𝐵 ∈ ℋ , 𝐵 , 0ℎ ) → ( ( normℎ ‘ if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ) · ( normℎ ‘ 𝐵 ) ) = ( ( normℎ ‘ if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ) · ( normℎ ‘ if ( 𝐵 ∈ ℋ , 𝐵 , 0ℎ ) ) ) )
9	6 8	breq12d	⊢ ( 𝐵 = if ( 𝐵 ∈ ℋ , 𝐵 , 0ℎ ) → ( ( abs ‘ ( if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ·ih 𝐵 ) ) ≤ ( ( normℎ ‘ if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ) · ( normℎ ‘ 𝐵 ) ) ↔ ( abs ‘ ( if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ·ih if ( 𝐵 ∈ ℋ , 𝐵 , 0ℎ ) ) ) ≤ ( ( normℎ ‘ if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ) · ( normℎ ‘ if ( 𝐵 ∈ ℋ , 𝐵 , 0ℎ ) ) ) ) )
10		ifhvhv0	⊢ if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ∈ ℋ
11		ifhvhv0	⊢ if ( 𝐵 ∈ ℋ , 𝐵 , 0ℎ ) ∈ ℋ
12	10 11	bcsiHIL	⊢ ( abs ‘ ( if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ·ih if ( 𝐵 ∈ ℋ , 𝐵 , 0ℎ ) ) ) ≤ ( ( normℎ ‘ if ( 𝐴 ∈ ℋ , 𝐴 , 0ℎ ) ) · ( normℎ ‘ if ( 𝐵 ∈ ℋ , 𝐵 , 0ℎ ) ) )
13	4 9 12	dedth2h	⊢ ( ( 𝐴 ∈ ℋ ∧ 𝐵 ∈ ℋ ) → ( abs ‘ ( 𝐴 ·ih 𝐵 ) ) ≤ ( ( normℎ ‘ 𝐴 ) · ( normℎ ‘ 𝐵 ) ) )