Users' Mathboxes Mathbox for Jim Kingdon < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >   Mathboxes  >  nninfall Unicode version

Theorem nninfall 13889
Description: Given a decidable predicate on ℕ, showing it holds for natural numbers and the point at infinity suffices to show it holds everywhere. The sense in which  Q is a decidable predicate is that it assigns a value of either  (/) or  1o (which can be thought of as false and true) to every element of ℕ. Lemma 3.5 of [PradicBrown2022], p. 5. (Contributed by Jim Kingdon, 1-Aug-2022.)
Hypotheses
Ref Expression
nninfall.q  |-  ( ph  ->  Q  e.  ( 2o 
^m ) )
nninfall.inf  |-  ( ph  ->  ( Q `  (
x  e.  om  |->  1o ) )  =  1o )
nninfall.n  |-  ( ph  ->  A. n  e.  om  ( Q `  ( i  e.  om  |->  if ( i  e.  n ,  1o ,  (/) ) ) )  =  1o )
Assertion
Ref Expression
nninfall  |-  ( ph  ->  A. p  e.  ( Q `  p
)  =  1o )
Distinct variable groups:    Q, n, i   
n, p, i, ph
Allowed substitution hints:    ph( x)    Q( x, p)

Proof of Theorem nninfall
Dummy variables  a  b are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 1n0 6400 . . . . 5  |-  1o  =/=  (/)
21nesymi 2382 . . . 4  |-  -.  (/)  =  1o
3 simplr 520 . . . . . . . . . . 11  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  p  e. )
4 nninff 7087 . . . . . . . . . . . 12  |-  ( p  e.  ->  p : om --> 2o )
54ffnd 5338 . . . . . . . . . . 11  |-  ( p  e.  ->  p  Fn  om )
63, 5syl 14 . . . . . . . . . 10  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  p  Fn  om )
7 nninfall.q . . . . . . . . . . . . . . 15  |-  ( ph  ->  Q  e.  ( 2o 
^m ) )
87ad2antrr 480 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  Q  e.  ( 2o  ^m ) )
9 nninfall.inf . . . . . . . . . . . . . . 15  |-  ( ph  ->  ( Q `  (
x  e.  om  |->  1o ) )  =  1o )
109ad2antrr 480 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  ( Q `  ( x  e.  om  |->  1o ) )  =  1o )
11 nninfall.n . . . . . . . . . . . . . . 15  |-  ( ph  ->  A. n  e.  om  ( Q `  ( i  e.  om  |->  if ( i  e.  n ,  1o ,  (/) ) ) )  =  1o )
1211ad2antrr 480 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  A. n  e.  om  ( Q `  ( i  e.  om  |->  if ( i  e.  n ,  1o ,  (/) ) ) )  =  1o )
13 simpr 109 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  ( Q `  p )  =  (/) )
148, 10, 12, 3, 13nninfalllem1 13888 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  A. n  e.  om  ( p `  n
)  =  1o )
15 eqeq1 2172 . . . . . . . . . . . . . . 15  |-  ( a  =  ( p `  n )  ->  (
a  =  1o  <->  ( p `  n )  =  1o ) )
1615ralrn 5623 . . . . . . . . . . . . . 14  |-  ( p  Fn  om  ->  ( A. a  e.  ran  p  a  =  1o  <->  A. n  e.  om  (
p `  n )  =  1o ) )
173, 5, 163syl 17 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  ( A. a  e.  ran  p  a  =  1o  <->  A. n  e.  om  ( p `  n
)  =  1o ) )
1814, 17mpbird 166 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  A. a  e.  ran  p  a  =  1o )
19 peano1 4571 . . . . . . . . . . . . . . . 16  |-  (/)  e.  om
20 elex2 2742 . . . . . . . . . . . . . . . 16  |-  ( (/)  e.  om  ->  E. b 
b  e.  om )
2119, 20ax-mp 5 . . . . . . . . . . . . . . 15  |-  E. b 
b  e.  om
22 fdm 5343 . . . . . . . . . . . . . . . . 17  |-  ( p : om --> 2o  ->  dom  p  =  om )
2322eleq2d 2236 . . . . . . . . . . . . . . . 16  |-  ( p : om --> 2o  ->  ( b  e.  dom  p  <->  b  e.  om ) )
2423exbidv 1813 . . . . . . . . . . . . . . 15  |-  ( p : om --> 2o  ->  ( E. b  b  e. 
dom  p  <->  E. b 
b  e.  om )
)
2521, 24mpbiri 167 . . . . . . . . . . . . . 14  |-  ( p : om --> 2o  ->  E. b  b  e.  dom  p )
26 dmmrnm 4823 . . . . . . . . . . . . . . 15  |-  ( E. b  b  e.  dom  p 
<->  E. a  a  e. 
ran  p )
27 eqsnm 3735 . . . . . . . . . . . . . . 15  |-  ( E. a  a  e.  ran  p  ->  ( ran  p  =  { 1o }  <->  A. a  e.  ran  p  a  =  1o ) )
2826, 27sylbi 120 . . . . . . . . . . . . . 14  |-  ( E. b  b  e.  dom  p  ->  ( ran  p  =  { 1o }  <->  A. a  e.  ran  p  a  =  1o ) )
2925, 28syl 14 . . . . . . . . . . . . 13  |-  ( p : om --> 2o  ->  ( ran  p  =  { 1o }  <->  A. a  e.  ran  p  a  =  1o ) )
303, 4, 293syl 17 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  ( ran  p  =  { 1o }  <->  A. a  e.  ran  p  a  =  1o ) )
3118, 30mpbird 166 . . . . . . . . . . 11  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  ran  p  =  { 1o } )
32 eqimss 3196 . . . . . . . . . . 11  |-  ( ran  p  =  { 1o }  ->  ran  p  C_  { 1o } )
3331, 32syl 14 . . . . . . . . . 10  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  ran  p  C_  { 1o } )
34 df-f 5192 . . . . . . . . . 10  |-  ( p : om --> { 1o } 
<->  ( p  Fn  om  /\ 
ran  p  C_  { 1o } ) )
356, 33, 34sylanbrc 414 . . . . . . . . 9  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  p : om --> { 1o } )
36 1onn 6488 . . . . . . . . . 10  |-  1o  e.  om
37 fconst2g 5700 . . . . . . . . . 10  |-  ( 1o  e.  om  ->  (
p : om --> { 1o } 
<->  p  =  ( om 
X.  { 1o }
) ) )
3836, 37ax-mp 5 . . . . . . . . 9  |-  ( p : om --> { 1o } 
<->  p  =  ( om 
X.  { 1o }
) )
3935, 38sylib 121 . . . . . . . 8  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  p  =  ( om  X.  { 1o } ) )
40 fconstmpt 4651 . . . . . . . 8  |-  ( om 
X.  { 1o }
)  =  ( x  e.  om  |->  1o )
4139, 40eqtrdi 2215 . . . . . . 7  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  p  =  ( x  e.  om  |->  1o ) )
4241fveq2d 5490 . . . . . 6  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  ( Q `  p )  =  ( Q `  ( x  e.  om  |->  1o ) ) )
4342, 13, 103eqtr3d 2206 . . . . 5  |-  ( ( ( ph  /\  p  e. )  /\  ( Q `  p )  =  (/) )  ->  (/)  =  1o )
4443ex 114 . . . 4  |-  ( (
ph  /\  p  e. )  -> 
( ( Q `  p )  =  (/)  -> 
(/)  =  1o ) )
452, 44mtoi 654 . . 3  |-  ( (
ph  /\  p  e. )  ->  -.  ( Q `  p
)  =  (/) )
46 elmapi 6636 . . . . . . 7  |-  ( Q  e.  ( 2o  ^m )  ->  Q : --> 2o )
477, 46syl 14 . . . . . 6  |-  ( ph  ->  Q : --> 2o )
4847ffvelrnda 5620 . . . . 5  |-  ( (
ph  /\  p  e. )  -> 
( Q `  p
)  e.  2o )
49 elpri 3599 . . . . . 6  |-  ( ( Q `  p )  e.  { (/) ,  1o }  ->  ( ( Q `
 p )  =  (/)  \/  ( Q `  p )  =  1o ) )
50 df2o3 6398 . . . . . 6  |-  2o  =  { (/) ,  1o }
5149, 50eleq2s 2261 . . . . 5  |-  ( ( Q `  p )  e.  2o  ->  (
( Q `  p
)  =  (/)  \/  ( Q `  p )  =  1o ) )
5248, 51syl 14 . . . 4  |-  ( (
ph  /\  p  e. )  -> 
( ( Q `  p )  =  (/)  \/  ( Q `  p
)  =  1o ) )
5352orcomd 719 . . 3  |-  ( (
ph  /\  p  e. )  -> 
( ( Q `  p )  =  1o  \/  ( Q `  p )  =  (/) ) )
5445, 53ecased 1339 . 2  |-  ( (
ph  /\  p  e. )  -> 
( Q `  p
)  =  1o )
5554ralrimiva 2539 1  |-  ( ph  ->  A. p  e.  ( Q `  p
)  =  1o )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 103    <-> wb 104    \/ wo 698    = wceq 1343   E.wex 1480    e. wcel 2136   A.wral 2444    C_ wss 3116   (/)c0 3409   ifcif 3520   {csn 3576   {cpr 3577    |-> cmpt 4043   omcom 4567    X. cxp 4602   dom cdm 4604   ran crn 4605    Fn wfn 5183   -->wf 5184   ` cfv 5188  (class class class)co 5842   1oc1o 6377   2oc2o 6378    ^m cmap 6614  ℕxnninf 7084
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-in1 604  ax-in2 605  ax-io 699  ax-5 1435  ax-7 1436  ax-gen 1437  ax-ie1 1481  ax-ie2 1482  ax-8 1492  ax-10 1493  ax-11 1494  ax-i12 1495  ax-bndl 1497  ax-4 1498  ax-17 1514  ax-i9 1518  ax-ial 1522  ax-i5r 1523  ax-13 2138  ax-14 2139  ax-ext 2147  ax-sep 4100  ax-nul 4108  ax-pow 4153  ax-pr 4187  ax-un 4411  ax-setind 4514  ax-iinf 4565
This theorem depends on definitions:  df-bi 116  df-dc 825  df-3or 969  df-3an 970  df-tru 1346  df-fal 1349  df-nf 1449  df-sb 1751  df-eu 2017  df-mo 2018  df-clab 2152  df-cleq 2158  df-clel 2161  df-nfc 2297  df-ne 2337  df-ral 2449  df-rex 2450  df-rab 2453  df-v 2728  df-sbc 2952  df-csb 3046  df-dif 3118  df-un 3120  df-in 3122  df-ss 3129  df-nul 3410  df-if 3521  df-pw 3561  df-sn 3582  df-pr 3583  df-op 3585  df-uni 3790  df-int 3825  df-br 3983  df-opab 4044  df-mpt 4045  df-tr 4081  df-id 4271  df-iord 4344  df-on 4346  df-suc 4349  df-iom 4568  df-xp 4610  df-rel 4611  df-cnv 4612  df-co 4613  df-dm 4614  df-rn 4615  df-iota 5153  df-fun 5190  df-fn 5191  df-f 5192  df-fv 5196  df-ov 5845  df-oprab 5846  df-mpo 5847  df-1o 6384  df-2o 6385  df-map 6616  df-nninf 7085
This theorem is referenced by:  nninfsel  13897  nninffeq  13900
  Copyright terms: Public domain W3C validator