Metamath Proof Explorer


Theorem cdlemk23-3

Description: Part of proof of Lemma K of Crawley p. 118. Eliminate the ( RC ) =/= ( RD ) requirement from cdlemk22-3 . (Contributed by NM, 7-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 cdlemk23-3 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxDYGP=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 simp11 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxKHLWH
12 simp121 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxFT
13 simp122 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxDT
14 simp123 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxNT
15 simp131 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxGT
16 simp133 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxxT
17 14 15 16 3jca KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxNTGTxT
18 simp21 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxPA¬P˙W
19 simp221 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxRF=RN
20 simp222 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxFIB
21 simp223 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxDIB
22 simp231 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxGIB
23 20 21 22 3jca KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxFIBDIBGIB
24 simp233 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxxIB
25 simp333 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxRGRx
26 simp332 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxRxRF
27 24 25 26 3jca KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxxIBRGRxRxRF
28 simp313 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxRDRF
29 simp32l KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxRGRD
30 simp331 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxRxRD
31 28 29 30 3jca KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxRDRFRGRDRxRD
32 1 2 3 4 5 6 7 8 9 10 cdlemk22-3 KHLWHFTDTNTGTxTPA¬P˙WRF=RNFIBDIBGIBxIBRGRxRxRFRDRFRGRDRxRDDYGP=xYGP
33 11 12 13 17 18 19 23 27 31 32 syl333anc KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxDYGP=xYGP
34 simp132 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxCT
35 simp232 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxCIB
36 20 35 22 3jca KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxFIBCIBGIB
37 simp312 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxRCRF
38 simp311 KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxRGRC
39 simp32r KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxRxRC
40 37 38 39 3jca KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxRCRFRGRCRxRC
41 1 2 3 4 5 6 7 8 9 10 cdlemk22-3 KHLWHFTCTNTGTxTPA¬P˙WRF=RNFIBCIBGIBxIBRGRxRxRFRCRFRGRCRxRCCYGP=xYGP
42 11 12 34 17 18 19 36 27 40 41 syl333anc KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxCYGP=xYGP
43 33 42 eqtr4d KHLWHFTDTNTGTCTxTPA¬P˙WRF=RNFIBDIBGIBCIBxIBRGRCRCRFRDRFRGRDRxRCRxRDRxRFRGRxDYGP=CYGP