Metamath Proof Explorer


Theorem dochord

Description: Ordering law for orthocomplement. (Contributed by NM, 12-Aug-2014)

Ref Expression
Hypotheses doch11.h ⊢ H = LHyp ⁡ K
doch11.i ⊢ I = DIsoH ⁡ K ⁡ W
doch11.o ⊢ ⊥ ˙ = ocH ⁡ K ⁡ W
doch11.k ⊢ φ → K ∈ HL ∧ W ∈ H
doch11.x ⊢ φ → X ∈ ran ⁡ I
doch11.y ⊢ φ → Y ∈ ran ⁡ I
Assertion dochord ⊢ φ → X ⊆ Y ↔ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X

Proof

Step Hyp Ref Expression
1 doch11.h ⊢ H = LHyp ⁡ K
2 doch11.i ⊢ I = DIsoH ⁡ K ⁡ W
3 doch11.o ⊢ ⊥ ˙ = ocH ⁡ K ⁡ W
4 doch11.k ⊢ φ → K ∈ HL ∧ W ∈ H
5 doch11.x ⊢ φ → X ∈ ran ⁡ I
6 doch11.y ⊢ φ → Y ∈ ran ⁡ I
7 4 adantr ⊢ φ ∧ X ⊆ Y → K ∈ HL ∧ W ∈ H
8 eqid ⊢ DVecH ⁡ K ⁡ W = DVecH ⁡ K ⁡ W
9 eqid ⊢ Base DVecH ⁡ K ⁡ W = Base DVecH ⁡ K ⁡ W
10 1 8 2 9 dihrnss ⊢ K ∈ HL ∧ W ∈ H ∧ Y ∈ ran ⁡ I → Y ⊆ Base DVecH ⁡ K ⁡ W
11 4 6 10 syl2anc ⊢ φ → Y ⊆ Base DVecH ⁡ K ⁡ W
12 11 adantr ⊢ φ ∧ X ⊆ Y → Y ⊆ Base DVecH ⁡ K ⁡ W
13 simpr ⊢ φ ∧ X ⊆ Y → X ⊆ Y
14 1 8 9 3 dochss ⊢ K ∈ HL ∧ W ∈ H ∧ Y ⊆ Base DVecH ⁡ K ⁡ W ∧ X ⊆ Y → ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X
15 7 12 13 14 syl3anc ⊢ φ ∧ X ⊆ Y → ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X
16 4 adantr ⊢ φ ∧ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X → K ∈ HL ∧ W ∈ H
17 1 8 2 9 dihrnss ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ ran ⁡ I → X ⊆ Base DVecH ⁡ K ⁡ W
18 4 5 17 syl2anc ⊢ φ → X ⊆ Base DVecH ⁡ K ⁡ W
19 1 2 8 9 3 dochcl ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ Base DVecH ⁡ K ⁡ W → ⊥ ˙ ⁡ X ∈ ran ⁡ I
20 4 18 19 syl2anc ⊢ φ → ⊥ ˙ ⁡ X ∈ ran ⁡ I
21 1 8 2 9 dihrnss ⊢ K ∈ HL ∧ W ∈ H ∧ ⊥ ˙ ⁡ X ∈ ran ⁡ I → ⊥ ˙ ⁡ X ⊆ Base DVecH ⁡ K ⁡ W
22 4 20 21 syl2anc ⊢ φ → ⊥ ˙ ⁡ X ⊆ Base DVecH ⁡ K ⁡ W
23 22 adantr ⊢ φ ∧ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X → ⊥ ˙ ⁡ X ⊆ Base DVecH ⁡ K ⁡ W
24 simpr ⊢ φ ∧ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X → ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X
25 1 8 9 3 dochss ⊢ K ∈ HL ∧ W ∈ H ∧ ⊥ ˙ ⁡ X ⊆ Base DVecH ⁡ K ⁡ W ∧ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y
26 16 23 24 25 syl3anc ⊢ φ ∧ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y
27 1 2 3 dochoc ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ ran ⁡ I → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X = X
28 4 5 27 syl2anc ⊢ φ → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X = X
29 28 adantr ⊢ φ ∧ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X = X
30 1 2 3 dochoc ⊢ K ∈ HL ∧ W ∈ H ∧ Y ∈ ran ⁡ I → ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y = Y
31 4 6 30 syl2anc ⊢ φ → ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y = Y
32 31 adantr ⊢ φ ∧ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X → ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y = Y
33 26 29 32 3sstr3d ⊢ φ ∧ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X → X ⊆ Y
34 15 33 impbida ⊢ φ → X ⊆ Y ↔ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X