| Step |
Hyp |
Ref |
Expression |
| 1 |
|
kbfval |
|- ( ( A e. ~H /\ B e. ~H ) -> ( A ketbra B ) = ( x e. ~H |-> ( ( x .ih B ) .h A ) ) ) |
| 2 |
|
hicl |
|- ( ( x e. ~H /\ B e. ~H ) -> ( x .ih B ) e. CC ) |
| 3 |
|
hvmulcl |
|- ( ( ( x .ih B ) e. CC /\ A e. ~H ) -> ( ( x .ih B ) .h A ) e. ~H ) |
| 4 |
2 3
|
sylan |
|- ( ( ( x e. ~H /\ B e. ~H ) /\ A e. ~H ) -> ( ( x .ih B ) .h A ) e. ~H ) |
| 5 |
4
|
an31s |
|- ( ( ( A e. ~H /\ B e. ~H ) /\ x e. ~H ) -> ( ( x .ih B ) .h A ) e. ~H ) |
| 6 |
1 5
|
fmpt3d |
|- ( ( A e. ~H /\ B e. ~H ) -> ( A ketbra B ) : ~H --> ~H ) |