Metamath Proof Explorer


Theorem 2polcon4bN

Description: Contraposition law for polarity. (Contributed by NM, 6-Mar-2012) (New usage is discouraged.)

Ref Expression
Hypotheses 2polss.a ⊢ A = Atoms ⁡ K
2polss.p ⊢ ⊥ ˙ = ⊥ 𝑃 ⁡ K
Assertion 2polcon4bN ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y ↔ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X

Proof

Step Hyp Ref Expression
1 2polss.a ⊢ A = Atoms ⁡ K
2 2polss.p ⊢ ⊥ ˙ = ⊥ 𝑃 ⁡ K
3 simpl1 ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A ∧ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y → K ∈ HL
4 simp1 ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A → K ∈ HL
5 1 2 polssatN ⊢ K ∈ HL ∧ Y ⊆ A → ⊥ ˙ ⁡ Y ⊆ A
6 5 3adant2 ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A → ⊥ ˙ ⁡ Y ⊆ A
7 1 2 polssatN ⊢ K ∈ HL ∧ ⊥ ˙ ⁡ Y ⊆ A → ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y ⊆ A
8 4 6 7 syl2anc ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A → ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y ⊆ A
9 8 adantr ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A ∧ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y → ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y ⊆ A
10 simpr ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A ∧ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y
11 1 2 polcon3N ⊢ K ∈ HL ∧ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y ⊆ A ∧ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y → ⊥ ˙ ⁡ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X
12 3 9 10 11 syl3anc ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A ∧ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y → ⊥ ˙ ⁡ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X
13 12 ex ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y → ⊥ ˙ ⁡ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X
14 1 2 3polN ⊢ K ∈ HL ∧ Y ⊆ A → ⊥ ˙ ⁡ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y = ⊥ ˙ ⁡ Y
15 14 3adant2 ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A → ⊥ ˙ ⁡ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y = ⊥ ˙ ⁡ Y
16 1 2 3polN ⊢ K ∈ HL ∧ X ⊆ A → ⊥ ˙ ⁡ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X = ⊥ ˙ ⁡ X
17 16 3adant3 ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A → ⊥ ˙ ⁡ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X = ⊥ ˙ ⁡ X
18 15 17 sseq12d ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A → ⊥ ˙ ⁡ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ↔ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X
19 13 18 sylibd ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y → ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X
20 simpl1 ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A ∧ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X → K ∈ HL
21 1 2 polssatN ⊢ K ∈ HL ∧ X ⊆ A → ⊥ ˙ ⁡ X ⊆ A
22 21 3adant3 ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A → ⊥ ˙ ⁡ X ⊆ A
23 22 adantr ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A ∧ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X → ⊥ ˙ ⁡ X ⊆ A
24 simpr ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A ∧ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X → ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X
25 1 2 polcon3N ⊢ K ∈ HL ∧ ⊥ ˙ ⁡ X ⊆ A ∧ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y
26 20 23 24 25 syl3anc ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A ∧ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y
27 26 ex ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A → ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y
28 19 27 impbid ⊢ K ∈ HL ∧ X ⊆ A ∧ Y ⊆ A → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ⊆ ⊥ ˙ ⁡ ⊥ ˙ ⁡ Y ↔ ⊥ ˙ ⁡ Y ⊆ ⊥ ˙ ⁡ X