Metamath Proof Explorer


Theorem cvrcon3b

Description: Contraposition law for the covers relation. ( cvcon3 analog.) (Contributed by NM, 4-Nov-2011)

Ref Expression
Hypotheses cvrcon3b.b ⊢ B = Base K
cvrcon3b.o ⊢ ⊥ ˙ = oc ⁡ K
cvrcon3b.c ⊢ C = ⋖ K
Assertion cvrcon3b ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → X C Y ↔ ⊥ ˙ ⁡ Y C ⊥ ˙ ⁡ X

Proof

Step Hyp Ref Expression
1 cvrcon3b.b ⊢ B = Base K
2 cvrcon3b.o ⊢ ⊥ ˙ = oc ⁡ K
3 cvrcon3b.c ⊢ C = ⋖ K
4 eqid ⊢ < K = < K
5 1 4 2 opltcon3b ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → X < K Y ↔ ⊥ ˙ ⁡ Y < K ⊥ ˙ ⁡ X
6 simpl1 ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ x ∈ B → K ∈ OP
7 simpl2 ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ x ∈ B → X ∈ B
8 simpr ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ x ∈ B → x ∈ B
9 1 4 2 opltcon3b ⊢ K ∈ OP ∧ X ∈ B ∧ x ∈ B → X < K x ↔ ⊥ ˙ ⁡ x < K ⊥ ˙ ⁡ X
10 6 7 8 9 syl3anc ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ x ∈ B → X < K x ↔ ⊥ ˙ ⁡ x < K ⊥ ˙ ⁡ X
11 simpl3 ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ x ∈ B → Y ∈ B
12 1 4 2 opltcon3b ⊢ K ∈ OP ∧ x ∈ B ∧ Y ∈ B → x < K Y ↔ ⊥ ˙ ⁡ Y < K ⊥ ˙ ⁡ x
13 6 8 11 12 syl3anc ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ x ∈ B → x < K Y ↔ ⊥ ˙ ⁡ Y < K ⊥ ˙ ⁡ x
14 10 13 anbi12d ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ x ∈ B → X < K x ∧ x < K Y ↔ ⊥ ˙ ⁡ x < K ⊥ ˙ ⁡ X ∧ ⊥ ˙ ⁡ Y < K ⊥ ˙ ⁡ x
15 1 2 opoccl ⊢ K ∈ OP ∧ x ∈ B → ⊥ ˙ ⁡ x ∈ B
16 15 3ad2antl1 ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ x ∈ B → ⊥ ˙ ⁡ x ∈ B
17 breq2 ⊢ y = ⊥ ˙ ⁡ x → ⊥ ˙ ⁡ Y < K y ↔ ⊥ ˙ ⁡ Y < K ⊥ ˙ ⁡ x
18 breq1 ⊢ y = ⊥ ˙ ⁡ x → y < K ⊥ ˙ ⁡ X ↔ ⊥ ˙ ⁡ x < K ⊥ ˙ ⁡ X
19 17 18 anbi12d ⊢ y = ⊥ ˙ ⁡ x → ⊥ ˙ ⁡ Y < K y ∧ y < K ⊥ ˙ ⁡ X ↔ ⊥ ˙ ⁡ Y < K ⊥ ˙ ⁡ x ∧ ⊥ ˙ ⁡ x < K ⊥ ˙ ⁡ X
20 19 rspcev ⊢ ⊥ ˙ ⁡ x ∈ B ∧ ⊥ ˙ ⁡ Y < K ⊥ ˙ ⁡ x ∧ ⊥ ˙ ⁡ x < K ⊥ ˙ ⁡ X → ∃ y ∈ B ⊥ ˙ ⁡ Y < K y ∧ y < K ⊥ ˙ ⁡ X
21 20 ex ⊢ ⊥ ˙ ⁡ x ∈ B → ⊥ ˙ ⁡ Y < K ⊥ ˙ ⁡ x ∧ ⊥ ˙ ⁡ x < K ⊥ ˙ ⁡ X → ∃ y ∈ B ⊥ ˙ ⁡ Y < K y ∧ y < K ⊥ ˙ ⁡ X
22 16 21 syl ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ x ∈ B → ⊥ ˙ ⁡ Y < K ⊥ ˙ ⁡ x ∧ ⊥ ˙ ⁡ x < K ⊥ ˙ ⁡ X → ∃ y ∈ B ⊥ ˙ ⁡ Y < K y ∧ y < K ⊥ ˙ ⁡ X
23 22 ancomsd ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ x ∈ B → ⊥ ˙ ⁡ x < K ⊥ ˙ ⁡ X ∧ ⊥ ˙ ⁡ Y < K ⊥ ˙ ⁡ x → ∃ y ∈ B ⊥ ˙ ⁡ Y < K y ∧ y < K ⊥ ˙ ⁡ X
24 14 23 sylbid ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ x ∈ B → X < K x ∧ x < K Y → ∃ y ∈ B ⊥ ˙ ⁡ Y < K y ∧ y < K ⊥ ˙ ⁡ X
25 24 rexlimdva ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → ∃ x ∈ B X < K x ∧ x < K Y → ∃ y ∈ B ⊥ ˙ ⁡ Y < K y ∧ y < K ⊥ ˙ ⁡ X
26 simpl1 ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ y ∈ B → K ∈ OP
27 simpl3 ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ y ∈ B → Y ∈ B
28 simpr ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ y ∈ B → y ∈ B
29 1 4 2 opltcon1b ⊢ K ∈ OP ∧ Y ∈ B ∧ y ∈ B → ⊥ ˙ ⁡ Y < K y ↔ ⊥ ˙ ⁡ y < K Y
30 26 27 28 29 syl3anc ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ y ∈ B → ⊥ ˙ ⁡ Y < K y ↔ ⊥ ˙ ⁡ y < K Y
31 simpl2 ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ y ∈ B → X ∈ B
32 1 4 2 opltcon2b ⊢ K ∈ OP ∧ y ∈ B ∧ X ∈ B → y < K ⊥ ˙ ⁡ X ↔ X < K ⊥ ˙ ⁡ y
33 26 28 31 32 syl3anc ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ y ∈ B → y < K ⊥ ˙ ⁡ X ↔ X < K ⊥ ˙ ⁡ y
34 30 33 anbi12d ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ y ∈ B → ⊥ ˙ ⁡ Y < K y ∧ y < K ⊥ ˙ ⁡ X ↔ ⊥ ˙ ⁡ y < K Y ∧ X < K ⊥ ˙ ⁡ y
35 1 2 opoccl ⊢ K ∈ OP ∧ y ∈ B → ⊥ ˙ ⁡ y ∈ B
36 35 3ad2antl1 ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ y ∈ B → ⊥ ˙ ⁡ y ∈ B
37 breq2 ⊢ x = ⊥ ˙ ⁡ y → X < K x ↔ X < K ⊥ ˙ ⁡ y
38 breq1 ⊢ x = ⊥ ˙ ⁡ y → x < K Y ↔ ⊥ ˙ ⁡ y < K Y
39 37 38 anbi12d ⊢ x = ⊥ ˙ ⁡ y → X < K x ∧ x < K Y ↔ X < K ⊥ ˙ ⁡ y ∧ ⊥ ˙ ⁡ y < K Y
40 39 rspcev ⊢ ⊥ ˙ ⁡ y ∈ B ∧ X < K ⊥ ˙ ⁡ y ∧ ⊥ ˙ ⁡ y < K Y → ∃ x ∈ B X < K x ∧ x < K Y
41 40 ex ⊢ ⊥ ˙ ⁡ y ∈ B → X < K ⊥ ˙ ⁡ y ∧ ⊥ ˙ ⁡ y < K Y → ∃ x ∈ B X < K x ∧ x < K Y
42 36 41 syl ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ y ∈ B → X < K ⊥ ˙ ⁡ y ∧ ⊥ ˙ ⁡ y < K Y → ∃ x ∈ B X < K x ∧ x < K Y
43 42 ancomsd ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ y ∈ B → ⊥ ˙ ⁡ y < K Y ∧ X < K ⊥ ˙ ⁡ y → ∃ x ∈ B X < K x ∧ x < K Y
44 34 43 sylbid ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B ∧ y ∈ B → ⊥ ˙ ⁡ Y < K y ∧ y < K ⊥ ˙ ⁡ X → ∃ x ∈ B X < K x ∧ x < K Y
45 44 rexlimdva ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → ∃ y ∈ B ⊥ ˙ ⁡ Y < K y ∧ y < K ⊥ ˙ ⁡ X → ∃ x ∈ B X < K x ∧ x < K Y
46 25 45 impbid ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → ∃ x ∈ B X < K x ∧ x < K Y ↔ ∃ y ∈ B ⊥ ˙ ⁡ Y < K y ∧ y < K ⊥ ˙ ⁡ X
47 46 notbid ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → ¬ ∃ x ∈ B X < K x ∧ x < K Y ↔ ¬ ∃ y ∈ B ⊥ ˙ ⁡ Y < K y ∧ y < K ⊥ ˙ ⁡ X
48 5 47 anbi12d ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → X < K Y ∧ ¬ ∃ x ∈ B X < K x ∧ x < K Y ↔ ⊥ ˙ ⁡ Y < K ⊥ ˙ ⁡ X ∧ ¬ ∃ y ∈ B ⊥ ˙ ⁡ Y < K y ∧ y < K ⊥ ˙ ⁡ X
49 1 4 3 cvrval ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → X C Y ↔ X < K Y ∧ ¬ ∃ x ∈ B X < K x ∧ x < K Y
50 simp1 ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → K ∈ OP
51 1 2 opoccl ⊢ K ∈ OP ∧ Y ∈ B → ⊥ ˙ ⁡ Y ∈ B
52 51 3adant2 ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ Y ∈ B
53 1 2 opoccl ⊢ K ∈ OP ∧ X ∈ B → ⊥ ˙ ⁡ X ∈ B
54 53 3adant3 ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ X ∈ B
55 1 4 3 cvrval ⊢ K ∈ OP ∧ ⊥ ˙ ⁡ Y ∈ B ∧ ⊥ ˙ ⁡ X ∈ B → ⊥ ˙ ⁡ Y C ⊥ ˙ ⁡ X ↔ ⊥ ˙ ⁡ Y < K ⊥ ˙ ⁡ X ∧ ¬ ∃ y ∈ B ⊥ ˙ ⁡ Y < K y ∧ y < K ⊥ ˙ ⁡ X
56 50 52 54 55 syl3anc ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ Y C ⊥ ˙ ⁡ X ↔ ⊥ ˙ ⁡ Y < K ⊥ ˙ ⁡ X ∧ ¬ ∃ y ∈ B ⊥ ˙ ⁡ Y < K y ∧ y < K ⊥ ˙ ⁡ X
57 48 49 56 3bitr4d ⊢ K ∈ OP ∧ X ∈ B ∧ Y ∈ B → X C Y ↔ ⊥ ˙ ⁡ Y C ⊥ ˙ ⁡ X