Metamath Proof Explorer


Theorem dihoml4

Description: Orthomodular law for constructed vector space H. Lemma 3.3(1) in Holland95 p. 215. ( poml4N analog.) (Contributed by NM, 15-Jan-2015)

Ref Expression
Hypotheses dihoml4.h H=LHypK
dihoml4.u U=DVecHKW
dihoml4.s S=LSubSpU
dihoml4.o ˙=ocHKW
dihoml4.k φKHLWH
dihoml4.x φXS
dihoml4.y φYS
dihoml4.c φ˙˙Y=Y
dihoml4.l φXY
Assertion dihoml4 φ˙˙XYY=˙˙X

Proof

Step Hyp Ref Expression
1 dihoml4.h H=LHypK
2 dihoml4.u U=DVecHKW
3 dihoml4.s S=LSubSpU
4 dihoml4.o ˙=ocHKW
5 dihoml4.k φKHLWH
6 dihoml4.x φXS
7 dihoml4.y φYS
8 dihoml4.c φ˙˙Y=Y
9 dihoml4.l φXY
10 eqid BaseU=BaseU
11 10 3 lssss XSXBaseU
12 6 11 syl φXBaseU
13 eqid DIsoHKW=DIsoHKW
14 1 13 2 10 4 dochcl KHLWHXBaseU˙XranDIsoHKW
15 5 12 14 syl2anc φ˙XranDIsoHKW
16 1 13 4 dochoc KHLWH˙XranDIsoHKW˙˙˙X=˙X
17 5 15 16 syl2anc φ˙˙˙X=˙X
18 17 ineq1d φ˙˙˙XY=˙XY
19 18 fveq2d φ˙˙˙˙XY=˙˙XY
20 19 ineq1d φ˙˙˙˙XYY=˙˙XYY
21 1 2 10 4 dochssv KHLWHXBaseU˙XBaseU
22 5 12 21 syl2anc φ˙XBaseU
23 1 13 2 10 4 dochcl KHLWH˙XBaseU˙˙XranDIsoHKW
24 5 22 23 syl2anc φ˙˙XranDIsoHKW
25 10 3 lssss YSYBaseU
26 7 25 syl φYBaseU
27 1 13 2 10 4 5 26 dochoccl φYranDIsoHKW˙˙Y=Y
28 8 27 mpbird φYranDIsoHKW
29 1 2 10 4 dochss KHLWHYBaseUXY˙Y˙X
30 5 26 9 29 syl3anc φ˙Y˙X
31 1 2 10 4 dochss KHLWH˙XBaseU˙Y˙X˙˙X˙˙Y
32 5 22 30 31 syl3anc φ˙˙X˙˙Y
33 32 8 sseqtrd φ˙˙XY
34 1 13 4 5 24 28 33 dihoml4c φ˙˙˙˙XYY=˙˙X
35 20 34 eqtr3d φ˙˙XYY=˙˙X