Metamath Proof Explorer


Theorem cdlemk26-3

Description: Part of proof of Lemma K of Crawley p. 118. Eliminate the x requirements from cdlemk25-3 . (Contributed by NM, 10-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 cdlemk26-3 KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDDYGP=CYGP

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 simp11l KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDKHL
12 simp11r KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDWH
13 1 6 7 8 cdlemftr3 KHLWHxTxIBRxRFRxRGRxRD
14 11 12 13 syl2anc KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRD
15 simp111 KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDKHLWH
16 simp112 KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDFTDTNT
17 simp13l KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDGT
18 17 3ad2ant1 KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDGT
19 simp13r KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDCT
20 19 3ad2ant1 KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDCT
21 simp2 KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDxT
22 18 20 21 3jca KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDGTCTxT
23 simp121 KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDPA¬P˙W
24 simp122 KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDRF=RNFIBDIB
25 simp23l KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDGIB
26 25 3ad2ant1 KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDGIB
27 simp23r KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDCIB
28 27 3ad2ant1 KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDCIB
29 simp3l KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDxIB
30 26 28 29 3jca KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDGIBCIBxIB
31 simp13l KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDRGRCRCRFRDRF
32 simp13r KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDRGRD
33 simp3r3 KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDRxRD
34 simp3r1 KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDRxRF
35 simp3r2 KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDRxRG
36 35 necomd KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDRGRx
37 33 34 36 3jca KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDRxRDRxRFRGRx
38 1 2 3 4 5 6 7 8 9 10 cdlemk25-3 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRDRxRFRGRxDYGP=CYGP
39 15 16 22 23 24 30 31 32 37 38 syl333anc KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDDYGP=CYGP
40 39 rexlimdv3a KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDxTxIBRxRFRxRGRxRDDYGP=CYGP
41 14 40 mpd KHLWHFTDTNTGTCTPA¬P˙WRF=RNFIBDIBGIBCIBRGRCRCRFRDRFRGRDDYGP=CYGP