Metamath Proof Explorer


Theorem cdlemk14

Description: Part of proof of Lemma K of Crawley p. 118. Line 19 on p. 119. O , D are k_1, f_1. (Contributed by NM, 1-Jul-2013)

Ref Expression
Hypotheses cdlemk1.b B=BaseK
cdlemk1.l ˙=K
cdlemk1.j ˙=joinK
cdlemk1.m ˙=meetK
cdlemk1.a A=AtomsK
cdlemk1.h H=LHypK
cdlemk1.t T=LTrnKW
cdlemk1.r R=trLKW
cdlemk1.s S=fTιiT|iP=P˙Rf˙NP˙RfF-1
cdlemk1.o O=SD
Assertion cdlemk14 KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFNP˙OP˙RFD-1

Proof

Step Hyp Ref Expression
1 cdlemk1.b B=BaseK
2 cdlemk1.l ˙=K
3 cdlemk1.j ˙=joinK
4 cdlemk1.m ˙=meetK
5 cdlemk1.a A=AtomsK
6 cdlemk1.h H=LHypK
7 cdlemk1.t T=LTrnKW
8 cdlemk1.r R=trLKW
9 cdlemk1.s S=fTιiT|iP=P˙Rf˙NP˙RfF-1
10 cdlemk1.o O=SD
11 1 2 3 4 5 6 7 8 9 10 cdlemk13 KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFOP=P˙RD˙NP˙RDF-1
12 simp11l KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFKHL
13 12 hllatd KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFKLat
14 simp22l KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFPA
15 simp11 KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFKHLWH
16 simp13 KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFDT
17 simp32 KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFDIB
18 1 5 6 7 8 trlnidat KHLWHDTDIBRDA
19 15 16 17 18 syl3anc KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFRDA
20 1 3 5 hlatjcl KHLPARDAP˙RDB
21 12 14 19 20 syl3anc KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFP˙RDB
22 simp21 KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFNT
23 2 5 6 7 ltrnat KHLWHNTPANPA
24 15 22 14 23 syl3anc KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFNPA
25 simp12 KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFFT
26 simp33 KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFRDRF
27 5 6 7 8 trlcocnvat KHLWHDTFTRDRFRDF-1A
28 15 16 25 26 27 syl121anc KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFRDF-1A
29 1 3 5 hlatjcl KHLNPARDF-1ANP˙RDF-1B
30 12 24 28 29 syl3anc KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFNP˙RDF-1B
31 1 2 4 latmle2 KLatP˙RDBNP˙RDF-1BP˙RD˙NP˙RDF-1˙NP˙RDF-1
32 13 21 30 31 syl3anc KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFP˙RD˙NP˙RDF-1˙NP˙RDF-1
33 11 32 eqbrtrd KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFOP˙NP˙RDF-1
34 10 fveq1i OP=SDP
35 1 2 3 5 6 7 8 4 9 cdlemksat KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFSDPA
36 34 35 eqeltrid KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFOPA
37 6 7 ltrncnv KHLWHFTF-1T
38 15 25 37 syl2anc KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFF-1T
39 6 7 ltrnco KHLWHDTF-1TDF-1T
40 15 16 38 39 syl3anc KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFDF-1T
41 2 6 7 8 trlle KHLWHDF-1TRDF-1˙W
42 15 40 41 syl2anc KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFRDF-1˙W
43 1 2 3 4 5 6 7 8 9 10 cdlemkoatnle KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFOPA¬OP˙W
44 43 simprd KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRF¬OP˙W
45 nbrne2 RDF-1˙W¬OP˙WRDF-1OP
46 42 44 45 syl2anc KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFRDF-1OP
47 46 necomd KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFOPRDF-1
48 2 3 5 hlatexch2 KHLOPANPARDF-1AOPRDF-1OP˙NP˙RDF-1NP˙OP˙RDF-1
49 12 36 24 28 47 48 syl131anc KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFOP˙NP˙RDF-1NP˙OP˙RDF-1
50 33 49 mpd KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFNP˙OP˙RDF-1
51 6 7 8 trlcocnv KHLWHDTFTRDF-1=RFD-1
52 15 16 25 51 syl3anc KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFRDF-1=RFD-1
53 52 oveq2d KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFOP˙RDF-1=OP˙RFD-1
54 50 53 breqtrd KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFNP˙OP˙RFD-1