Metamath Proof Explorer


Theorem cdlemg4e

Description: TODO: FIX COMMENT. (Contributed by NM, 25-Apr-2013)

Ref Expression
Hypotheses cdlemg4.l ˙=K
cdlemg4.a A=AtomsK
cdlemg4.h H=LHypK
cdlemg4.t T=LTrnKW
cdlemg4.r R=trLKW
cdlemg4.j ˙=joinK
cdlemg4b.v V=RG
cdlemg4.m ˙=meetK
Assertion cdlemg4e KHLWHPA¬P˙WQA¬Q˙WFTGT¬Q˙P˙VFGP=PFGQ=GQ˙RF˙FGP˙GP˙GQ˙W

Proof

Step Hyp Ref Expression
1 cdlemg4.l ˙=K
2 cdlemg4.a A=AtomsK
3 cdlemg4.h H=LHypK
4 cdlemg4.t T=LTrnKW
5 cdlemg4.r R=trLKW
6 cdlemg4.j ˙=joinK
7 cdlemg4b.v V=RG
8 cdlemg4.m ˙=meetK
9 simp1 KHLWHPA¬P˙WQA¬Q˙WFTGT¬Q˙P˙VFGP=PKHLWH
10 simp23 KHLWHPA¬P˙WQA¬Q˙WFTGT¬Q˙P˙VFGP=PFT
11 simp31 KHLWHPA¬P˙WQA¬Q˙WFTGT¬Q˙P˙VFGP=PGT
12 simp21 KHLWHPA¬P˙WQA¬Q˙WFTGT¬Q˙P˙VFGP=PPA¬P˙W
13 1 2 3 4 ltrnel KHLWHGTPA¬P˙WGPA¬GP˙W
14 9 11 12 13 syl3anc KHLWHPA¬P˙WQA¬Q˙WFTGT¬Q˙P˙VFGP=PGPA¬GP˙W
15 simp22 KHLWHPA¬P˙WQA¬Q˙WFTGT¬Q˙P˙VFGP=PQA¬Q˙W
16 1 2 3 4 ltrnel KHLWHGTQA¬Q˙WGQA¬GQ˙W
17 9 11 15 16 syl3anc KHLWHPA¬P˙WQA¬Q˙WFTGT¬Q˙P˙VFGP=PGQA¬GQ˙W
18 1 2 3 4 5 6 7 cdlemg4d KHLWHPA¬P˙WQA¬Q˙WFTGT¬Q˙P˙VFGP=P¬GQ˙GP˙FGP
19 1 6 8 2 3 4 5 cdlemc KHLWHFTGPA¬GP˙WGQA¬GQ˙W¬GQ˙GP˙FGPFGQ=GQ˙RF˙FGP˙GP˙GQ˙W
20 9 10 14 17 18 19 syl131anc KHLWHPA¬P˙WQA¬Q˙WFTGT¬Q˙P˙VFGP=PFGQ=GQ˙RF˙FGP˙GP˙GQ˙W