Metamath Proof Explorer


Theorem cdlemk26b-3

Description: Part of proof of Lemma K of Crawley p. 118. (Contributed by NM, 14-Jul-2013)

Ref Expression
Hypotheses cdlemk3.b B=BaseK
cdlemk3.l ˙=K
cdlemk3.j ˙=joinK
cdlemk3.m ˙=meetK
cdlemk3.a A=AtomsK
cdlemk3.h H=LHypK
cdlemk3.t T=LTrnKW
cdlemk3.r R=trLKW
cdlemk3.s S=fTιiT|iP=P˙Rf˙NP˙RfF-1
cdlemk3.u1 Y=dT,eTιjT|jP=P˙Re˙SdP˙Red-1
Assertion cdlemk26b-3 KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGxYGT

Proof

Step Hyp Ref Expression
1 cdlemk3.b B=BaseK
2 cdlemk3.l ˙=K
3 cdlemk3.j ˙=joinK
4 cdlemk3.m ˙=meetK
5 cdlemk3.a A=AtomsK
6 cdlemk3.h H=LHypK
7 cdlemk3.t T=LTrnKW
8 cdlemk3.r R=trLKW
9 cdlemk3.s S=fTιiT|iP=P˙Rf˙NP˙RfF-1
10 cdlemk3.u1 Y=dT,eTιjT|jP=P˙Re˙SdP˙Red-1
11 simpl1 KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WKHLWH
12 1 6 7 8 cdlemftr2 KHLWHxTxIBRxRFRxRG
13 11 12 syl KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRG
14 simp3r KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGxIBRxRFRxRG
15 simp11 KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGKHLWH
16 simp133 KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGRF=RN
17 simp131 KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGGT
18 simp121 KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGFT
19 simp3l KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGxT
20 simp123 KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGNT
21 simp3r2 KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGRxRF
22 simp3r3 KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGRxRG
23 21 22 jca KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGRxRFRxRG
24 simp122 KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGFIB
25 simp132 KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGGIB
26 simp3r1 KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGxIB
27 24 25 26 3jca KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGFIBGIBxIB
28 simp2 KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGPA¬P˙W
29 1 2 3 4 5 6 7 8 9 10 cdlemkuel-3 KHLWHRF=RNGTFTxTNTRxRFRxRGFIBGIBxIBPA¬P˙WxYGT
30 15 16 17 18 19 20 23 27 28 29 syl333anc KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGxYGT
31 14 30 jca KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGxIBRxRFRxRGxYGT
32 31 3expia KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGxIBRxRFRxRGxYGT
33 32 expd KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGxIBRxRFRxRGxYGT
34 33 reximdvai KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGxTxIBRxRFRxRGxYGT
35 13 34 mpd KHLWHFTFIBNTGTGIBRF=RNPA¬P˙WxTxIBRxRFRxRGxYGT