Theorem dalawlem10

Description: Lemma for dalaw . Combine dalawlem5 , dalawlem8 , and dalawlem9 . (Contributed by NM, 6-Oct-2012)

	Ref	Expression
Hypotheses	dalawlem.l	$$⊢\underset{\dot{}}{\le }={\le }_K$$
	dalawlem.j	$$⊢\underset{\dot{}}{\vee }=\mathrm{join}\left(K\right)$$
	dalawlem.m	$$⊢\underset{\dot{}}{\wedge }=\mathrm{meet}\left(K\right)$$
	dalawlem.a	$$⊢A=\mathrm{Atoms}\left(K\right)$$
Assertion	dalawlem10	$$⊢\left(\left(K\in \mathrm{HL}\wedge \neg \left(\neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\wedge \left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(P\underset{\dot{}}{\vee }Q\right)\underset{\dot{}}{\wedge }\left(S\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(\left(\left(Q\underset{\dot{}}{\vee }R\right)\underset{\dot{}}{\wedge }\left(T\underset{\dot{}}{\vee }U\right)\right)\underset{\dot{}}{\vee }\left(\left(R\underset{\dot{}}{\vee }P\right)\underset{\dot{}}{\wedge }\left(U\underset{\dot{}}{\vee }S\right)\right)\right)$$

Proof

Step	Hyp	Ref	Expression
1		dalawlem.l	$$⊢\underset{\dot{}}{\le }={\le }_K$$
2		dalawlem.j	$$⊢\underset{\dot{}}{\vee }=\mathrm{join}\left(K\right)$$
3		dalawlem.m	$$⊢\underset{\dot{}}{\wedge }=\mathrm{meet}\left(K\right)$$
4		dalawlem.a	$$⊢A=\mathrm{Atoms}\left(K\right)$$
5		simp11	$$⊢\left(\left(K\in \mathrm{HL}\wedge \neg \left(\neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\wedge \left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to K\in \mathrm{HL}$$
6		simp12	$$⊢\left(\left(K\in \mathrm{HL}\wedge \neg \left(\neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\wedge \left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \neg \left(\neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\right)$$
7		3oran	$$⊢\left(\left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\vee \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\vee \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\right)\leftrightarrow \neg \left(\neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\right)$$
8	6 7	sylibr	$$⊢\left(\left(K\in \mathrm{HL}\wedge \neg \left(\neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\wedge \left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\vee \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\vee \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\right)$$
9		simp13	$$⊢\left(\left(K\in \mathrm{HL}\wedge \neg \left(\neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\wedge \left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)$$
10		simp2	$$⊢\left(\left(K\in \mathrm{HL}\wedge \neg \left(\neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\wedge \left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(P\in A\wedge Q\in A\wedge R\in A\right)$$
11		simp3	$$⊢\left(\left(K\in \mathrm{HL}\wedge \neg \left(\neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\wedge \left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(S\in A\wedge T\in A\wedge U\in A\right)$$
12	1 2 3 4	dalawlem5	$$⊢\left(\left(K\in \mathrm{HL}\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\wedge \left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(P\underset{\dot{}}{\vee }Q\right)\underset{\dot{}}{\wedge }\left(S\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(\left(\left(Q\underset{\dot{}}{\vee }R\right)\underset{\dot{}}{\wedge }\left(T\underset{\dot{}}{\vee }U\right)\right)\underset{\dot{}}{\vee }\left(\left(R\underset{\dot{}}{\vee }P\right)\underset{\dot{}}{\wedge }\left(U\underset{\dot{}}{\vee }S\right)\right)\right)$$
13	12	3expib	$$⊢\left(K\in \mathrm{HL}\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\to \left(\left(\left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(P\underset{\dot{}}{\vee }Q\right)\underset{\dot{}}{\wedge }\left(S\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(\left(\left(Q\underset{\dot{}}{\vee }R\right)\underset{\dot{}}{\wedge }\left(T\underset{\dot{}}{\vee }U\right)\right)\underset{\dot{}}{\vee }\left(\left(R\underset{\dot{}}{\vee }P\right)\underset{\dot{}}{\wedge }\left(U\underset{\dot{}}{\vee }S\right)\right)\right)\right)$$
14	13	3exp	$$⊢K\in \mathrm{HL}\to \left(\left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\to \left(\left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\to \left(\left(\left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(P\underset{\dot{}}{\vee }Q\right)\underset{\dot{}}{\wedge }\left(S\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(\left(\left(Q\underset{\dot{}}{\vee }R\right)\underset{\dot{}}{\wedge }\left(T\underset{\dot{}}{\vee }U\right)\right)\underset{\dot{}}{\vee }\left(\left(R\underset{\dot{}}{\vee }P\right)\underset{\dot{}}{\wedge }\left(U\underset{\dot{}}{\vee }S\right)\right)\right)\right)\right)\right)$$
15	1 2 3 4	dalawlem8	$$⊢\left(\left(K\in \mathrm{HL}\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\wedge \left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(P\underset{\dot{}}{\vee }Q\right)\underset{\dot{}}{\wedge }\left(S\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(\left(\left(Q\underset{\dot{}}{\vee }R\right)\underset{\dot{}}{\wedge }\left(T\underset{\dot{}}{\vee }U\right)\right)\underset{\dot{}}{\vee }\left(\left(R\underset{\dot{}}{\vee }P\right)\underset{\dot{}}{\wedge }\left(U\underset{\dot{}}{\vee }S\right)\right)\right)$$
16	15	3expib	$$⊢\left(K\in \mathrm{HL}\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\to \left(\left(\left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(P\underset{\dot{}}{\vee }Q\right)\underset{\dot{}}{\wedge }\left(S\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(\left(\left(Q\underset{\dot{}}{\vee }R\right)\underset{\dot{}}{\wedge }\left(T\underset{\dot{}}{\vee }U\right)\right)\underset{\dot{}}{\vee }\left(\left(R\underset{\dot{}}{\vee }P\right)\underset{\dot{}}{\wedge }\left(U\underset{\dot{}}{\vee }S\right)\right)\right)\right)$$
17	16	3exp	$$⊢K\in \mathrm{HL}\to \left(\left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\to \left(\left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\to \left(\left(\left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(P\underset{\dot{}}{\vee }Q\right)\underset{\dot{}}{\wedge }\left(S\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(\left(\left(Q\underset{\dot{}}{\vee }R\right)\underset{\dot{}}{\wedge }\left(T\underset{\dot{}}{\vee }U\right)\right)\underset{\dot{}}{\vee }\left(\left(R\underset{\dot{}}{\vee }P\right)\underset{\dot{}}{\wedge }\left(U\underset{\dot{}}{\vee }S\right)\right)\right)\right)\right)\right)$$
18	1 2 3 4	dalawlem9	$$⊢\left(\left(K\in \mathrm{HL}\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\wedge \left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(P\underset{\dot{}}{\vee }Q\right)\underset{\dot{}}{\wedge }\left(S\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(\left(\left(Q\underset{\dot{}}{\vee }R\right)\underset{\dot{}}{\wedge }\left(T\underset{\dot{}}{\vee }U\right)\right)\underset{\dot{}}{\vee }\left(\left(R\underset{\dot{}}{\vee }P\right)\underset{\dot{}}{\wedge }\left(U\underset{\dot{}}{\vee }S\right)\right)\right)$$
19	18	3expib	$$⊢\left(K\in \mathrm{HL}\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\to \left(\left(\left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(P\underset{\dot{}}{\vee }Q\right)\underset{\dot{}}{\wedge }\left(S\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(\left(\left(Q\underset{\dot{}}{\vee }R\right)\underset{\dot{}}{\wedge }\left(T\underset{\dot{}}{\vee }U\right)\right)\underset{\dot{}}{\vee }\left(\left(R\underset{\dot{}}{\vee }P\right)\underset{\dot{}}{\wedge }\left(U\underset{\dot{}}{\vee }S\right)\right)\right)\right)$$
20	19	3exp	$$⊢K\in \mathrm{HL}\to \left(\left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\to \left(\left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\to \left(\left(\left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(P\underset{\dot{}}{\vee }Q\right)\underset{\dot{}}{\wedge }\left(S\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(\left(\left(Q\underset{\dot{}}{\vee }R\right)\underset{\dot{}}{\wedge }\left(T\underset{\dot{}}{\vee }U\right)\right)\underset{\dot{}}{\vee }\left(\left(R\underset{\dot{}}{\vee }P\right)\underset{\dot{}}{\wedge }\left(U\underset{\dot{}}{\vee }S\right)\right)\right)\right)\right)\right)$$
21	14 17 20	3jaod	$$⊢K\in \mathrm{HL}\to \left(\left(\left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\vee \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\vee \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\right)\to \left(\left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\to \left(\left(\left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(P\underset{\dot{}}{\vee }Q\right)\underset{\dot{}}{\wedge }\left(S\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(\left(\left(Q\underset{\dot{}}{\vee }R\right)\underset{\dot{}}{\wedge }\left(T\underset{\dot{}}{\vee }U\right)\right)\underset{\dot{}}{\vee }\left(\left(R\underset{\dot{}}{\vee }P\right)\underset{\dot{}}{\wedge }\left(U\underset{\dot{}}{\vee }S\right)\right)\right)\right)\right)\right)$$
22	21	3imp	$$⊢\left(K\in \mathrm{HL}\wedge \left(\left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\vee \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\vee \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\to \left(\left(\left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(P\underset{\dot{}}{\vee }Q\right)\underset{\dot{}}{\wedge }\left(S\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(\left(\left(Q\underset{\dot{}}{\vee }R\right)\underset{\dot{}}{\wedge }\left(T\underset{\dot{}}{\vee }U\right)\right)\underset{\dot{}}{\vee }\left(\left(R\underset{\dot{}}{\vee }P\right)\underset{\dot{}}{\wedge }\left(U\underset{\dot{}}{\vee }S\right)\right)\right)\right)$$
23	22	3impib	$$⊢\left(\left(K\in \mathrm{HL}\wedge \left(\left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\vee \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\vee \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\wedge \left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(P\underset{\dot{}}{\vee }Q\right)\underset{\dot{}}{\wedge }\left(S\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(\left(\left(Q\underset{\dot{}}{\vee }R\right)\underset{\dot{}}{\wedge }\left(T\underset{\dot{}}{\vee }U\right)\right)\underset{\dot{}}{\vee }\left(\left(R\underset{\dot{}}{\vee }P\right)\underset{\dot{}}{\wedge }\left(U\underset{\dot{}}{\vee }S\right)\right)\right)$$
24	5 8 9 10 11 23	syl311anc	$$⊢\left(\left(K\in \mathrm{HL}\wedge \neg \left(\neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(P\underset{\dot{}}{\vee }Q\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(Q\underset{\dot{}}{\vee }R\right)\wedge \neg \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }P\right)\right)\wedge \left(\left(P\underset{\dot{}}{\vee }S\right)\underset{\dot{}}{\wedge }\left(Q\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(R\underset{\dot{}}{\vee }U\right)\right)\wedge \left(P\in A\wedge Q\in A\wedge R\in A\right)\wedge \left(S\in A\wedge T\in A\wedge U\in A\right)\right)\to \left(\left(P\underset{\dot{}}{\vee }Q\right)\underset{\dot{}}{\wedge }\left(S\underset{\dot{}}{\vee }T\right)\right)\underset{\dot{}}{\le }\left(\left(\left(Q\underset{\dot{}}{\vee }R\right)\underset{\dot{}}{\wedge }\left(T\underset{\dot{}}{\vee }U\right)\right)\underset{\dot{}}{\vee }\left(\left(R\underset{\dot{}}{\vee }P\right)\underset{\dot{}}{\wedge }\left(U\underset{\dot{}}{\vee }S\right)\right)\right)$$