Metamath Proof Explorer


Theorem ocel

Description: Membership in orthogonal complement of H subset. (Contributed by NM, 7-Aug-2000) (New usage is discouraged.)

Ref Expression
Assertion ocel ( ๐ป โІ โ„‹ โ†’ ( ๐ด โˆˆ ( โŠฅ โ€˜ ๐ป ) โ†” ( ๐ด โˆˆ โ„‹ โˆง โˆ€ ๐‘ฅ โˆˆ ๐ป ( ๐ด ยทih ๐‘ฅ ) = 0 ) ) )

Proof

Step Hyp Ref Expression
1 ocval โŠข ( ๐ป โІ โ„‹ โ†’ ( โŠฅ โ€˜ ๐ป ) = { ๐‘ฆ โˆˆ โ„‹ โˆฃ โˆ€ ๐‘ฅ โˆˆ ๐ป ( ๐‘ฆ ยทih ๐‘ฅ ) = 0 } )
2 1 eleq2d โŠข ( ๐ป โІ โ„‹ โ†’ ( ๐ด โˆˆ ( โŠฅ โ€˜ ๐ป ) โ†” ๐ด โˆˆ { ๐‘ฆ โˆˆ โ„‹ โˆฃ โˆ€ ๐‘ฅ โˆˆ ๐ป ( ๐‘ฆ ยทih ๐‘ฅ ) = 0 } ) )
3 oveq1 โŠข ( ๐‘ฆ = ๐ด โ†’ ( ๐‘ฆ ยทih ๐‘ฅ ) = ( ๐ด ยทih ๐‘ฅ ) )
4 3 eqeq1d โŠข ( ๐‘ฆ = ๐ด โ†’ ( ( ๐‘ฆ ยทih ๐‘ฅ ) = 0 โ†” ( ๐ด ยทih ๐‘ฅ ) = 0 ) )
5 4 ralbidv โŠข ( ๐‘ฆ = ๐ด โ†’ ( โˆ€ ๐‘ฅ โˆˆ ๐ป ( ๐‘ฆ ยทih ๐‘ฅ ) = 0 โ†” โˆ€ ๐‘ฅ โˆˆ ๐ป ( ๐ด ยทih ๐‘ฅ ) = 0 ) )
6 5 elrab โŠข ( ๐ด โˆˆ { ๐‘ฆ โˆˆ โ„‹ โˆฃ โˆ€ ๐‘ฅ โˆˆ ๐ป ( ๐‘ฆ ยทih ๐‘ฅ ) = 0 } โ†” ( ๐ด โˆˆ โ„‹ โˆง โˆ€ ๐‘ฅ โˆˆ ๐ป ( ๐ด ยทih ๐‘ฅ ) = 0 ) )
7 2 6 bitrdi โŠข ( ๐ป โІ โ„‹ โ†’ ( ๐ด โˆˆ ( โŠฅ โ€˜ ๐ป ) โ†” ( ๐ด โˆˆ โ„‹ โˆง โˆ€ ๐‘ฅ โˆˆ ๐ป ( ๐ด ยทih ๐‘ฅ ) = 0 ) ) )