Metamath Proof Explorer


Theorem axhvmulid-zf

Description: Derive Axiom ax-hvmulid from Hilbert space under ZF set theory. (Contributed by NM, 31-May-2008) (New usage is discouraged.)

Ref Expression
Hypotheses axhil.1
|- U = <. <. +h , .h >. , normh >.
axhil.2
|- U e. CHilOLD
Assertion axhvmulid-zf
|- ( A e. ~H -> ( 1 .h A ) = A )

Proof

Step Hyp Ref Expression
1 axhil.1
 |-  U = <. <. +h , .h >. , normh >.
2 axhil.2
 |-  U e. CHilOLD
3 df-hba
 |-  ~H = ( BaseSet ` <. <. +h , .h >. , normh >. )
4 1 fveq2i
 |-  ( BaseSet ` U ) = ( BaseSet ` <. <. +h , .h >. , normh >. )
5 3 4 eqtr4i
 |-  ~H = ( BaseSet ` U )
6 2 hlnvi
 |-  U e. NrmCVec
7 1 6 h2hsm
 |-  .h = ( .sOLD ` U )
8 5 7 hlmulid
 |-  ( ( U e. CHilOLD /\ A e. ~H ) -> ( 1 .h A ) = A )
9 2 8 mpan
 |-  ( A e. ~H -> ( 1 .h A ) = A )