Metamath Proof Explorer


Theorem opcon3b

Description: Contraposition law for orthoposets. ( chcon3i analog.) (Contributed by NM, 8-Nov-2011)

Ref Expression
Hypotheses opoccl.b ⊢ B = Base K
opoccl.o ⊢ ⊥ ˙ = oc ⁡ K
Assertion opcon3b ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → X = Y ↔ ⊥ ˙ ⁡ Y = ⊥ ˙ ⁡ X

Proof

Step Hyp Ref Expression
1 opoccl.b ⊢ B = Base K
2 opoccl.o ⊢ ⊥ ˙ = oc ⁡ K
3 fveq2 ⊢ Y = X → ⊥ ˙ ⁡ Y = ⊥ ˙ ⁡ X
4 3 eqcoms ⊢ X = Y → ⊥ ˙ ⁡ Y = ⊥ ˙ ⁡ X
5 fveq2 ⊢ ⊥ ˙ ⁡ X = ⊥ ˙ ⁡ Y → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X = ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y
6 5 eqcoms ⊢ ⊥ ˙ ⁡ Y = ⊥ ˙ ⁡ X → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X = ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y
7 1 2 opococ ⊢ K ∈ OP ∧ X ∈ B → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X = X
8 7 3adant3 ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X = X
9 1 2 opococ ⊢ K ∈ OP ∧ Y ∈ B → ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y = Y
10 9 3adant2 ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y = Y
11 8 10 eqeq12d ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X = ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y ↔ X = Y
12 6 11 imbitrid ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ Y = ⊥ ˙ ⁡ X → X = Y
13 4 12 impbid2 ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → X = Y ↔ ⊥ ˙ ⁡ Y = ⊥ ˙ ⁡ X