Theorem wql2lem5 284

Description: Lemma for ->2 WQL axiom.

Hypothesis

Ref	Expression
wql2lem5.1	(a ->2 b) = 1

Assertion

Ref	Expression
wql2lem5	((b_|_ ^ (a v b)) ->2 a_|_) = 1

Proof of Theorem wql2lem5

Step	Hyp	Ref	Expression
1		anor3 82	. . . 4 ((b_|_ ^ (a v b))_|_ ^ a_|__|_) = ((b_|_ ^ (a v b)) v a_|_)_|_
2		oran3 85	. . . . . 6 ((a ->2 b)_|_ v a_|_) = ((a ->2 b) ^ a)_|_
3		ud2lem0c 270	. . . . . . 7 (a ->2 b)_|_ = (b_|_ ^ (a v b))
4	3	ax-r5 37	. . . . . 6 ((a ->2 b)_|_ v a_|_) = ((b_|_ ^ (a v b)) v a_|_)
5		wql2lem5.1	. . . . . . . . 9 (a ->2 b) = 1
6	5	ran 71	. . . . . . . 8 ((a ->2 b) ^ a) = (1 ^ a)
7		ancom 68	. . . . . . . 8 (1 ^ a) = (a ^ 1)
8		an1 98	. . . . . . . 8 (a ^ 1) = a
9	6, 7, 8	3tr 62	. . . . . . 7 ((a ->2 b) ^ a) = a
10	9	ax-r4 36	. . . . . 6 ((a ->2 b) ^ a)_|_ = a_|_
11	2, 4, 10	3tr2 61	. . . . 5 ((b_|_ ^ (a v b)) v a_|_) = a_|_
12	11	ax-r4 36	. . . 4 ((b_|_ ^ (a v b)) v a_|_)_|_ = a_|__|_
13	1, 12	ax-r2 35	. . 3 ((b_|_ ^ (a v b))_|_ ^ a_|__|_) = a_|__|_
14	13	lor 66	. 2 (a_|_ v ((b_|_ ^ (a v b))_|_ ^ a_|__|_)) = (a_|_ v a_|__|_)
15		df-i2 44	. 2 ((b_|_ ^ (a v b)) ->2 a_|_) = (a_|_ v ((b_|_ ^ (a v b))_|_ ^ a_|__|_))
16		df-t 40	. 2 1 = (a_|_ v a_|__|_)
17	14, 15, 16	3tr1 60	1 ((b_|_ ^ (a v b)) ->2 a_|_) = 1

Syntax hints:   = wb 1  _|_wn 4   v wo 6   ^ wa 7  1wt 9   ->2 wi2 14

This theorem was proved from axioms:  ax-a1 29  ax-a2 30  ax-a5 33  ax-r1 34  ax-r2 35  ax-r4 36  ax-r5 37

This theorem depends on definitions:  df-a 39  df-t 40  df-f 41  df-i2 44

metamath.org