Metamath Proof Explorer


Theorem cdleme

Description: Lemma E in Crawley p. 113. If p,q are atoms not under hyperplane w, then there is a unique translation f such that f(p) = q. (Contributed by NM, 11-Apr-2013)

Ref Expression
Hypotheses cdleme.l ˙=K
cdleme.a A=AtomsK
cdleme.h H=LHypK
cdleme.t T=LTrnKW
Assertion cdleme KHLWHPA¬P˙WQA¬Q˙W∃!fTfP=Q

Proof

Step Hyp Ref Expression
1 cdleme.l ˙=K
2 cdleme.a A=AtomsK
3 cdleme.h H=LHypK
4 cdleme.t T=LTrnKW
5 1 2 3 4 cdleme50ex KHLWHPA¬P˙WQA¬Q˙WfTfP=Q
6 simp11 KHLWHPA¬P˙WQA¬Q˙WfTzTfP=QzP=QKHLWH
7 simp2l KHLWHPA¬P˙WQA¬Q˙WfTzTfP=QzP=QfT
8 simp2r KHLWHPA¬P˙WQA¬Q˙WfTzTfP=QzP=QzT
9 simp12 KHLWHPA¬P˙WQA¬Q˙WfTzTfP=QzP=QPA¬P˙W
10 eqtr3 fP=QzP=QfP=zP
11 10 3ad2ant3 KHLWHPA¬P˙WQA¬Q˙WfTzTfP=QzP=QfP=zP
12 1 2 3 4 cdlemd KHLWHfTzTPA¬P˙WfP=zPf=z
13 6 7 8 9 11 12 syl311anc KHLWHPA¬P˙WQA¬Q˙WfTzTfP=QzP=Qf=z
14 13 3exp KHLWHPA¬P˙WQA¬Q˙WfTzTfP=QzP=Qf=z
15 14 ralrimivv KHLWHPA¬P˙WQA¬Q˙WfTzTfP=QzP=Qf=z
16 fveq1 f=zfP=zP
17 16 eqeq1d f=zfP=QzP=Q
18 17 reu4 ∃!fTfP=QfTfP=QfTzTfP=QzP=Qf=z
19 5 15 18 sylanbrc KHLWHPA¬P˙WQA¬Q˙W∃!fTfP=Q