Metamath Proof Explorer


Theorem 2reu4lem

Description: Lemma for 2reu4 . (Contributed by Alexander van der Vekens, 1-Jul-2017)

Ref Expression
Assertion 2reu4lem AB∃!xAyBφ∃!yBxAφxAyBφzAwBxAyBφx=zy=w

Proof

Step Hyp Ref Expression
1 reu3 ∃!xAyBφxAyBφzAxAyBφx=z
2 reu3 ∃!yBxAφyBxAφwByBxAφy=w
3 1 2 anbi12i ∃!xAyBφ∃!yBxAφxAyBφzAxAyBφx=zyBxAφwByBxAφy=w
4 3 a1i AB∃!xAyBφ∃!yBxAφxAyBφzAxAyBφx=zyBxAφwByBxAφy=w
5 an4 xAyBφzAxAyBφx=zyBxAφwByBxAφy=wxAyBφyBxAφzAxAyBφx=zwByBxAφy=w
6 5 a1i ABxAyBφzAxAyBφx=zyBxAφwByBxAφy=wxAyBφyBxAφzAxAyBφx=zwByBxAφy=w
7 rexcom yBxAφxAyBφ
8 7 anbi2i xAyBφyBxAφxAyBφxAyBφ
9 anidm xAyBφxAyBφxAyBφ
10 8 9 bitri xAyBφyBxAφxAyBφ
11 10 a1i ABxAyBφyBxAφxAyBφ
12 r19.26 xAyBφx=zxAyBφy=wxAyBφx=zxAxAyBφy=w
13 nfra1 xxAyBφy=w
14 13 r19.3rz AxAyBφy=wxAxAyBφy=w
15 14 bicomd AxAxAyBφy=wxAyBφy=w
16 15 adantr ABxAxAyBφy=wxAyBφy=w
17 16 adantr ABzAwBxAxAyBφy=wxAyBφy=w
18 17 anbi2d ABzAwBxAyBφx=zxAxAyBφy=wxAyBφx=zxAyBφy=w
19 jcab φx=zy=wφx=zφy=w
20 19 ralbii yBφx=zy=wyBφx=zφy=w
21 r19.26 yBφx=zφy=wyBφx=zyBφy=w
22 20 21 bitri yBφx=zy=wyBφx=zyBφy=w
23 22 ralbii xAyBφx=zy=wxAyBφx=zyBφy=w
24 r19.26 xAyBφx=zyBφy=wxAyBφx=zxAyBφy=w
25 23 24 bitri xAyBφx=zy=wxAyBφx=zxAyBφy=w
26 25 a1i ABzAwBxAyBφx=zy=wxAyBφx=zxAyBφy=w
27 18 26 bitr4d ABzAwBxAyBφx=zxAxAyBφy=wxAyBφx=zy=w
28 12 27 bitr2id ABzAwBxAyBφx=zy=wxAyBφx=zxAyBφy=w
29 r19.26 yByBφx=zxAφy=wyByBφx=zyBxAφy=w
30 nfra1 yyBφx=z
31 30 r19.3rz ByBφx=zyByBφx=z
32 31 ad2antlr ABzAwByBφx=zyByBφx=z
33 32 bicomd ABzAwByByBφx=zyBφx=z
34 ralcom yBxAφy=wxAyBφy=w
35 34 a1i ABzAwByBxAφy=wxAyBφy=w
36 33 35 anbi12d ABzAwByByBφx=zyBxAφy=wyBφx=zxAyBφy=w
37 29 36 bitrid ABzAwByByBφx=zxAφy=wyBφx=zxAyBφy=w
38 37 ralbidv ABzAwBxAyByBφx=zxAφy=wxAyBφx=zxAyBφy=w
39 28 38 bitr4d ABzAwBxAyBφx=zy=wxAyByBφx=zxAφy=w
40 r19.23v yBφx=zyBφx=z
41 r19.23v xAφy=wxAφy=w
42 40 41 anbi12i yBφx=zxAφy=wyBφx=zxAφy=w
43 42 2ralbii xAyByBφx=zxAφy=wxAyByBφx=zxAφy=w
44 43 a1i ABzAwBxAyByBφx=zxAφy=wxAyByBφx=zxAφy=w
45 neneq A¬A=
46 neneq B¬B=
47 45 46 anim12i AB¬A=¬B=
48 47 olcd ABA=B=¬A=¬B=
49 dfbi3 A=B=A=B=¬A=¬B=
50 48 49 sylibr ABA=B=
51 nfre1 yyBφ
52 nfv yx=z
53 51 52 nfim yyBφx=z
54 nfre1 xxAφ
55 nfv xy=w
56 54 55 nfim xxAφy=w
57 53 56 raaan2 A=B=xAyByBφx=zxAφy=wxAyBφx=zyBxAφy=w
58 50 57 syl ABxAyByBφx=zxAφy=wxAyBφx=zyBxAφy=w
59 58 adantr ABzAwBxAyByBφx=zxAφy=wxAyBφx=zyBxAφy=w
60 39 44 59 3bitrd ABzAwBxAyBφx=zy=wxAyBφx=zyBxAφy=w
61 60 2rexbidva ABzAwBxAyBφx=zy=wzAwBxAyBφx=zyBxAφy=w
62 reeanv zAwBxAyBφx=zyBxAφy=wzAxAyBφx=zwByBxAφy=w
63 61 62 bitr2di ABzAxAyBφx=zwByBxAφy=wzAwBxAyBφx=zy=w
64 11 63 anbi12d ABxAyBφyBxAφzAxAyBφx=zwByBxAφy=wxAyBφzAwBxAyBφx=zy=w
65 4 6 64 3bitrd AB∃!xAyBφ∃!yBxAφxAyBφzAwBxAyBφx=zy=w