Metamath Proof Explorer


Theorem cdlemk16a

Description: Part of proof of Lemma K of Crawley p. 118. (Contributed by NM, 3-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 cdlemk16a KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WP˙RG˙OP˙RGD-1A¬P˙RG˙OP˙RGD-1˙W

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 simp11 KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WKHLWH
12 simp22 KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WDT
13 simp13 KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WGT
14 simp33 KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WPA¬P˙W
15 simp21 KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WFT
16 simp23 KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WNT
17 simp12 KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WRF=RN
18 simp321 KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WFIB
19 simp323 KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WDIB
20 simp31l KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WRDRF
21 1 2 3 4 5 6 7 8 9 10 cdlemkoatnle KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFOPA¬OP˙W
22 11 15 12 16 14 17 18 19 20 21 syl333anc KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WOPA¬OP˙W
23 1 2 3 4 5 6 7 8 9 10 cdlemkole KHLWHFTDTNTPA¬P˙WRF=RNFIBDIBRDRFOP˙P˙RD
24 11 15 12 16 14 17 18 19 20 23 syl333anc KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WOP˙P˙RD
25 simp322 KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WGIB
26 simp31r KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WRDRG
27 eqid P˙RG˙OP˙RGD-1=P˙RG˙OP˙RGD-1
28 1 2 3 4 5 6 7 8 27 cdlemh KHLWHDTGTPA¬P˙WOPA¬OP˙WOP˙P˙RDDIBGIBRDRGP˙RG˙OP˙RGD-1A¬P˙RG˙OP˙RGD-1˙W
29 11 12 13 14 22 24 19 25 26 28 syl333anc KHLWHRF=RNGTFTDTNTRDRFRDRGFIBGIBDIBPA¬P˙WP˙RG˙OP˙RGD-1A¬P˙RG˙OP˙RGD-1˙W