Users' Mathboxes Mathbox for BJ < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >   Mathboxes  >  bj-charfunbi Unicode version
Theorem bj-charfunbi 16581
Description: In an ambient set X, if membership in A is stable, then it is decidable if and only if A has a characteristic function.

This characterization can be applied to singletons when the set X has stable equality, which is the case as soon as it has a tight apartness relation. (Contributed by BJ, 6-Aug-2024.)

Hypotheses
Ref Expression
bj-charfunbi.ex |- ( ph -> X e. V )
bj-charfunbi.st |- ( ph -> A. x e. X STAB x e. A )
Assertion
Ref Expression
bj-charfunbi |- ( ph -> ( A. x e. X DECID x e. A <-> E. f e. ( 2o ^m X ) ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) ) )
Distinct variable groups:   A, f, x   f, X, x   ph, f, x
Allowed substitution hints:   V( x, f)
Proof of Theorem bj-charfunbi
Dummy variables g y z are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eleq1w 2293 . . . . 5 |- ( x = z -> ( x e. A <-> z e. A ) )
21dcbid 846 . . . 4 |- ( x = z -> (DECID x e. A <-> DECID z e. A ) )
32cbvralvw 2782 . . 3 |- ( A. x e. X DECID x e. A <-> A. z e. X DECID z e. A )
4 eleq1w 2293 . . . . . . . . . . . 12 |- ( z = x -> ( z e. A <-> x e. A ) )
54ifbid 3644 . . . . . . . . . . 11 |- ( z = x -> if ( z e. A , 1o , (/) ) = if ( x e. A , 1o , (/) ) )
65cbvmptv 4206 . . . . . . . . . 10 |- ( z e. X |-> if ( z e. A , 1o , (/) ) ) = ( x e. X |-> if ( x e. A , 1o , (/) ) )
76a1i 9 . . . . . . . . 9 |- ( ( ph /\ A. z e. X DECID z e. A ) -> ( z e. X |-> if ( z e. A , 1o , (/) ) ) = ( x e. X |-> if ( x e. A , 1o , (/) ) ) )
83biimpri 133 . . . . . . . . . 10 |- ( A. z e. X DECID z e. A -> A. x e. X DECID x e. A )
98adantl 277 . . . . . . . . 9 |- ( ( ph /\ A. z e. X DECID z e. A ) -> A. x e. X DECID x e. A )
107, 9bj-charfundc 16578 . . . . . . . 8 |- ( ( ph /\ A. z e. X DECID z e. A ) -> ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) : X --> 2o /\ ( A. x e. ( X i^i A ) ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = 1o /\ A. x e. ( X \ A ) ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = (/) ) ) )
1110ex 115 . . . . . . 7 |- ( ph -> ( A. z e. X DECID z e. A -> ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) : X --> 2o /\ ( A. x e. ( X i^i A ) ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = 1o /\ A. x e. ( X \ A ) ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = (/) ) ) ) )
12 2on 6656 . . . . . . . . . . 11 |- 2o e. On
1312a1i 9 . . . . . . . . . 10 |- ( ph -> 2o e. On )
14 bj-charfunbi.ex . . . . . . . . . 10 |- ( ph -> X e. V )
1513, 14elmapd 6896 . . . . . . . . 9 |- ( ph -> ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) e. ( 2o ^m X ) <-> ( z e. X |-> if ( z e. A , 1o , (/) ) ) : X --> 2o ) )
1615biimprd 158 . . . . . . . 8 |- ( ph -> ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) : X --> 2o -> ( z e. X |-> if ( z e. A , 1o , (/) ) ) e. ( 2o ^m X ) ) )
1716adantrd 279 . . . . . . 7 |- ( ph -> ( ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) : X --> 2o /\ ( A. x e. ( X i^i A ) ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = 1o /\ A. x e. ( X \ A ) ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = (/) ) ) -> ( z e. X |-> if ( z e. A , 1o , (/) ) ) e. ( 2o ^m X ) ) )
1811, 17syld 45 . . . . . 6 |- ( ph -> ( A. z e. X DECID z e. A -> ( z e. X |-> if ( z e. A , 1o , (/) ) ) e. ( 2o ^m X ) ) )
1918imp 124 . . . . 5 |- ( ( ph /\ A. z e. X DECID z e. A ) -> ( z e. X |-> if ( z e. A , 1o , (/) ) ) e. ( 2o ^m X ) )
20 fveq1 5669 . . . . . . . . 9 |- ( f = ( z e. X |-> if ( z e. A , 1o , (/) ) ) -> ( f ` x ) = ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) )
2120eqeq1d 2241 . . . . . . . 8 |- ( f = ( z e. X |-> if ( z e. A , 1o , (/) ) ) -> ( ( f ` x ) = 1o <-> ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = 1o ) )
2221ralbidv 2542 . . . . . . 7 |- ( f = ( z e. X |-> if ( z e. A , 1o , (/) ) ) -> ( A. x e. ( X i^i A ) ( f ` x ) = 1o <-> A. x e. ( X i^i A ) ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = 1o ) )
2320eqeq1d 2241 . . . . . . . 8 |- ( f = ( z e. X |-> if ( z e. A , 1o , (/) ) ) -> ( ( f ` x ) = (/) <-> ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = (/) ) )
2423ralbidv 2542 . . . . . . 7 |- ( f = ( z e. X |-> if ( z e. A , 1o , (/) ) ) -> ( A. x e. ( X \ A ) ( f ` x ) = (/) <-> A. x e. ( X \ A ) ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = (/) ) )
2522, 24anbi12d 473 . . . . . 6 |- ( f = ( z e. X |-> if ( z e. A , 1o , (/) ) ) -> ( ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) <-> ( A. x e. ( X i^i A ) ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = 1o /\ A. x e. ( X \ A ) ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = (/) ) ) )
2625adantl 277 . . . . 5 |- ( ( ( ph /\ A. z e. X DECID z e. A ) /\ f = ( z e. X |-> if ( z e. A , 1o , (/) ) ) ) -> ( ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) <-> ( A. x e. ( X i^i A ) ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = 1o /\ A. x e. ( X \ A ) ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = (/) ) ) )
2710simprd 114 . . . . 5 |- ( ( ph /\ A. z e. X DECID z e. A ) -> ( A. x e. ( X i^i A ) ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = 1o /\ A. x e. ( X \ A ) ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = (/) ) )
2819, 26, 27rspcedvd 2927 . . . 4 |- ( ( ph /\ A. z e. X DECID z e. A ) -> E. f e. ( 2o ^m X ) ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) )
2928ex 115 . . 3 |- ( ph -> ( A. z e. X DECID z e. A -> E. f e. ( 2o ^m X ) ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) ) )
303, 29biimtrid 152 . 2 |- ( ph -> ( A. x e. X DECID x e. A -> E. f e. ( 2o ^m X ) ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) ) )
31 omex 4715 . . . . . . . . 9 |- om e. _V
32 2ssom 6757 . . . . . . . . 9 |- 2o C_ om
33 mapss 6926 . . . . . . . . 9 |- ( ( om e. _V /\ 2o C_ om ) -> ( 2o ^m X ) C_ ( om ^m X ) )
3431, 32, 33mp2an 426 . . . . . . . 8 |- ( 2o ^m X ) C_ ( om ^m X )
35 fveq1 5669 . . . . . . . . . . . . 13 |- ( f = g -> ( f ` x ) = ( g ` x ) )
3635eqeq1d 2241 . . . . . . . . . . . 12 |- ( f = g -> ( ( f ` x ) = 1o <-> ( g ` x ) = 1o ) )
3736ralbidv 2542 . . . . . . . . . . 11 |- ( f = g -> ( A. x e. ( X i^i A ) ( f ` x ) = 1o <-> A. x e. ( X i^i A ) ( g ` x ) = 1o ) )
3835eqeq1d 2241 . . . . . . . . . . . 12 |- ( f = g -> ( ( f ` x ) = (/) <-> ( g ` x ) = (/) ) )
3938ralbidv 2542 . . . . . . . . . . 11 |- ( f = g -> ( A. x e. ( X \ A ) ( f ` x ) = (/) <-> A. x e. ( X \ A ) ( g ` x ) = (/) ) )
4037, 39anbi12d 473 . . . . . . . . . 10 |- ( f = g -> ( ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) <-> ( A. x e. ( X i^i A ) ( g ` x ) = 1o /\ A. x e. ( X \ A ) ( g ` x ) = (/) ) ) )
4140cbvrexvw 2783 . . . . . . . . 9 |- ( E. f e. ( 2o ^m X ) ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) <-> E. g e. ( 2o ^m X ) ( A. x e. ( X i^i A ) ( g ` x ) = 1o /\ A. x e. ( X \ A ) ( g ` x ) = (/) ) )
42 fveqeq2 5679 . . . . . . . . . . . . 13 |- ( x = y -> ( ( g ` x ) = 1o <-> ( g ` y ) = 1o ) )
4342cbvralvw 2782 . . . . . . . . . . . 12 |- ( A. x e. ( X i^i A ) ( g ` x ) = 1o <-> A. y e. ( X i^i A ) ( g ` y ) = 1o )
44 1n0 6665 . . . . . . . . . . . . . . . 16 |- 1o =/= (/)
4544neii 2414 . . . . . . . . . . . . . . 15 |- -. 1o = (/)
46 eqeq1 2239 . . . . . . . . . . . . . . 15 |- ( ( g ` y ) = 1o -> ( ( g ` y ) = (/) <-> 1o = (/) ) )
4745, 46mtbiri 682 . . . . . . . . . . . . . 14 |- ( ( g ` y ) = 1o -> -. ( g ` y ) = (/) )
4847neqned 2419 . . . . . . . . . . . . 13 |- ( ( g ` y ) = 1o -> ( g ` y ) =/= (/) )
4948ralimi 2605 . . . . . . . . . . . 12 |- ( A. y e. ( X i^i A ) ( g ` y ) = 1o -> A. y e. ( X i^i A ) ( g ` y ) =/= (/) )
5043, 49sylbi 121 . . . . . . . . . . 11 |- ( A. x e. ( X i^i A ) ( g ` x ) = 1o -> A. y e. ( X i^i A ) ( g ` y ) =/= (/) )
51 fveqeq2 5679 . . . . . . . . . . . . 13 |- ( x = y -> ( ( g ` x ) = (/) <-> ( g ` y ) = (/) ) )
5251cbvralvw 2782 . . . . . . . . . . . 12 |- ( A. x e. ( X \ A ) ( g ` x ) = (/) <-> A. y e. ( X \ A ) ( g ` y ) = (/) )
5352biimpi 120 . . . . . . . . . . 11 |- ( A. x e. ( X \ A ) ( g ` x ) = (/) -> A. y e. ( X \ A ) ( g ` y ) = (/) )
5450, 53anim12i 338 . . . . . . . . . 10 |- ( ( A. x e. ( X i^i A ) ( g ` x ) = 1o /\ A. x e. ( X \ A ) ( g ` x ) = (/) ) -> ( A. y e. ( X i^i A ) ( g ` y ) =/= (/) /\ A. y e. ( X \ A ) ( g ` y ) = (/) ) )
5554reximi 2639 . . . . . . . . 9 |- ( E. g e. ( 2o ^m X ) ( A. x e. ( X i^i A ) ( g ` x ) = 1o /\ A. x e. ( X \ A ) ( g ` x ) = (/) ) -> E. g e. ( 2o ^m X ) ( A. y e. ( X i^i A ) ( g ` y ) =/= (/) /\ A. y e. ( X \ A ) ( g ` y ) = (/) ) )
5641, 55sylbi 121 . . . . . . . 8 |- ( E. f e. ( 2o ^m X ) ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) -> E. g e. ( 2o ^m X ) ( A. y e. ( X i^i A ) ( g ` y ) =/= (/) /\ A. y e. ( X \ A ) ( g ` y ) = (/) ) )
57 ssrexv 3303 . . . . . . . 8 |- ( ( 2o ^m X ) C_ ( om ^m X ) -> ( E. g e. ( 2o ^m X ) ( A. y e. ( X i^i A ) ( g ` y ) =/= (/) /\ A. y e. ( X \ A ) ( g ` y ) = (/) ) -> E. g e. ( om ^m X ) ( A. y e. ( X i^i A ) ( g ` y ) =/= (/) /\ A. y e. ( X \ A ) ( g ` y ) = (/) ) ) )
5834, 56, 57mpsyl 65 . . . . . . 7 |- ( E. f e. ( 2o ^m X ) ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) -> E. g e. ( om ^m X ) ( A. y e. ( X i^i A ) ( g ` y ) =/= (/) /\ A. y e. ( X \ A ) ( g ` y ) = (/) ) )
5958adantl 277 . . . . . 6 |- ( ( ph /\ E. f e. ( 2o ^m X ) ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) ) -> E. g e. ( om ^m X ) ( A. y e. ( X i^i A ) ( g ` y ) =/= (/) /\ A. y e. ( X \ A ) ( g ` y ) = (/) ) )
6059bj-charfunr 16580 . . . . 5 |- ( ( ph /\ E. f e. ( 2o ^m X ) ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) ) -> A. y e. X DECID -. y e. A )
6160ex 115 . . . 4 |- ( ph -> ( E. f e. ( 2o ^m X ) ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) -> A. y e. X DECID -. y e. A ) )
62 eleq1w 2293 . . . . . . 7 |- ( x = y -> ( x e. A <-> y e. A ) )
6362notbid 673 . . . . . 6 |- ( x = y -> ( -. x e. A <-> -. y e. A ) )
6463dcbid 846 . . . . 5 |- ( x = y -> (DECID -. x e. A <-> DECID -. y e. A ) )
6564cbvralvw 2782 . . . 4 |- ( A. x e. X DECID -. x e. A <-> A. y e. X DECID -. y e. A )
6661, 65imbitrrdi 162 . . 3 |- ( ph -> ( E. f e. ( 2o ^m X ) ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) -> A. x e. X DECID -. x e. A ) )
67 bj-charfunbi.st . . . . . 6 |- ( ph -> A. x e. X STAB x e. A )
6867r19.21bi 2630 . . . . 5 |- ( ( ph /\ x e. X ) -> STAB x e. A )
69 stdcn 855 . . . . 5 |- (STAB x e. A <-> (DECID -. x e. A -> DECID x e. A ) )
7068, 69sylib 122 . . . 4 |- ( ( ph /\ x e. X ) -> (DECID -. x e. A -> DECID x e. A ) )
7170ralimdva 2609 . . 3 |- ( ph -> ( A. x e. X DECID -. x e. A -> A. x e. X DECID x e. A ) )
7266, 71syld 45 . 2 |- ( ph -> ( E. f e. ( 2o ^m X ) ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) -> A. x e. X DECID x e. A ) )
7330, 72impbid 129 1 |- ( ph -> ( A. x e. X DECID x e. A <-> E. f e. ( 2o ^m X ) ( A. x e. ( X i^i A ) ( f ` x ) = 1o /\ A. x e. ( X \ A ) ( f ` x ) = (/) ) ) )
Colors of variables: wff set class
Syntax hints:   -. wn 3   -> wi 4   /\ wa 104   <-> wb 105  STAB wstab 838  DECID wdc 842   = wceq 1398   e. wcel 2203   =/= wne 2412   A.wral 2520   E.wrex 2521   _Vcvv 2813   \ cdif 3208   i^i cin 3210   C_ wss 3211   (/)c0 3508   ifcif 3620   |-> cmpt 4171   Oncon0 4484   omcom 4712   -->wf 5348   ` cfv 5352  (class class class)co 6050   1oc1o 6640   2oc2o 6641   ^m cmap 6882
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 619  ax-in2 620  ax-io 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-13 2205  ax-14 2206  ax-ext 2214  ax-sep 4228  ax-nul 4236  ax-pow 4287  ax-pr 4322  ax-un 4554  ax-setind 4659  ax-iinf 4710
This theorem depends on definitions:  df-bi 117  df-stab 839  df-dc 843  df-3an 1007  df-tru 1401  df-fal 1404  df-nf 1510  df-sb 1812  df-eu 2083  df-mo 2084  df-clab 2219  df-cleq 2225  df-clel 2228  df-nfc 2373  df-ne 2413  df-ral 2525  df-rex 2526  df-rab 2529  df-v 2815  df-sbc 3043  df-csb 3139  df-dif 3213  df-un 3215  df-in 3217  df-ss 3224  df-nul 3509  df-if 3621  df-pw 3671  df-sn 3695  df-pr 3696  df-op 3698  df-uni 3915  df-int 3950  df-br 4110  df-opab 4172  df-mpt 4173  df-tr 4209  df-id 4414  df-iord 4487  df-on 4489  df-suc 4492  df-iom 4713  df-xp 4755  df-rel 4756  df-cnv 4757  df-co 4758  df-dm 4759  df-rn 4760  df-res 4761  df-ima 4762  df-iota 5312  df-fun 5354  df-fn 5355  df-f 5356  df-fv 5360  df-ov 6053  df-oprab 6054  df-mpo 6055  df-1o 6647  df-2o 6648  df-map 6884
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator