Metamath Proof Explorer


Theorem axdclem

Description: Lemma for axdc . (Contributed by Mario Carneiro, 25-Jan-2013)

Ref Expression
Hypothesis axdclem.1 F=recyVgz|yxzsω
Assertion axdclem y𝒫domxygyyranxdomxzFKxzKωFKxFsucK

Proof

Step Hyp Ref Expression
1 axdclem.1 F=recyVgz|yxzsω
2 neeq1 y=z|FKxzyz|FKxz
3 abn0 z|FKxzzFKxz
4 2 3 bitrdi y=z|FKxzyzFKxz
5 eleq2 y=z|FKxzgyygyz|FKxz
6 breq2 w=zFKxwFKxz
7 6 cbvabv w|FKxw=z|FKxz
8 7 eleq2i gyw|FKxwgyz|FKxz
9 5 8 bitr4di y=z|FKxzgyygyw|FKxw
10 fvex gyV
11 breq2 w=gyFKxwFKxgy
12 10 11 elab gyw|FKxwFKxgy
13 9 12 bitrdi y=z|FKxzgyyFKxgy
14 fveq2 y=z|FKxzgy=gz|FKxz
15 14 breq2d y=z|FKxzFKxgyFKxgz|FKxz
16 13 15 bitrd y=z|FKxzgyyFKxgz|FKxz
17 4 16 imbi12d y=z|FKxzygyyzFKxzFKxgz|FKxz
18 17 rspcv z|FKxz𝒫domxy𝒫domxygyyzFKxzFKxgz|FKxz
19 fvex FKV
20 vex zV
21 19 20 brelrn FKxzzranx
22 21 abssi z|FKxzranx
23 sstr z|FKxzranxranxdomxz|FKxzdomx
24 22 23 mpan ranxdomxz|FKxzdomx
25 vex xV
26 25 dmex domxV
27 26 elpw2 z|FKxz𝒫domxz|FKxzdomx
28 24 27 sylibr ranxdomxz|FKxz𝒫domx
29 18 28 syl11 y𝒫domxygyyranxdomxzFKxzFKxgz|FKxz
30 29 3imp y𝒫domxygyyranxdomxzFKxzFKxgz|FKxz
31 fvex gz|FKxzV
32 nfcv _ys
33 nfcv _yK
34 nfcv _ygz|FKxz
35 breq1 y=FKyxzFKxz
36 35 abbidv y=FKz|yxz=z|FKxz
37 36 fveq2d y=FKgz|yxz=gz|FKxz
38 32 33 34 1 37 frsucmpt Kωgz|FKxzVFsucK=gz|FKxz
39 31 38 mpan2 KωFsucK=gz|FKxz
40 39 breq2d KωFKxFsucKFKxgz|FKxz
41 30 40 syl5ibrcom y𝒫domxygyyranxdomxzFKxzKωFKxFsucK