Theorem negantlem9 841

Description: Negated antecedent identity.

Hypothesis

Ref	Expression
negant.1	(a ->1 c) = (b ->1 c)

Assertion

Ref	Expression
negantlem9	(a ->3 c) =< (b ->3 c)

Proof of Theorem negantlem9

Step	Hyp	Ref	Expression
1		leao4 157	. . . . 5 (a_|_ ^ c) =< (b_|_ v c)
2		leor 151	. . . . . 6 (a_|_ ^ c) =< (a v (a_|_ ^ c))
3		negant.1	. . . . . . . . 9 (a ->1 c) = (b ->1 c)
4	3	sac 817	. . . . . . . 8 (a_|_ ->1 c) = (b_|_ ->1 c)
5		df-i1 43	. . . . . . . . 9 (a_|_ ->1 c) = (a_|__|_ v (a_|_ ^ c))
6		ax-a1 29	. . . . . . . . . . 11 a = a_|__|_
7	6	ax-r5 37	. . . . . . . . . 10 (a v (a_|_ ^ c)) = (a_|__|_ v (a_|_ ^ c))
8	7	ax-r1 34	. . . . . . . . 9 (a_|__|_ v (a_|_ ^ c)) = (a v (a_|_ ^ c))
9	5, 8	ax-r2 35	. . . . . . . 8 (a_|_ ->1 c) = (a v (a_|_ ^ c))
10		df-i1 43	. . . . . . . . 9 (b_|_ ->1 c) = (b_|__|_ v (b_|_ ^ c))
11		ax-a1 29	. . . . . . . . . . 11 b = b_|__|_
12	11	ax-r5 37	. . . . . . . . . 10 (b v (b_|_ ^ c)) = (b_|__|_ v (b_|_ ^ c))
13	12	ax-r1 34	. . . . . . . . 9 (b_|__|_ v (b_|_ ^ c)) = (b v (b_|_ ^ c))
14	10, 13	ax-r2 35	. . . . . . . 8 (b_|_ ->1 c) = (b v (b_|_ ^ c))
15	4, 9, 14	3tr2 61	. . . . . . 7 (a v (a_|_ ^ c)) = (b v (b_|_ ^ c))
16		leo 150	. . . . . . . 8 b =< (b v (b_|_ ^ c_|_))
17	16	leror 144	. . . . . . 7 (b v (b_|_ ^ c)) =< ((b v (b_|_ ^ c_|_)) v (b_|_ ^ c))
18	15, 17	bltr 130	. . . . . 6 (a v (a_|_ ^ c)) =< ((b v (b_|_ ^ c_|_)) v (b_|_ ^ c))
19	2, 18	letr 129	. . . . 5 (a_|_ ^ c) =< ((b v (b_|_ ^ c_|_)) v (b_|_ ^ c))
20	1, 19	ler2an 165	. . . 4 (a_|_ ^ c) =< ((b_|_ v c) ^ ((b v (b_|_ ^ c_|_)) v (b_|_ ^ c)))
21		leao1 154	. . . . . 6 (a_|_ ^ c_|_) =< (a_|_ v c)
22	3	negantlem8 838	. . . . . 6 (a_|_ v c) = (b_|_ v c)
23	21, 22	lbtr 131	. . . . 5 (a_|_ ^ c_|_) =< (b_|_ v c)
24	3	negantlem5 835	. . . . . 6 (a_|_ ^ c_|_) = (b_|_ ^ c_|_)
25		leor 151	. . . . . . 7 (b_|_ ^ c_|_) =< (b v (b_|_ ^ c_|_))
26	25	ler 141	. . . . . 6 (b_|_ ^ c_|_) =< ((b v (b_|_ ^ c_|_)) v (b_|_ ^ c))
27	24, 26	bltr 130	. . . . 5 (a_|_ ^ c_|_) =< ((b v (b_|_ ^ c_|_)) v (b_|_ ^ c))
28	23, 27	ler2an 165	. . . 4 (a_|_ ^ c_|_) =< ((b_|_ v c) ^ ((b v (b_|_ ^ c_|_)) v (b_|_ ^ c)))
29	20, 28	lel2or 162	. . 3 ((a_|_ ^ c) v (a_|_ ^ c_|_)) =< ((b_|_ v c) ^ ((b v (b_|_ ^ c_|_)) v (b_|_ ^ c)))
30		lear 153	. . . . 5 (a ^ (a_|_ v c)) =< (a_|_ v c)
31	30, 22	lbtr 131	. . . 4 (a ^ (a_|_ v c)) =< (b_|_ v c)
32		leo 150	. . . . . . 7 a =< (a v (a_|_ ^ c))
33	32, 15	lbtr 131	. . . . . 6 a =< (b v (b_|_ ^ c))
34	33, 17	letr 129	. . . . 5 a =< ((b v (b_|_ ^ c_|_)) v (b_|_ ^ c))
35	34	lel 143	. . . 4 (a ^ (a_|_ v c)) =< ((b v (b_|_ ^ c_|_)) v (b_|_ ^ c))
36	31, 35	ler2an 165	. . 3 (a ^ (a_|_ v c)) =< ((b_|_ v c) ^ ((b v (b_|_ ^ c_|_)) v (b_|_ ^ c)))
37	29, 36	lel2or 162	. 2 (((a_|_ ^ c) v (a_|_ ^ c_|_)) v (a ^ (a_|_ v c))) =< ((b_|_ v c) ^ ((b v (b_|_ ^ c_|_)) v (b_|_ ^ c)))
38		df-i3 45	. 2 (a ->3 c) = (((a_|_ ^ c) v (a_|_ ^ c_|_)) v (a ^ (a_|_ v c)))
39		dfi3b 481	. 2 (b ->3 c) = ((b_|_ v c) ^ ((b v (b_|_ ^ c_|_)) v (b_|_ ^ c)))
40	37, 38, 39	le3tr1 132	1 (a ->3 c) =< (b ->3 c)

Syntax hints:   = wb 1   =< wle 2  _|_wn 4   v wo 6   ^ wa 7   ->1 wi1 13   ->3 wi3 15

This theorem is referenced by:  negant3 842

This theorem was proved from axioms:  ax-a1 29  ax-a2 30  ax-a3 31  ax-a4 32  ax-a5 33  ax-r1 34  ax-r2 35  ax-r4 36  ax-r5 37  ax-r3 421

This theorem depends on definitions:  df-b 38  df-a 39  df-t 40  df-f 41  df-i1 43  df-i3 45  df-le1 122  df-le2 123  df-c1 124  df-c2 125

metamath.org