Metamath Proof Explorer


Theorem clsk3nimkb

Description: If the base set is not empty, axiom K3 does not imply KB. A concrete example with a pseudo-closure function of k = ( x e. ~P b |-> ( b \ x ) ) is given. (Contributed by RP, 16-Jun-2021)

Ref Expression
Assertion clsk3nimkb ¬bk𝒫b𝒫bs𝒫bt𝒫bkstkskts𝒫bt𝒫bst=bkskt=b

Proof

Step Hyp Ref Expression
1 1oex 1𝑜V
2 1n0 1𝑜
3 nelsn 1𝑜¬1𝑜
4 2 3 ax-mp ¬1𝑜
5 eldif 1𝑜V1𝑜V¬1𝑜
6 ne0i 1𝑜VV
7 5 6 sylbir 1𝑜V¬1𝑜V
8 1 4 7 mp2an V
9 r19.2zb VbVk𝒫b𝒫bs𝒫bt𝒫bkstkskt¬s𝒫bt𝒫bst=bkskt=bbVk𝒫b𝒫bs𝒫bt𝒫bkstkskt¬s𝒫bt𝒫bst=bkskt=b
10 8 9 mpbi bVk𝒫b𝒫bs𝒫bt𝒫bkstkskt¬s𝒫bt𝒫bst=bkskt=bbVk𝒫b𝒫bs𝒫bt𝒫bkstkskt¬s𝒫bt𝒫bst=bkskt=b
11 rexex bVk𝒫b𝒫bs𝒫bt𝒫bkstkskt¬s𝒫bt𝒫bst=bkskt=bbk𝒫b𝒫bs𝒫bt𝒫bkstkskt¬s𝒫bt𝒫bst=bkskt=b
12 rexanali k𝒫b𝒫bs𝒫bt𝒫bkstkskt¬s𝒫bt𝒫bst=bkskt=b¬k𝒫b𝒫bs𝒫bt𝒫bkstkskts𝒫bt𝒫bst=bkskt=b
13 12 exbii bk𝒫b𝒫bs𝒫bt𝒫bkstkskt¬s𝒫bt𝒫bst=bkskt=bb¬k𝒫b𝒫bs𝒫bt𝒫bkstkskts𝒫bt𝒫bst=bkskt=b
14 exnal b¬k𝒫b𝒫bs𝒫bt𝒫bkstkskts𝒫bt𝒫bst=bkskt=b¬bk𝒫b𝒫bs𝒫bt𝒫bkstkskts𝒫bt𝒫bst=bkskt=b
15 13 14 sylbb bk𝒫b𝒫bs𝒫bt𝒫bkstkskt¬s𝒫bt𝒫bst=bkskt=b¬bk𝒫b𝒫bs𝒫bt𝒫bkstkskts𝒫bt𝒫bst=bkskt=b
16 10 11 15 3syl bVk𝒫b𝒫bs𝒫bt𝒫bkstkskt¬s𝒫bt𝒫bst=bkskt=b¬bk𝒫b𝒫bs𝒫bt𝒫bkstkskts𝒫bt𝒫bst=bkskt=b
17 difelpw bVbx𝒫b
18 17 adantr bVx𝒫bbx𝒫b
19 18 fmpttd bVx𝒫bbx:𝒫b𝒫b
20 pwexg bV𝒫bV
21 20 20 elmapd bVx𝒫bbx𝒫b𝒫bx𝒫bbx:𝒫b𝒫b
22 19 21 mpbird bVx𝒫bbx𝒫b𝒫b
23 simpllr bVk=x𝒫bbxs𝒫bt𝒫bk=x𝒫bbx
24 difeq2 x=zbx=bz
25 24 cbvmptv x𝒫bbx=z𝒫bbz
26 23 25 eqtrdi bVk=x𝒫bbxs𝒫bt𝒫bk=z𝒫bbz
27 difeq2 z=stbz=bst
28 27 adantl bVk=x𝒫bbxs𝒫bt𝒫bz=stbz=bst
29 simplll bVk=x𝒫bbxs𝒫bt𝒫bbV
30 simplr bVk=x𝒫bbxs𝒫bt𝒫bs𝒫b
31 30 elpwid bVk=x𝒫bbxs𝒫bt𝒫bsb
32 simpr bVk=x𝒫bbxs𝒫bt𝒫bt𝒫b
33 32 elpwid bVk=x𝒫bbxs𝒫bt𝒫btb
34 31 33 unssd bVk=x𝒫bbxs𝒫bt𝒫bstb
35 29 34 sselpwd bVk=x𝒫bbxs𝒫bt𝒫bst𝒫b
36 vex bV
37 36 difexi bstV
38 37 a1i bVk=x𝒫bbxs𝒫bt𝒫bbstV
39 26 28 35 38 fvmptd bVk=x𝒫bbxs𝒫bt𝒫bkst=bst
40 difeq2 z=sbz=bs
41 40 adantl bVk=x𝒫bbxs𝒫bt𝒫bz=sbz=bs
42 36 difexi bsV
43 42 a1i bVk=x𝒫bbxs𝒫bt𝒫bbsV
44 26 41 30 43 fvmptd bVk=x𝒫bbxs𝒫bt𝒫bks=bs
45 difeq2 z=tbz=bt
46 45 adantl bVk=x𝒫bbxs𝒫bt𝒫bz=tbz=bt
47 36 difexi btV
48 47 a1i bVk=x𝒫bbxs𝒫bt𝒫bbtV
49 26 46 32 48 fvmptd bVk=x𝒫bbxs𝒫bt𝒫bkt=bt
50 44 49 uneq12d bVk=x𝒫bbxs𝒫bt𝒫bkskt=bsbt
51 difindi bst=bsbt
52 50 51 eqtr4di bVk=x𝒫bbxs𝒫bt𝒫bkskt=bst
53 39 52 sseq12d bVk=x𝒫bbxs𝒫bt𝒫bkstksktbstbst
54 53 ralbidva bVk=x𝒫bbxs𝒫bt𝒫bkstksktt𝒫bbstbst
55 54 ralbidva bVk=x𝒫bbxs𝒫bt𝒫bkstkskts𝒫bt𝒫bbstbst
56 52 eqeq1d bVk=x𝒫bbxs𝒫bt𝒫bkskt=bbst=b
57 56 imbi2d bVk=x𝒫bbxs𝒫bt𝒫bst=bkskt=bst=bbst=b
58 57 ralbidva bVk=x𝒫bbxs𝒫bt𝒫bst=bkskt=bt𝒫bst=bbst=b
59 58 ralbidva bVk=x𝒫bbxs𝒫bt𝒫bst=bkskt=bs𝒫bt𝒫bst=bbst=b
60 59 notbid bVk=x𝒫bbx¬s𝒫bt𝒫bst=bkskt=b¬s𝒫bt𝒫bst=bbst=b
61 55 60 anbi12d bVk=x𝒫bbxs𝒫bt𝒫bkstkskt¬s𝒫bt𝒫bst=bkskt=bs𝒫bt𝒫bbstbst¬s𝒫bt𝒫bst=bbst=b
62 pwidg bVb𝒫b
63 ssidd bVbb
64 eldifsnneq bV¬b=
65 uneq1 s=bst=bt
66 65 eqeq1d s=bst=bbt=b
67 ssequn2 tbbt=b
68 66 67 bitr4di s=bst=btb
69 ineq1 s=bst=bt
70 69 difeq2d s=bbst=bbt
71 70 eqeq1d s=bbst=bbbt=b
72 71 notbid s=b¬bst=b¬bbt=b
73 68 72 anbi12d s=bst=b¬bst=btb¬bbt=b
74 sseq1 t=btbbb
75 ineq2 t=bbt=bb
76 inidm bb=b
77 75 76 eqtrdi t=bbt=b
78 77 difeq2d t=bbbt=bb
79 difid bb=
80 78 79 eqtrdi t=bbbt=
81 80 eqeq1d t=bbbt=b=b
82 eqcom =bb=
83 81 82 bitrdi t=bbbt=bb=
84 83 notbid t=b¬bbt=b¬b=
85 74 84 anbi12d t=btb¬bbt=bbb¬b=
86 73 85 rspc2ev b𝒫bb𝒫bbb¬b=s𝒫bt𝒫bst=b¬bst=b
87 62 62 63 64 86 syl112anc bVs𝒫bt𝒫bst=b¬bst=b
88 rexanali t𝒫bst=b¬bst=b¬t𝒫bst=bbst=b
89 88 rexbii s𝒫bt𝒫bst=b¬bst=bs𝒫b¬t𝒫bst=bbst=b
90 rexnal s𝒫b¬t𝒫bst=bbst=b¬s𝒫bt𝒫bst=bbst=b
91 89 90 sylbb s𝒫bt𝒫bst=b¬bst=b¬s𝒫bt𝒫bst=bbst=b
92 87 91 syl bV¬s𝒫bt𝒫bst=bbst=b
93 inss1 sts
94 ssun1 sst
95 93 94 sstri stst
96 sscon ststbstbst
97 95 96 ax-mp bstbst
98 97 rgen2w s𝒫bt𝒫bbstbst
99 92 98 jctil bVs𝒫bt𝒫bbstbst¬s𝒫bt𝒫bst=bbst=b
100 22 61 99 rspcedvd bVk𝒫b𝒫bs𝒫bt𝒫bkstkskt¬s𝒫bt𝒫bst=bkskt=b
101 16 100 mprg ¬bk𝒫b𝒫bs𝒫bt𝒫bkstkskts𝒫bt𝒫bst=bkskt=b