Metamath Proof Explorer


Theorem isbasisrelowllem2

Description: Lemma for isbasisrelowl . (Contributed by ML, 27-Jul-2020)

Ref Expression
Hypothesis isbasisrelowl.1 I=.2
Assertion isbasisrelowllem2 abx=z|azz<bcdy=z|czz<dacdbxyI

Proof

Step Hyp Ref Expression
1 isbasisrelowl.1 I=.2
2 simplr1 abx=z|azz<bcdy=z|czz<dacdbc
3 simplr2 abx=z|azz<bcdy=z|czz<dacdbd
4 nfv za
5 nfv zb
6 nfrab1 _zz|azz<b
7 6 nfeq2 zx=z|azz<b
8 4 5 7 nf3an zabx=z|azz<b
9 nfv zc
10 nfv zd
11 nfrab1 _zz|czz<d
12 11 nfeq2 zy=z|czz<d
13 9 10 12 nf3an zcdy=z|czz<d
14 8 13 nfan zabx=z|azz<bcdy=z|czz<d
15 nfv zacdb
16 14 15 nfan zabx=z|azz<bcdy=z|czz<dacdb
17 nfcv _zxy
18 simp3 abx=z|azz<bx=z|azz<b
19 simp3 cdy=z|czz<dy=z|czz<d
20 elin zxyzxzy
21 eleq2 x=z|azz<bzxzz|azz<b
22 rabid zz|azz<bzazz<b
23 21 22 bitrdi x=z|azz<bzxzazz<b
24 23 anbi1d x=z|azz<bzxzyzazz<bzy
25 20 24 bitrid x=z|azz<bzxyzazz<bzy
26 eleq2 y=z|czz<dzyzz|czz<d
27 rabid zz|czz<dzczz<d
28 26 27 bitrdi y=z|czz<dzyzczz<d
29 28 anbi2d y=z|czz<dzazz<bzyzazz<bzczz<d
30 25 29 sylan9bb x=z|azz<by=z|czz<dzxyzazz<bzczz<d
31 an4 zazz<bzczz<dzzazz<bczz<d
32 anidm zzz
33 32 anbi1i zzazz<bczz<dzazz<bczz<d
34 31 33 bitri zazz<bzczz<dzazz<bczz<d
35 an4 azz<dczz<bazczz<dz<b
36 an42 azz<bczz<dazczz<dz<b
37 36 bicomi azczz<dz<bazz<bczz<d
38 35 37 bitri azz<dczz<bazz<bczz<d
39 38 bicomi azz<bczz<dazz<dczz<b
40 39 anbi2i zazz<bczz<dzazz<dczz<b
41 34 40 bitri zazz<bzczz<dzazz<dczz<b
42 30 41 bitrdi x=z|azz<by=z|czz<dzxyzazz<dczz<b
43 18 19 42 syl2an abx=z|azz<bcdy=z|czz<dzxyzazz<dczz<b
44 43 adantr abx=z|azz<bcdy=z|czz<dacdbzxyzazz<dczz<b
45 simpl zazz<dczz<bz
46 simprrl zazz<dczz<bcz
47 simprlr zazz<dczz<bz<d
48 45 46 47 jca32 zazz<dczz<bzczz<d
49 44 48 syl6bi abx=z|azz<bcdy=z|czz<dacdbzxyzczz<d
50 3simpa abx=z|azz<bab
51 3simpa cdy=z|czz<dcd
52 50 51 anim12i abx=z|azz<bcdy=z|czz<dabcd
53 letr aczacczaz
54 53 3expia aczacczaz
55 54 exp4a aczacczaz
56 55 ad2ant2r abcdzacczaz
57 ltletr zdbz<ddbz<b
58 57 3com13 bdzz<ddbz<b
59 58 expcomd bdzdbz<dz<b
60 59 3expia bdzdbz<dz<b
61 60 ad2ant2l abcdzdbz<dz<b
62 56 61 jcad abcdzacczazdbz<dz<b
63 anim12 acczazdbz<dz<bacdbczazz<dz<b
64 62 63 syl6 abcdzacdbczazz<dz<b
65 64 com23 abcdacdbzczazz<dz<b
66 anim12 czazz<dz<bczz<dazz<b
67 65 66 syl8 abcdacdbzczz<dazz<b
68 67 imp31 abcdacdbzczz<dazz<b
69 68 ancrd abcdacdbzczz<dazz<bczz<d
70 an42 azz<dczz<bazczz<bz<d
71 an4 azczz<bz<dazz<bczz<d
72 70 71 bitri azz<dczz<bazz<bczz<d
73 69 72 syl6ibr abcdacdbzczz<dazz<dczz<b
74 simpr abcdacdbzz
75 73 74 jctild abcdacdbzczz<dzazz<dczz<b
76 52 75 sylanl1 abx=z|azz<bcdy=z|czz<dacdbzczz<dzazz<dczz<b
77 76 imp abx=z|azz<bcdy=z|czz<dacdbzczz<dzazz<dczz<b
78 77 an32s abx=z|azz<bcdy=z|czz<dacdbczz<dzzazz<dczz<b
79 44 adantr abx=z|azz<bcdy=z|czz<dacdbczz<dzxyzazz<dczz<b
80 79 adantr abx=z|azz<bcdy=z|czz<dacdbczz<dzzxyzazz<dczz<b
81 78 80 mpbird abx=z|azz<bcdy=z|czz<dacdbczz<dzzxy
82 81 expl abx=z|azz<bcdy=z|czz<dacdbczz<dzzxy
83 82 ancomsd abx=z|azz<bcdy=z|czz<dacdbzczz<dzxy
84 49 83 impbid abx=z|azz<bcdy=z|czz<dacdbzxyzczz<d
85 84 27 bitr4di abx=z|azz<bcdy=z|czz<dacdbzxyzz|czz<d
86 16 17 11 85 eqrd abx=z|azz<bcdy=z|czz<dacdbxy=z|czz<d
87 3 86 jca abx=z|azz<bcdy=z|czz<dacdbdxy=z|czz<d
88 87 19.8ad abx=z|azz<bcdy=z|czz<dacdbddxy=z|czz<d
89 df-rex dxy=z|czz<dddxy=z|czz<d
90 88 89 sylibr abx=z|azz<bcdy=z|czz<dacdbdxy=z|czz<d
91 2 90 jca abx=z|azz<bcdy=z|czz<dacdbcdxy=z|czz<d
92 91 19.8ad abx=z|azz<bcdy=z|czz<dacdbccdxy=z|czz<d
93 df-rex cdxy=z|czz<dccdxy=z|czz<d
94 92 93 sylibr abx=z|azz<bcdy=z|czz<dacdbcdxy=z|czz<d
95 1 icoreelrnab xyIcdxy=z|czz<d
96 94 95 sylibr abx=z|azz<bcdy=z|czz<dacdbxyI