cdleme35f

Description: Part of proof of Lemma E in Crawley p. 113. TODO: FIX COMMENT. (Contributed by NM, 10-Mar-2013)

	Ref	Expression
Hypotheses	cdleme35.l	$⊢ \underset{˙}{\leq} = \leq_{K}$
	cdleme35.j	$⊢ \underset{˙}{\lor} = join (K)$
	cdleme35.m	$⊢ \underset{˙}{\land} = meet (K)$
	cdleme35.a	$⊢ A = Atoms (K)$
	cdleme35.h	$⊢ H = LHyp (K)$
	cdleme35.u	$⊢ U = (P \underset{˙}{\lor} Q) \underset{˙}{\land} W$
	cdleme35.f	$⊢ F = (R \underset{˙}{\lor} U) \underset{˙}{\land} (Q \underset{˙}{\lor} ((P \underset{˙}{\lor} R) \underset{˙}{\land} W))$
Assertion	cdleme35f	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to (R \underset{˙}{\lor} U) \underset{˙}{\land} (P \underset{˙}{\lor} R) = R$

Proof

Step	Hyp	Ref	Expression
1		cdleme35.l	$⊢ \underset{˙}{\leq} = \leq_{K}$
2		cdleme35.j	$⊢ \underset{˙}{\lor} = join (K)$
3		cdleme35.m	$⊢ \underset{˙}{\land} = meet (K)$
4		cdleme35.a	$⊢ A = Atoms (K)$
5		cdleme35.h	$⊢ H = LHyp (K)$
6		cdleme35.u	$⊢ U = (P \underset{˙}{\lor} Q) \underset{˙}{\land} W$
7		cdleme35.f	$⊢ F = (R \underset{˙}{\lor} U) \underset{˙}{\land} (Q \underset{˙}{\lor} ((P \underset{˙}{\lor} R) \underset{˙}{\land} W))$
8		simp11l	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to K \in HL$
9		simp12l	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to P \in A$
10		simp2rl	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to R \in A$
11	2 4	hlatjcom	$⊢ (K \in HL \land P \in A \land R \in A) \to P \underset{˙}{\lor} R = R \underset{˙}{\lor} P$
12	8 9 10 11	syl3anc	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to P \underset{˙}{\lor} R = R \underset{˙}{\lor} P$
13	12	oveq2d	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to (R \underset{˙}{\lor} U) \underset{˙}{\land} (P \underset{˙}{\lor} R) = (R \underset{˙}{\lor} U) \underset{˙}{\land} (R \underset{˙}{\lor} P)$
14		simp11	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to (K \in HL \land W \in H)$
15		simp12	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to (P \in A \land \neg P \underset{˙}{\leq} W)$
16		simp13l	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to Q \in A$
17		simp2l	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to P \neq Q$
18	1 2 3 4 5 6	cdleme0a	$⊢ ((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land P \neq Q)) \to U \in A$
19	14 15 16 17 18	syl112anc	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to U \in A$
20		simp12r	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to \neg P \underset{˙}{\leq} W$
21	8	hllatd	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to K \in Lat$
22		eqid	$⊢ {Base}_{K} = {Base}_{K}$
23	22 2 4	hlatjcl	$⊢ (K \in HL \land P \in A \land Q \in A) \to P \underset{˙}{\lor} Q \in {Base}_{K}$
24	8 9 16 23	syl3anc	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to P \underset{˙}{\lor} Q \in {Base}_{K}$
25		simp11r	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to W \in H$
26	22 5	lhpbase	$⊢ W \in H \to W \in {Base}_{K}$
27	25 26	syl	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to W \in {Base}_{K}$
28	22 1 3	latmle2	$⊢ (K \in Lat \land P \underset{˙}{\lor} Q \in {Base}_{K} \land W \in {Base}_{K}) \to ((P \underset{˙}{\lor} Q) \underset{˙}{\land} W) \underset{˙}{\leq} W$
29	21 24 27 28	syl3anc	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to ((P \underset{˙}{\lor} Q) \underset{˙}{\land} W) \underset{˙}{\leq} W$
30	6 29	eqbrtrid	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to U \underset{˙}{\leq} W$
31		breq1	$⊢ U = P \to (U \underset{˙}{\leq} W \leftrightarrow P \underset{˙}{\leq} W)$
32	30 31	syl5ibcom	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to (U = P \to P \underset{˙}{\leq} W)$
33	32	necon3bd	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to (\neg P \underset{˙}{\leq} W \to U \neq P)$
34	20 33	mpd	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to U \neq P$
35		simp3	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)$
36	22 1 3	latmle1	$⊢ (K \in Lat \land P \underset{˙}{\lor} Q \in {Base}_{K} \land W \in {Base}_{K}) \to ((P \underset{˙}{\lor} Q) \underset{˙}{\land} W) \underset{˙}{\leq} (P \underset{˙}{\lor} Q)$
37	21 24 27 36	syl3anc	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to ((P \underset{˙}{\lor} Q) \underset{˙}{\land} W) \underset{˙}{\leq} (P \underset{˙}{\lor} Q)$
38	6 37	eqbrtrid	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to U \underset{˙}{\leq} (P \underset{˙}{\lor} Q)$
39	1 2 4	hlatlej1	$⊢ (K \in HL \land P \in A \land Q \in A) \to P \underset{˙}{\leq} (P \underset{˙}{\lor} Q)$
40	8 9 16 39	syl3anc	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to P \underset{˙}{\leq} (P \underset{˙}{\lor} Q)$
41	22 4	atbase	$⊢ U \in A \to U \in {Base}_{K}$
42	19 41	syl	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to U \in {Base}_{K}$
43	22 4	atbase	$⊢ P \in A \to P \in {Base}_{K}$
44	9 43	syl	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to P \in {Base}_{K}$
45	22 1 2	latjle12	$⊢ (K \in Lat \land (U \in {Base}_{K} \land P \in {Base}_{K} \land P \underset{˙}{\lor} Q \in {Base}_{K})) \to ((U \underset{˙}{\leq} (P \underset{˙}{\lor} Q) \land P \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \leftrightarrow (U \underset{˙}{\lor} P) \underset{˙}{\leq} (P \underset{˙}{\lor} Q))$
46	21 42 44 24 45	syl13anc	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to ((U \underset{˙}{\leq} (P \underset{˙}{\lor} Q) \land P \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \leftrightarrow (U \underset{˙}{\lor} P) \underset{˙}{\leq} (P \underset{˙}{\lor} Q))$
47	38 40 46	mpbi2and	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to (U \underset{˙}{\lor} P) \underset{˙}{\leq} (P \underset{˙}{\lor} Q)$
48	22 4	atbase	$⊢ R \in A \to R \in {Base}_{K}$
49	10 48	syl	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to R \in {Base}_{K}$
50	22 2 4	hlatjcl	$⊢ (K \in HL \land U \in A \land P \in A) \to U \underset{˙}{\lor} P \in {Base}_{K}$
51	8 19 9 50	syl3anc	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to U \underset{˙}{\lor} P \in {Base}_{K}$
52	22 1	lattr	$⊢ (K \in Lat \land (R \in {Base}_{K} \land U \underset{˙}{\lor} P \in {Base}_{K} \land P \underset{˙}{\lor} Q \in {Base}_{K})) \to ((R \underset{˙}{\leq} (U \underset{˙}{\lor} P) \land (U \underset{˙}{\lor} P) \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to R \underset{˙}{\leq} (P \underset{˙}{\lor} Q))$
53	21 49 51 24 52	syl13anc	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to ((R \underset{˙}{\leq} (U \underset{˙}{\lor} P) \land (U \underset{˙}{\lor} P) \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to R \underset{˙}{\leq} (P \underset{˙}{\lor} Q))$
54	47 53	mpan2d	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to (R \underset{˙}{\leq} (U \underset{˙}{\lor} P) \to R \underset{˙}{\leq} (P \underset{˙}{\lor} Q))$
55	35 54	mtod	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to \neg R \underset{˙}{\leq} (U \underset{˙}{\lor} P)$
56	1 2 3 4	2llnma2	$⊢ (K \in HL \land (U \in A \land P \in A \land R \in A) \land (U \neq P \land \neg R \underset{˙}{\leq} (U \underset{˙}{\lor} P))) \to (R \underset{˙}{\lor} U) \underset{˙}{\land} (R \underset{˙}{\lor} P) = R$
57	8 19 9 10 34 55 56	syl132anc	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to (R \underset{˙}{\lor} U) \underset{˙}{\land} (R \underset{˙}{\lor} P) = R$
58	13 57	eqtrd	$⊢ (((K \in HL \land W \in H) \land (P \in A \land \neg P \underset{˙}{\leq} W) \land (Q \in A \land \neg Q \underset{˙}{\leq} W)) \land (P \neq Q \land (R \in A \land \neg R \underset{˙}{\leq} W)) \land \neg R \underset{˙}{\leq} (P \underset{˙}{\lor} Q)) \to (R \underset{˙}{\lor} U) \underset{˙}{\land} (P \underset{˙}{\lor} R) = R$

Metamath Proof Explorer

Theorem cdleme35f

Proof