Users' Mathboxes Mathbox for BJ < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >   Mathboxes  >  bj-charfunbi Unicode version
Theorem bj-charfunbi 15946
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 2268 . . . . 5 |- ( x = z -> ( x e. A <-> z e. A ) )
21dcbid 840 . . . 4 |- ( x = z -> (DECID x e. A <-> DECID z e. A ) )
32cbvralvw 2746 . . 3 |- ( A. x e. X DECID x e. A <-> A. z e. X DECID z e. A )
4 eleq1w 2268 . . . . . . . . . . . 12 |- ( z = x -> ( z e. A <-> x e. A ) )
54ifbid 3601 . . . . . . . . . . 11 |- ( z = x -> if ( z e. A , 1o , (/) ) = if ( x e. A , 1o , (/) ) )
65cbvmptv 4156 . . . . . . . . . 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 15943 . . . . . . . 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 6534 . . . . . . . . . . 11 |- 2o e. On
1312a1i 9 . . . . . . . . . 10 |- ( ph -> 2o e. On )
14 bj-charfunbi.ex . . . . . . . . . 10 |- ( ph -> X e. V )
1513, 14elmapd 6772 . . . . . . . . 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 5598 . . . . . . . . 9 |- ( f = ( z e. X |-> if ( z e. A , 1o , (/) ) ) -> ( f ` x ) = ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) )
2120eqeq1d 2216 . . . . . . . 8 |- ( f = ( z e. X |-> if ( z e. A , 1o , (/) ) ) -> ( ( f ` x ) = 1o <-> ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = 1o ) )
2221ralbidv 2508 . . . . . . 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 2216 . . . . . . . 8 |- ( f = ( z e. X |-> if ( z e. A , 1o , (/) ) ) -> ( ( f ` x ) = (/) <-> ( ( z e. X |-> if ( z e. A , 1o , (/) ) ) ` x ) = (/) ) )
2423ralbidv 2508 . . . . . . 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 2890 . . . 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 4659 . . . . . . . . 9 |- om e. _V
32 2ssom 6633 . . . . . . . . 9 |- 2o C_ om
33 mapss 6801 . . . . . . . . 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 5598 . . . . . . . . . . . . 13 |- ( f = g -> ( f ` x ) = ( g ` x ) )
3635eqeq1d 2216 . . . . . . . . . . . 12 |- ( f = g -> ( ( f ` x ) = 1o <-> ( g ` x ) = 1o ) )
3736ralbidv 2508 . . . . . . . . . . 11 |- ( f = g -> ( A. x e. ( X i^i A ) ( f ` x ) = 1o <-> A. x e. ( X i^i A ) ( g ` x ) = 1o ) )
3835eqeq1d 2216 . . . . . . . . . . . 12 |- ( f = g -> ( ( f ` x ) = (/) <-> ( g ` x ) = (/) ) )
3938ralbidv 2508 . . . . . . . . . . 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 2747 . . . . . . . . 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 5608 . . . . . . . . . . . . 13 |- ( x = y -> ( ( g ` x ) = 1o <-> ( g ` y ) = 1o ) )
4342cbvralvw 2746 . . . . . . . . . . . 12 |- ( A. x e. ( X i^i A ) ( g ` x ) = 1o <-> A. y e. ( X i^i A ) ( g ` y ) = 1o )
44 1n0 6541 . . . . . . . . . . . . . . . 16 |- 1o =/= (/)
4544neii 2380 . . . . . . . . . . . . . . 15 |- -. 1o = (/)
46 eqeq1 2214 . . . . . . . . . . . . . . 15 |- ( ( g ` y ) = 1o -> ( ( g ` y ) = (/) <-> 1o = (/) ) )
4745, 46mtbiri 677 . . . . . . . . . . . . . 14 |- ( ( g ` y ) = 1o -> -. ( g ` y ) = (/) )
4847neqned 2385 . . . . . . . . . . . . 13 |- ( ( g ` y ) = 1o -> ( g ` y ) =/= (/) )
4948ralimi 2571 . . . . . . . . . . . 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 5608 . . . . . . . . . . . . 13 |- ( x = y -> ( ( g ` x ) = (/) <-> ( g ` y ) = (/) ) )
5251cbvralvw 2746 . . . . . . . . . . . 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 2605 . . . . . . . . 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 3266 . . . . . . . 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 15945 . . . . 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 2268 . . . . . . 7 |- ( x = y -> ( x e. A <-> y e. A ) )
6362notbid 669 . . . . . 6 |- ( x = y -> ( -. x e. A <-> -. y e. A ) )
6463dcbid 840 . . . . 5 |- ( x = y -> (DECID -. x e. A <-> DECID -. y e. A ) )
6564cbvralvw 2746 . . . 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 2596 . . . . 5 |- ( ( ph /\ x e. X ) -> STAB x e. A )
69 stdcn 849 . . . . 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 2575 . . 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 832  DECID wdc 836   = wceq 1373   e. wcel 2178   =/= wne 2378   A.wral 2486   E.wrex 2487   _Vcvv 2776   \ cdif 3171   i^i cin 3173   C_ wss 3174   (/)c0 3468   ifcif 3579   |-> cmpt 4121   Oncon0 4428   omcom 4656   -->wf 5286   ` cfv 5290  (class class class)co 5967   1oc1o 6518   2oc2o 6519   ^m cmap 6758
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 615  ax-in2 616  ax-io 711  ax-5 1471  ax-7 1472  ax-gen 1473  ax-ie1 1517  ax-ie2 1518  ax-8 1528  ax-10 1529  ax-11 1530  ax-i12 1531  ax-bndl 1533  ax-4 1534  ax-17 1550  ax-i9 1554  ax-ial 1558  ax-i5r 1559  ax-13 2180  ax-14 2181  ax-ext 2189  ax-sep 4178  ax-nul 4186  ax-pow 4234  ax-pr 4269  ax-un 4498  ax-setind 4603  ax-iinf 4654
This theorem depends on definitions:  df-bi 117  df-stab 833  df-dc 837  df-3an 983  df-tru 1376  df-fal 1379  df-nf 1485  df-sb 1787  df-eu 2058  df-mo 2059  df-clab 2194  df-cleq 2200  df-clel 2203  df-nfc 2339  df-ne 2379  df-ral 2491  df-rex 2492  df-rab 2495  df-v 2778  df-sbc 3006  df-csb 3102  df-dif 3176  df-un 3178  df-in 3180  df-ss 3187  df-nul 3469  df-if 3580  df-pw 3628  df-sn 3649  df-pr 3650  df-op 3652  df-uni 3865  df-int 3900  df-br 4060  df-opab 4122  df-mpt 4123  df-tr 4159  df-id 4358  df-iord 4431  df-on 4433  df-suc 4436  df-iom 4657  df-xp 4699  df-rel 4700  df-cnv 4701  df-co 4702  df-dm 4703  df-rn 4704  df-res 4705  df-ima 4706  df-iota 5251  df-fun 5292  df-fn 5293  df-f 5294  df-fv 5298  df-ov 5970  df-oprab 5971  df-mpo 5972  df-1o 6525  df-2o 6526  df-map 6760
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator