Metamath Proof Explorer


Theorem ocvfval

Description: The orthocomplement operation. (Contributed by NM, 7-Oct-2011) (Revised by Mario Carneiro, 13-Oct-2015)

Ref Expression
Hypotheses ocvfval.v V = Base W
ocvfval.i , ˙ = 𝑖 W
ocvfval.f F = Scalar W
ocvfval.z 0 ˙ = 0 F
ocvfval.o ˙ = ocv W
Assertion ocvfval W X ˙ = s 𝒫 V x V | y s x , ˙ y = 0 ˙

Proof

Step Hyp Ref Expression
1 ocvfval.v V = Base W
2 ocvfval.i , ˙ = 𝑖 W
3 ocvfval.f F = Scalar W
4 ocvfval.z 0 ˙ = 0 F
5 ocvfval.o ˙ = ocv W
6 elex W X W V
7 fveq2 h = W Base h = Base W
8 7 1 eqtr4di h = W Base h = V
9 8 pweqd h = W 𝒫 Base h = 𝒫 V
10 fveq2 h = W 𝑖 h = 𝑖 W
11 10 2 eqtr4di h = W 𝑖 h = , ˙
12 11 oveqd h = W x 𝑖 h y = x , ˙ y
13 fveq2 h = W Scalar h = Scalar W
14 13 3 eqtr4di h = W Scalar h = F
15 14 fveq2d h = W 0 Scalar h = 0 F
16 15 4 eqtr4di h = W 0 Scalar h = 0 ˙
17 12 16 eqeq12d h = W x 𝑖 h y = 0 Scalar h x , ˙ y = 0 ˙
18 17 ralbidv h = W y s x 𝑖 h y = 0 Scalar h y s x , ˙ y = 0 ˙
19 8 18 rabeqbidv h = W x Base h | y s x 𝑖 h y = 0 Scalar h = x V | y s x , ˙ y = 0 ˙
20 9 19 mpteq12dv h = W s 𝒫 Base h x Base h | y s x 𝑖 h y = 0 Scalar h = s 𝒫 V x V | y s x , ˙ y = 0 ˙
21 df-ocv ocv = h V s 𝒫 Base h x Base h | y s x 𝑖 h y = 0 Scalar h
22 eqid s 𝒫 V x V | y s x , ˙ y = 0 ˙ = s 𝒫 V x V | y s x , ˙ y = 0 ˙
23 1 fvexi V V
24 ssrab2 x V | y s x , ˙ y = 0 ˙ V
25 23 24 elpwi2 x V | y s x , ˙ y = 0 ˙ 𝒫 V
26 25 a1i s 𝒫 V x V | y s x , ˙ y = 0 ˙ 𝒫 V
27 22 26 fmpti s 𝒫 V x V | y s x , ˙ y = 0 ˙ : 𝒫 V 𝒫 V
28 23 pwex 𝒫 V V
29 fex2 s 𝒫 V x V | y s x , ˙ y = 0 ˙ : 𝒫 V 𝒫 V 𝒫 V V 𝒫 V V s 𝒫 V x V | y s x , ˙ y = 0 ˙ V
30 27 28 28 29 mp3an s 𝒫 V x V | y s x , ˙ y = 0 ˙ V
31 20 21 30 fvmpt W V ocv W = s 𝒫 V x V | y s x , ˙ y = 0 ˙
32 6 31 syl W X ocv W = s 𝒫 V x V | y s x , ˙ y = 0 ˙
33 5 32 eqtrid W X ˙ = s 𝒫 V x V | y s x , ˙ y = 0 ˙