Theorem cdlemg17ir

Description: TODO: fix comment. (Contributed by NM, 13-May-2013)

	Ref	Expression
Hypotheses	cdlemg12.l	$$⊢\underset{\dot{}}{\le }={\le }_K$$
	cdlemg12.j	$$⊢\underset{\dot{}}{\vee }=\mathrm{join}\left(K\right)$$
	cdlemg12.m	$$⊢\underset{\dot{}}{\wedge }=\mathrm{meet}\left(K\right)$$
	cdlemg12.a	$$⊢A=\mathrm{Atoms}\left(K\right)$$
	cdlemg12.h	$$⊢H=\mathrm{LHyp}\left(K\right)$$
	cdlemg12.t	$$⊢T=\mathrm{LTrn}\left(K\right)\left(W\right)$$
	cdlemg12b.r	$$⊢R=\mathrm{trL}\left(K\right)\left(W\right)$$
Assertion	cdlemg17ir	$$⊢\left(\left(\left(K\in \mathrm{HL}\wedge W\in H\right)\wedge \left(P\in A\wedge \neg P\underset{\dot{}}{\le }W\right)\wedge \left(Q\in A\wedge \neg Q\underset{\dot{}}{\le }W\right)\right)\wedge \left(F\in T\wedge G\in T\wedge P\ne Q\right)\wedge \left(G\left(P\right)\ne P\wedge R\left(G\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \exists r\in A\left(\neg r\underset{\dot{}}{\le }W\wedge P\underset{\dot{}}{\vee }r=Q\underset{\dot{}}{\vee }r\right)\right)\right)\to F\left(G\left(P\right)\right)=F\left(Q\right)$$

Proof

Step	Hyp	Ref	Expression
1		cdlemg12.l	$$⊢\underset{\dot{}}{\le }={\le }_K$$
2		cdlemg12.j	$$⊢\underset{\dot{}}{\vee }=\mathrm{join}\left(K\right)$$
3		cdlemg12.m	$$⊢\underset{\dot{}}{\wedge }=\mathrm{meet}\left(K\right)$$
4		cdlemg12.a	$$⊢A=\mathrm{Atoms}\left(K\right)$$
5		cdlemg12.h	$$⊢H=\mathrm{LHyp}\left(K\right)$$
6		cdlemg12.t	$$⊢T=\mathrm{LTrn}\left(K\right)\left(W\right)$$
7		cdlemg12b.r	$$⊢R=\mathrm{trL}\left(K\right)\left(W\right)$$
8		simp1	$$⊢\left(\left(\left(K\in \mathrm{HL}\wedge W\in H\right)\wedge \left(P\in A\wedge \neg P\underset{\dot{}}{\le }W\right)\wedge \left(Q\in A\wedge \neg Q\underset{\dot{}}{\le }W\right)\right)\wedge \left(F\in T\wedge G\in T\wedge P\ne Q\right)\wedge \left(G\left(P\right)\ne P\wedge R\left(G\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \exists r\in A\left(\neg r\underset{\dot{}}{\le }W\wedge P\underset{\dot{}}{\vee }r=Q\underset{\dot{}}{\vee }r\right)\right)\right)\to \left(\left(K\in \mathrm{HL}\wedge W\in H\right)\wedge \left(P\in A\wedge \neg P\underset{\dot{}}{\le }W\right)\wedge \left(Q\in A\wedge \neg Q\underset{\dot{}}{\le }W\right)\right)$$
9		simp22	$$⊢\left(\left(\left(K\in \mathrm{HL}\wedge W\in H\right)\wedge \left(P\in A\wedge \neg P\underset{\dot{}}{\le }W\right)\wedge \left(Q\in A\wedge \neg Q\underset{\dot{}}{\le }W\right)\right)\wedge \left(F\in T\wedge G\in T\wedge P\ne Q\right)\wedge \left(G\left(P\right)\ne P\wedge R\left(G\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \exists r\in A\left(\neg r\underset{\dot{}}{\le }W\wedge P\underset{\dot{}}{\vee }r=Q\underset{\dot{}}{\vee }r\right)\right)\right)\to G\in T$$
10		simp23	$$⊢\left(\left(\left(K\in \mathrm{HL}\wedge W\in H\right)\wedge \left(P\in A\wedge \neg P\underset{\dot{}}{\le }W\right)\wedge \left(Q\in A\wedge \neg Q\underset{\dot{}}{\le }W\right)\right)\wedge \left(F\in T\wedge G\in T\wedge P\ne Q\right)\wedge \left(G\left(P\right)\ne P\wedge R\left(G\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \exists r\in A\left(\neg r\underset{\dot{}}{\le }W\wedge P\underset{\dot{}}{\vee }r=Q\underset{\dot{}}{\vee }r\right)\right)\right)\to P\ne Q$$
11		simp3	$$⊢\left(\left(\left(K\in \mathrm{HL}\wedge W\in H\right)\wedge \left(P\in A\wedge \neg P\underset{\dot{}}{\le }W\right)\wedge \left(Q\in A\wedge \neg Q\underset{\dot{}}{\le }W\right)\right)\wedge \left(F\in T\wedge G\in T\wedge P\ne Q\right)\wedge \left(G\left(P\right)\ne P\wedge R\left(G\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \exists r\in A\left(\neg r\underset{\dot{}}{\le }W\wedge P\underset{\dot{}}{\vee }r=Q\underset{\dot{}}{\vee }r\right)\right)\right)\to \left(G\left(P\right)\ne P\wedge R\left(G\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \exists r\in A\left(\neg r\underset{\dot{}}{\le }W\wedge P\underset{\dot{}}{\vee }r=Q\underset{\dot{}}{\vee }r\right)\right)$$
12	1 2 3 4 5 6 7	cdlemg17b	$$⊢\left(\left(\left(K\in \mathrm{HL}\wedge W\in H\right)\wedge \left(P\in A\wedge \neg P\underset{\dot{}}{\le }W\right)\wedge \left(Q\in A\wedge \neg Q\underset{\dot{}}{\le }W\right)\right)\wedge \left(G\in T\wedge P\ne Q\right)\wedge \left(G\left(P\right)\ne P\wedge R\left(G\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \exists r\in A\left(\neg r\underset{\dot{}}{\le }W\wedge P\underset{\dot{}}{\vee }r=Q\underset{\dot{}}{\vee }r\right)\right)\right)\to G\left(P\right)=Q$$
13	8 9 10 11 12	syl121anc	$$⊢\left(\left(\left(K\in \mathrm{HL}\wedge W\in H\right)\wedge \left(P\in A\wedge \neg P\underset{\dot{}}{\le }W\right)\wedge \left(Q\in A\wedge \neg Q\underset{\dot{}}{\le }W\right)\right)\wedge \left(F\in T\wedge G\in T\wedge P\ne Q\right)\wedge \left(G\left(P\right)\ne P\wedge R\left(G\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \exists r\in A\left(\neg r\underset{\dot{}}{\le }W\wedge P\underset{\dot{}}{\vee }r=Q\underset{\dot{}}{\vee }r\right)\right)\right)\to G\left(P\right)=Q$$
14	13	fveq2d	$$⊢\left(\left(\left(K\in \mathrm{HL}\wedge W\in H\right)\wedge \left(P\in A\wedge \neg P\underset{\dot{}}{\le }W\right)\wedge \left(Q\in A\wedge \neg Q\underset{\dot{}}{\le }W\right)\right)\wedge \left(F\in T\wedge G\in T\wedge P\ne Q\right)\wedge \left(G\left(P\right)\ne P\wedge R\left(G\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \exists r\in A\left(\neg r\underset{\dot{}}{\le }W\wedge P\underset{\dot{}}{\vee }r=Q\underset{\dot{}}{\vee }r\right)\right)\right)\to F\left(G\left(P\right)\right)=F\left(Q\right)$$