Metamath Proof Explorer


Theorem sshhococi

Description: The join of two Hilbert space subsets (not necessarily closed subspaces) equals the join of their closures (double orthocomplements). (Contributed by NM, 1-Jun-2004) (Revised by Mario Carneiro, 15-May-2014) (New usage is discouraged.)

Ref Expression
Hypotheses sshjococ.1 ⊢ A ⊆ ℋ
sshjococ.2 ⊢ B ⊆ ℋ
Assertion sshhococi ⊢ A ∨ ℋ B = ⊥ ⁡ ⊥ ⁡ A ∨ ℋ ⊥ ⁡ ⊥ ⁡ B

Proof

Step Hyp Ref Expression
1 sshjococ.1 ⊢ A ⊆ ℋ
2 sshjococ.2 ⊢ B ⊆ ℋ
3 ococss ⊢ A ⊆ ℋ → A ⊆ ⊥ ⁡ ⊥ ⁡ A
4 1 3 ax-mp ⊢ A ⊆ ⊥ ⁡ ⊥ ⁡ A
5 ococss ⊢ B ⊆ ℋ → B ⊆ ⊥ ⁡ ⊥ ⁡ B
6 2 5 ax-mp ⊢ B ⊆ ⊥ ⁡ ⊥ ⁡ B
7 unss12 ⊢ A ⊆ ⊥ ⁡ ⊥ ⁡ A ∧ B ⊆ ⊥ ⁡ ⊥ ⁡ B → A ∪ B ⊆ ⊥ ⁡ ⊥ ⁡ A ∪ ⊥ ⁡ ⊥ ⁡ B
8 4 6 7 mp2an ⊢ A ∪ B ⊆ ⊥ ⁡ ⊥ ⁡ A ∪ ⊥ ⁡ ⊥ ⁡ B
9 1 2 unssi ⊢ A ∪ B ⊆ ℋ
10 occl ⊢ A ⊆ ℋ → ⊥ ⁡ A ∈ C ℋ
11 1 10 ax-mp ⊢ ⊥ ⁡ A ∈ C ℋ
12 11 choccli ⊢ ⊥ ⁡ ⊥ ⁡ A ∈ C ℋ
13 12 chssii ⊢ ⊥ ⁡ ⊥ ⁡ A ⊆ ℋ
14 occl ⊢ B ⊆ ℋ → ⊥ ⁡ B ∈ C ℋ
15 2 14 ax-mp ⊢ ⊥ ⁡ B ∈ C ℋ
16 15 choccli ⊢ ⊥ ⁡ ⊥ ⁡ B ∈ C ℋ
17 16 chssii ⊢ ⊥ ⁡ ⊥ ⁡ B ⊆ ℋ
18 13 17 unssi ⊢ ⊥ ⁡ ⊥ ⁡ A ∪ ⊥ ⁡ ⊥ ⁡ B ⊆ ℋ
19 9 18 occon2i ⊢ A ∪ B ⊆ ⊥ ⁡ ⊥ ⁡ A ∪ ⊥ ⁡ ⊥ ⁡ B → ⊥ ⁡ ⊥ ⁡ A ∪ B ⊆ ⊥ ⁡ ⊥ ⁡ ⊥ ⁡ ⊥ ⁡ A ∪ ⊥ ⁡ ⊥ ⁡ B
20 8 19 ax-mp ⊢ ⊥ ⁡ ⊥ ⁡ A ∪ B ⊆ ⊥ ⁡ ⊥ ⁡ ⊥ ⁡ ⊥ ⁡ A ∪ ⊥ ⁡ ⊥ ⁡ B
21 sshjval ⊢ A ⊆ ℋ ∧ B ⊆ ℋ → A ∨ ℋ B = ⊥ ⁡ ⊥ ⁡ A ∪ B
22 1 2 21 mp2an ⊢ A ∨ ℋ B = ⊥ ⁡ ⊥ ⁡ A ∪ B
23 12 16 chjvali ⊢ ⊥ ⁡ ⊥ ⁡ A ∨ ℋ ⊥ ⁡ ⊥ ⁡ B = ⊥ ⁡ ⊥ ⁡ ⊥ ⁡ ⊥ ⁡ A ∪ ⊥ ⁡ ⊥ ⁡ B
24 20 22 23 3sstr4i ⊢ A ∨ ℋ B ⊆ ⊥ ⁡ ⊥ ⁡ A ∨ ℋ ⊥ ⁡ ⊥ ⁡ B
25 ssun1 ⊢ A ⊆ A ∪ B
26 ococss ⊢ A ∪ B ⊆ ℋ → A ∪ B ⊆ ⊥ ⁡ ⊥ ⁡ A ∪ B
27 9 26 ax-mp ⊢ A ∪ B ⊆ ⊥ ⁡ ⊥ ⁡ A ∪ B
28 25 27 sstri ⊢ A ⊆ ⊥ ⁡ ⊥ ⁡ A ∪ B
29 28 22 sseqtrri ⊢ A ⊆ A ∨ ℋ B
30 sshjcl ⊢ A ⊆ ℋ ∧ B ⊆ ℋ → A ∨ ℋ B ∈ C ℋ
31 1 2 30 mp2an ⊢ A ∨ ℋ B ∈ C ℋ
32 31 chssii ⊢ A ∨ ℋ B ⊆ ℋ
33 1 32 occon2i ⊢ A ⊆ A ∨ ℋ B → ⊥ ⁡ ⊥ ⁡ A ⊆ ⊥ ⁡ ⊥ ⁡ A ∨ ℋ B
34 29 33 ax-mp ⊢ ⊥ ⁡ ⊥ ⁡ A ⊆ ⊥ ⁡ ⊥ ⁡ A ∨ ℋ B
35 ssun2 ⊢ B ⊆ A ∪ B
36 35 27 sstri ⊢ B ⊆ ⊥ ⁡ ⊥ ⁡ A ∪ B
37 36 22 sseqtrri ⊢ B ⊆ A ∨ ℋ B
38 2 32 occon2i ⊢ B ⊆ A ∨ ℋ B → ⊥ ⁡ ⊥ ⁡ B ⊆ ⊥ ⁡ ⊥ ⁡ A ∨ ℋ B
39 37 38 ax-mp ⊢ ⊥ ⁡ ⊥ ⁡ B ⊆ ⊥ ⁡ ⊥ ⁡ A ∨ ℋ B
40 31 choccli ⊢ ⊥ ⁡ A ∨ ℋ B ∈ C ℋ
41 40 choccli ⊢ ⊥ ⁡ ⊥ ⁡ A ∨ ℋ B ∈ C ℋ
42 12 16 41 chlubii ⊢ ⊥ ⁡ ⊥ ⁡ A ⊆ ⊥ ⁡ ⊥ ⁡ A ∨ ℋ B ∧ ⊥ ⁡ ⊥ ⁡ B ⊆ ⊥ ⁡ ⊥ ⁡ A ∨ ℋ B → ⊥ ⁡ ⊥ ⁡ A ∨ ℋ ⊥ ⁡ ⊥ ⁡ B ⊆ ⊥ ⁡ ⊥ ⁡ A ∨ ℋ B
43 34 39 42 mp2an ⊢ ⊥ ⁡ ⊥ ⁡ A ∨ ℋ ⊥ ⁡ ⊥ ⁡ B ⊆ ⊥ ⁡ ⊥ ⁡ A ∨ ℋ B
44 31 ococi ⊢ ⊥ ⁡ ⊥ ⁡ A ∨ ℋ B = A ∨ ℋ B
45 43 44 sseqtri ⊢ ⊥ ⁡ ⊥ ⁡ A ∨ ℋ ⊥ ⁡ ⊥ ⁡ B ⊆ A ∨ ℋ B
46 24 45 eqssi ⊢ A ∨ ℋ B = ⊥ ⁡ ⊥ ⁡ A ∨ ℋ ⊥ ⁡ ⊥ ⁡ B