Intuitionistic Logic Explorer Home Intuitionistic Logic Explorer
Most Recent Proofs
 
Mirrors  >  Home  >  ILE Home  >  Th. List  >  Recent MPE Most Recent             Other  >  MM 100

Most recent proofs    These are the 100 (Unicode, GIF) or 1000 (Unicode, GIF) most recent proofs in the iset.mm database for the Intuitionistic Logic Explorer. The iset.mm database is maintained on GitHub with master (stable) and develop (development) versions. This page was created from the commit given on the MPE Most Recent Proofs page. The database from that commit is also available here: iset.mm.

See the MPE Most Recent Proofs page for news and some useful links.

Color key:   Intuitionistic Logic Explorer  Intuitionistic Logic Explorer   User Mathboxes  User Mathboxes  

Last updated on 27-Apr-2025 at 6:37 AM ET.
Recent Additions to the Intuitionistic Logic Explorer
DateLabelDescription
Theorem
 
25-Apr-2025rspex 13570 Existence of the ring span. (Contributed by Jim Kingdon, 25-Apr-2025.)
 |-  ( W  e.  V  ->  (RSpan `  W )  e.  _V )
 
25-Apr-2025lspex 13493 Existence of the span of a set of vectors. (Contributed by Jim Kingdon, 25-Apr-2025.)
 |-  ( W  e.  X  ->  ( LSpan `  W )  e.  _V )
 
25-Apr-2025eqgex 13091 The left coset equivalence relation exists. (Contributed by Jim Kingdon, 25-Apr-2025.)
 |-  ( ( G  e.  V  /\  S  e.  W )  ->  ( G ~QG  S )  e.  _V )
 
25-Apr-2025qusex 12752 Existence of a quotient structure. (Contributed by Jim Kingdon, 25-Apr-2025.)
 |-  ( ( R  e.  V  /\  .~  e.  W )  ->  ( R  /.s  .~  )  e.  _V )
 
23-Apr-20251dom1el 14904 If a set is dominated by one, then any two of its elements are equal. (Contributed by Jim Kingdon, 23-Apr-2025.)
 |-  (
 ( A  ~<_  1o  /\  B  e.  A  /\  C  e.  A )  ->  B  =  C )
 
22-Apr-2025mulgex 12996 Existence of the group multiple operation. (Contributed by Jim Kingdon, 22-Apr-2025.)
 |-  ( G  e.  V  ->  (.g `  G )  e. 
 _V )
 
18-Apr-2025lidlmex 13571 Existence of the set a left ideal is built from (when the ideal is inhabited). (Contributed by Jim Kingdon, 18-Apr-2025.)
 |-  I  =  (LIdeal `  W )   =>    |-  ( U  e.  I  ->  W  e.  _V )
 
18-Apr-2025lsslsp 13527 Spans in submodules correspond to spans in the containing module. (Contributed by Stefan O'Rear, 12-Dec-2014.) Terms in the equation were swapped as proposed by NM on 15-Mar-2015. (Revised by AV, 18-Apr-2025.)
 |-  X  =  ( Ws  U )   &    |-  M  =  (
 LSpan `  W )   &    |-  N  =  ( LSpan `  X )   &    |-  L  =  ( LSubSp `  W )   =>    |-  (
 ( W  e.  LMod  /\  U  e.  L  /\  G  C_  U )  ->  ( N `  G )  =  ( M `  G ) )
 
16-Apr-2025sraex 13544 Existence of a subring algebra. (Contributed by Jim Kingdon, 16-Apr-2025.)
 |-  ( ph  ->  A  =  ( (subringAlg  `  W ) `
  S ) )   &    |-  ( ph  ->  S  C_  ( Base `  W ) )   &    |-  ( ph  ->  W  e.  X )   =>    |-  ( ph  ->  A  e.  _V )
 
10-Apr-2025cndcap 14969 Real number trichotomy is equivalent to decidability of complex number apartness. (Contributed by Jim Kingdon, 10-Apr-2025.)
 |-  ( A. x  e.  RR  A. y  e.  RR  ( x  <  y  \/  x  =  y  \/  y  <  x )  <->  A. z  e.  CC  A. w  e.  CC DECID  z #  w )
 
20-Mar-2025ccoslid 12693 Slot property of comp. (Contributed by Jim Kingdon, 20-Mar-2025.)
 |-  (comp  = Slot  (comp `  ndx )  /\  (comp `  ndx )  e.  NN )
 
20-Mar-2025homslid 12691 Slot property of  Hom. (Contributed by Jim Kingdon, 20-Mar-2025.)
 |-  ( Hom  = Slot  ( Hom  `  ndx )  /\  ( Hom  `  ndx )  e. 
 NN )
 
19-Mar-2025ptex 12719 Existence of the product topology. (Contributed by Jim Kingdon, 19-Mar-2025.)
 |-  ( F  e.  V  ->  ( Xt_ `  F )  e.  _V )
 
18-Mar-2025prdsex 12724 Existence of the structure product. (Contributed by Jim Kingdon, 18-Mar-2025.)
 |-  ( ( S  e.  V  /\  R  e.  W )  ->  ( S X_s R )  e.  _V )
 
13-Mar-2025imasex 12732 Existence of the image structure. (Contributed by Jim Kingdon, 13-Mar-2025.)
 |-  ( ( F  e.  V  /\  R  e.  W )  ->  ( F  "s  R )  e.  _V )
 
11-Mar-2025imasival 12733 Value of an image structure. The is a lemma for the theorems imasbas 12734, imasplusg 12735, and imasmulr 12736 and should not be needed once they are proved. (Contributed by Mario Carneiro, 23-Feb-2015.) (Revised by Jim Kingdon, 11-Mar-2025.) (New usage is discouraged.)
 |-  ( ph  ->  U  =  ( F  "s  R )
 )   &    |-  ( ph  ->  V  =  ( Base `  R )
 )   &    |- 
 .+  =  ( +g  `  R )   &    |-  .X.  =  ( .r `  R )   &    |-  .x.  =  ( .s `  R )   &    |-  ( ph  ->  .+b  =  U_ p  e.  V  U_ q  e.  V  { <. <. ( F `
  p ) ,  ( F `  q
 ) >. ,  ( F `
  ( p  .+  q ) ) >. } )   &    |-  ( ph  ->  .xb 
 =  U_ p  e.  V  U_ q  e.  V  { <.
 <. ( F `  p ) ,  ( F `  q ) >. ,  ( F `  ( p  .X.  q ) ) >. } )   &    |-  ( ph  ->  F : V -onto-> B )   &    |-  ( ph  ->  R  e.  Z )   =>    |-  ( ph  ->  U  =  { <. ( Base `  ndx ) ,  B >. , 
 <. ( +g  `  ndx ) ,  .+b  >. ,  <. ( .r `  ndx ) ,  .xb  >. } )
 
8-Mar-2025subgex 13046 The class of subgroups of a group is a set. (Contributed by Jim Kingdon, 8-Mar-2025.)
 |-  ( G  e.  Grp  ->  (SubGrp `  G )  e. 
 _V )
 
28-Feb-2025ringressid 13249 A ring restricted to its base set is a ring. It will usually be the original ring exactly, of course, but to show that needs additional conditions such as those in strressid 12533. (Contributed by Jim Kingdon, 28-Feb-2025.)
 |-  B  =  ( Base `  G )   =>    |-  ( G  e.  Ring  ->  ( Gs  B )  e.  Ring )
 
28-Feb-2025grpressid 12938 A group restricted to its base set is a group. It will usually be the original group exactly, of course, but to show that needs additional conditions such as those in strressid 12533. (Contributed by Jim Kingdon, 28-Feb-2025.)
 |-  B  =  ( Base `  G )   =>    |-  ( G  e.  Grp  ->  ( Gs  B )  e.  Grp )
 
26-Feb-2025strext 12567 Extending the upper range of a structure. This works because when we say that a structure has components in  A ... C we are not saying that every slot in that range is present, just that all the slots that are present are within that range. (Contributed by Jim Kingdon, 26-Feb-2025.)
 |-  ( ph  ->  F Struct  <. A ,  B >. )   &    |-  ( ph  ->  C  e.  ( ZZ>= `  B )
 )   =>    |-  ( ph  ->  F Struct  <. A ,  C >. )
 
23-Feb-2025ltlenmkv 14980 If  < can be expressed as holding exactly when 
<_ holds and the values are not equal, then the analytic Markov's Principle applies. (To get the regular Markov's Principle, combine with neapmkv 14978). (Contributed by Jim Kingdon, 23-Feb-2025.)
 |-  ( A. x  e.  RR  A. y  e.  RR  ( x  <  y  <->  ( x  <_  y  /\  y  =/=  x ) )  ->  A. x  e.  RR  A. y  e. 
 RR  ( x  =/=  y  ->  x #  y
 ) )
 
23-Feb-2025neap0mkv 14979 The analytic Markov principle can be expressed either with two arbitrary real numbers, or one arbitrary number and zero. (Contributed by Jim Kingdon, 23-Feb-2025.)
 |-  ( A. x  e.  RR  A. y  e.  RR  ( x  =/=  y  ->  x #  y )  <->  A. x  e.  RR  ( x  =/=  0  ->  x #  0 ) )
 
23-Feb-2025lringuplu 13348 If the sum of two elements of a local ring is invertible, then at least one of the summands must be invertible. (Contributed by Jim Kingdon, 18-Feb-2025.) (Revised by SN, 23-Feb-2025.)
 |-  ( ph  ->  B  =  ( Base `  R )
 )   &    |-  ( ph  ->  U  =  (Unit `  R )
 )   &    |-  ( ph  ->  .+  =  ( +g  `  R )
 )   &    |-  ( ph  ->  R  e. LRing )   &    |-  ( ph  ->  ( X  .+  Y )  e.  U )   &    |-  ( ph  ->  X  e.  B )   &    |-  ( ph  ->  Y  e.  B )   =>    |-  ( ph  ->  ( X  e.  U  \/  Y  e.  U )
 )
 
23-Feb-2025lringnz 13347 A local ring is a nonzero ring. (Contributed by Jim Kingdon, 20-Feb-2025.) (Revised by SN, 23-Feb-2025.)
 |- 
 .1.  =  ( 1r `  R )   &    |-  .0.  =  ( 0g `  R )   =>    |-  ( R  e. LRing  ->  .1.  =/=  .0.  )
 
23-Feb-2025lringring 13346 A local ring is a ring. (Contributed by Jim Kingdon, 20-Feb-2025.) (Revised by SN, 23-Feb-2025.)
 |-  ( R  e. LRing  ->  R  e.  Ring )
 
23-Feb-2025lringnzr 13345 A local ring is a nonzero ring. (Contributed by SN, 23-Feb-2025.)
 |-  ( R  e. LRing  ->  R  e. NzRing )
 
23-Feb-2025islring 13344 The predicate "is a local ring". (Contributed by SN, 23-Feb-2025.)
 |-  B  =  ( Base `  R )   &    |-  .+  =  ( +g  `  R )   &    |-  .1.  =  ( 1r `  R )   &    |-  U  =  (Unit `  R )   =>    |-  ( R  e. LRing  <->  ( R  e. NzRing  /\ 
 A. x  e.  B  A. y  e.  B  ( ( x  .+  y
 )  =  .1.  ->  ( x  e.  U  \/  y  e.  U )
 ) ) )
 
23-Feb-2025df-lring 13343 A local ring is a nonzero ring where for any two elements summing to one, at least one is invertible. Any field is a local ring; the ring of integers is an example of a ring which is not a local ring. (Contributed by Jim Kingdon, 18-Feb-2025.) (Revised by SN, 23-Feb-2025.)
 |- LRing  =  { r  e. NzRing  |  A. x  e.  ( Base `  r ) A. y  e.  ( Base `  r )
 ( ( x (
 +g  `  r )
 y )  =  ( 1r `  r ) 
 ->  ( x  e.  (Unit `  r )  \/  y  e.  (Unit `  r )
 ) ) }
 
23-Feb-202501eq0ring 13341 If the zero and the identity element of a ring are the same, the ring is the zero ring. (Contributed by AV, 16-Apr-2019.) (Proof shortened by SN, 23-Feb-2025.)
 |-  B  =  ( Base `  R )   &    |-  .0.  =  ( 0g `  R )   &    |-  .1.  =  ( 1r `  R )   =>    |-  ( ( R  e.  Ring  /\  .0.  =  .1.  )  ->  B  =  {  .0.  } )
 
23-Feb-2025nzrring 13338 A nonzero ring is a ring. (Contributed by Stefan O'Rear, 24-Feb-2015.) (Proof shortened by SN, 23-Feb-2025.)
 |-  ( R  e. NzRing  ->  R  e.  Ring )
 
21-Feb-2025dftap2 7253 Tight apartness with the apartness properties from df-pap 7250 expanded. (Contributed by Jim Kingdon, 21-Feb-2025.)
 |-  ( R TAp  A  <->  ( R  C_  ( A  X.  A ) 
 /\  ( A. x  e.  A  -.  x R x  /\  A. x  e.  A  A. y  e.  A  ( x R y  ->  y R x ) )  /\  ( A. x  e.  A  A. y  e.  A  A. z  e.  A  ( x R y  ->  ( x R z  \/  y R z ) ) 
 /\  A. x  e.  A  A. y  e.  A  ( -.  x R y 
 ->  x  =  y
 ) ) ) )
 
20-Feb-2025aprap 13387 The relation given by df-apr 13382 for a local ring is an apartness relation. (Contributed by Jim Kingdon, 20-Feb-2025.)
 |-  ( R  e. LRing  ->  (#r `  R ) Ap  ( Base `  R ) )
 
20-Feb-2025setscomd 12506 Different components can be set in any order. (Contributed by Jim Kingdon, 20-Feb-2025.)
 |-  ( ph  ->  A  e.  Y )   &    |-  ( ph  ->  B  e.  Z )   &    |-  ( ph  ->  S  e.  V )   &    |-  ( ph  ->  A  =/=  B )   &    |-  ( ph  ->  C  e.  W )   &    |-  ( ph  ->  D  e.  X )   =>    |-  ( ph  ->  (
 ( S sSet  <. A ,  C >. ) sSet  <. B ,  D >. )  =  ( ( S sSet  <. B ,  D >. ) sSet  <. A ,  C >. ) )
 
17-Feb-2025aprcotr 13386 The apartness relation given by df-apr 13382 for a local ring is cotransitive. (Contributed by Jim Kingdon, 17-Feb-2025.)
 |-  ( ph  ->  B  =  ( Base `  R )
 )   &    |-  ( ph  -> #  =  (#r `  R ) )   &    |-  ( ph  ->  R  e. LRing )   &    |-  ( ph  ->  X  e.  B )   &    |-  ( ph  ->  Y  e.  B )   &    |-  ( ph  ->  Z  e.  B )   =>    |-  ( ph  ->  ( X #  Y  ->  ( X #  Z  \/  Y #  Z ) ) )
 
17-Feb-2025aprsym 13385 The apartness relation given by df-apr 13382 for a ring is symmetric. (Contributed by Jim Kingdon, 17-Feb-2025.)
 |-  ( ph  ->  B  =  ( Base `  R )
 )   &    |-  ( ph  -> #  =  (#r `  R ) )   &    |-  ( ph  ->  R  e.  Ring )   &    |-  ( ph  ->  X  e.  B )   &    |-  ( ph  ->  Y  e.  B )   =>    |-  ( ph  ->  ( X #  Y  ->  Y #  X ) )
 
17-Feb-2025aprval 13383 Expand Definition df-apr 13382. (Contributed by Jim Kingdon, 17-Feb-2025.)
 |-  ( ph  ->  B  =  ( Base `  R )
 )   &    |-  ( ph  -> #  =  (#r `  R ) )   &    |-  ( ph  ->  .-  =  ( -g `  R ) )   &    |-  ( ph  ->  U  =  (Unit `  R ) )   &    |-  ( ph  ->  R  e.  Ring
 )   &    |-  ( ph  ->  X  e.  B )   &    |-  ( ph  ->  Y  e.  B )   =>    |-  ( ph  ->  ( X #  Y  <->  ( X  .-  Y )  e.  U ) )
 
16-Feb-2025aprirr 13384 The apartness relation given by df-apr 13382 for a nonzero ring is irreflexive. (Contributed by Jim Kingdon, 16-Feb-2025.)
 |-  ( ph  ->  B  =  ( Base `  R )
 )   &    |-  ( ph  -> #  =  (#r `  R ) )   &    |-  ( ph  ->  R  e.  Ring )   &    |-  ( ph  ->  X  e.  B )   &    |-  ( ph  ->  ( 1r `  R )  =/=  ( 0g `  R ) )   =>    |-  ( ph  ->  -.  X #  X )
 
16-Feb-2025aptap 8610 Complex apartness (as defined at df-ap 8542) is a tight apartness (as defined at df-tap 7252). (Contributed by Jim Kingdon, 16-Feb-2025.)
 |- # TAp  CC
 
15-Feb-2025tapeq2 7255 Equality theorem for tight apartness predicate. (Contributed by Jim Kingdon, 15-Feb-2025.)
 |-  ( A  =  B  ->  ( R TAp  A  <->  R TAp  B )
 )
 
14-Feb-2025exmidmotap 7263 The proposition that every class has at most one tight apartness is equivalent to excluded middle. (Contributed by Jim Kingdon, 14-Feb-2025.)
 |-  (EXMID  <->  A. x E* r  r TAp 
 x )
 
14-Feb-2025exmidapne 7262 Excluded middle implies there is only one tight apartness on any class, namely negated equality. (Contributed by Jim Kingdon, 14-Feb-2025.)
 |-  (EXMID 
 ->  ( R TAp  A  <->  R  =  { <. u ,  v >.  |  ( ( u  e.  A  /\  v  e.  A )  /\  u  =/=  v ) } )
 )
 
14-Feb-2025df-pap 7250 Apartness predicate. A relation  R is an apartness if it is irreflexive, symmetric, and cotransitive. (Contributed by Jim Kingdon, 14-Feb-2025.)
 |-  ( R Ap  A  <->  ( ( R 
 C_  ( A  X.  A )  /\  A. x  e.  A  -.  x R x )  /\  ( A. x  e.  A  A. y  e.  A  ( x R y  ->  y R x )  /\  A. x  e.  A  A. y  e.  A  A. z  e.  A  ( x R y  ->  ( x R z  \/  y R z ) ) ) ) )
 
13-Feb-2025df-apr 13382 The relation between elements whose difference is invertible, which for a local ring is an apartness relation by aprap 13387. (Contributed by Jim Kingdon, 13-Feb-2025.)
 |- #r  =  ( w  e.  _V  |->  {
 <. x ,  y >.  |  ( ( x  e.  ( Base `  w )  /\  y  e.  ( Base `  w ) ) 
 /\  ( x (
 -g `  w )
 y )  e.  (Unit `  w ) ) }
 )
 
8-Feb-20252oneel 7258  (/) and  1o are two unequal elements of  2o. (Contributed by Jim Kingdon, 8-Feb-2025.)
 |- 
 <. (/) ,  1o >.  e. 
 { <. u ,  v >.  |  ( ( u  e.  2o  /\  v  e.  2o )  /\  u  =/=  v ) }
 
8-Feb-2025tapeq1 7254 Equality theorem for tight apartness predicate. (Contributed by Jim Kingdon, 8-Feb-2025.)
 |-  ( R  =  S  ->  ( R TAp  A  <->  S TAp  A )
 )
 
6-Feb-20252omotap 7261 If there is at most one tight apartness on  2o, excluded middle follows. Based on online discussions by Tom de Jong, Andrew W Swan, and Martin Escardo. (Contributed by Jim Kingdon, 6-Feb-2025.)
 |-  ( E* r  r TAp 
 2o  -> EXMID
 )
 
6-Feb-20252omotaplemst 7260 Lemma for 2omotap 7261. (Contributed by Jim Kingdon, 6-Feb-2025.)
 |-  ( ( E* r  r TAp  2o  /\  -.  -.  ph )  ->  ph )
 
6-Feb-20252omotaplemap 7259 Lemma for 2omotap 7261. (Contributed by Jim Kingdon, 6-Feb-2025.)
 |-  ( -.  -.  ph  ->  { <. u ,  v >.  |  ( ( u  e.  2o  /\  v  e.  2o )  /\  ( ph  /\  u  =/=  v
 ) ) } TAp  2o )
 
6-Feb-20252onetap 7257 Negated equality is a tight apartness on  2o. (Contributed by Jim Kingdon, 6-Feb-2025.)
 |- 
 { <. u ,  v >.  |  ( ( u  e.  2o  /\  v  e.  2o )  /\  u  =/=  v ) } TAp  2o
 
5-Feb-2025netap 7256 Negated equality on a set with decidable equality is a tight apartness. (Contributed by Jim Kingdon, 5-Feb-2025.)
 |-  ( A. x  e.  A  A. y  e.  A DECID  x  =  y  ->  { <. u ,  v >.  |  ( ( u  e.  A  /\  v  e.  A )  /\  u  =/=  v ) } TAp  A )
 
5-Feb-2025df-tap 7252 Tight apartness predicate. A relation  R is a tight apartness if it is irreflexive, symmetric, cotransitive, and tight. (Contributed by Jim Kingdon, 5-Feb-2025.)
 |-  ( R TAp  A  <->  ( R Ap  A  /\  A. x  e.  A  A. y  e.  A  ( -.  x R y 
 ->  x  =  y
 ) ) )
 
1-Feb-2025mulgnn0cld 13014 Closure of the group multiple (exponentiation) operation for a nonnegative multiplier in a monoid. Deduction associated with mulgnn0cl 13009. (Contributed by SN, 1-Feb-2025.)
 |-  B  =  ( Base `  G )   &    |-  .x.  =  (.g `  G )   &    |-  ( ph  ->  G  e.  Mnd )   &    |-  ( ph  ->  N  e.  NN0 )   &    |-  ( ph  ->  X  e.  B )   =>    |-  ( ph  ->  ( N  .x.  X )  e.  B )
 
31-Jan-20250subg 13069 The zero subgroup of an arbitrary group. (Contributed by Stefan O'Rear, 10-Dec-2014.) (Proof shortened by SN, 31-Jan-2025.)
 |- 
 .0.  =  ( 0g `  G )   =>    |-  ( G  e.  Grp  ->  {  .0.  }  e.  (SubGrp `  G ) )
 
28-Jan-2025dvdsrex 13278 Existence of the divisibility relation. (Contributed by Jim Kingdon, 28-Jan-2025.)
 |-  ( R  e. SRing  ->  (
 ||r `  R )  e.  _V )
 
24-Jan-2025reldvdsrsrg 13272 The divides relation is a relation. (Contributed by Mario Carneiro, 1-Dec-2014.) (Revised by Jim Kingdon, 24-Jan-2025.)
 |-  ( R  e. SRing  ->  Rel  ( ||r
 `  R ) )
 
18-Jan-2025rerecapb 8803 A real number has a multiplicative inverse if and only if it is apart from zero. Theorem 11.2.4 of [HoTT], p. (varies). (Contributed by Jim Kingdon, 18-Jan-2025.)
 |-  ( A  e.  RR  ->  ( A #  0  <->  E. x  e.  RR  ( A  x.  x )  =  1 )
 )
 
18-Jan-2025recapb 8631 A complex number has a multiplicative inverse if and only if it is apart from zero. Theorem 11.2.4 of [HoTT], p. (varies), generalized from real to complex numbers. (Contributed by Jim Kingdon, 18-Jan-2025.)
 |-  ( A  e.  CC  ->  ( A #  0  <->  E. x  e.  CC  ( A  x.  x )  =  1 )
 )
 
17-Jan-2025ressval3d 12534 Value of structure restriction, deduction version. (Contributed by AV, 14-Mar-2020.) (Revised by Jim Kingdon, 17-Jan-2025.)
 |-  R  =  ( Ss  A )   &    |-  B  =  (
 Base `  S )   &    |-  E  =  ( Base `  ndx )   &    |-  ( ph  ->  S  e.  V )   &    |-  ( ph  ->  Fun  S )   &    |-  ( ph  ->  E  e.  dom  S )   &    |-  ( ph  ->  A  C_  B )   =>    |-  ( ph  ->  R  =  ( S sSet  <. E ,  A >. ) )
 
17-Jan-2025strressid 12533 Behavior of trivial restriction. (Contributed by Stefan O'Rear, 29-Nov-2014.) (Revised by Jim Kingdon, 17-Jan-2025.)
 |-  ( ph  ->  B  =  ( Base `  W )
 )   &    |-  ( ph  ->  W Struct  <. M ,  N >. )   &    |-  ( ph  ->  Fun  W )   &    |-  ( ph  ->  ( Base ` 
 ndx )  e.  dom  W )   =>    |-  ( ph  ->  ( Ws  B )  =  W )
 
16-Jan-2025ressex 12528 Existence of structure restriction. (Contributed by Jim Kingdon, 16-Jan-2025.)
 |-  ( ( W  e.  X  /\  A  e.  Y )  ->  ( Ws  A )  e.  _V )
 
16-Jan-2025ressvalsets 12527 Value of structure restriction. (Contributed by Jim Kingdon, 16-Jan-2025.)
 |-  ( ( W  e.  X  /\  A  e.  Y )  ->  ( Ws  A )  =  ( W sSet  <. ( Base ` 
 ndx ) ,  ( A  i^i  ( Base `  W ) ) >. ) )
 
10-Jan-2025opprex 13256 Existence of the opposite ring. If you know that  R is a ring, see opprring 13260. (Contributed by Jim Kingdon, 10-Jan-2025.)
 |-  O  =  (oppr `  R )   =>    |-  ( R  e.  V  ->  O  e.  _V )
 
10-Jan-2025mgpex 13146 Existence of the multiplication group. If  R is known to be a semiring, see srgmgp 13162. (Contributed by Jim Kingdon, 10-Jan-2025.)
 |-  M  =  (mulGrp `  R )   =>    |-  ( R  e.  V  ->  M  e.  _V )
 
5-Jan-2025imbibi 252 The antecedent of one side of a biconditional can be moved out of the biconditional to become the antecedent of the remaining biconditional. (Contributed by BJ, 1-Jan-2025.) (Proof shortened by Wolf Lammen, 5-Jan-2025.)
 |-  ( ( ( ph  ->  ps )  <->  ch )  ->  ( ph  ->  ( ps  <->  ch ) ) )
 
1-Jan-2025snss 3729 The singleton of an element of a class is a subset of the class (inference form of snssg 3728). Theorem 7.4 of [Quine] p. 49. (Contributed by NM, 21-Jun-1993.) (Proof shortened by BJ, 1-Jan-2025.)
 |-  A  e.  _V   =>    |-  ( A  e.  B 
 <->  { A }  C_  B )
 
1-Jan-2025snssg 3728 The singleton formed on a set is included in a class if and only if the set is an element of that class. Theorem 7.4 of [Quine] p. 49. (Contributed by NM, 22-Jul-2001.) (Proof shortened by BJ, 1-Jan-2025.)
 |-  ( A  e.  V  ->  ( A  e.  B  <->  { A }  C_  B ) )
 
1-Jan-2025snssb 3727 Characterization of the inclusion of a singleton in a class. (Contributed by BJ, 1-Jan-2025.)
 |-  ( { A }  C_  B  <->  ( A  e.  _V 
 ->  A  e.  B ) )
 
9-Dec-2024nninfwlpoim 7179 Decidable equality for ℕ implies the Weak Limited Principle of Omniscience (WLPO). (Contributed by Jim Kingdon, 9-Dec-2024.)
 |-  ( A. x  e.  A. y  e. DECID  x  =  y  ->  om  e. WOmni )
 
8-Dec-2024nninfwlpoimlemdc 7178 Lemma for nninfwlpoim 7179. (Contributed by Jim Kingdon, 8-Dec-2024.)
 |-  ( ph  ->  F : om --> 2o )   &    |-  G  =  ( i  e.  om  |->  if ( E. x  e. 
 suc  i ( F `
  x )  =  (/) ,  (/) ,  1o )
 )   &    |-  ( ph  ->  A. x  e.  A. y  e. DECID  x  =  y )   =>    |-  ( ph  -> DECID  A. n  e.  om  ( F `  n )  =  1o )
 
8-Dec-2024nninfwlpoimlemginf 7177 Lemma for nninfwlpoim 7179. (Contributed by Jim Kingdon, 8-Dec-2024.)
 |-  ( ph  ->  F : om --> 2o )   &    |-  G  =  ( i  e.  om  |->  if ( E. x  e. 
 suc  i ( F `
  x )  =  (/) ,  (/) ,  1o )
 )   =>    |-  ( ph  ->  ( G  =  ( i  e.  om  |->  1o )  <->  A. n  e.  om  ( F `  n )  =  1o ) )
 
8-Dec-2024nninfwlpoimlemg 7176 Lemma for nninfwlpoim 7179. (Contributed by Jim Kingdon, 8-Dec-2024.)
 |-  ( ph  ->  F : om --> 2o )   &    |-  G  =  ( i  e.  om  |->  if ( E. x  e. 
 suc  i ( F `
  x )  =  (/) ,  (/) ,  1o )
 )   =>    |-  ( ph  ->  G  e. )
 
7-Dec-2024nninfwlpor 7175 The Weak Limited Principle of Omniscience (WLPO) implies that equality for ℕ is decidable. (Contributed by Jim Kingdon, 7-Dec-2024.)
 |-  ( om  e. WOmni  ->  A. x  e.  A. y  e. DECID  x  =  y )
 
7-Dec-2024nninfwlporlem 7174 Lemma for nninfwlpor 7175. The result. (Contributed by Jim Kingdon, 7-Dec-2024.)
 |-  ( ph  ->  X : om --> 2o )   &    |-  ( ph  ->  Y : om --> 2o )   &    |-  D  =  ( i  e.  om  |->  if ( ( X `  i )  =  ( Y `  i ) ,  1o ,  (/) ) )   &    |-  ( ph  ->  om  e. WOmni )   =>    |-  ( ph  -> DECID  X  =  Y )
 
6-Dec-2024nninfwlporlemd 7173 Given two countably infinite sequences of zeroes and ones, they are equal if and only if a sequence formed by pointwise comparing them is all ones. (Contributed by Jim Kingdon, 6-Dec-2024.)
 |-  ( ph  ->  X : om --> 2o )   &    |-  ( ph  ->  Y : om --> 2o )   &    |-  D  =  ( i  e.  om  |->  if ( ( X `  i )  =  ( Y `  i ) ,  1o ,  (/) ) )   =>    |-  ( ph  ->  ( X  =  Y  <->  D  =  (
 i  e.  om  |->  1o ) ) )
 
3-Dec-2024nninfwlpo 7180 Decidability of equality for ℕ is equivalent to the Weak Limited Principle of Omniscience (WLPO). (Contributed by Jim Kingdon, 3-Dec-2024.)
 |-  ( A. x  e.  A. y  e. DECID  x  =  y  <->  om  e. WOmni )
 
3-Dec-2024nninfdcinf 7172 The Weak Limited Principle of Omniscience (WLPO) implies that it is decidable whether an element of ℕ equals the point at infinity. (Contributed by Jim Kingdon, 3-Dec-2024.)
 |-  ( ph  ->  om  e. WOmni )   &    |-  ( ph  ->  N  e. )   =>    |-  ( ph  -> DECID  N  =  ( i  e.  om  |->  1o ) )
 
28-Nov-2024basmexd 12525 A structure whose base is inhabited is a set. (Contributed by Jim Kingdon, 28-Nov-2024.)
 |-  ( ph  ->  B  =  ( Base `  G )
 )   &    |-  ( ph  ->  A  e.  B )   =>    |-  ( ph  ->  G  e.  _V )
 
22-Nov-2024eliotaeu 5207 An inhabited iota expression has a unique value. (Contributed by Jim Kingdon, 22-Nov-2024.)
 |-  ( A  e.  ( iota x ph )  ->  E! x ph )
 
22-Nov-2024eliota 5206 An element of an iota expression. (Contributed by Jim Kingdon, 22-Nov-2024.)
 |-  ( A  e.  ( iota x ph )  <->  E. y ( A  e.  y  /\  A. x ( ph  <->  x  =  y
 ) ) )
 
18-Nov-2024basmex 12524 A structure whose base is inhabited is a set. (Contributed by Jim Kingdon, 18-Nov-2024.)
 |-  B  =  ( Base `  G )   =>    |-  ( A  e.  B  ->  G  e.  _V )
 
12-Nov-2024sravscag 13541 The scalar product operation of a subring algebra. (Contributed by Stefan O'Rear, 27-Nov-2014.) (Revised by Mario Carneiro, 4-Oct-2015.) (Revised by Thierry Arnoux, 16-Jun-2019.) (Proof shortened by AV, 12-Nov-2024.)
 |-  ( ph  ->  A  =  ( (subringAlg  `  W ) `
  S ) )   &    |-  ( ph  ->  S  C_  ( Base `  W ) )   &    |-  ( ph  ->  W  e.  X )   =>    |-  ( ph  ->  ( .r `  W )  =  ( .s `  A ) )
 
12-Nov-2024srascag 13540 The set of scalars of a subring algebra. (Contributed by Stefan O'Rear, 27-Nov-2014.) (Revised by Mario Carneiro, 4-Oct-2015.) (Revised by Thierry Arnoux, 16-Jun-2019.) (Proof shortened by AV, 12-Nov-2024.)
 |-  ( ph  ->  A  =  ( (subringAlg  `  W ) `
  S ) )   &    |-  ( ph  ->  S  C_  ( Base `  W ) )   &    |-  ( ph  ->  W  e.  X )   =>    |-  ( ph  ->  ( Ws  S )  =  (Scalar `  A ) )
 
12-Nov-2024slotsdifipndx 12636 The slot for the scalar is not the index of other slots. (Contributed by AV, 12-Nov-2024.)
 |-  ( ( .s `  ndx )  =/=  ( .i `  ndx )  /\  (Scalar `  ndx )  =/=  ( .i `  ndx ) )
 
11-Nov-2024bj-con1st 14664 Contraposition when the antecedent is a negated stable proposition. See con1dc 856. (Contributed by BJ, 11-Nov-2024.)
 |-  (STAB  ph  ->  ( ( -.  ph  ->  ps )  ->  ( -.  ps 
 ->  ph ) ) )
 
11-Nov-2024slotsdifdsndx 12682 The index of the slot for the distance is not the index of other slots. (Contributed by AV, 11-Nov-2024.)
 |-  ( ( *r `
  ndx )  =/=  ( dist `  ndx )  /\  ( le `  ndx )  =/=  ( dist `  ndx ) )
 
11-Nov-2024slotsdifplendx 12671 The index of the slot for the distance is not the index of other slots. (Contributed by AV, 11-Nov-2024.)
 |-  ( ( *r `
  ndx )  =/=  ( le `  ndx )  /\  (TopSet `  ndx )  =/=  ( le `  ndx ) )
 
11-Nov-2024tsetndxnstarvndx 12655 The slot for the topology is not the slot for the involution in an extensible structure. (Contributed by AV, 11-Nov-2024.)
 |-  (TopSet `  ndx )  =/=  ( *r `  ndx )
 
11-Nov-2024const 852 Contraposition when the antecedent is a negated stable proposition. See comment of condc 853. (Contributed by BJ, 18-Nov-2023.) (Proof shortened by BJ, 11-Nov-2024.)
 |-  (STAB 
 ph  ->  ( ( -.  ph  ->  -.  ps )  ->  ( ps  ->  ph )
 ) )
 
10-Nov-2024slotsdifunifndx 12689 The index of the slot for the uniform set is not the index of other slots. (Contributed by AV, 10-Nov-2024.)
 |-  ( ( ( +g  ` 
 ndx )  =/=  ( UnifSet
 `  ndx )  /\  ( .r `  ndx )  =/=  ( UnifSet `  ndx )  /\  ( *r `  ndx )  =/=  ( UnifSet `  ndx ) )  /\  ( ( le `  ndx )  =/=  ( UnifSet `  ndx )  /\  ( dist `  ndx )  =/=  ( UnifSet `  ndx ) ) )
 
7-Nov-2024ressbasd 12530 Base set of a structure restriction. (Contributed by Stefan O'Rear, 26-Nov-2014.) (Proof shortened by AV, 7-Nov-2024.)
 |-  ( ph  ->  R  =  ( Ws  A ) )   &    |-  ( ph  ->  B  =  (
 Base `  W ) )   &    |-  ( ph  ->  W  e.  X )   &    |-  ( ph  ->  A  e.  V )   =>    |-  ( ph  ->  ( A  i^i  B )  =  ( Base `  R ) )
 
6-Nov-2024oppraddg 13259 Addition operation of an opposite ring. (Contributed by Mario Carneiro, 1-Dec-2014.) (Proof shortened by AV, 6-Nov-2024.)
 |-  O  =  (oppr `  R )   &    |- 
 .+  =  ( +g  `  R )   =>    |-  ( R  e.  V  ->  .+  =  ( +g  `  O ) )
 
6-Nov-2024opprbasg 13258 Base set of an opposite ring. (Contributed by Mario Carneiro, 1-Dec-2014.) (Proof shortened by AV, 6-Nov-2024.)
 |-  O  =  (oppr `  R )   &    |-  B  =  ( Base `  R )   =>    |-  ( R  e.  V  ->  B  =  ( Base `  O ) )
 
6-Nov-2024opprsllem 13257 Lemma for opprbasg 13258 and oppraddg 13259. (Contributed by Mario Carneiro, 1-Dec-2014.) (Revised by AV, 6-Nov-2024.)
 |-  O  =  (oppr `  R )   &    |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )   &    |-  ( E `  ndx )  =/=  ( .r `  ndx )   =>    |-  ( R  e.  V  ->  ( E `  R )  =  ( E `  O ) )
 
4-Nov-2024lgsfvalg 14567 Value of the function  F which defines the Legendre symbol at the primes. (Contributed by Mario Carneiro, 4-Feb-2015.) (Revised by Jim Kingdon, 4-Nov-2024.)
 |-  F  =  ( n  e.  NN  |->  if ( n  e.  Prime ,  ( if ( n  =  2 ,  if ( 2 
 ||  A ,  0 ,  if ( ( A  mod  8 )  e.  { 1 ,  7 } ,  1 ,  -u 1 ) ) ,  ( ( ( ( A ^ (
 ( n  -  1
 )  /  2 )
 )  +  1 ) 
 mod  n )  -  1 ) ) ^
 ( n  pCnt  N ) ) ,  1 ) )   =>    |-  ( ( A  e.  ZZ  /\  N  e.  NN  /\  M  e.  NN )  ->  ( F `  M )  =  if ( M  e.  Prime ,  ( if ( M  =  2 ,  if ( 2 
 ||  A ,  0 ,  if ( ( A  mod  8 )  e.  { 1 ,  7 } ,  1 ,  -u 1 ) ) ,  ( ( ( ( A ^ (
 ( M  -  1
 )  /  2 )
 )  +  1 ) 
 mod  M )  -  1
 ) ) ^ ( M  pCnt  N ) ) ,  1 ) )
 
3-Nov-2024zlmmulrg 13654 Ring operation of a  ZZ-module (if present). (Contributed by Mario Carneiro, 2-Oct-2015.) (Revised by AV, 3-Nov-2024.)
 |-  W  =  ( ZMod `  G )   &    |-  .x.  =  ( .r `  G )   =>    |-  ( G  e.  V  ->  .x.  =  ( .r `  W ) )
 
3-Nov-2024zlmplusgg 13653 Group operation of a  ZZ-module. (Contributed by Mario Carneiro, 2-Oct-2015.) (Revised by AV, 3-Nov-2024.)
 |-  W  =  ( ZMod `  G )   &    |-  .+  =  ( +g  `  G )   =>    |-  ( G  e.  V  ->  .+  =  ( +g  `  W ) )
 
3-Nov-2024zlmbasg 13652 Base set of a  ZZ-module. (Contributed by Mario Carneiro, 2-Oct-2015.) (Revised by AV, 3-Nov-2024.)
 |-  W  =  ( ZMod `  G )   &    |-  B  =  (
 Base `  G )   =>    |-  ( G  e.  V  ->  B  =  (
 Base `  W ) )
 
3-Nov-2024zlmlemg 13651 Lemma for zlmbasg 13652 and zlmplusgg 13653. (Contributed by Mario Carneiro, 2-Oct-2015.) (Revised by AV, 3-Nov-2024.)
 |-  W  =  ( ZMod `  G )   &    |-  E  = Slot  ( E `  ndx )   &    |-  ( E `  ndx )  e. 
 NN   &    |-  ( E `  ndx )  =/=  (Scalar `  ndx )   &    |-  ( E `  ndx )  =/=  ( .s `  ndx )   =>    |-  ( G  e.  V  ->  ( E `  G )  =  ( E `  W ) )
 
2-Nov-2024zlmsca 13655 Scalar ring of a  ZZ-module. (Contributed by Mario Carneiro, 2-Oct-2015.) (Revised by AV, 12-Jun-2019.) (Proof shortened by AV, 2-Nov-2024.)
 |-  W  =  ( ZMod `  G )   =>    |-  ( G  e.  V  ->ring  =  (Scalar `  W )
 )
 
1-Nov-2024plendxnvscandx 12670 The slot for the "less than or equal to" ordering is not the slot for the scalar product in an extensible structure. (Contributed by AV, 1-Nov-2024.)
 |-  ( le `  ndx )  =/=  ( .s `  ndx )
 
1-Nov-2024plendxnscandx 12669 The slot for the "less than or equal to" ordering is not the slot for the scalar in an extensible structure. (Contributed by AV, 1-Nov-2024.)
 |-  ( le `  ndx )  =/=  (Scalar `  ndx )
 
1-Nov-2024plendxnmulrndx 12668 The slot for the "less than or equal to" ordering is not the slot for the ring multiplication operation in an extensible structure. (Contributed by AV, 1-Nov-2024.)
 |-  ( le `  ndx )  =/=  ( .r `  ndx )
 
1-Nov-2024qsqeqor 10634 The squares of two rational numbers are equal iff one number equals the other or its negative. (Contributed by Jim Kingdon, 1-Nov-2024.)
 |-  ( ( A  e.  QQ  /\  B  e.  QQ )  ->  ( ( A ^ 2 )  =  ( B ^ 2
 ) 
 <->  ( A  =  B  \/  A  =  -u B ) ) )
 
31-Oct-2024dsndxnmulrndx 12679 The slot for the distance function is not the slot for the ring multiplication operation in an extensible structure. (Contributed by AV, 31-Oct-2024.)
 |-  ( dist `  ndx )  =/=  ( .r `  ndx )
 
31-Oct-2024tsetndxnmulrndx 12654 The slot for the topology is not the slot for the ring multiplication operation in an extensible structure. (Contributed by AV, 31-Oct-2024.)
 |-  (TopSet `  ndx )  =/=  ( .r `  ndx )
 
31-Oct-2024tsetndxnbasendx 12652 The slot for the topology is not the slot for the base set in an extensible structure. (Contributed by AV, 21-Oct-2024.) (Proof shortened by AV, 31-Oct-2024.)
 |-  (TopSet `  ndx )  =/=  ( Base `  ndx )
 
31-Oct-2024basendxlttsetndx 12651 The index of the slot for the base set is less then the index of the slot for the topology in an extensible structure. (Contributed by AV, 31-Oct-2024.)
 |-  ( Base `  ndx )  < 
 (TopSet `  ndx )
 
31-Oct-2024tsetndxnn 12650 The index of the slot for the group operation in an extensible structure is a positive integer. (Contributed by AV, 31-Oct-2024.)
 |-  (TopSet `  ndx )  e. 
 NN
 
30-Oct-2024plendxnbasendx 12666 The slot for the order is not the slot for the base set in an extensible structure. (Contributed by AV, 21-Oct-2024.) (Proof shortened by AV, 30-Oct-2024.)
 |-  ( le `  ndx )  =/=  ( Base `  ndx )
 
30-Oct-2024basendxltplendx 12665 The index value of the  Base slot is less than the index value of the  le slot. (Contributed by AV, 30-Oct-2024.)
 |-  ( Base `  ndx )  < 
 ( le `  ndx )
 
30-Oct-2024plendxnn 12664 The index value of the order slot is a positive integer. This property should be ensured for every concrete coding because otherwise it could not be used in an extensible structure (slots must be positive integers). (Contributed by AV, 30-Oct-2024.)
 |-  ( le `  ndx )  e.  NN
 
29-Oct-2024sradsg 13546 Distance function of a subring algebra. (Contributed by Mario Carneiro, 4-Oct-2015.) (Revised by Thierry Arnoux, 16-Jun-2019.) (Revised by AV, 29-Oct-2024.)
 |-  ( ph  ->  A  =  ( (subringAlg  `  W ) `
  S ) )   &    |-  ( ph  ->  S  C_  ( Base `  W ) )   &    |-  ( ph  ->  W  e.  X )   =>    |-  ( ph  ->  ( dist `  W )  =  ( dist `  A )
 )
 
29-Oct-2024sratsetg 13543 Topology component of a subring algebra. (Contributed by Mario Carneiro, 4-Oct-2015.) (Revised by Thierry Arnoux, 16-Jun-2019.) (Revised by AV, 29-Oct-2024.)
 |-  ( ph  ->  A  =  ( (subringAlg  `  W ) `
  S ) )   &    |-  ( ph  ->  S  C_  ( Base `  W ) )   &    |-  ( ph  ->  W  e.  X )   =>    |-  ( ph  ->  (TopSet `  W )  =  (TopSet `  A ) )
 
29-Oct-2024sramulrg 13539 Multiplicative operation of a subring algebra. (Contributed by Stefan O'Rear, 27-Nov-2014.) (Revised by Mario Carneiro, 4-Oct-2015.) (Revised by Thierry Arnoux, 16-Jun-2019.) (Revised by AV, 29-Oct-2024.)
 |-  ( ph  ->  A  =  ( (subringAlg  `  W ) `
  S ) )   &    |-  ( ph  ->  S  C_  ( Base `  W ) )   &    |-  ( ph  ->  W  e.  X )   =>    |-  ( ph  ->  ( .r `  W )  =  ( .r `  A ) )
 
29-Oct-2024sraaddgg 13538 Additive operation of a subring algebra. (Contributed by Stefan O'Rear, 27-Nov-2014.) (Revised by Mario Carneiro, 4-Oct-2015.) (Revised by Thierry Arnoux, 16-Jun-2019.) (Revised by AV, 29-Oct-2024.)
 |-  ( ph  ->  A  =  ( (subringAlg  `  W ) `
  S ) )   &    |-  ( ph  ->  S  C_  ( Base `  W ) )   &    |-  ( ph  ->  W  e.  X )   =>    |-  ( ph  ->  ( +g  `  W )  =  ( +g  `  A ) )
 
29-Oct-2024srabaseg 13537 Base set of a subring algebra. (Contributed by Stefan O'Rear, 27-Nov-2014.) (Revised by Mario Carneiro, 4-Oct-2015.) (Revised by Thierry Arnoux, 16-Jun-2019.) (Revised by AV, 29-Oct-2024.)
 |-  ( ph  ->  A  =  ( (subringAlg  `  W ) `
  S ) )   &    |-  ( ph  ->  S  C_  ( Base `  W ) )   &    |-  ( ph  ->  W  e.  X )   =>    |-  ( ph  ->  ( Base `  W )  =  ( Base `  A )
 )
 
29-Oct-2024sralemg 13536 Lemma for srabaseg 13537 and similar theorems. (Contributed by Mario Carneiro, 4-Oct-2015.) (Revised by Thierry Arnoux, 16-Jun-2019.) (Revised by AV, 29-Oct-2024.)
 |-  ( ph  ->  A  =  ( (subringAlg  `  W ) `
  S ) )   &    |-  ( ph  ->  S  C_  ( Base `  W ) )   &    |-  ( ph  ->  W  e.  X )   &    |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )   &    |-  (Scalar ` 
 ndx )  =/=  ( E `  ndx )   &    |-  ( .s `  ndx )  =/=  ( E `  ndx )   &    |-  ( .i `  ndx )  =/=  ( E `  ndx )   =>    |-  ( ph  ->  ( E `  W )  =  ( E `  A ) )
 
29-Oct-2024dsndxntsetndx 12681 The slot for the distance function is not the slot for the topology in an extensible structure. (Contributed by AV, 29-Oct-2024.)
 |-  ( dist `  ndx )  =/=  (TopSet `  ndx )
 
29-Oct-2024slotsdnscsi 12680 The slots Scalar,  .s and  .i are different from the slot  dist. (Contributed by AV, 29-Oct-2024.)
 |-  ( ( dist `  ndx )  =/=  (Scalar `  ndx )  /\  ( dist `  ndx )  =/=  ( .s `  ndx )  /\  ( dist ` 
 ndx )  =/=  ( .i `  ndx ) )
 
29-Oct-2024slotstnscsi 12656 The slots Scalar,  .s and  .i are different from the slot TopSet. (Contributed by AV, 29-Oct-2024.)
 |-  ( (TopSet `  ndx )  =/=  (Scalar `  ndx )  /\  (TopSet `  ndx )  =/=  ( .s `  ndx )  /\  (TopSet `  ndx )  =/=  ( .i `  ndx ) )
 
29-Oct-2024ipndxnmulrndx 12635 The slot for the inner product is not the slot for the ring (multiplication) operation in an extensible structure. (Contributed by AV, 29-Oct-2024.)
 |-  ( .i `  ndx )  =/=  ( .r `  ndx )
 
29-Oct-2024ipndxnplusgndx 12634 The slot for the inner product is not the slot for the group operation in an extensible structure. (Contributed by AV, 29-Oct-2024.)
 |-  ( .i `  ndx )  =/=  ( +g  `  ndx )
 
29-Oct-2024vscandxnmulrndx 12622 The slot for the scalar product is not the slot for the ring (multiplication) operation in an extensible structure. (Contributed by AV, 29-Oct-2024.)
 |-  ( .s `  ndx )  =/=  ( .r `  ndx )
 
29-Oct-2024scandxnmulrndx 12617 The slot for the scalar field is not the slot for the ring (multiplication) operation in an extensible structure. (Contributed by AV, 29-Oct-2024.)
 |-  (Scalar `  ndx )  =/=  ( .r `  ndx )
 
29-Oct-2024fiubnn 10813 A finite set of natural numbers has an upper bound which is a a natural number. (Contributed by Jim Kingdon, 29-Oct-2024.)
 |-  ( ( A  C_  NN  /\  A  e.  Fin )  ->  E. x  e.  NN  A. y  e.  A  y 
 <_  x )
 
29-Oct-2024fiubz 10812 A finite set of integers has an upper bound which is an integer. (Contributed by Jim Kingdon, 29-Oct-2024.)
 |-  ( ( A  C_  ZZ  /\  A  e.  Fin )  ->  E. x  e.  ZZ  A. y  e.  A  y 
 <_  x )
 
29-Oct-2024fiubm 10811 Lemma for fiubz 10812 and fiubnn 10813. A general form of those theorems. (Contributed by Jim Kingdon, 29-Oct-2024.)
 |-  ( ph  ->  A  C_  B )   &    |-  ( ph  ->  B 
 C_  QQ )   &    |-  ( ph  ->  C  e.  B )   &    |-  ( ph  ->  A  e.  Fin )   =>    |-  ( ph  ->  E. x  e.  B  A. y  e.  A  y  <_  x )
 
28-Oct-2024unifndxntsetndx 12688 The slot for the uniform set is not the slot for the topology in an extensible structure. (Contributed by AV, 28-Oct-2024.)
 |-  ( UnifSet `  ndx )  =/=  (TopSet `  ndx )
 
28-Oct-2024basendxltunifndx 12686 The index of the slot for the base set is less then the index of the slot for the uniform set in an extensible structure. (Contributed by AV, 28-Oct-2024.)
 |-  ( Base `  ndx )  < 
 ( UnifSet `  ndx )
 
28-Oct-2024unifndxnn 12685 The index of the slot for the uniform set in an extensible structure is a positive integer. (Contributed by AV, 28-Oct-2024.)
 |-  ( UnifSet `  ndx )  e. 
 NN
 
28-Oct-2024dsndxnbasendx 12677 The slot for the distance is not the slot for the base set in an extensible structure. (Contributed by AV, 21-Oct-2024.) (Proof shortened by AV, 28-Oct-2024.)
 |-  ( dist `  ndx )  =/=  ( Base `  ndx )
 
28-Oct-2024basendxltdsndx 12676 The index of the slot for the base set is less then the index of the slot for the distance in an extensible structure. (Contributed by AV, 28-Oct-2024.)
 |-  ( Base `  ndx )  < 
 ( dist `  ndx )
 
28-Oct-2024dsndxnn 12675 The index of the slot for the distance in an extensible structure is a positive integer. (Contributed by AV, 28-Oct-2024.)
 |-  ( dist `  ndx )  e. 
 NN
 
27-Oct-2024bj-nnst 14656 Double negation of stability of a formula. Intuitionistic logic refutes unstability (but does not prove stability) of any formula. This theorem can also be proved in classical refutability calculus (see https://us.metamath.org/mpeuni/bj-peircestab.html) but not in minimal calculus (see https://us.metamath.org/mpeuni/bj-stabpeirce.html). See nnnotnotr 14903 for the version not using the definition of stability. (Contributed by BJ, 9-Oct-2019.) Prove it in  (  ->  ,  -.  ) -intuitionistic calculus with definitions (uses of ax-ia1 106, ax-ia2 107, ax-ia3 108 are via sylibr 134, necessary for definition unpackaging), and in  (  ->  ,  <->  ,  -.  )-intuitionistic calculus, following a discussion with Jim Kingdon. (Revised by BJ, 27-Oct-2024.)
 |-  -.  -. STAB  ph
 
27-Oct-2024bj-imnimnn 14651 If a formula is implied by both a formula and its negation, then it is not refutable. There is another proof using the inference associated with bj-nnclavius 14650 as its last step. (Contributed by BJ, 27-Oct-2024.)
 |-  ( ph  ->  ps )   &    |-  ( -.  ph  ->  ps )   =>    |- 
 -.  -.  ps
 
25-Oct-2024nnwosdc 12043 Well-ordering principle: any inhabited decidable set of positive integers has a least element (schema form). (Contributed by NM, 17-Aug-2001.) (Revised by Jim Kingdon, 25-Oct-2024.)
 |-  ( x  =  y 
 ->  ( ph  <->  ps ) )   =>    |-  ( ( E. x  e.  NN  ph  /\  A. x  e.  NN DECID  ph )  ->  E. x  e.  NN  ( ph  /\  A. y  e.  NN  ( ps  ->  x  <_  y
 ) ) )
 
23-Oct-2024nnwodc 12040 Well-ordering principle: any inhabited decidable set of positive integers has a least element. Theorem I.37 (well-ordering principle) of [Apostol] p. 34. (Contributed by NM, 17-Aug-2001.) (Revised by Jim Kingdon, 23-Oct-2024.)
 |-  ( ( A  C_  NN  /\  E. w  w  e.  A  /\  A. j  e.  NN DECID  j  e.  A )  ->  E. x  e.  A  A. y  e.  A  x  <_  y )
 
22-Oct-2024uzwodc 12041 Well-ordering principle: any inhabited decidable subset of an upper set of integers has a least element. (Contributed by NM, 8-Oct-2005.) (Revised by Jim Kingdon, 22-Oct-2024.)
 |-  ( ( S  C_  ( ZZ>= `  M )  /\  E. x  x  e.  S  /\  A. x  e.  ( ZZ>= `  M )DECID  x  e.  S )  ->  E. j  e.  S  A. k  e.  S  j  <_  k
 )
 
21-Oct-2024nnnotnotr 14903 Double negation of double negation elimination. Suggested by an online post by Martin Escardo. Although this statement resembles nnexmid 850, it can be proved with reference only to implication and negation (that is, without use of disjunction). (Contributed by Jim Kingdon, 21-Oct-2024.)
 |-  -.  -.  ( -.  -.  ph  -> 
 ph )
 
21-Oct-2024unifndxnbasendx 12687 The slot for the uniform set is not the slot for the base set in an extensible structure. (Contributed by AV, 21-Oct-2024.)
 |-  ( UnifSet `  ndx )  =/=  ( Base `  ndx )
 
21-Oct-2024ipndxnbasendx 12633 The slot for the inner product is not the slot for the base set in an extensible structure. (Contributed by AV, 21-Oct-2024.)
 |-  ( .i `  ndx )  =/=  ( Base `  ndx )
 
21-Oct-2024scandxnbasendx 12615 The slot for the scalar is not the slot for the base set in an extensible structure. (Contributed by AV, 21-Oct-2024.)
 |-  (Scalar `  ndx )  =/=  ( Base `  ndx )
 
20-Oct-2024isprm5lem 12144 Lemma for isprm5 12145. The interesting direction (showing that one only needs to check prime divisors up to the square root of  P). (Contributed by Jim Kingdon, 20-Oct-2024.)
 |-  ( ph  ->  P  e.  ( ZZ>= `  2 )
 )   &    |-  ( ph  ->  A. z  e.  Prime  ( ( z ^ 2 )  <_  P  ->  -.  z  ||  P ) )   &    |-  ( ph  ->  X  e.  ( 2 ... ( P  -  1
 ) ) )   =>    |-  ( ph  ->  -.  X  ||  P )
 
19-Oct-2024resseqnbasd 12535 The components of an extensible structure except the base set remain unchanged on a structure restriction. (Contributed by Mario Carneiro, 26-Nov-2014.) (Revised by Mario Carneiro, 2-Dec-2014.) (Revised by AV, 19-Oct-2024.)
 |-  R  =  ( Ws  A )   &    |-  C  =  ( E `  W )   &    |-  ( E  = Slot  ( E `
  ndx )  /\  ( E `  ndx )  e. 
 NN )   &    |-  ( E `  ndx )  =/=  ( Base `  ndx )   &    |-  ( ph  ->  W  e.  X )   &    |-  ( ph  ->  A  e.  V )   =>    |-  ( ph  ->  C  =  ( E `  R ) )
 
18-Oct-2024rmodislmod 13452 The right module  R induces a left module  L by replacing the scalar multiplication with a reversed multiplication if the scalar ring is commutative. The hypothesis "rmodislmod.r" is a definition of a right module analogous to Definition df-lmod 13390 of a left module, see also islmod 13392. (Contributed by AV, 3-Dec-2021.) (Proof shortened by AV, 18-Oct-2024.)
 |-  V  =  ( Base `  R )   &    |-  .+  =  ( +g  `  R )   &    |-  .x.  =  ( .s `  R )   &    |-  F  =  (Scalar `  R )   &    |-  K  =  ( Base `  F )   &    |-  .+^  =  ( +g  `  F )   &    |-  .X.  =  ( .r `  F )   &    |-  .1.  =  ( 1r `  F )   &    |-  ( R  e.  Grp  /\  F  e.  Ring  /\  A. q  e.  K  A. r  e.  K  A. x  e.  V  A. w  e.  V  ( ( ( w  .x.  r )  e.  V  /\  ( ( w  .+  x ) 
 .x.  r )  =  ( ( w  .x.  r )  .+  ( x 
 .x.  r ) ) 
 /\  ( w  .x.  ( q  .+^  r ) )  =  ( ( w  .x.  q )  .+  ( w  .x.  r
 ) ) )  /\  ( ( w  .x.  ( q  .X.  r ) )  =  ( ( w  .x.  q )  .x.  r )  /\  ( w  .x.  .1.  )  =  w ) ) )   &    |-  .*  =  ( s  e.  K ,  v  e.  V  |->  ( v  .x.  s ) )   &    |-  L  =  ( R sSet  <. ( .s
 `  ndx ) ,  .*  >.
 )   =>    |-  ( F  e.  CRing  ->  L  e.  LMod )
 
18-Oct-2024mgpress 13152 Subgroup commutes with the multiplicative group operator. (Contributed by Mario Carneiro, 10-Jan-2015.) (Proof shortened by AV, 18-Oct-2024.)
 |-  S  =  ( Rs  A )   &    |-  M  =  (mulGrp `  R )   =>    |-  ( ( R  e.  V  /\  A  e.  W )  ->  ( Ms  A )  =  (mulGrp `  S ) )
 
18-Oct-2024dsndxnplusgndx 12678 The slot for the distance function is not the slot for the group operation in an extensible structure. (Contributed by AV, 18-Oct-2024.)
 |-  ( dist `  ndx )  =/=  ( +g  `  ndx )
 
18-Oct-2024plendxnplusgndx 12667 The slot for the "less than or equal to" ordering is not the slot for the group operation in an extensible structure. (Contributed by AV, 18-Oct-2024.)
 |-  ( le `  ndx )  =/=  ( +g  `  ndx )
 
18-Oct-2024tsetndxnplusgndx 12653 The slot for the topology is not the slot for the group operation in an extensible structure. (Contributed by AV, 18-Oct-2024.)
 |-  (TopSet `  ndx )  =/=  ( +g  `  ndx )
 
18-Oct-2024vscandxnscandx 12623 The slot for the scalar product is not the slot for the scalar field in an extensible structure. (Contributed by AV, 18-Oct-2024.)
 |-  ( .s `  ndx )  =/=  (Scalar `  ndx )
 
18-Oct-2024vscandxnplusgndx 12621 The slot for the scalar product is not the slot for the group operation in an extensible structure. (Contributed by AV, 18-Oct-2024.)
 |-  ( .s `  ndx )  =/=  ( +g  `  ndx )
 
18-Oct-2024vscandxnbasendx 12620 The slot for the scalar product is not the slot for the base set in an extensible structure. (Contributed by AV, 18-Oct-2024.)
 |-  ( .s `  ndx )  =/=  ( Base `  ndx )
 
18-Oct-2024scandxnplusgndx 12616 The slot for the scalar field is not the slot for the group operation in an extensible structure. (Contributed by AV, 18-Oct-2024.)
 |-  (Scalar `  ndx )  =/=  ( +g  `  ndx )
 
18-Oct-2024starvndxnmulrndx 12605 The slot for the involution function is not the slot for the base set in an extensible structure. (Contributed by AV, 18-Oct-2024.)
 |-  ( *r `  ndx )  =/=  ( .r `  ndx )
 
18-Oct-2024starvndxnplusgndx 12604 The slot for the involution function is not the slot for the base set in an extensible structure. (Contributed by AV, 18-Oct-2024.)
 |-  ( *r `  ndx )  =/=  ( +g  `  ndx )
 
18-Oct-2024starvndxnbasendx 12603 The slot for the involution function is not the slot for the base set in an extensible structure. (Contributed by AV, 18-Oct-2024.)
 |-  ( *r `  ndx )  =/=  ( Base `  ndx )
 
17-Oct-2024basendxltplusgndx 12575 The index of the slot for the base set is less then the index of the slot for the group operation in an extensible structure. (Contributed by AV, 17-Oct-2024.)
 |-  ( Base `  ndx )  < 
 ( +g  `  ndx )
 
17-Oct-2024plusgndxnn 12573 The index of the slot for the group operation in an extensible structure is a positive integer. (Contributed by AV, 17-Oct-2024.)
 |-  ( +g  `  ndx )  e.  NN
 
17-Oct-2024elnndc 9615 Membership of an integer in  NN is decidable. (Contributed by Jim Kingdon, 17-Oct-2024.)
 |-  ( N  e.  ZZ  -> DECID  N  e.  NN )
 
14-Oct-20242zinfmin 11254 Two ways to express the minimum of two integers. Because order of integers is decidable, we have more flexibility than for real numbers. (Contributed by Jim Kingdon, 14-Oct-2024.)
 |-  ( ( A  e.  ZZ  /\  B  e.  ZZ )  -> inf ( { A ,  B } ,  RR ,  <  )  =  if ( A  <_  B ,  A ,  B )
 )
 
14-Oct-2024mingeb 11253 Equivalence of  <_ and being equal to the minimum of two reals. (Contributed by Jim Kingdon, 14-Oct-2024.)
 |-  ( ( A  e.  RR  /\  B  e.  RR )  ->  ( A  <_  B  <-> inf ( { A ,  B } ,  RR ,  <  )  =  A ) )
 
13-Oct-2024pcxnn0cl 12313 Extended nonnegative integer closure of the general prime count function. (Contributed by Jim Kingdon, 13-Oct-2024.)
 |-  ( ( P  e.  Prime  /\  N  e.  ZZ )  ->  ( P  pCnt  N )  e. NN0* )
 
13-Oct-2024xnn0letri 9806 Dichotomy for extended nonnegative integers. (Contributed by Jim Kingdon, 13-Oct-2024.)
 |-  ( ( A  e. NN0*  /\  B  e. NN0* )  ->  ( A  <_  B  \/  B  <_  A ) )
 
13-Oct-2024xnn0dcle 9805 Decidability of  <_ for extended nonnegative integers. (Contributed by Jim Kingdon, 13-Oct-2024.)
 |-  ( ( A  e. NN0*  /\  B  e. NN0* )  -> DECID  A  <_  B )
 
9-Oct-2024nn0leexp2 10693 Ordering law for exponentiation. (Contributed by Jim Kingdon, 9-Oct-2024.)
 |-  ( ( ( A  e.  RR  /\  M  e.  NN0  /\  N  e.  NN0 )  /\  1  <  A )  ->  ( M 
 <_  N  <->  ( A ^ M )  <_  ( A ^ N ) ) )
 
8-Oct-2024pclemdc 12291 Lemma for the prime power pre-function's properties. (Contributed by Jim Kingdon, 8-Oct-2024.)
 |-  A  =  { n  e.  NN0  |  ( P ^ n )  ||  N }   =>    |-  ( ( P  e.  ( ZZ>= `  2 )  /\  ( N  e.  ZZ  /\  N  =/=  0 ) )  ->  A. x  e. 
 ZZ DECID  x  e.  A )
 
8-Oct-2024elnn0dc 9614 Membership of an integer in  NN0 is decidable. (Contributed by Jim Kingdon, 8-Oct-2024.)
 |-  ( N  e.  ZZ  -> DECID  N  e.  NN0 )
 
7-Oct-2024pclemub 12290 Lemma for the prime power pre-function's properties. (Contributed by Mario Carneiro, 23-Feb-2014.) (Revised by Jim Kingdon, 7-Oct-2024.)
 |-  A  =  { n  e.  NN0  |  ( P ^ n )  ||  N }   =>    |-  ( ( P  e.  ( ZZ>= `  2 )  /\  ( N  e.  ZZ  /\  N  =/=  0 ) )  ->  E. x  e.  ZZ  A. y  e.  A  y  <_  x )
 
7-Oct-2024pclem0 12289 Lemma for the prime power pre-function's properties. (Contributed by Mario Carneiro, 23-Feb-2014.) (Revised by Jim Kingdon, 7-Oct-2024.)
 |-  A  =  { n  e.  NN0  |  ( P ^ n )  ||  N }   =>    |-  ( ( P  e.  ( ZZ>= `  2 )  /\  ( N  e.  ZZ  /\  N  =/=  0 ) )  ->  0  e.  A )
 
7-Oct-2024nn0ltexp2 10692 Special case of ltexp2 14521 which we use here because we haven't yet defined df-rpcxp 14441 which is used in the current proof of ltexp2 14521. (Contributed by Jim Kingdon, 7-Oct-2024.)
 |-  ( ( ( A  e.  RR  /\  M  e.  NN0  /\  N  e.  NN0 )  /\  1  <  A )  ->  ( M  <  N  <->  ( A ^ M )  <  ( A ^ N ) ) )
 
6-Oct-2024suprzcl2dc 11959 The supremum of a bounded-above decidable set of integers is a member of the set. (This theorem avoids ax-pre-suploc 7935.) (Contributed by Mario Carneiro, 21-Apr-2015.) (Revised by Jim Kingdon, 6-Oct-2024.)
 |-  ( ph  ->  A  C_ 
 ZZ )   &    |-  ( ph  ->  A. x  e.  ZZ DECID  x  e.  A )   &    |-  ( ph  ->  E. x  e.  ZZ  A. y  e.  A  y  <_  x )   &    |-  ( ph  ->  E. x  x  e.  A )   =>    |-  ( ph  ->  sup ( A ,  RR ,  <  )  e.  A )
 
5-Oct-2024zsupssdc 11958 An inhabited decidable bounded subset of integers has a supremum in the set. (The proof does not use ax-pre-suploc 7935.) (Contributed by Mario Carneiro, 21-Apr-2015.) (Revised by Jim Kingdon, 5-Oct-2024.)
 |-  ( ph  ->  A  C_ 
 ZZ )   &    |-  ( ph  ->  E. x  x  e.  A )   &    |-  ( ph  ->  A. x  e.  ZZ DECID  x  e.  A )   &    |-  ( ph  ->  E. x  e.  ZZ  A. y  e.  A  y  <_  x )   =>    |-  ( ph  ->  E. x  e.  A  ( A. y  e.  A  -.  x  < 
 y  /\  A. y  e.  B  ( y  < 
 x  ->  E. z  e.  A  y  <  z
 ) ) )
 
5-Oct-2024suprzubdc 11956 The supremum of a bounded-above decidable set of integers is greater than any member of the set. (Contributed by Mario Carneiro, 21-Apr-2015.) (Revised by Jim Kingdon, 5-Oct-2024.)
 |-  ( ph  ->  A  C_ 
 ZZ )   &    |-  ( ph  ->  A. x  e.  ZZ DECID  x  e.  A )   &    |-  ( ph  ->  E. x  e.  ZZ  A. y  e.  A  y  <_  x )   &    |-  ( ph  ->  B  e.  A )   =>    |-  ( ph  ->  B 
 <_  sup ( A ,  RR ,  <  ) )
 
1-Oct-2024infex2g 7036 Existence of infimum. (Contributed by Jim Kingdon, 1-Oct-2024.)
 |-  ( A  e.  C  -> inf ( B ,  A ,  R )  e.  _V )
 
30-Sep-2024unbendc 12458 An unbounded decidable set of positive integers is infinite. (Contributed by NM, 5-May-2005.) (Revised by Jim Kingdon, 30-Sep-2024.)
 |-  ( ( A  C_  NN  /\  A. x  e. 
 NN DECID  x  e.  A  /\  A. m  e.  NN  E. n  e.  A  m  <  n )  ->  A  ~~ 
 NN )
 
30-Sep-2024prmdc 12133 Primality is decidable. (Contributed by Jim Kingdon, 30-Sep-2024.)
 |-  ( N  e.  NN  -> DECID  N  e.  Prime )
 
30-Sep-2024dcfi 6983 Decidability of a family of propositions indexed by a finite set. (Contributed by Jim Kingdon, 30-Sep-2024.)
 |-  ( ( A  e.  Fin  /\  A. x  e.  A DECID  ph )  -> DECID  A. x  e.  A  ph )
 
29-Sep-2024ssnnct 12451 A decidable subset of  NN is countable. (Contributed by Jim Kingdon, 29-Sep-2024.)
 |-  ( ( A  C_  NN  /\  A. x  e. 
 NN DECID  x  e.  A )  ->  E. f  f : om -onto-> ( A 1o )
 )
 
29-Sep-2024ssnnctlemct 12450 Lemma for ssnnct 12451. The result. (Contributed by Jim Kingdon, 29-Sep-2024.)
 |-  G  = frec ( ( x  e.  ZZ  |->  ( x  +  1 ) ) ,  1 )   =>    |-  ( ( A  C_  NN  /\  A. x  e. 
 NN DECID  x  e.  A )  ->  E. f  f : om -onto-> ( A 1o )
 )
 
28-Sep-2024nninfdcex 11957 A decidable set of natural numbers has an infimum. (Contributed by Jim Kingdon, 28-Sep-2024.)
 |-  ( ph  ->  A  C_ 
 NN )   &    |-  ( ph  ->  A. x  e.  NN DECID  x  e.  A )   &    |-  ( ph  ->  E. y  y  e.  A )   =>    |-  ( ph  ->  E. x  e.  RR  ( A. y  e.  A  -.  y  < 
 x  /\  A. y  e. 
 RR  ( x  < 
 y  ->  E. z  e.  A  z  <  y
 ) ) )
 
27-Sep-2024infregelbex 9601 Any lower bound of a set of real numbers with an infimum is less than or equal to the infimum. (Contributed by Jim Kingdon, 27-Sep-2024.)
 |-  ( ph  ->  E. x  e.  RR  ( A. y  e.  A  -.  y  < 
 x  /\  A. y  e. 
 RR  ( x  < 
 y  ->  E. z  e.  A  z  <  y
 ) ) )   &    |-  ( ph  ->  A  C_  RR )   &    |-  ( ph  ->  B  e.  RR )   =>    |-  ( ph  ->  ( B  <_ inf ( A ,  RR ,  <  )  <->  A. z  e.  A  B  <_  z ) )
 
26-Sep-2024nninfdclemp1 12454 Lemma for nninfdc 12457. Each element of the sequence  F is greater than the previous element. (Contributed by Jim Kingdon, 26-Sep-2024.)
 |-  ( ph  ->  A  C_ 
 NN )   &    |-  ( ph  ->  A. x  e.  NN DECID  x  e.  A )   &    |-  ( ph  ->  A. m  e.  NN  E. n  e.  A  m  <  n )   &    |-  ( ph  ->  ( J  e.  A  /\  1  <  J ) )   &    |-  F  =  seq 1
 ( ( y  e. 
 NN ,  z  e. 
 NN  |-> inf ( ( A  i^i  ( ZZ>= `  (
 y  +  1 ) ) ) ,  RR ,  <  ) ) ,  ( i  e.  NN  |->  J ) )   &    |-  ( ph  ->  U  e.  NN )   =>    |-  ( ph  ->  ( F `  U )  < 
 ( F `  ( U  +  1 )
 ) )
 
26-Sep-2024nnminle 12039 The infimum of a decidable subset of the natural numbers is less than an element of the set. The infimum is also a minimum as shown at nnmindc 12038. (Contributed by Jim Kingdon, 26-Sep-2024.)
 |-  ( ( A  C_  NN  /\  A. x  e. 
 NN DECID  x  e.  A  /\  B  e.  A )  -> inf ( A ,  RR ,  <  )  <_  B )
 
25-Sep-2024nninfdclemcl 12452 Lemma for nninfdc 12457. (Contributed by Jim Kingdon, 25-Sep-2024.)
 |-  ( ph  ->  A  C_ 
 NN )   &    |-  ( ph  ->  A. x  e.  NN DECID  x  e.  A )   &    |-  ( ph  ->  A. m  e.  NN  E. n  e.  A  m  <  n )   &    |-  ( ph  ->  P  e.  A )   &    |-  ( ph  ->  Q  e.  A )   =>    |-  ( ph  ->  ( P ( y  e. 
 NN ,  z  e. 
 NN  |-> inf ( ( A  i^i  ( ZZ>= `  (
 y  +  1 ) ) ) ,  RR ,  <  ) ) Q )  e.  A )
 
24-Sep-2024nninfdclemlt 12455 Lemma for nninfdc 12457. The function from nninfdclemf 12453 is strictly monotonic. (Contributed by Jim Kingdon, 24-Sep-2024.)
 |-  ( ph  ->  A  C_ 
 NN )   &    |-  ( ph  ->  A. x  e.  NN DECID  x  e.  A )   &    |-  ( ph  ->  A. m  e.  NN  E. n  e.  A  m  <  n )   &    |-  ( ph  ->  ( J  e.  A  /\  1  <  J ) )   &    |-  F  =  seq 1
 ( ( y  e. 
 NN ,  z  e. 
 NN  |-> inf ( ( A  i^i  ( ZZ>= `  (
 y  +  1 ) ) ) ,  RR ,  <  ) ) ,  ( i  e.  NN  |->  J ) )   &    |-  ( ph  ->  U  e.  NN )   &    |-  ( ph  ->  V  e.  NN )   &    |-  ( ph  ->  U  <  V )   =>    |-  ( ph  ->  ( F `  U )  <  ( F `  V ) )
 
23-Sep-2024nninfdc 12457 An unbounded decidable set of positive integers is infinite. (Contributed by Jim Kingdon, 23-Sep-2024.)
 |-  ( ( A  C_  NN  /\  A. x  e. 
 NN DECID  x  e.  A  /\  A. m  e.  NN  E. n  e.  A  m  <  n )  ->  om  ~<_  A )
 
23-Sep-2024nninfdclemf1 12456 Lemma for nninfdc 12457. The function from nninfdclemf 12453 is one-to-one. (Contributed by Jim Kingdon, 23-Sep-2024.)
 |-  ( ph  ->  A  C_ 
 NN )   &    |-  ( ph  ->  A. x  e.  NN DECID  x  e.  A )   &    |-  ( ph  ->  A. m  e.  NN  E. n  e.  A  m  <  n )   &    |-  ( ph  ->  ( J  e.  A  /\  1  <  J ) )   &    |-  F  =  seq 1
 ( ( y  e. 
 NN ,  z  e. 
 NN  |-> inf ( ( A  i^i  ( ZZ>= `  (
 y  +  1 ) ) ) ,  RR ,  <  ) ) ,  ( i  e.  NN  |->  J ) )   =>    |-  ( ph  ->  F : NN -1-1-> A )
 
23-Sep-2024nninfdclemf 12453 Lemma for nninfdc 12457. A function from the natural numbers into  A. (Contributed by Jim Kingdon, 23-Sep-2024.)
 |-  ( ph  ->  A  C_ 
 NN )   &    |-  ( ph  ->  A. x  e.  NN DECID  x  e.  A )   &    |-  ( ph  ->  A. m  e.  NN  E. n  e.  A  m  <  n )   &    |-  ( ph  ->  ( J  e.  A  /\  1  <  J ) )   &    |-  F  =  seq 1
 ( ( y  e. 
 NN ,  z  e. 
 NN  |-> inf ( ( A  i^i  ( ZZ>= `  (
 y  +  1 ) ) ) ,  RR ,  <  ) ) ,  ( i  e.  NN  |->  J ) )   =>    |-  ( ph  ->  F : NN --> A )
 
23-Sep-2024nnmindc 12038 An inhabited decidable subset of the natural numbers has a minimum. (Contributed by Jim Kingdon, 23-Sep-2024.)
 |-  ( ( A  C_  NN  /\  A. x  e. 
 NN DECID  x  e.  A  /\  E. y  y  e.  A )  -> inf ( A ,  RR ,  <  )  e.  A )
 
19-Sep-2024ssomct 12449 A decidable subset of  om is countable. (Contributed by Jim Kingdon, 19-Sep-2024.)
 |-  ( ( A  C_  om 
 /\  A. x  e.  om DECID  x  e.  A )  ->  E. f  f : om -onto-> ( A 1o ) )
 
14-Sep-2024nnpredlt 4625 The predecessor (see nnpredcl 4624) of a nonzero natural number is less than (see df-iord 4368) that number. (Contributed by Jim Kingdon, 14-Sep-2024.)
 |-  ( ( A  e.  om 
 /\  A  =/=  (/) )  ->  U. A  e.  A )
 
13-Sep-2024nninfisollemeq 7133 Lemma for nninfisol 7134. The case where  N is a successor and  N and  X are equal. (Contributed by Jim Kingdon, 13-Sep-2024.)
 |-  ( ph  ->  X  e. )   &    |-  ( ph  ->  ( X `  N )  =  (/) )   &    |-  ( ph  ->  N  e.  om )   &    |-  ( ph  ->  N  =/=  (/) )   &    |-  ( ph  ->  ( X `  U. N )  =  1o )   =>    |-  ( ph  -> DECID 
 ( i  e.  om  |->  if ( i  e.  N ,  1o ,  (/) ) )  =  X )
 
13-Sep-2024nninfisollemne 7132 Lemma for nninfisol 7134. A case where  N is a successor and  N and  X are not equal. (Contributed by Jim Kingdon, 13-Sep-2024.)
 |-  ( ph  ->  X  e. )   &    |-  ( ph  ->  ( X `  N )  =  (/) )   &    |-  ( ph  ->  N  e.  om )   &    |-  ( ph  ->  N  =/=  (/) )   &    |-  ( ph  ->  ( X `  U. N )  =  (/) )   =>    |-  ( ph  -> DECID  ( i  e.  om  |->  if (
 i  e.  N ,  1o ,  (/) ) )  =  X )
 
13-Sep-2024nninfisollem0 7131 Lemma for nninfisol 7134. The case where  N is zero. (Contributed by Jim Kingdon, 13-Sep-2024.)
 |-  ( ph  ->  X  e. )   &    |-  ( ph  ->  ( X `  N )  =  (/) )   &    |-  ( ph  ->  N  e.  om )   &    |-  ( ph  ->  N  =  (/) )   =>    |-  ( ph  -> DECID  ( i  e.  om  |->  if ( i  e.  N ,  1o ,  (/) ) )  =  X )
 
12-Sep-2024nninfisol 7134 Finite elements of ℕ are isolated. That is, given a natural number and any element of ℕ, it is decidable whether the natural number (when converted to an element of ℕ) is equal to the given element of ℕ. Stated in an online post by Martin Escardo. One way to understand this theorem is that you do not need to look at an unbounded number of elements of the sequence  X to decide whether it is equal to  N (in fact, you only need to look at two elements and  N tells you where to look). (Contributed by BJ and Jim Kingdon, 12-Sep-2024.)
 |-  ( ( N  e.  om 
 /\  X  e. )  -> DECID  ( i  e.  om  |->  if ( i  e.  N ,  1o ,  (/) ) )  =  X )
 
7-Sep-2024eulerthlemfi 12231 Lemma for eulerth 12236. The set  S is finite. (Contributed by Mario Carneiro, 28-Feb-2014.) (Revised by Jim Kingdon, 7-Sep-2024.)
 |-  ( ph  ->  ( N  e.  NN  /\  A  e.  ZZ  /\  ( A 
 gcd  N )  =  1 ) )   &    |-  S  =  {
 y  e.  ( 0..^ N )  |  ( y  gcd  N )  =  1 }   =>    |-  ( ph  ->  S  e.  Fin )
 
7-Sep-2024modqexp 10650 Exponentiation property of the modulo operation, see theorem 5.2(c) in [ApostolNT] p. 107. (Contributed by Mario Carneiro, 28-Feb-2014.) (Revised by Jim Kingdon, 7-Sep-2024.)
 |-  ( ph  ->  A  e.  ZZ )   &    |-  ( ph  ->  B  e.  ZZ )   &    |-  ( ph  ->  C  e.  NN0 )   &    |-  ( ph  ->  D  e.  QQ )   &    |-  ( ph  ->  0  <  D )   &    |-  ( ph  ->  ( A  mod  D )  =  ( B 
 mod  D ) )   =>    |-  ( ph  ->  ( ( A ^ C )  mod  D )  =  ( ( B ^ C )  mod  D ) )
 
5-Sep-2024eulerthlemh 12234 Lemma for eulerth 12236. A permutation of  ( 1 ... ( phi `  N ) ). (Contributed by Mario Carneiro, 28-Feb-2014.) (Revised by Jim Kingdon, 5-Sep-2024.)
 |-  ( ph  ->  ( N  e.  NN  /\  A  e.  ZZ  /\  ( A 
 gcd  N )  =  1 ) )   &    |-  S  =  {
 y  e.  ( 0..^ N )  |  ( y  gcd  N )  =  1 }   &    |-  ( ph  ->  F : ( 1 ... ( phi `  N ) ) -1-1-onto-> S )   &    |-  H  =  ( `' F  o.  ( y  e.  ( 1 ... ( phi `  N ) ) 
 |->  ( ( A  x.  ( F `  y ) )  mod  N ) ) )   =>    |-  ( ph  ->  H : ( 1 ... ( phi `  N ) ) -1-1-onto-> ( 1 ... ( phi `  N ) ) )
 
2-Sep-2024eulerthlemth 12235 Lemma for eulerth 12236. The result. (Contributed by Mario Carneiro, 28-Feb-2014.) (Revised by Jim Kingdon, 2-Sep-2024.)
 |-  ( ph  ->  ( N  e.  NN  /\  A  e.  ZZ  /\  ( A 
 gcd  N )  =  1 ) )   &    |-  S  =  {
 y  e.  ( 0..^ N )  |  ( y  gcd  N )  =  1 }   &    |-  ( ph  ->  F : ( 1 ... ( phi `  N ) ) -1-1-onto-> S )   =>    |-  ( ph  ->  ( ( A ^ ( phi `  N ) )  mod  N )  =  ( 1  mod 
 N ) )
 
2-Sep-2024eulerthlema 12233 Lemma for eulerth 12236. (Contributed by Mario Carneiro, 28-Feb-2014.) (Revised by Jim Kingdon, 2-Sep-2024.)
 |-  ( ph  ->  ( N  e.  NN  /\  A  e.  ZZ  /\  ( A 
 gcd  N )  =  1 ) )   &    |-  S  =  {
 y  e.  ( 0..^ N )  |  ( y  gcd  N )  =  1 }   &    |-  ( ph  ->  F : ( 1 ... ( phi `  N ) ) -1-1-onto-> S )   =>    |-  ( ph  ->  ( (
 ( A ^ ( phi `  N ) )  x.  prod_ x  e.  (
 1 ... ( phi `  N ) ) ( F `
  x ) ) 
 mod  N )  =  (
 prod_ x  e.  (
 1 ... ( phi `  N ) ) ( ( A  x.  ( F `
  x ) ) 
 mod  N )  mod  N ) )
 
2-Sep-2024eulerthlemrprm 12232 Lemma for eulerth 12236. 
N and  prod_ x  e.  ( 1 ... ( phi `  N ) ) ( F `  x
) are relatively prime. (Contributed by Mario Carneiro, 28-Feb-2014.) (Revised by Jim Kingdon, 2-Sep-2024.)
 |-  ( ph  ->  ( N  e.  NN  /\  A  e.  ZZ  /\  ( A 
 gcd  N )  =  1 ) )   &    |-  S  =  {
 y  e.  ( 0..^ N )  |  ( y  gcd  N )  =  1 }   &    |-  ( ph  ->  F : ( 1 ... ( phi `  N ) ) -1-1-onto-> S )   =>    |-  ( ph  ->  ( N  gcd  prod_ x  e.  (
 1 ... ( phi `  N ) ) ( F `
  x ) )  =  1 )
 
30-Aug-2024fprodap0f 11647 A finite product of terms apart from zero is apart from zero. A version of fprodap0 11632 using bound-variable hypotheses instead of distinct variable conditions. (Contributed by Glauco Siliprandi, 5-Apr-2020.) (Revised by Jim Kingdon, 30-Aug-2024.)
 |- 
 F/ k ph   &    |-  ( ph  ->  A  e.  Fin )   &    |-  (
 ( ph  /\  k  e.  A )  ->  B  e.  CC )   &    |-  ( ( ph  /\  k  e.  A ) 
 ->  B #  0 )   =>    |-  ( ph  ->  prod_
 k  e.  A  B #  0 )
 
28-Aug-2024fprodrec 11640 The finite product of reciprocals is the reciprocal of the product. (Contributed by Jim Kingdon, 28-Aug-2024.)
 |-  ( ph  ->  A  e.  Fin )   &    |-  ( ( ph  /\  k  e.  A ) 
 ->  B  e.  CC )   &    |-  (
 ( ph  /\  k  e.  A )  ->  B #  0 )   =>    |-  ( ph  ->  prod_ k  e.  A  ( 1  /  B )  =  (
 1  /  prod_ k  e.  A  B ) )
 
26-Aug-2024exmidontri2or 7245 Ordinal trichotomy is equivalent to excluded middle. (Contributed by Jim Kingdon, 26-Aug-2024.)
 |-  (EXMID  <->  A. x  e.  On  A. y  e.  On  ( x  C_  y  \/  y  C_  x ) )
 
26-Aug-2024exmidontri 7241 Ordinal trichotomy is equivalent to excluded middle. (Contributed by Jim Kingdon, 26-Aug-2024.)
 |-  (EXMID  <->  A. x  e.  On  A. y  e.  On  ( x  e.  y  \/  x  =  y  \/  y  e.  x )
 )
 
26-Aug-2024ontri2orexmidim 4573 Ordinal trichotomy implies excluded middle. Closed form of ordtri2or2exmid 4572. (Contributed by Jim Kingdon, 26-Aug-2024.)
 |-  ( A. x  e. 
 On  A. y  e.  On  ( x  C_  y  \/  y  C_  x )  -> DECID  ph )
 
26-Aug-2024ontriexmidim 4523 Ordinal trichotomy implies excluded middle. Closed form of ordtriexmid 4522. (Contributed by Jim Kingdon, 26-Aug-2024.)
 |-  ( A. x  e. 
 On  A. y  e.  On  ( x  e.  y  \/  x  =  y  \/  y  e.  x )  -> DECID  ph )
 
25-Aug-2024onntri2or 7248 Double negated ordinal trichotomy. (Contributed by Jim Kingdon, 25-Aug-2024.)
 |-  ( -.  -. EXMID  <->  A. x  e.  On  A. y  e.  On  -.  -.  ( x  C_  y  \/  y  C_  x ) )
 
25-Aug-2024onntri3or 7247 Double negated ordinal trichotomy. (Contributed by Jim Kingdon, 25-Aug-2024.)
 |-  ( -.  -. EXMID  <->  A. x  e.  On  A. y  e.  On  -.  -.  ( x  e.  y  \/  x  =  y  \/  y  e.  x ) )
 
25-Aug-2024csbcow 3070 Composition law for chained substitutions into a class. Version of csbco 3069 with a disjoint variable condition, which requires fewer axioms. (Contributed by NM, 10-Nov-2005.) (Revised by Gino Giotto, 25-Aug-2024.)
 |-  [_ A  /  y ]_ [_ y  /  x ]_ B  =  [_ A  /  x ]_ B
 
25-Aug-2024cbvreuvw 2711 Version of cbvreuv 2707 with a disjoint variable condition. (Contributed by Gino Giotto, 10-Jan-2024.) Reduce axiom usage. (Revised by Gino Giotto, 25-Aug-2024.)
 |-  ( x  =  y 
 ->  ( ph  <->  ps ) )   =>    |-  ( E! x  e.  A  ph  <->  E! y  e.  A  ps )
 
25-Aug-2024cbvrexvw 2710 Version of cbvrexv 2706 with a disjoint variable condition. (Contributed by Gino Giotto, 10-Jan-2024.) Reduce axiom usage. (Revised by Gino Giotto, 25-Aug-2024.)
 |-  ( x  =  y 
 ->  ( ph  <->  ps ) )   =>    |-  ( E. x  e.  A  ph  <->  E. y  e.  A  ps )
 
25-Aug-2024cbvralvw 2709 Version of cbvralv 2705 with a disjoint variable condition. (Contributed by Gino Giotto, 10-Jan-2024.) Reduce axiom usage. (Revised by Gino Giotto, 25-Aug-2024.)
 |-  ( x  =  y 
 ->  ( ph  <->  ps ) )   =>    |-  ( A. x  e.  A  ph  <->  A. y  e.  A  ps )
 
25-Aug-2024cbvabw 2300 Version of cbvab 2301 with a disjoint variable condition. (Contributed by Gino Giotto, 10-Jan-2024.) Reduce axiom usage. (Revised by Gino Giotto, 25-Aug-2024.)
 |- 
 F/ y ph   &    |-  F/ x ps   &    |-  ( x  =  y  ->  (
 ph 
 <->  ps ) )   =>    |-  { x  |  ph
 }  =  { y  |  ps }
 
25-Aug-2024nfsbv 1947 If  z is not free in  ph, it is not free in  [ y  /  x ] ph when  z is distinct from  x and  y. Version of nfsb 1946 requiring more disjoint variables. (Contributed by Wolf Lammen, 7-Feb-2023.) Remove disjoint variable condition on  x ,  y. (Revised by Steven Nguyen, 13-Aug-2023.) Reduce axiom usage. (Revised by Gino Giotto, 25-Aug-2024.)
 |- 
 F/ z ph   =>    |- 
 F/ z [ y  /  x ] ph
 
25-Aug-2024cbvexvw 1920 Change bound variable. See cbvexv 1918 for a version with fewer disjoint variable conditions. (Contributed by NM, 19-Apr-2017.) Avoid ax-7 1448. (Revised by Gino Giotto, 25-Aug-2024.)
 |-  ( x  =  y 
 ->  ( ph  <->  ps ) )   =>    |-  ( E. x ph  <->  E. y ps )
 
25-Aug-2024cbvalvw 1919 Change bound variable. See cbvalv 1917 for a version with fewer disjoint variable conditions. (Contributed by NM, 9-Apr-2017.) Avoid ax-7 1448. (Revised by Gino Giotto, 25-Aug-2024.)
 |-  ( x  =  y 
 ->  ( ph  <->  ps ) )   =>    |-  ( A. x ph  <->  A. y ps )
 
25-Aug-2024nfal 1576 If  x is not free in  ph, it is not free in  A. y ph. (Contributed by Mario Carneiro, 11-Aug-2016.) Remove dependency on ax-4 1510. (Revised by Gino Giotto, 25-Aug-2024.)
 |- 
 F/ x ph   =>    |- 
 F/ x A. y ph
 
24-Aug-2024gcdcomd 11978 The  gcd operator is commutative, deduction version. (Contributed by SN, 24-Aug-2024.)
 |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  N  e.  ZZ )   =>    |-  ( ph  ->  ( M  gcd  N )  =  ( N  gcd  M ) )
 
21-Aug-2024dvds2addd 11839 Deduction form of dvds2add 11835. (Contributed by SN, 21-Aug-2024.)
 |-  ( ph  ->  K  e.  ZZ )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  N  e.  ZZ )   &    |-  ( ph  ->  K  ||  M )   &    |-  ( ph  ->  K 
 ||  N )   =>    |-  ( ph  ->  K 
 ||  ( M  +  N ) )
 
17-Aug-2024fprodcl2lem 11616 Finite product closure lemma. (Contributed by Scott Fenton, 14-Dec-2017.) (Revised by Jim Kingdon, 17-Aug-2024.)
 |-  ( ph  ->  S  C_ 
 CC )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S ) )  ->  ( x  x.  y )  e.  S )   &    |-  ( ph  ->  A  e.  Fin )   &    |-  (
 ( ph  /\  k  e.  A )  ->  B  e.  S )   &    |-  ( ph  ->  A  =/=  (/) )   =>    |-  ( ph  ->  prod_ k  e.  A  B  e.  S )
 
16-Aug-2024if0ab 14718 Expression of a conditional class as a class abstraction when the False alternative is the empty class: in that case, the conditional class is the extension, in the True alternative, of the condition.

Remark: a consequence which could be formalized is the inclusion  |-  if (
ph ,  A ,  (/) )  C_  A and therefore, using elpwg 3585,  |-  ( A  e.  V  ->  if ( ph ,  A ,  (/) )  e.  ~P A
), from which fmelpw1o 14719 could be derived, yielding an alternative proof. (Contributed by BJ, 16-Aug-2024.)

 |-  if ( ph ,  A ,  (/) )  =  { x  e.  A  |  ph }
 
16-Aug-2024fprodunsn 11615 Multiply in an additional term in a finite product. See also fprodsplitsn 11644 which is the same but with a  F/ k
ph hypothesis in place of the distinct variable condition between  ph and  k. (Contributed by Jim Kingdon, 16-Aug-2024.)
 |-  F/_ k D   &    |-  ( ph  ->  A  e.  Fin )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  -.  B  e.  A )   &    |-  ( ( ph  /\  k  e.  A ) 
 ->  C  e.  CC )   &    |-  ( ph  ->  D  e.  CC )   &    |-  ( k  =  B  ->  C  =  D )   =>    |-  ( ph  ->  prod_ k  e.  ( A  u.  { B } ) C  =  ( prod_ k  e.  A  C  x.  D ) )
 
15-Aug-2024bj-charfundcALT 14722 Alternate proof of bj-charfundc 14721. It was expected to be much shorter since it uses bj-charfun 14720 for the main part of the proof and the rest is basic computations, but these turn out to be lengthy, maybe because of the limited library of available lemmas. (Contributed by BJ, 15-Aug-2024.) (Proof modification is discouraged.) (New usage is discouraged.)
 |-  ( ph  ->  F  =  ( x  e.  X  |->  if ( x  e.  A ,  1o ,  (/) ) ) )   &    |-  ( ph  ->  A. x  e.  X DECID  x  e.  A )   =>    |-  ( ph  ->  ( F : X --> 2o  /\  ( A. x  e.  ( X  i^i  A ) ( F `  x )  =  1o  /\  A. x  e.  ( X  \  A ) ( F `
  x )  =  (/) ) ) )
 
15-Aug-2024bj-charfun 14720 Properties of the characteristic function on the class  X of the class  A. (Contributed by BJ, 15-Aug-2024.)
 |-  ( ph  ->  F  =  ( x  e.  X  |->  if ( x  e.  A ,  1o ,  (/) ) ) )   =>    |-  ( ph  ->  (
 ( F : X --> ~P 1o  /\  ( F  |`  ( ( X  i^i  A )  u.  ( X 
 \  A ) ) ) : ( ( X  i^i  A )  u.  ( X  \  A ) ) --> 2o )  /\  ( A. x  e.  ( X  i^i  A ) ( F `  x )  =  1o  /\ 
 A. x  e.  ( X  \  A ) ( F `  x )  =  (/) ) ) )
 
15-Aug-2024fmelpw1o 14719 With a formula  ph one can associate an element of 
~P 1o, which can therefore be thought of as the set of "truth values" (but recall that there are no other genuine truth values than T. and F., by nndc 851, which translate to  1o and  (/) respectively by iftrue 3541 and iffalse 3544, giving pwtrufal 14909).

As proved in if0ab 14718, the associated element of  ~P 1o is the extension, in  ~P 1o, of the formula  ph. (Contributed by BJ, 15-Aug-2024.)

 |-  if ( ph ,  1o ,  (/) )  e.  ~P 1o
 
15-Aug-2024cnstab 8605 Equality of complex numbers is stable. Stability here means  -.  -.  A  =  B  ->  A  =  B as defined at df-stab 831. This theorem for real numbers is Proposition 5.2 of [BauerHanson], p. 27. (Contributed by Jim Kingdon, 1-Aug-2023.) (Proof shortened by BJ, 15-Aug-2024.)
 |-  ( ( A  e.  CC  /\  B  e.  CC )  -> STAB 
 A  =  B )
 
15-Aug-2024subap0d 8604 Two numbers apart from each other have difference apart from zero. (Contributed by Jim Kingdon, 12-Aug-2021.) (Proof shortened by BJ, 15-Aug-2024.)
 |-  ( ph  ->  A  e.  CC )   &    |-  ( ph  ->  B  e.  CC )   &    |-  ( ph  ->  A #  B )   =>    |-  ( ph  ->  ( A  -  B ) #  0 )
 
15-Aug-2024ifexd 4486 Existence of a conditional class (deduction form). (Contributed by BJ, 15-Aug-2024.)
 |-  ( ph  ->  A  e.  V )   &    |-  ( ph  ->  B  e.  W )   =>    |-  ( ph  ->  if ( ps ,  A ,  B )  e.  _V )
 
15-Aug-2024ifelpwun 4485 Existence of a conditional class, quantitative version (inference form). (Contributed by BJ, 15-Aug-2024.)
 |-  A  e.  _V   &    |-  B  e.  _V   =>    |- 
 if ( ph ,  A ,  B )  e.  ~P ( A  u.  B )
 
15-Aug-2024ifelpwund 4484 Existence of a conditional class, quantitative version (deduction form). (Contributed by BJ, 15-Aug-2024.)
 |-  ( ph  ->  A  e.  V )   &    |-  ( ph  ->  B  e.  W )   =>    |-  ( ph  ->  if ( ps ,  A ,  B )  e.  ~P ( A  u.  B ) )
 
15-Aug-2024ifelpwung 4483 Existence of a conditional class, quantitative version (closed form). (Contributed by BJ, 15-Aug-2024.)
 |-  ( ( A  e.  V  /\  B  e.  W )  ->  if ( ph ,  A ,  B )  e.  ~P ( A  u.  B ) )
 
15-Aug-2024ifidss 3551 A conditional class whose two alternatives are equal is included in that alternative. With excluded middle, we can prove it is equal to it. (Contributed by BJ, 15-Aug-2024.)
 |- 
 if ( ph ,  A ,  A )  C_  A
 
15-Aug-2024ifssun 3550 A conditional class is included in the union of its two alternatives. (Contributed by BJ, 15-Aug-2024.)
 |- 
 if ( ph ,  A ,  B )  C_  ( A  u.  B )
 
12-Aug-2024exmidontriimlem2 7224 Lemma for exmidontriim 7227. (Contributed by Jim Kingdon, 12-Aug-2024.)
 |-  ( ph  ->  B  e.  On )   &    |-  ( ph  -> EXMID )   &    |-  ( ph  ->  A. y  e.  B  ( A  e.  y  \/  A  =  y  \/  y  e.  A ) )   =>    |-  ( ph  ->  ( A  e.  B  \/  A. y  e.  B  y  e.  A ) )
 
12-Aug-2024exmidontriimlem1 7223 Lemma for exmidontriim 7227. A variation of r19.30dc 2624. (Contributed by Jim Kingdon, 12-Aug-2024.)
 |-  ( ( A. x  e.  A  ( ph  \/  ps 
 \/  ch )  /\ EXMID )  ->  ( E. x  e.  A  ph  \/  E. x  e.  A  ps  \/  A. x  e.  A  ch ) )
 
11-Aug-2024nndc 851 Double negation of decidability of a formula. Intuitionistic logic refutes the negation of decidability (but does not prove decidability) of any formula.

This should not trick the reader into thinking that  -.  -. EXMID is provable in intuitionistic logic. Indeed, if we could quantify over formula metavariables, then generalizing nnexmid 850 over  ph would give " |-  A. ph -.  -. DECID  ph", but EXMID is " A. phDECID 
ph", so proving 
-.  -. EXMID would amount to proving " -.  -.  A. phDECID  ph", which is not implied by the above theorem. Indeed, the converse of nnal 1649 does not hold. Since our system does not allow quantification over formula metavariables, we can reproduce this argument by representing formulas as subsets of  ~P 1o, like we do in our definition of EXMID (df-exmid 4197): then, we can prove  A. x  e. 
~P 1o -.  -. DECID  x  =  1o but we cannot prove  -.  -.  A. x  e.  ~P 1oDECID  x  =  1o because the converse of nnral 2467 does not hold.

Actually,  -.  -. EXMID is not provable in intuitionistic logic since intuitionistic logic has models satisfying  -. EXMID and noncontradiction holds (pm3.24 693). (Contributed by BJ, 9-Oct-2019.) Add explanation on non-provability of  -. 
-. EXMID. (Revised by BJ, 11-Aug-2024.)

 |- 
 -.  -. DECID  ph
 
10-Aug-2024exmidontriim 7227 Excluded middle implies ordinal trichotomy. Lemma 10.4.1 of [HoTT], p. (varies). The proof follows the proof from the HoTT book fairly closely. (Contributed by Jim Kingdon, 10-Aug-2024.)
 |-  (EXMID 
 ->  A. x  e.  On  A. y  e.  On  ( x  e.  y  \/  x  =  y  \/  y  e.  x )
 )
 
10-Aug-2024exmidontriimlem4 7226 Lemma for exmidontriim 7227. The induction step for the induction on  A. (Contributed by Jim Kingdon, 10-Aug-2024.)
 |-  ( ph  ->  A  e.  On )   &    |-  ( ph  ->  B  e.  On )   &    |-  ( ph  -> EXMID
 )   &    |-  ( ph  ->  A. z  e.  A  A. y  e. 
 On  ( z  e.  y  \/  z  =  y  \/  y  e.  z ) )   =>    |-  ( ph  ->  ( A  e.  B  \/  A  =  B  \/  B  e.  A )
 )
 
10-Aug-2024exmidontriimlem3 7225 Lemma for exmidontriim 7227. What we get to do based on induction on both  A and  B. (Contributed by Jim Kingdon, 10-Aug-2024.)
 |-  ( ph  ->  A  e.  On )   &    |-  ( ph  ->  B  e.  On )   &    |-  ( ph  -> EXMID
 )   &    |-  ( ph  ->  A. z  e.  A  A. y  e. 
 On  ( z  e.  y  \/  z  =  y  \/  y  e.  z ) )   &    |-  ( ph  ->  A. y  e.  B  ( A  e.  y  \/  A  =  y  \/  y  e.  A ) )   =>    |-  ( ph  ->  ( A  e.  B  \/  A  =  B  \/  B  e.  A )
 )
 
10-Aug-2024nnnninf2 7128 Canonical embedding of  suc  om into ℕ. (Contributed by BJ, 10-Aug-2024.)
 |-  ( N  e.  suc  om 
 ->  ( i  e.  om  |->  if ( i  e.  N ,  1o ,  (/) ) )  e. )
 
10-Aug-2024infnninf 7125 The point at infinity in ℕ is the constant sequence equal to  1o. Note that with our encoding of functions, that constant function can also be expressed as  ( om  X.  { 1o } ), as fconstmpt 4675 shows. (Contributed by Jim Kingdon, 14-Jul-2022.) Use maps-to notation. (Revised by BJ, 10-Aug-2024.)
 |-  ( i  e.  om  |->  1o )  e.
 
9-Aug-2024ss1o0el1o 6915 Reformulation of ss1o0el1 4199 using  1o instead of 
{ (/) }. (Contributed by BJ, 9-Aug-2024.)
 |-  ( A  C_  1o  ->  ( (/)  e.  A  <->  A  =  1o ) )
 
9-Aug-2024pw1dc0el 6914 Another equivalent of excluded middle, which is a mere reformulation of the definition. (Contributed by BJ, 9-Aug-2024.)
 |-  (EXMID  <->  A. x  e.  ~P  1oDECID  (/)  e.  x )
 
9-Aug-2024ss1o0el1 4199 A subclass of  { (/) } contains the empty set if and only if it equals  { (/) }. (Contributed by BJ and Jim Kingdon, 9-Aug-2024.)
 |-  ( A  C_  { (/) }  ->  ( (/)  e.  A  <->  A  =  { (/)
 } ) )
 
8-Aug-2024pw1dc1 6916 If, in the set of truth values (the powerset of 1o), equality to 1o is decidable, then excluded middle holds (and conversely). (Contributed by BJ and Jim Kingdon, 8-Aug-2024.)
 |-  (EXMID  <->  A. x  e.  ~P  1oDECID  x  =  1o )
 
7-Aug-2024pw1fin 6913 Excluded middle is equivalent to the power set of  1o being finite. (Contributed by SN and Jim Kingdon, 7-Aug-2024.)
 |-  (EXMID  <->  ~P 1o  e.  Fin )
 
7-Aug-2024elomssom 4606 A natural number ordinal is, as a set, included in the set of natural number ordinals. (Contributed by NM, 21-Jun-1998.) Extract this result from the previous proof of elnn 4607. (Revised by BJ, 7-Aug-2024.)
 |-  ( A  e.  om  ->  A  C_  om )
 
6-Aug-2024bj-charfunbi 14724 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.)

 |-  ( ph  ->  X  e.  V )   &    |-  ( ph  ->  A. x  e.  X STAB  x  e.  A )   =>    |-  ( 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 )  =  (/) ) ) )
 
6-Aug-2024bj-charfunr 14723 If a class  A has a "weak" characteristic function on a class  X, then negated membership in 
A is decidable (in other words, membership in  A is testable) in  X.

The hypothesis imposes that 
X be a set. As usual, it could be formulated as  |-  ( ph  ->  ( F : X --> om  /\  ... ) ) to deal with general classes, but that extra generality would not make the theorem much more useful.

The theorem would still hold if the codomain of  f were any class with testable equality to the point where  ( X  \  A ) is sent. (Contributed by BJ, 6-Aug-2024.)

 |-  ( ph  ->  E. f  e.  ( om  ^m  X ) (
 A. x  e.  ( X  i^i  A ) ( f `  x )  =/=  (/)  /\  A. x  e.  ( X  \  A ) ( f `  x )  =  (/) ) )   =>    |-  ( ph  ->  A. x  e.  X DECID 
 -.  x  e.  A )
 
6-Aug-2024bj-charfundc 14721 Properties of the characteristic function on the class  X of the class  A, provided membership in  A is decidable in  X. (Contributed by BJ, 6-Aug-2024.)
 |-  ( ph  ->  F  =  ( x  e.  X  |->  if ( x  e.  A ,  1o ,  (/) ) ) )   &    |-  ( ph  ->  A. x  e.  X DECID  x  e.  A )   =>    |-  ( ph  ->  ( F : X --> 2o  /\  ( A. x  e.  ( X  i^i  A ) ( F `  x )  =  1o  /\  A. x  e.  ( X  \  A ) ( F `
  x )  =  (/) ) ) )
 
6-Aug-2024prodssdc 11600 Change the index set to a subset in an upper integer product. (Contributed by Scott Fenton, 11-Dec-2017.) (Revised by Jim Kingdon, 6-Aug-2024.)
 |-  ( ph  ->  A  C_  B )   &    |-  ( ( ph  /\  k  e.  A ) 
 ->  C  e.  CC )   &    |-  ( ph  ->  E. n  e.  ( ZZ>=
 `  M ) E. y ( y #  0 
 /\  seq n (  x. 
 ,  ( k  e.  ( ZZ>= `  M )  |->  if ( k  e.  B ,  C , 
 1 ) ) )  ~~>  y ) )   &    |-  ( ph  ->  A. j  e.  ( ZZ>=
 `  M )DECID  j  e.  A )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  (
 ( ph  /\  k  e.  ( B  \  A ) )  ->  C  =  1 )   &    |-  ( ph  ->  B 
 C_  ( ZZ>= `  M ) )   &    |-  ( ph  ->  A. j  e.  ( ZZ>= `  M )DECID  j  e.  B )   =>    |-  ( ph  ->  prod_ k  e.  A  C  =  prod_ k  e.  B  C )
 
5-Aug-2024fnmptd 14717 The maps-to notation defines a function with domain (deduction form). (Contributed by BJ, 5-Aug-2024.)
 |-  ( ph  ->  F  =  ( x  e.  A  |->  B ) )   &    |-  ( ( ph  /\  x  e.  A ) 
 ->  B  e.  V )   =>    |-  ( ph  ->  F  Fn  A )
 
5-Aug-2024funmptd 14716 The maps-to notation defines a function (deduction form).

Note: one should similarly prove a deduction form of funopab4 5255, then prove funmptd 14716 from it, and then prove funmpt 5256 from that: this would reduce global proof length. (Contributed by BJ, 5-Aug-2024.)

 |-  ( ph  ->  F  =  ( x  e.  A  |->  B ) )   =>    |-  ( ph  ->  Fun  F )
 
5-Aug-2024bj-dcfal 14668 The false truth value is decidable. (Contributed by BJ, 5-Aug-2024.)
 |- DECID F.
 
5-Aug-2024bj-dctru 14666 The true truth value is decidable. (Contributed by BJ, 5-Aug-2024.)
 |- DECID T.
 
5-Aug-2024bj-stfal 14655 The false truth value is stable. (Contributed by BJ, 5-Aug-2024.)
 |- STAB F.
 
5-Aug-2024bj-sttru 14653 The true truth value is stable. (Contributed by BJ, 5-Aug-2024.)
 |- STAB T.
 
5-Aug-2024prod1dc 11597 Any product of one over a valid set is one. (Contributed by Scott Fenton, 7-Dec-2017.) (Revised by Jim Kingdon, 5-Aug-2024.)
 |-  ( ( ( M  e.  ZZ  /\  A  C_  ( ZZ>= `  M )  /\  A. j  e.  ( ZZ>=
 `  M )DECID  j  e.  A )  \/  A  e.  Fin )  ->  prod_ k  e.  A  1  =  1 )
 
5-Aug-20242ssom 6528 The ordinal 2 is included in the set of natural number ordinals. (Contributed by BJ, 5-Aug-2024.)
 |- 
 2o  C_  om
 
2-Aug-2024onntri52 7246 Double negated ordinal trichotomy. (Contributed by James E. Hanson and Jim Kingdon, 2-Aug-2024.)
 |-  ( -.  -. EXMID  ->  -.  -.  A. x  e.  On  A. y  e.  On  ( x  C_  y  \/  y  C_  x ) )
 
2-Aug-2024onntri24 7244 Double negated ordinal trichotomy. (Contributed by James E. Hanson and Jim Kingdon, 2-Aug-2024.)
 |-  ( -.  -.  A. x  e.  On  A. y  e.  On  ( x  C_  y  \/  y  C_  x )  ->  A. x  e.  On  A. y  e.  On  -.  -.  ( x  C_  y  \/  y  C_  x ) )
 
2-Aug-2024onntri45 7243 Double negated ordinal trichotomy. (Contributed by James E. Hanson and Jim Kingdon, 2-Aug-2024.)
 |-  ( A. x  e. 
 On  A. y  e.  On  -. 
 -.  ( x  C_  y  \/  y  C_  x )  ->  -.  -. EXMID )
 
2-Aug-2024onntri51 7242 Double negated ordinal trichotomy. (Contributed by James E. Hanson and Jim Kingdon, 2-Aug-2024.)
 |-  ( -.  -. EXMID  ->  -.  -.  A. x  e.  On  A. y  e.  On  ( x  e.  y  \/  x  =  y  \/  y  e.  x )
 )
 
2-Aug-2024onntri13 7240 Double negated ordinal trichotomy. (Contributed by James E. Hanson and Jim Kingdon, 2-Aug-2024.)
 |-  ( -.  -.  A. x  e.  On  A. y  e.  On  ( x  e.  y  \/  x  =  y  \/  y  e.  x )  ->  A. x  e.  On  A. y  e. 
 On  -.  -.  ( x  e.  y  \/  x  =  y  \/  y  e.  x )
 )
 
2-Aug-2024onntri35 7239 Double negated ordinal trichotomy.

There are five equivalent statements: (1)  -.  -.  A. x  e.  On A. y  e.  On ( x  e.  y  \/  x  =  y  \/  y  e.  x ), (2)  -.  -.  A. x  e.  On A. y  e.  On ( x  C_  y  \/  y  C_  x ), (3)  A. x  e.  On A. y  e.  On -.  -.  (
x  e.  y  \/  x  =  y  \/  y  e.  x ), (4)  A. x  e.  On A. y  e.  On -.  -.  (
x  C_  y  \/  y  C_  x ), and (5)  -.  -. EXMID. That these are all equivalent is expressed by (1) implies (3) (onntri13 7240), (3) implies (5) (onntri35 7239), (5) implies (1) (onntri51 7242), (2) implies (4) (onntri24 7244), (4) implies (5) (onntri45 7243), and (5) implies (2) (onntri52 7246).

Another way of stating this is that EXMID is equivalent to trichotomy, either the  x  e.  y  \/  x  =  y  \/  y  e.  x or the  x  C_  y  \/  y  C_  x form, as shown in exmidontri 7241 and exmidontri2or 7245, respectively. Thus  -.  -. EXMID is equivalent to (1) or (2). In addition, 
-.  -. EXMID is equivalent to (3) by onntri3or 7247 and (4) by onntri2or 7248.

(Contributed by James E. Hanson and Jim Kingdon, 2-Aug-2024.)

 |-  ( A. x  e. 
 On  A. y  e.  On  -. 
 -.  ( x  e.  y  \/  x  =  y  \/  y  e.  x )  ->  -.  -. EXMID )
 
1-Aug-2024nnral 2467 The double negation of a universal quantification implies the universal quantification of the double negation. Restricted quantifier version of nnal 1649. (Contributed by Jim Kingdon, 1-Aug-2024.)
 |-  ( -.  -.  A. x  e.  A  ph  ->  A. x  e.  A  -.  -.  ph )
 
31-Jul-20243nsssucpw1 7238 Negated excluded middle implies that  3o is not a subset of the successor of the power set of 
1o. (Contributed by James E. Hanson and Jim Kingdon, 31-Jul-2024.)
 |-  ( -. EXMID  ->  -.  3o  C_  suc  ~P 1o )
 
31-Jul-2024sucpw1nss3 7237 Negated excluded middle implies that the successor of the power set of  1o is not a subset of  3o. (Contributed by James E. Hanson and Jim Kingdon, 31-Jul-2024.)
 |-  ( -. EXMID  ->  -.  suc  ~P 1o  C_ 
 3o )
 
30-Jul-20243nelsucpw1 7236 Three is not an element of the successor of the power set of  1o. (Contributed by James E. Hanson and Jim Kingdon, 30-Jul-2024.)
 |- 
 -.  3o  e.  suc  ~P 1o
 
30-Jul-2024sucpw1nel3 7235 The successor of the power set of 
1o is not an element of  3o. (Contributed by James E. Hanson and Jim Kingdon, 30-Jul-2024.)
 |- 
 -.  suc  ~P 1o  e.  3o
 
30-Jul-2024sucpw1ne3 7234 Negated excluded middle implies that the successor of the power set of  1o is not three . (Contributed by James E. Hanson and Jim Kingdon, 30-Jul-2024.)
 |-  ( -. EXMID  ->  suc  ~P 1o  =/=  3o )
 
30-Jul-2024pw1nel3 7233 Negated excluded middle implies that the power set of  1o is not an element of  3o. (Contributed by James E. Hanson and Jim Kingdon, 30-Jul-2024.)
 |-  ( -. EXMID  ->  -.  ~P 1o  e.  3o )
 
30-Jul-2024pw1ne3 7232 The power set of  1o is not three. (Contributed by James E. Hanson and Jim Kingdon, 30-Jul-2024.)
 |- 
 ~P 1o  =/=  3o
 
30-Jul-2024pw1ne1 7231 The power set of  1o is not one. (Contributed by Jim Kingdon, 30-Jul-2024.)
 |- 
 ~P 1o  =/=  1o
 
30-Jul-2024pw1ne0 7230 The power set of  1o is not zero. (Contributed by Jim Kingdon, 30-Jul-2024.)
 |- 
 ~P 1o  =/=  (/)
 
29-Jul-2024grpcld 12897 Closure of the operation of a group. (Contributed by SN, 29-Jul-2024.)
 |-  B  =  ( Base `  G )   &    |-  .+  =  ( +g  `  G )   &    |-  ( ph  ->  G  e.  Grp )   &    |-  ( ph  ->  X  e.  B )   &    |-  ( ph  ->  Y  e.  B )   =>    |-  ( ph  ->  ( X  .+  Y )  e.  B )
 
29-Jul-2024pw1on 7228 The power set of  1o is an ordinal. (Contributed by Jim Kingdon, 29-Jul-2024.)
 |- 
 ~P 1o  e.  On
 
28-Jul-2024exmidpweq 6912 Excluded middle is equivalent to the power set of  1o being  2o. (Contributed by Jim Kingdon, 28-Jul-2024.)
 |-  (EXMID  <->  ~P 1o  =  2o )
 
27-Jul-2024dcapnconstALT 14972 Decidability of real number apartness implies the existence of a certain non-constant function from real numbers to integers. A proof of dcapnconst 14971 by means of dceqnconst 14970. (Contributed by Jim Kingdon, 27-Jul-2024.) (New usage is discouraged.) (Proof modification is discouraged.)
 |-  ( A. x  e.  RR DECID  x #  0 
 ->  E. f ( f : RR --> ZZ  /\  ( f `  0
 )  =  0  /\  A. x  e.  RR+  ( f `
  x )  =/=  0 ) )
 
27-Jul-2024reap0 14968 Real number trichotomy is equivalent to decidability of apartness from zero. (Contributed by Jim Kingdon, 27-Jul-2024.)
 |-  ( A. x  e.  RR  A. y  e.  RR  ( x  <  y  \/  x  =  y  \/  y  <  x )  <->  A. z  e.  RR DECID  z #  0 )
 
26-Jul-2024nconstwlpolemgt0 14974 Lemma for nconstwlpo 14976. If one of the terms of series is positive, so is the sum. (Contributed by Jim Kingdon, 26-Jul-2024.)
 |-  ( ph  ->  G : NN --> { 0 ,  1 } )   &    |-  A  =  sum_ i  e.  NN  ( ( 1  /  ( 2 ^ i ) )  x.  ( G `  i ) )   &    |-  ( ph  ->  E. x  e.  NN  ( G `  x )  =  1 )   =>    |-  ( ph  ->  0  <  A )
 
26-Jul-2024nconstwlpolem0 14973 Lemma for nconstwlpo 14976. If all the terms of the series are zero, so is their sum. (Contributed by Jim Kingdon, 26-Jul-2024.)
 |-  ( ph  ->  G : NN --> { 0 ,  1 } )   &    |-  A  =  sum_ i  e.  NN  ( ( 1  /  ( 2 ^ i ) )  x.  ( G `  i ) )   &    |-  ( ph  ->  A. x  e.  NN  ( G `  x )  =  0 )   =>    |-  ( ph  ->  A  =  0 )
 
24-Jul-2024tridceq 14966 Real trichotomy implies decidability of real number equality. Or in other words, analytic LPO implies analytic WLPO (see trilpo 14953 and redcwlpo 14965). Thus, this is an analytic analogue to lpowlpo 7169. (Contributed by Jim Kingdon, 24-Jul-2024.)
 |-  ( A. x  e.  RR  A. y  e.  RR  ( x  <  y  \/  x  =  y  \/  y  <  x )  ->  A. x  e.  RR  A. y  e. 
 RR DECID  x  =  y )
 
24-Jul-2024iswomni0 14961 Weak omniscience stated in terms of equality with  0. Like iswomninn 14960 but with zero in place of one. (Contributed by Jim Kingdon, 24-Jul-2024.)
 |-  ( A  e.  V  ->  ( A  e. WOmni  <->  A. f  e.  ( { 0 ,  1 }  ^m  A )DECID  A. x  e.  A  (
 f `  x )  =  0 ) )
 
24-Jul-2024lpowlpo 7169 LPO implies WLPO. Easy corollary of the more general omniwomnimkv 7168. There is an analogue in terms of analytic omniscience principles at tridceq 14966. (Contributed by Jim Kingdon, 24-Jul-2024.)
 |-  ( om  e. Omni  ->  om  e. WOmni )
 
23-Jul-2024nconstwlpolem 14975 Lemma for nconstwlpo 14976. (Contributed by Jim Kingdon, 23-Jul-2024.)
 |-  ( ph  ->  F : RR --> ZZ )   &    |-  ( ph  ->  ( F `  0 )  =  0 )   &    |-  (
 ( ph  /\  x  e.  RR+ )  ->  ( F `
  x )  =/=  0 )   &    |-  ( ph  ->  G : NN --> { 0 ,  1 } )   &    |-  A  =  sum_ i  e.  NN  ( ( 1  /  ( 2 ^ i
 ) )  x.  ( G `  i ) )   =>    |-  ( ph  ->  ( A. y  e.  NN  ( G `  y )  =  0  \/  -.  A. y  e.  NN  ( G `  y )  =  0 ) )
 
23-Jul-2024dceqnconst 14970 Decidability of real number equality implies the existence of a certain non-constant function from real numbers to integers. Variation of Exercise 11.6(i) of [HoTT], p. (varies). See redcwlpo 14965 for more discussion of decidability of real number equality. (Contributed by BJ and Jim Kingdon, 24-Jun-2024.) (Revised by Jim Kingdon, 23-Jul-2024.)
 |-  ( A. x  e.  RR DECID  x  =  0  ->  E. f
 ( f : RR --> ZZ  /\  ( f `  0 )  =  0  /\  A. x  e.  RR+  ( f `  x )  =/=  0 ) )
 
23-Jul-2024redc0 14967 Two ways to express decidability of real number equality. (Contributed by Jim Kingdon, 23-Jul-2024.)
 |-  ( A. x  e.  RR  A. y  e.  RR DECID  x  =  y 
 <-> 
 A. z  e.  RR DECID  z  =  0 )
 
23-Jul-2024canth 5832 No set  A is equinumerous to its power set (Cantor's theorem), i.e., no function can map  A onto its power set. Compare Theorem 6B(b) of [Enderton] p. 132. (Use nex 1500 if you want the form  -.  E. f
f : A -onto-> ~P A.) (Contributed by NM, 7-Aug-1994.) (Revised by Noah R Kingdon, 23-Jul-2024.)
 |-  A  e.  _V   =>    |-  -.  F : A -onto-> ~P A
 
22-Jul-2024nconstwlpo 14976 Existence of a certain non-constant function from reals to integers implies  om  e. WOmni (the Weak Limited Principle of Omniscience or WLPO). Based on Exercise 11.6(ii) of [HoTT], p. (varies). (Contributed by BJ and Jim Kingdon, 22-Jul-2024.)
 |-  ( ph  ->  F : RR --> ZZ )   &    |-  ( ph  ->  ( F `  0 )  =  0 )   &    |-  (
 ( ph  /\  x  e.  RR+ )  ->  ( F `
  x )  =/=  0 )   =>    |-  ( ph  ->  om  e. WOmni )
 
15-Jul-2024fprodseq 11594 The value of a product over a nonempty finite set. (Contributed by Scott Fenton, 6-Dec-2017.) (Revised by Jim Kingdon, 15-Jul-2024.)
 |-  ( k  =  ( F `  n ) 
 ->  B  =  C )   &    |-  ( ph  ->  M  e.  NN )   &    |-  ( ph  ->  F : ( 1 ...
 M ) -1-1-onto-> A )   &    |-  ( ( ph  /\  k  e.  A ) 
 ->  B  e.  CC )   &    |-  (
 ( ph  /\  n  e.  ( 1 ... M ) )  ->  ( G `
  n )  =  C )   =>    |-  ( ph  ->  prod_ k  e.  A  B  =  ( 
 seq 1 (  x. 
 ,  ( n  e. 
 NN  |->  if ( n  <_  M ,  ( G `  n ) ,  1 ) ) ) `  M ) )
 
14-Jul-2024rexbid2 2482 Formula-building rule for restricted existential quantifier (deduction form). (Contributed by BJ, 14-Jul-2024.)
 |- 
 F/ x ph   &    |-  ( ph  ->  ( ( x  e.  A  /\  ps )  <->  ( x  e.  B  /\  ch )
 ) )   =>    |-  ( ph  ->  ( E. x  e.  A  ps 
 <-> 
 E. x  e.  B  ch ) )
 
14-Jul-2024ralbid2 2481 Formula-building rule for restricted universal quantifier (deduction form). (Contributed by BJ, 14-Jul-2024.)
 |- 
 F/ x ph   &    |-  ( ph  ->  ( ( x  e.  A  ->  ps )  <->  ( x  e.  B  ->  ch )
 ) )   =>    |-  ( ph  ->  ( A. x  e.  A  ps 
 <-> 
 A. x  e.  B  ch ) )
 
12-Jul-20242irrexpqap 14557 There exist real numbers  a and  b which are irrational (in the sense of being apart from any rational number) such that  ( a ^ b ) is rational. Statement in the Metamath book, section 1.1.5, footnote 27 on page 17, and the "constructive proof" for theorem 1.2 of [Bauer], p. 483. This is a constructive proof because it is based on two explicitly named irrational numbers  ( sqr `  2 ) and  ( 2 logb  9 ), see sqrt2irrap 12183, 2logb9irrap 14556 and sqrt2cxp2logb9e3 14554. Therefore, this proof is acceptable/usable in intuitionistic logic. (Contributed by Jim Kingdon, 12-Jul-2024.)
 |- 
 E. a  e.  RR  E. b  e.  RR  ( A. p  e.  QQ  a #  p  /\  A. q  e.  QQ  b #  q  /\  ( a  ^c  b )  e.  QQ )
 
12-Jul-20242logb9irrap 14556 Example for logbgcd1irrap 14549. The logarithm of nine to base two is irrational (in the sense of being apart from any rational number). (Contributed by Jim Kingdon, 12-Jul-2024.)
 |-  ( Q  e.  QQ  ->  ( 2 logb  9 ) #  Q )
 
12-Jul-2024erlecpbl 12758 Translate the relation compatibility relation to a quotient set. (Contributed by Mario Carneiro, 24-Feb-2015.) (Revised by Mario Carneiro, 12-Aug-2015.) (Revised by AV, 12-Jul-2024.)
 |-  ( ph  ->  .~  Er  V )   &    |-  ( ph  ->  V  e.  W )   &    |-  F  =  ( x  e.  V  |->  [ x ]  .~  )   &    |-  ( ph  ->  ( ( A 
 .~  C  /\  B  .~  D )  ->  ( A N B  <->  C N D ) ) )   =>    |-  ( ( ph  /\  ( A  e.  V  /\  B  e.  V )  /\  ( C  e.  V  /\  D  e.  V ) )  ->  ( (
 ( F `  A )  =  ( F `  C )  /\  ( F `  B )  =  ( F `  D ) )  ->  ( A N B  <->  C N D ) ) )
 
12-Jul-2024ercpbl 12757 Translate the function compatibility relation to a quotient set. (Contributed by Mario Carneiro, 24-Feb-2015.) (Revised by Mario Carneiro, 12-Aug-2015.) (Revised by AV, 12-Jul-2024.)
 |-  ( ph  ->  .~  Er  V )   &    |-  ( ph  ->  V  e.  W )   &    |-  F  =  ( x  e.  V  |->  [ x ]  .~  )   &    |-  (
 ( ph  /\  ( a  e.  V  /\  b  e.  V ) )  ->  ( a  .+  b )  e.  V )   &    |-  ( ph  ->  ( ( A 
 .~  C  /\  B  .~  D )  ->  ( A  .+  B )  .~  ( C  .+  D ) ) )   =>    |-  ( ( ph  /\  ( A  e.  V  /\  B  e.  V )  /\  ( C  e.  V  /\  D  e.  V ) )  ->  ( (
 ( F `  A )  =  ( F `  C )  /\  ( F `  B )  =  ( F `  D ) )  ->  ( F `
  ( A  .+  B ) )  =  ( F `  ( C  .+  D ) ) ) )
 
12-Jul-2024ercpbllemg 12756 Lemma for ercpbl 12757. (Contributed by Mario Carneiro, 24-Feb-2015.) (Revised by AV, 12-Jul-2024.)
 |-  ( ph  ->  .~  Er  V )   &    |-  ( ph  ->  V  e.  W )   &    |-  F  =  ( x  e.  V  |->  [ x ]  .~  )   &    |-  ( ph  ->  A  e.  V )   &    |-  ( ph  ->  B  e.  V )   =>    |-  ( ph  ->  (
 ( F `  A )  =  ( F `  B )  <->  A  .~  B ) )
 
12-Jul-2024divsfvalg 12755 Value of the function in qusval 12750. (Contributed by Mario Carneiro, 24-Feb-2015.) (Revised by Mario Carneiro, 12-Aug-2015.) (Revised by AV, 12-Jul-2024.)
 |-  ( ph  ->  .~  Er  V )   &    |-  ( ph  ->  V  e.  W )   &    |-  F  =  ( x  e.  V  |->  [ x ]  .~  )   &    |-  ( ph  ->  A  e.  V )   =>    |-  ( ph  ->  ( F `  A )  =  [ A ]  .~  )
 
11-Jul-2024logbgcd1irraplemexp 14547 Lemma for logbgcd1irrap 14549. Apartness of  X ^ N and  B ^ M. (Contributed by Jim Kingdon, 11-Jul-2024.)
 |-  ( ph  ->  X  e.  ( ZZ>= `  2 )
 )   &    |-  ( ph  ->  B  e.  ( ZZ>= `  2 )
 )   &    |-  ( ph  ->  ( X  gcd  B )  =  1 )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  N  e.  NN )   =>    |-  ( ph  ->  ( X ^ N ) #  ( B ^ M ) )
 
11-Jul-2024reapef 14360 Apartness and the exponential function for reals. (Contributed by Jim Kingdon, 11-Jul-2024.)
 |-  ( ( A  e.  RR  /\  B  e.  RR )  ->  ( A #  B  <->  ( exp `  A ) #  ( exp `  B )
 ) )
 
10-Jul-2024apcxp2 14519 Apartness and real exponentiation. (Contributed by Jim Kingdon, 10-Jul-2024.)
 |-  ( ( ( A  e.  RR+  /\  A #  1
 )  /\  ( B  e.  RR  /\  C  e.  RR ) )  ->  ( B #  C  <->  ( A  ^c  B ) #  ( A 
 ^c  C ) ) )
 
9-Jul-2024logbgcd1irraplemap 14548 Lemma for logbgcd1irrap 14549. The result, with the rational number expressed as numerator and denominator. (Contributed by Jim Kingdon, 9-Jul-2024.)
 |-  ( ph  ->  X  e.  ( ZZ>= `  2 )
 )   &    |-  ( ph  ->  B  e.  ( ZZ>= `  2 )
 )   &    |-  ( ph  ->  ( X  gcd  B )  =  1 )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  N  e.  NN )   =>    |-  ( ph  ->  ( B logb  X ) #  ( M  /  N ) )
 
9-Jul-2024apexp1 10701 Exponentiation and apartness. (Contributed by Jim Kingdon, 9-Jul-2024.)
 |-  ( ( A  e.  CC  /\  B  e.  CC  /\  N  e.  NN )  ->  ( ( A ^ N ) #  ( B ^ N )  ->  A #  B ) )
 
5-Jul-2024logrpap0 14459 The logarithm is apart from 0 if its argument is apart from 1. (Contributed by Jim Kingdon, 5-Jul-2024.)
 |-  ( ( A  e.  RR+  /\  A #  1 )  ->  ( log `  A ) #  0 )
 
3-Jul-2024rplogbval 14524 Define the value of the logb function, the logarithm generalized to an arbitrary base, when used as infix. Most Metamath statements select variables in order of their use, but to make the order clearer we use "B" for base and "X" for the argument of the logarithm function here. (Contributed by David A. Wheeler, 21-Jan-2017.) (Revised by Jim Kingdon, 3-Jul-2024.)
 |-  ( ( B  e.  RR+  /\  B #  1  /\  X  e.  RR+ )  ->  ( B logb  X )  =  (
 ( log `  X )  /  ( log `  B ) ) )
 
3-Jul-2024logrpap0d 14460 Deduction form of logrpap0 14459. (Contributed by Jim Kingdon, 3-Jul-2024.)
 |-  ( ph  ->  A  e.  RR+ )   &    |-  ( ph  ->  A #  1 )   =>    |-  ( ph  ->  ( log `  A ) #  0 )
 
3-Jul-2024logrpap0b 14458 The logarithm is apart from 0 if and only if its argument is apart from 1. (Contributed by Jim Kingdon, 3-Jul-2024.)
 |-  ( A  e.  RR+  ->  ( A #  1  <->  ( log `  A ) #  0 ) )
 
28-Jun-20242o01f 14908 Mapping zero and one between  om and  NN0 style integers. (Contributed by Jim Kingdon, 28-Jun-2024.)
 |-  G  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   =>    |-  ( G  |`  2o ) : 2o --> { 0 ,  1 }
 
28-Jun-2024012of 14907 Mapping zero and one between  NN0 and  om style integers. (Contributed by Jim Kingdon, 28-Jun-2024.)
 |-  G  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   =>    |-  ( `' G  |`  { 0 ,  1 } ) : { 0 ,  1 } --> 2o
 
27-Jun-2024iooreen 14945 An open interval is equinumerous to the real numbers. (Contributed by Jim Kingdon, 27-Jun-2024.)
 |-  (
 0 (,) 1 )  ~~  RR
 
27-Jun-2024iooref1o 14944 A one-to-one mapping from the real numbers onto the open unit interval. (Contributed by Jim Kingdon, 27-Jun-2024.)
 |-  F  =  ( x  e.  RR  |->  ( 1  /  (
 1  +  ( exp `  x ) ) ) )   =>    |-  F : RR -1-1-onto-> ( 0 (,) 1
 )
 
25-Jun-2024neapmkvlem 14977 Lemma for neapmkv 14978. The result, with a few hypotheses broken out for convenience. (Contributed by Jim Kingdon, 25-Jun-2024.)
 |-  ( ph  ->  F : NN --> { 0 ,  1 } )   &    |-  A  =  sum_ i  e.  NN  ( ( 1  /  ( 2 ^ i ) )  x.  ( F `  i ) )   &    |-  (
 ( ph  /\  A  =/=  1 )  ->  A #  1
 )   =>    |-  ( ph  ->  ( -.  A. x  e.  NN  ( F `  x )  =  1  ->  E. x  e.  NN  ( F `  x )  =  0
 ) )
 
25-Jun-2024ismkvnn 14963 The predicate of being Markov stated in terms of set exponentiation. (Contributed by Jim Kingdon, 25-Jun-2024.)
 |-  ( A  e.  V  ->  ( A  e. Markov  <->  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( -.  A. x  e.  A  ( f `  x )  =  1  ->  E. x  e.  A  ( f `  x )  =  0 )
 ) )
 
25-Jun-2024ismkvnnlem 14962 Lemma for ismkvnn 14963. The result, with a hypothesis to give a name to an expression for convenience. (Contributed by Jim Kingdon, 25-Jun-2024.)
 |-  G  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   =>    |-  ( A  e.  V  ->  ( A  e. Markov  <->  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( -.  A. x  e.  A  ( f `  x )  =  1  ->  E. x  e.  A  ( f `  x )  =  0 )
 ) )
 
25-Jun-2024enmkvlem 7162 Lemma for enmkv 7163. One direction of the biconditional. (Contributed by Jim Kingdon, 25-Jun-2024.)
 |-  ( A  ~~  B  ->  ( A  e. Markov  ->  B  e. Markov ) )
 
24-Jun-2024neapmkv 14978 If negated equality for real numbers implies apartness, Markov's Principle follows. Exercise 11.10 of [HoTT], p. (varies). (Contributed by Jim Kingdon, 24-Jun-2024.)
 |-  ( A. x  e.  RR  A. y  e.  RR  ( x  =/=  y  ->  x #  y )  ->  om  e. Markov )
 
24-Jun-2024dcapnconst 14971 Decidability of real number apartness implies the existence of a certain non-constant function from real numbers to integers. Variation of Exercise 11.6(i) of [HoTT], p. (varies). See trilpo 14953 for more discussion of decidability of real number apartness.

This is a weaker form of dceqnconst 14970 and in fact this theorem can be proved using dceqnconst 14970 as shown at dcapnconstALT 14972. (Contributed by BJ and Jim Kingdon, 24-Jun-2024.)

 |-  ( A. x  e.  RR DECID  x #  0 
 ->  E. f ( f : RR --> ZZ  /\  ( f `  0
 )  =  0  /\  A. x  e.  RR+  ( f `
  x )  =/=  0 ) )
 
24-Jun-2024enmkv 7163 Being Markov is invariant with respect to equinumerosity. For example, this means that we can express the Markov's Principle as either  om  e. Markov or  NN0  e. Markov. The former is a better match to conventional notation in the sense that df2o3 6434 says that  2o  =  { (/)
,  1o } whereas the corresponding relationship does not exist between  2 and  { 0 ,  1 }. (Contributed by Jim Kingdon, 24-Jun-2024.)
 |-  ( A  ~~  B  ->  ( A  e. Markov  <->  B  e. Markov ) )
 
21-Jun-2024redcwlpolemeq1 14964 Lemma for redcwlpo 14965. A biconditionalized version of trilpolemeq1 14950. (Contributed by Jim Kingdon, 21-Jun-2024.)
 |-  ( ph  ->  F : NN --> { 0 ,  1 } )   &    |-  A  =  sum_ i  e.  NN  ( ( 1  /  ( 2 ^ i ) )  x.  ( F `  i ) )   =>    |-  ( ph  ->  ( A  =  1  <->  A. x  e.  NN  ( F `  x )  =  1 ) )
 
20-Jun-2024redcwlpo 14965 Decidability of real number equality implies the Weak Limited Principle of Omniscience (WLPO). We expect that we'd need some form of countable choice to prove the converse.

Here's the outline of the proof. Given an infinite sequence F of zeroes and ones, we need to show the sequence is all ones or it is not. Construct a real number A whose representation in base two consists of a zero, a decimal point, and then the numbers of the sequence. This real number will equal one if and only if the sequence is all ones (redcwlpolemeq1 14964). Therefore decidability of real number equality would imply decidability of whether the sequence is all ones.

Because of this theorem, decidability of real number equality is sometimes called "analytic WLPO".

WLPO is known to not be provable in IZF (and most constructive foundations), so this theorem establishes that we will be unable to prove an analogue to qdceq 10250 for real numbers. (Contributed by Jim Kingdon, 20-Jun-2024.)

 |-  ( A. x  e.  RR  A. y  e.  RR DECID  x  =  y  ->  om  e. WOmni )
 
20-Jun-2024iswomninn 14960 Weak omniscience stated in terms of natural numbers. Similar to iswomnimap 7167 but it will sometimes be more convenient to use  0 and  1 rather than  (/) and  1o. (Contributed by Jim Kingdon, 20-Jun-2024.)
 |-  ( A  e.  V  ->  ( A  e. WOmni  <->  A. f  e.  ( { 0 ,  1 }  ^m  A )DECID  A. x  e.  A  (
 f `  x )  =  1 ) )
 
20-Jun-2024iswomninnlem 14959 Lemma for iswomnimap 7167. The result, with a hypothesis for convenience. (Contributed by Jim Kingdon, 20-Jun-2024.)
 |-  G  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   =>    |-  ( A  e.  V  ->  ( A  e. WOmni  <->  A. f  e.  ( { 0 ,  1 }  ^m  A )DECID  A. x  e.  A  (
 f `  x )  =  1 ) )
 
20-Jun-2024enwomni 7171 Weak omniscience is invariant with respect to equinumerosity. For example, this means that we can express the Weak Limited Principle of Omniscience as either  om  e. WOmni or  NN0  e. WOmni. The former is a better match to conventional notation in the sense that df2o3 6434 says that  2o  =  { (/)
,  1o } whereas the corresponding relationship does not exist between  2 and  { 0 ,  1 }. (Contributed by Jim Kingdon, 20-Jun-2024.)
 |-  ( A  ~~  B  ->  ( A  e. WOmni  <->  B  e. WOmni ) )
 
20-Jun-2024enwomnilem 7170 Lemma for enwomni 7171. One direction of the biconditional. (Contributed by Jim Kingdon, 20-Jun-2024.)
 |-  ( A  ~~  B  ->  ( A  e. WOmni  ->  B  e. WOmni ) )
 
19-Jun-2024rpabscxpbnd 14520 Bound on the absolute value of a complex power. (Contributed by Mario Carneiro, 15-Sep-2014.) (Revised by Jim Kingdon, 19-Jun-2024.)
 |-  ( ph  ->  A  e.  RR+ )   &    |-  ( ph  ->  B  e.  CC )   &    |-  ( ph  ->  0  <  ( Re `  B ) )   &    |-  ( ph  ->  M  e.  RR )   &    |-  ( ph  ->  ( abs `  A )  <_  M )   =>    |-  ( ph  ->  ( abs `  ( A  ^c  B ) )  <_  ( ( M  ^c  ( Re `  B ) )  x.  ( exp `  (
 ( abs `  B )  x.  pi ) ) ) )
 
16-Jun-2024rpcxpsqrt 14503 The exponential function with exponent 
1  /  2 exactly matches the square root function, and thus serves as a suitable generalization to other  n-th roots and irrational roots. (Contributed by Mario Carneiro, 2-Aug-2014.) (Revised by Jim Kingdon, 16-Jun-2024.)
 |-  ( A  e.  RR+  ->  ( A  ^c  ( 1  /  2 ) )  =  ( sqr `  A ) )
 
13-Jun-2024rpcxpadd 14487 Sum of exponents law for complex exponentiation. (Contributed by Mario Carneiro, 2-Aug-2014.) (Revised by Jim Kingdon, 13-Jun-2024.)
 |-  ( ( A  e.  RR+  /\  B  e.  CC  /\  C  e.  CC )  ->  ( A  ^c 
 ( B  +  C ) )  =  (
 ( A  ^c  B )  x.  ( A  ^c  C ) ) )
 
12-Jun-2024cxpap0 14486 Complex exponentiation is apart from zero. (Contributed by Mario Carneiro, 2-Aug-2014.) (Revised by Jim Kingdon, 12-Jun-2024.)
 |-  ( ( A  e.  RR+  /\  B  e.  CC )  ->  ( A  ^c  B ) #  0 )
 
12-Jun-2024rpcncxpcl 14484 Closure of the complex power function. (Contributed by Jim Kingdon, 12-Jun-2024.)
 |-  ( ( A  e.  RR+  /\  B  e.  CC )  ->  ( A  ^c  B )  e.  CC )
 
12-Jun-2024rpcxp0 14480 Value of the complex power function when the second argument is zero. (Contributed by Mario Carneiro, 2-Aug-2014.) (Revised by Jim Kingdon, 12-Jun-2024.)
 |-  ( A  e.  RR+  ->  ( A  ^c  0 )  =  1 )
 
12-Jun-2024cxpexpnn 14478 Relate the complex power function to the integer power function. (Contributed by Mario Carneiro, 2-Aug-2014.) (Revised by Jim Kingdon, 12-Jun-2024.)
 |-  ( ( A  e.  NN  /\  B  e.  ZZ )  ->  ( A  ^c  B )  =  ( A ^ B ) )
 
12-Jun-2024cxpexprp 14477 Relate the complex power function to the integer power function. (Contributed by Mario Carneiro, 2-Aug-2014.) (Revised by Jim Kingdon, 12-Jun-2024.)
 |-  ( ( A  e.  RR+  /\  B  e.  ZZ )  ->  ( A  ^c  B )  =  ( A ^ B ) )
 
12-Jun-2024rpcxpef 14476 Value of the complex power function. (Contributed by Mario Carneiro, 2-Aug-2014.) (Revised by Jim Kingdon, 12-Jun-2024.)
 |-  ( ( A  e.  RR+  /\  B  e.  CC )  ->  ( A  ^c  B )  =  ( exp `  ( B  x.  ( log `  A )
 ) ) )
 
12-Jun-2024df-rpcxp 14441 Define the power function on complex numbers. Because df-relog 14440 is only defined on positive reals, this definition only allows for a base which is a positive real. (Contributed by Jim Kingdon, 12-Jun-2024.)
 |- 
 ^c  =  ( x  e.  RR+ ,  y  e.  CC  |->  ( exp `  (
 y  x.  ( log `  x ) ) ) )
 
10-Jun-2024trirec0xor 14955 Version of trirec0 14954 with exclusive-or.

The definition of a discrete field is sometimes stated in terms of exclusive-or but as proved here, this is equivalent to inclusive-or because the two disjuncts cannot be simultaneously true. (Contributed by Jim Kingdon, 10-Jun-2024.)

 |-  ( A. x  e.  RR  A. y  e.  RR  ( x  <  y  \/  x  =  y  \/  y  <  x )  <->  A. x  e.  RR  ( E. z  e.  RR  ( x  x.  z
 )  =  1  \/_  x  =  0 )
 )
 
10-Jun-2024trirec0 14954 Every real number having a reciprocal or equaling zero is equivalent to real number trichotomy.

This is the key part of the definition of what is known as a discrete field, so "the real numbers are a discrete field" can be taken as an equivalent way to state real trichotomy (see further discussion at trilpo 14953). (Contributed by Jim Kingdon, 10-Jun-2024.)

 |-  ( A. x  e.  RR  A. y  e.  RR  ( x  <  y  \/  x  =  y  \/  y  <  x )  <->  A. x  e.  RR  ( E. z  e.  RR  ( x  x.  z
 )  =  1  \/  x  =  0 ) )
 
9-Jun-2024omniwomnimkv 7168 A set is omniscient if and only if it is weakly omniscient and Markov. The case  A  =  om says that LPO  <-> WLPO  /\ MP which is a remark following Definition 2.5 of [Pierik], p. 9. (Contributed by Jim Kingdon, 9-Jun-2024.)
 |-  ( A  e. Omni  <->  ( A  e. WOmni  /\  A  e. Markov ) )
 
9-Jun-2024iswomnimap 7167 The predicate of being weakly omniscient stated in terms of set exponentiation. (Contributed by Jim Kingdon, 9-Jun-2024.)
 |-  ( A  e.  V  ->  ( A  e. WOmni  <->  A. f  e.  ( 2o  ^m  A )DECID  A. x  e.  A  ( f `  x )  =  1o ) )
 
9-Jun-2024iswomni 7166 The predicate of being weakly omniscient. (Contributed by Jim Kingdon, 9-Jun-2024.)
 |-  ( A  e.  V  ->  ( A  e. WOmni  <->  A. f ( f : A --> 2o  -> DECID  A. x  e.  A  ( f `  x )  =  1o ) ) )
 
9-Jun-2024df-womni 7165 A weakly omniscient set is one where we can decide whether a predicate (here represented by a function  f) holds (is equal to  1o) for all elements or not. Generalization of definition 2.4 of [Pierik], p. 9.

In particular,  om  e. WOmni is known as the Weak Limited Principle of Omniscience (WLPO).

The term WLPO is common in the literature; there appears to be no widespread term for what we are calling a weakly omniscient set. (Contributed by Jim Kingdon, 9-Jun-2024.)

 |- WOmni  =  { y  |  A. f ( f : y --> 2o  -> DECID  A. x  e.  y  ( f `  x )  =  1o ) }
 
1-Jun-2024cmnmndd 13122 A commutative monoid is a monoid. (Contributed by SN, 1-Jun-2024.)
 |-  ( ph  ->  G  e. CMnd )   =>    |-  ( ph  ->  G  e.  Mnd )
 
1-Jun-2024grpmndd 12896 A group is a monoid. (Contributed by SN, 1-Jun-2024.)
 |-  ( ph  ->  G  e.  Grp )   =>    |-  ( ph  ->  G  e.  Mnd )
 
29-May-2024pw1nct 14914 A condition which ensures that the powerset of a singleton is not countable. The antecedent here can be referred to as the uniformity principle. Based on Mastodon posts by Andrej Bauer and Rahul Chhabra. (Contributed by Jim Kingdon, 29-May-2024.)
 |-  ( A. r ( r  C_  ( ~P 1o  X.  om )  ->  ( A. p  e.  ~P  1o E. n  e.  om  p r n 
 ->  E. m  e.  om  A. q  e.  ~P  1o q r m ) )  ->  -.  E. f  f : om -onto-> ( ~P 1o 1o ) )
 
28-May-2024sssneq 14913 Any two elements of a subset of a singleton are equal. (Contributed by Jim Kingdon, 28-May-2024.)
 |-  ( A  C_  { B }  ->  A. y  e.  A  A. z  e.  A  y  =  z )
 
26-May-2024elpwi2 4160 Membership in a power class. (Contributed by Glauco Siliprandi, 3-Mar-2021.) (Proof shortened by Wolf Lammen, 26-May-2024.)
 |-  B  e.  V   &    |-  A  C_  B   =>    |-  A  e.  ~P B
 
24-May-2024dvmptcjx 14347 Function-builder for derivative, conjugate rule. (Contributed by Mario Carneiro, 1-Sep-2014.) (Revised by Jim Kingdon, 24-May-2024.)
 |-  ( ( ph  /\  x  e.  X )  ->  A  e.  CC )   &    |-  ( ( ph  /\  x  e.  X ) 
 ->  B  e.  V )   &    |-  ( ph  ->  ( RR  _D  ( x  e.  X  |->  A ) )  =  ( x  e.  X  |->  B ) )   &    |-  ( ph  ->  X  C_  RR )   =>    |-  ( ph  ->  ( RR  _D  ( x  e.  X  |->  ( * `  A ) ) )  =  ( x  e.  X  |->  ( * `  B ) ) )
 
23-May-2024cbvralfw 2695 Rule used to change bound variables, using implicit substitution. Version of cbvralf 2697 with a disjoint variable condition. Although we don't do so yet, we expect this disjoint variable condition will allow us to remove reliance on ax-i12 1507 and ax-bndl 1509 in the proof. (Contributed by NM, 7-Mar-2004.) (Revised by Gino Giotto, 23-May-2024.)
 |-  F/_ x A   &    |-  F/_ y A   &    |-  F/ y ph   &    |-  F/ x ps   &    |-  ( x  =  y  ->  (
 ph 
 <->  ps ) )   =>    |-  ( A. x  e.  A  ph  <->  A. y  e.  A  ps )
 
22-May-2024efltlemlt 14356 Lemma for eflt 14357. The converse of efltim 11709 plus the epsilon-delta setup. (Contributed by Jim Kingdon, 22-May-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  ( exp `  A )  <  ( exp `  B ) )   &    |-  ( ph  ->  D  e.  RR+ )   &    |-  ( ph  ->  ( ( abs `  ( A  -  B ) )  <  D  ->  ( abs `  ( ( exp `  A )  -  ( exp `  B ) ) )  <  ( ( exp `  B )  -  ( exp `  A ) ) ) )   =>    |-  ( ph  ->  A  <  B )
 
21-May-2024eflt 14357 The exponential function on the reals is strictly increasing. (Contributed by Paul Chapman, 21-Aug-2007.) (Revised by Jim Kingdon, 21-May-2024.)
 |-  ( ( A  e.  RR  /\  B  e.  RR )  ->  ( A  <  B  <-> 
 ( exp `  A )  <  ( exp `  B ) ) )
 
19-May-2024apdifflemr 14957 Lemma for apdiff 14958. (Contributed by Jim Kingdon, 19-May-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  S  e.  QQ )   &    |-  ( ph  ->  ( abs `  ( A  -  -u 1 ) ) #  ( abs `  ( A  -  1 ) ) )   &    |-  ( ( ph  /\  S  =/=  0 ) 
 ->  ( abs `  ( A  -  0 ) ) #  ( abs `  ( A  -  ( 2  x.  S ) ) ) )   =>    |-  ( ph  ->  A #  S )
 
18-May-2024apdifflemf 14956 Lemma for apdiff 14958. Being apart from the point halfway between  Q and  R suffices for  A to be a different distance from  Q and from  R. (Contributed by Jim Kingdon, 18-May-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  Q  e.  QQ )   &    |-  ( ph  ->  R  e.  QQ )   &    |-  ( ph  ->  Q  <  R )   &    |-  ( ph  ->  (
 ( Q  +  R )  /  2 ) #  A )   =>    |-  ( ph  ->  ( abs `  ( A  -  Q ) ) #  ( abs `  ( A  -  R ) ) )
 
17-May-2024apdiff 14958 The irrationals (reals apart from any rational) are exactly those reals that are a different distance from every rational. (Contributed by Jim Kingdon, 17-May-2024.)
 |-  ( A  e.  RR  ->  (
 A. q  e.  QQ  A #  q  <->  A. q  e.  QQ  A. r  e.  QQ  (
 q  =/=  r  ->  ( abs `  ( A  -  q ) ) #  ( abs `  ( A  -  r ) ) ) ) )
 
16-May-2024lmodgrpd 13398 A left module is a group. (Contributed by SN, 16-May-2024.)
 |-  ( ph  ->  W  e.  LMod )   =>    |-  ( ph  ->  W  e.  Grp )
 
16-May-2024crnggrpd 13204 A commutative ring is a group. (Contributed by SN, 16-May-2024.)
 |-  ( ph  ->  R  e.  CRing )   =>    |-  ( ph  ->  R  e.  Grp )
 
16-May-2024crngringd 13203 A commutative ring is a ring. (Contributed by SN, 16-May-2024.)
 |-  ( ph  ->  R  e.  CRing )   =>    |-  ( ph  ->  R  e.  Ring )
 
16-May-2024ringgrpd 13199 A ring is a group. (Contributed by SN, 16-May-2024.)
 |-  ( ph  ->  R  e.  Ring )   =>    |-  ( ph  ->  R  e.  Grp )
 
15-May-2024reeff1oleme 14354 Lemma for reeff1o 14355. (Contributed by Jim Kingdon, 15-May-2024.)
 |-  ( U  e.  (
 0 (,) _e )  ->  E. x  e.  RR  ( exp `  x )  =  U )
 
14-May-2024df-relog 14440 Define the natural logarithm function. Defining the logarithm on complex numbers is similar to square root - there are ways to define it but they tend to make use of excluded middle. Therefore, we merely define logarithms on positive reals. See http://en.wikipedia.org/wiki/Natural_logarithm and https://en.wikipedia.org/wiki/Complex_logarithm. (Contributed by Jim Kingdon, 14-May-2024.)
 |- 
 log  =  `' ( exp  |`  RR )
 
12-May-2024dvdstrd 11840 The divides relation is transitive, a deduction version of dvdstr 11838. (Contributed by metakunt, 12-May-2024.)
 |-  ( ph  ->  K  e.  ZZ )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  N  e.  ZZ )   &    |-  ( ph  ->  K  ||  M )   &    |-  ( ph  ->  M 
 ||  N )   =>    |-  ( ph  ->  K 
 ||  N )
 
7-May-2024ioocosf1o 14436 The cosine function is a bijection when restricted to its principal domain. (Contributed by Mario Carneiro, 12-May-2014.) (Revised by Jim Kingdon, 7-May-2024.)
 |-  ( cos  |`  ( 0 (,) pi ) ) : ( 0 (,)
 pi ) -1-1-onto-> ( -u 1 (,) 1
 )
 
7-May-2024cos0pilt1 14434 Cosine is between minus one and one on the open interval between zero and  pi. (Contributed by Jim Kingdon, 7-May-2024.)
 |-  ( A  e.  (
 0 (,) pi )  ->  ( cos `  A )  e.  ( -u 1 (,) 1
 ) )
 
6-May-2024cos11 14435 Cosine is one-to-one over the closed interval from  0 to  pi. (Contributed by Paul Chapman, 16-Mar-2008.) (Revised by Jim Kingdon, 6-May-2024.)
 |-  ( ( A  e.  ( 0 [,] pi )  /\  B  e.  (
 0 [,] pi ) ) 
 ->  ( A  =  B  <->  ( cos `  A )  =  ( cos `  B ) ) )
 
5-May-2024omiunct 12448 The union of a countably infinite collection of countable sets is countable. Theorem 8.1.28 of [AczelRathjen], p. 78. Compare with ctiunct 12444 which has a stronger hypothesis but does not require countable choice. (Contributed by Jim Kingdon, 5-May-2024.)
 |-  ( ph  -> CCHOICE )   &    |-  ( ( ph  /\  x  e.  om )  ->  E. g  g : om -onto-> ( B 1o )
 )   =>    |-  ( ph  ->  E. h  h : om -onto-> ( U_ x  e.  om  B 1o )
 )
 
5-May-2024ctiunctal 12445 Variation of ctiunct 12444 which allows  x to be present in  ph. (Contributed by Jim Kingdon, 5-May-2024.)
 |-  ( ph  ->  F : om -onto-> ( A 1o )
 )   &    |-  ( ph  ->  A. x  e.  A  G : om -onto->
 ( B 1o ) )   =>    |-  ( ph  ->  E. h  h : om -onto-> ( U_ x  e.  A  B 1o ) )
 
3-May-2024cc4n 7273 Countable choice with a simpler restriction on how every set in the countable collection needs to be inhabited. That is, compared with cc4 7272, the hypotheses only require an A(n) for each value of  n, not a single set  A which suffices for every 
n  e.  om. (Contributed by Mario Carneiro, 7-Apr-2013.) (Revised by Jim Kingdon, 3-May-2024.)
 |-  ( ph  -> CCHOICE )   &    |-  ( ph  ->  A. n  e.  N  { x  e.  A  |  ps }  e.  V )   &    |-  ( ph  ->  N  ~~  om )   &    |-  ( x  =  ( f `  n ) 
 ->  ( ps  <->  ch ) )   &    |-  ( ph  ->  A. n  e.  N  E. x  e.  A  ps )   =>    |-  ( ph  ->  E. f
 ( f  Fn  N  /\  A. n  e.  N  ch ) )
 
3-May-2024cc4f 7271 Countable choice by showing the existence of a function  f which can choose a value at each index 
n such that  ch holds. (Contributed by Mario Carneiro, 7-Apr-2013.) (Revised by Jim Kingdon, 3-May-2024.)
 |-  ( ph  -> CCHOICE )   &    |-  ( ph  ->  A  e.  V )   &    |-  F/_ n A   &    |-  ( ph  ->  N  ~~ 
 om )   &    |-  ( x  =  ( f `  n )  ->  ( ps  <->  ch ) )   &    |-  ( ph  ->  A. n  e.  N  E. x  e.  A  ps )   =>    |-  ( ph  ->  E. f
 ( f : N --> A  /\  A. n  e.  N  ch ) )
 
1-May-2024cc4 7272 Countable choice by showing the existence of a function  f which can choose a value at each index 
n such that  ch holds. (Contributed by Mario Carneiro, 7-Apr-2013.) (Revised by Jim Kingdon, 1-May-2024.)
 |-  ( ph  -> CCHOICE )   &    |-  ( ph  ->  A  e.  V )   &    |-  ( ph  ->  N  ~~  om )   &    |-  ( x  =  ( f `  n ) 
 ->  ( ps  <->  ch ) )   &    |-  ( ph  ->  A. n  e.  N  E. x  e.  A  ps )   =>    |-  ( ph  ->  E. f
 ( f : N --> A  /\  A. n  e.  N  ch ) )
 
29-Apr-2024cc3 7270 Countable choice using a sequence F(n) . (Contributed by Mario Carneiro, 8-Feb-2013.) (Revised by Jim Kingdon, 29-Apr-2024.)
 |-  ( ph  -> CCHOICE )   &    |-  ( ph  ->  A. n  e.  N  F  e.  _V )   &    |-  ( ph  ->  A. n  e.  N  E. w  w  e.  F )   &    |-  ( ph  ->  N  ~~ 
 om )   =>    |-  ( ph  ->  E. f
 ( f  Fn  N  /\  A. n  e.  N  ( f `  n )  e.  F )
 )
 
27-Apr-2024cc2 7269 Countable choice using sequences instead of countable sets. (Contributed by Jim Kingdon, 27-Apr-2024.)
 |-  ( ph  -> CCHOICE )   &    |-  ( ph  ->  F  Fn  om )   &    |-  ( ph  ->  A. x  e.  om  E. w  w  e.  ( F `  x ) )   =>    |-  ( ph  ->  E. g
 ( g  Fn  om  /\ 
 A. n  e.  om  ( g `  n )  e.  ( F `  n ) ) )
 
27-Apr-2024cc2lem 7268 Lemma for cc2 7269. (Contributed by Jim Kingdon, 27-Apr-2024.)
 |-  ( ph  -> CCHOICE )   &    |-  ( ph  ->  F  Fn  om )   &    |-  ( ph  ->  A. x  e.  om  E. w  w  e.  ( F `  x ) )   &    |-  A  =  ( n  e.  om  |->  ( { n }  X.  ( F `  n ) ) )   &    |-  G  =  ( n  e.  om  |->  ( 2nd `  (
 f `  ( A `  n ) ) ) )   =>    |-  ( ph  ->  E. g
 ( g  Fn  om  /\ 
 A. n  e.  om  ( g `  n )  e.  ( F `  n ) ) )
 
27-Apr-2024cc1 7267 Countable choice in terms of a choice function on a countably infinite set of inhabited sets. (Contributed by Jim Kingdon, 27-Apr-2024.)
 |-  (CCHOICE 
 ->  A. x ( ( x  ~~  om  /\  A. z  e.  x  E. w  w  e.  z
 )  ->  E. f A. z  e.  x  ( f `  z
 )  e.  z ) )
 
24-Apr-2024lsppropd 13530 If two structures have the same components (properties), they have the same span function. (Contributed by Mario Carneiro, 9-Feb-2015.) (Revised by Mario Carneiro, 14-Jun-2015.) (Revised by AV, 24-Apr-2024.)
 |-  ( ph  ->  B  =  ( Base `  K )
 )   &    |-  ( ph  ->  B  =  ( Base `  L )
 )   &    |-  ( ph  ->  B  C_  W )   &    |-  ( ( ph  /\  ( x  e.  W  /\  y  e.  W ) )  ->  ( x ( +g  `  K ) y )  =  ( x ( +g  `  L ) y ) )   &    |-  ( ( ph  /\  ( x  e.  P  /\  y  e.  B ) )  ->  ( x ( .s `  K ) y )  e.  W )   &    |-  ( ( ph  /\  ( x  e.  P  /\  y  e.  B ) )  ->  ( x ( .s `  K ) y )  =  ( x ( .s
 `  L ) y ) )   &    |-  ( ph  ->  P  =  ( Base `  (Scalar `  K ) ) )   &    |-  ( ph  ->  P  =  ( Base `  (Scalar `  L ) ) )   &    |-  ( ph  ->  K  e.  X )   &    |-  ( ph  ->  L  e.  Y )   =>    |-  ( ph  ->  ( LSpan `  K )  =  ( LSpan `  L )
 )
 
19-Apr-2024omctfn 12447 Using countable choice to find a sequence of enumerations for a collection of countable sets. Lemma 8.1.27 of [AczelRathjen], p. 77. (Contributed by Jim Kingdon, 19-Apr-2024.)
 |-  ( ph  -> CCHOICE )   &    |-  ( ( ph  /\  x  e.  om )  ->  E. g  g : om -onto-> ( B 1o )
 )   =>    |-  ( ph  ->  E. f
 ( f  Fn  om  /\ 
 A. x  e.  om  ( f `  x ) : om -onto-> ( B 1o ) ) )
 
13-Apr-2024prodmodclem2 11588 Lemma for prodmodc 11589. (Contributed by Scott Fenton, 4-Dec-2017.) (Revised by Jim Kingdon, 13-Apr-2024.)
 |-  F  =  ( k  e.  ZZ  |->  if (
 k  e.  A ,  B ,  1 )
 )   &    |-  ( ( ph  /\  k  e.  A )  ->  B  e.  CC )   &    |-  G  =  ( j  e.  NN  |->  if ( j  <_  ( `  A ) ,  [_ ( f `  j
 )  /  k ]_ B ,  1 )
 )   =>    |-  ( ( ph  /\  E. m  e.  ZZ  (
 ( A  C_  ( ZZ>=
 `  m )  /\  A. j  e.  ( ZZ>= `  m )DECID  j  e.  A ) 
 /\  ( E. n  e.  ( ZZ>= `  m ) E. y ( y #  0 
 /\  seq n (  x. 
 ,  F )  ~~>  y )  /\  seq m (  x. 
 ,  F )  ~~>  x )
 ) )  ->  ( E. m  e.  NN  E. f ( f : ( 1 ... m )
 -1-1-onto-> A  /\  z  =  ( 
 seq 1 (  x. 
 ,  G ) `  m ) )  ->  x  =  z )
 )
 
11-Apr-2024prodmodclem2a 11587 Lemma for prodmodc 11589. (Contributed by Scott Fenton, 4-Dec-2017.) (Revised by Jim Kingdon, 11-Apr-2024.)
 |-  F  =  ( k  e.  ZZ  |->  if (
 k  e.  A ,  B ,  1 )
 )   &    |-  ( ( ph  /\  k  e.  A )  ->  B  e.  CC )   &    |-  G  =  ( j  e.  NN  |->  if ( j  <_  ( `  A ) ,  [_ ( f `  j
 )  /  k ]_ B ,  1 )
 )   &    |-  H  =  ( j  e.  NN  |->  if (
 j  <_  ( `  A ) ,  [_ ( K `
  j )  /  k ]_ B ,  1 ) )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M ) )  -> DECID  k  e.  A )   &    |-  ( ph  ->  N  e.  NN )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  A  C_  ( ZZ>= `  M )
 )   &    |-  ( ph  ->  f : ( 1 ...
 N ) -1-1-onto-> A )   &    |-  ( ph  ->  K 
 Isom  <  ,  <  (
 ( 1 ... ( `  A ) ) ,  A ) )   =>    |-  ( ph  ->  seq
 M (  x.  ,  F )  ~~>  (  seq 1
 (  x.  ,  G ) `  N ) )
 
11-Apr-2024prodmodclem3 11586 Lemma for prodmodc 11589. (Contributed by Scott Fenton, 4-Dec-2017.) (Revised by Jim Kingdon, 11-Apr-2024.)
 |-  F  =  ( k  e.  ZZ  |->  if (
 k  e.  A ,  B ,  1 )
 )   &    |-  ( ( ph  /\  k  e.  A )  ->  B  e.  CC )   &    |-  G  =  ( j  e.  NN  |->  if ( j  <_  ( `  A ) ,  [_ ( f `  j
 )  /  k ]_ B ,  1 )
 )   &    |-  H  =  ( j  e.  NN  |->  if (
 j  <_  ( `  A ) ,  [_ ( K `
  j )  /  k ]_ B ,  1 ) )   &    |-  ( ph  ->  ( M  e.  NN  /\  N  e.  NN )
 )   &    |-  ( ph  ->  f : ( 1 ...
 M ) -1-1-onto-> A )   &    |-  ( ph  ->  K : ( 1 ...
 N ) -1-1-onto-> A )   =>    |-  ( ph  ->  (  seq 1 (  x.  ,  G ) `  M )  =  (  seq 1 (  x.  ,  H ) `  N ) )
 
10-Apr-2024jcnd 652 Deduction joining the consequents of two premises. (Contributed by Glauco Siliprandi, 11-Dec-2019.) (Proof shortened by Wolf Lammen, 10-Apr-2024.)
 |-  ( ph  ->  ps )   &    |-  ( ph  ->  -.  ch )   =>    |-  ( ph  ->  -.  ( ps  ->  ch ) )
 
4-Apr-2024prodrbdclem 11582 Lemma for prodrbdc 11585. (Contributed by Scott Fenton, 4-Dec-2017.) (Revised by Jim Kingdon, 4-Apr-2024.)
 |-  F  =  ( k  e.  ZZ  |->  if (
 k  e.  A ,  B ,  1 )
 )   &    |-  ( ( ph  /\  k  e.  A )  ->  B  e.  CC )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M ) )  -> DECID  k  e.  A )   &    |-  ( ph  ->  N  e.  ( ZZ>= `  M ) )   =>    |-  ( ( ph  /\  A  C_  ( ZZ>= `  N )
 )  ->  (  seq M (  x.  ,  F )  |`  ( ZZ>= `  N ) )  =  seq N (  x.  ,  F ) )
 
24-Mar-2024prodfdivap 11558 The quotient of two products. (Contributed by Scott Fenton, 15-Jan-2018.) (Revised by Jim Kingdon, 24-Mar-2024.)
 |-  ( ph  ->  N  e.  ( ZZ>= `  M )
 )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( F `  k )  e.  CC )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( G `  k )  e.  CC )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( G `  k ) #  0 )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( H `  k )  =  ( ( F `  k
 )  /  ( G `  k ) ) )   =>    |-  ( ph  ->  (  seq M (  x.  ,  H ) `  N )  =  ( (  seq M (  x.  ,  F ) `
  N )  /  (  seq M (  x. 
 ,  G ) `  N ) ) )
 
24-Mar-2024prodfrecap 11557 The reciprocal of a finite product. (Contributed by Scott Fenton, 15-Jan-2018.) (Revised by Jim Kingdon, 24-Mar-2024.)
 |-  ( ph  ->  N  e.  ( ZZ>= `  M )
 )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( F `  k )  e.  CC )   &    |-  ( ( ph  /\  k  e.  ( M ... N ) )  ->  ( F `
  k ) #  0 )   &    |-  ( ( ph  /\  k  e.  ( M
 ... N ) ) 
 ->  ( G `  k
 )  =  ( 1 
 /  ( F `  k ) ) )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( G `  k )  e.  CC )   =>    |-  ( ph  ->  (  seq M (  x.  ,  G ) `  N )  =  ( 1  /  (  seq M (  x.  ,  F ) `
  N ) ) )
 
23-Mar-2024prodfap0 11556 The product of finitely many terms apart from zero is apart from zero. (Contributed by Scott Fenton, 14-Jan-2018.) (Revised by Jim Kingdon, 23-Mar-2024.)
 |-  ( ph  ->  N  e.  ( ZZ>= `  M )
 )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( F `  k )  e.  CC )   &    |-  ( ( ph  /\  k  e.  ( M ... N ) )  ->  ( F `
  k ) #  0 )   =>    |-  ( ph  ->  (  seq M (  x.  ,  F ) `  N ) #  0 )
 
22-Mar-2024prod3fmul 11552 The product of two infinite products. (Contributed by Scott Fenton, 18-Dec-2017.) (Revised by Jim Kingdon, 22-Mar-2024.)
 |-  ( ph  ->  N  e.  ( ZZ>= `  M )
 )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( F `  k )  e.  CC )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( G `  k )  e.  CC )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( H `  k )  =  ( ( F `  k
 )  x.  ( G `
  k ) ) )   =>    |-  ( ph  ->  (  seq M (  x.  ,  H ) `  N )  =  ( (  seq M (  x.  ,  F ) `  N )  x.  (  seq M (  x.  ,  G ) `
  N ) ) )
 
21-Mar-2024df-proddc 11562 Define the product of a series with an index set of integers  A. This definition takes most of the aspects of df-sumdc 11365 and adapts them for multiplication instead of addition. However, we insist that in the infinite case, there is a nonzero tail of the sequence. This ensures that the convergence criteria match those of infinite sums. (Contributed by Scott Fenton, 4-Dec-2017.) (Revised by Jim Kingdon, 21-Mar-2024.)
 |- 
 prod_ k  e.  A  B  =  ( iota x ( E. m  e. 
 ZZ  ( ( A 
 C_  ( ZZ>= `  m )  /\  A. j  e.  ( ZZ>= `  m )DECID  j  e.  A )  /\  ( E. n  e.  ( ZZ>=
 `  m ) E. y ( y #  0 
 /\  seq n (  x. 
 ,  ( k  e. 
 ZZ  |->  if ( k  e.  A ,  B , 
 1 ) ) )  ~~>  y )  /\  seq m (  x.  ,  ( k  e.  ZZ  |->  if (
 k  e.  A ,  B ,  1 )
 ) )  ~~>  x )
 )  \/  E. m  e.  NN  E. f ( f : ( 1
 ... m ) -1-1-onto-> A  /\  x  =  (  seq 1 (  x.  ,  ( n  e.  NN  |->  if ( n  <_  m ,  [_ ( f `  n )  /  k ]_ B ,  1 ) ) ) `  m ) ) ) )
 
19-Mar-2024cos02pilt1 14433 Cosine is less than one between zero and  2  x.  pi. (Contributed by Jim Kingdon, 19-Mar-2024.)
 |-  ( A  e.  (
 0 (,) ( 2  x.  pi ) )  ->  ( cos `  A )  <  1 )
 
19-Mar-2024cosq34lt1 14432 Cosine is less than one in the third and fourth quadrants. (Contributed by Jim Kingdon, 19-Mar-2024.)
 |-  ( A  e.  ( pi [,) ( 2  x.  pi ) )  ->  ( cos `  A )  <  1 )
 
14-Mar-2024coseq0q4123 14416 Location of the zeroes of cosine in  ( -u (
pi  /  2 ) (,) ( 3  x.  ( pi  /  2
) ) ). (Contributed by Jim Kingdon, 14-Mar-2024.)
 |-  ( A  e.  ( -u ( pi  /  2
 ) (,) ( 3  x.  ( pi  /  2
 ) ) )  ->  ( ( cos `  A )  =  0  <->  A  =  ( pi  /  2 ) ) )
 
14-Mar-2024cosq23lt0 14415 The cosine of a number in the second and third quadrants is negative. (Contributed by Jim Kingdon, 14-Mar-2024.)
 |-  ( A  e.  (
 ( pi  /  2
 ) (,) ( 3  x.  ( pi  /  2
 ) ) )  ->  ( cos `  A )  <  0 )
 
9-Mar-2024pilem3 14365 Lemma for pi related theorems. (Contributed by Jim Kingdon, 9-Mar-2024.)
 |-  ( pi  e.  (
 2 (,) 4 )  /\  ( sin `  pi )  =  0 )
 
9-Mar-2024exmidonfin 7196 If a finite ordinal is a natural number, excluded middle follows. That excluded middle implies that a finite ordinal is a natural number is proved in the Metamath Proof Explorer. That a natural number is a finite ordinal is shown at nnfi 6875 and nnon 4611. (Contributed by Andrew W Swan and Jim Kingdon, 9-Mar-2024.)
 |-  ( om  =  ( On  i^i  Fin )  -> EXMID )
 
9-Mar-2024exmidonfinlem 7195 Lemma for exmidonfin 7196. (Contributed by Andrew W Swan and Jim Kingdon, 9-Mar-2024.)
 |-  A  =  { { x  e.  { (/) }  |  ph
 } ,  { x  e.  { (/) }  |  -.  ph
 } }   =>    |-  ( om  =  ( On  i^i  Fin )  -> DECID  ph )
 
8-Mar-2024sin0pilem2 14364 Lemma for pi related theorems. (Contributed by Mario Carneiro and Jim Kingdon, 8-Mar-2024.)
 |- 
 E. q  e.  (
 2 (,) 4 ) ( ( sin `  q
 )  =  0  /\  A. x  e.  ( 0 (,) q ) 0  <  ( sin `  x ) )
 
8-Mar-2024sin0pilem1 14363 Lemma for pi related theorems. (Contributed by Mario Carneiro and Jim Kingdon, 8-Mar-2024.)
 |- 
 E. p  e.  (
 1 (,) 2 ) ( ( cos `  p )  =  0  /\  A. x  e.  ( p (,) ( 2  x.  p ) ) 0  <  ( sin `  x ) )
 
7-Mar-2024cosz12 14362 Cosine has a zero between 1 and 2. (Contributed by Mario Carneiro and Jim Kingdon, 7-Mar-2024.)
 |- 
 E. p  e.  (
 1 (,) 2 ) ( cos `  p )  =  0
 
6-Mar-2024cos12dec 11778 Cosine is decreasing from one to two. (Contributed by Mario Carneiro and Jim Kingdon, 6-Mar-2024.)
 |-  ( ( A  e.  ( 1 [,] 2
 )  /\  B  e.  ( 1 [,] 2
 )  /\  A  <  B )  ->  ( cos `  B )  <  ( cos `  A ) )
 
2-Mar-2024scaffvalg 13407 The scalar multiplication operation as a function. (Contributed by Mario Carneiro, 5-Oct-2015.) (Proof shortened by AV, 2-Mar-2024.)
 |-  B  =  ( Base `  W )   &    |-  F  =  (Scalar `  W )   &    |-  K  =  (
 Base `  F )   &    |-  .xb  =  ( .sf `  W )   &    |- 
 .x.  =  ( .s `  W )   =>    |-  ( W  e.  V  -> 
 .xb  =  ( x  e.  K ,  y  e.  B  |->  ( x  .x.  y ) ) )
 
2-Mar-2024dvrfvald 13313 Division operation in a ring. (Contributed by Mario Carneiro, 2-Jul-2014.) (Revised by Mario Carneiro, 2-Dec-2014.) (Proof shortened by AV, 2-Mar-2024.)
 |-  ( ph  ->  B  =  ( Base `  R )
 )   &    |-  ( ph  ->  .x.  =  ( .r `  R ) )   &    |-  ( ph  ->  U  =  (Unit `  R ) )   &    |-  ( ph  ->  I  =  ( invr `  R ) )   &    |-  ( ph  ->  ./  =  (/r `  R ) )   &    |-  ( ph  ->  R  e. SRing )   =>    |-  ( ph  ->  ./  =  ( x  e.  B ,  y  e.  U  |->  ( x 
 .x.  ( I `  y ) ) ) )
 
2-Mar-2024plusffvalg 12788 The group addition operation as a function. (Contributed by Mario Carneiro, 14-Aug-2015.) (Proof shortened by AV, 2-Mar-2024.)
 |-  B  =  ( Base `  G )   &    |-  .+  =  ( +g  `  G )   &    |-  .+^  =  ( +f `  G )   =>    |-  ( G  e.  V  -> 
 .+^  =  ( x  e.  B ,  y  e.  B  |->  ( x  .+  y ) ) )
 
25-Feb-2024insubm 12879 The intersection of two submonoids is a submonoid. (Contributed by AV, 25-Feb-2024.)
 |-  ( ( A  e.  (SubMnd `  M )  /\  B  e.  (SubMnd `  M ) )  ->  ( A  i^i  B )  e.  (SubMnd `  M )
 )
 
25-Feb-2024mul2lt0pn 9767 The product of multiplicands of different signs is negative. (Contributed by Jim Kingdon, 25-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  A  <  0
 )   &    |-  ( ph  ->  0  <  B )   =>    |-  ( ph  ->  ( B  x.  A )  < 
 0 )
 
25-Feb-2024mul2lt0np 9766 The product of multiplicands of different signs is negative. (Contributed by Jim Kingdon, 25-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  A  <  0
 )   &    |-  ( ph  ->  0  <  B )   =>    |-  ( ph  ->  ( A  x.  B )  < 
 0 )
 
25-Feb-2024lt0ap0 8608 A number which is less than zero is apart from zero. (Contributed by Jim Kingdon, 25-Feb-2024.)
 |-  ( ( A  e.  RR  /\  A  <  0
 )  ->  A #  0
 )
 
25-Feb-2024negap0d 8591 The negative of a number apart from zero is apart from zero. (Contributed by Jim Kingdon, 25-Feb-2024.)
 |-  ( ph  ->  A  e.  CC )   &    |-  ( ph  ->  A #  0 )   =>    |-  ( ph  ->  -u A #  0 )
 
24-Feb-2024lt0ap0d 8609 A real number less than zero is apart from zero. Deduction form. (Contributed by Jim Kingdon, 24-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  A  <  0 )   =>    |-  ( ph  ->  A #  0 )
 
20-Feb-2024ivthdec 14283 The intermediate value theorem, decreasing case, for a strictly monotonic function. (Contributed by Jim Kingdon, 20-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  U  e.  RR )   &    |-  ( ph  ->  A  <  B )   &    |-  ( ph  ->  ( A [,] B ) 
 C_  D )   &    |-  ( ph  ->  F  e.  ( D -cn-> CC ) )   &    |-  (
 ( ph  /\  x  e.  ( A [,] B ) )  ->  ( F `
  x )  e. 
 RR )   &    |-  ( ph  ->  ( ( F `  B )  <  U  /\  U  <  ( F `  A ) ) )   &    |-  (
 ( ( ph  /\  x  e.  ( A [,] B ) )  /\  ( y  e.  ( A [,] B )  /\  x  < 
 y ) )  ->  ( F `  y )  <  ( F `  x ) )   =>    |-  ( ph  ->  E. c  e.  ( A (,) B ) ( F `  c )  =  U )
 
20-Feb-2024ivthinclemex 14281 Lemma for ivthinc 14282. Existence of a number between the lower cut and the upper cut. (Contributed by Jim Kingdon, 20-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  U  e.  RR )   &    |-  ( ph  ->  A  <  B )   &    |-  ( ph  ->  ( A [,] B ) 
 C_  D )   &    |-  ( ph  ->  F  e.  ( D -cn-> CC ) )   &    |-  (
 ( ph  /\  x  e.  ( A [,] B ) )  ->  ( F `
  x )  e. 
 RR )   &    |-  ( ph  ->  ( ( F `  A )  <  U  /\  U  <  ( F `  B ) ) )   &    |-  (
 ( ( ph  /\  x  e.  ( A [,] B ) )  /\  ( y  e.  ( A [,] B )  /\  x  < 
 y ) )  ->  ( F `  x )  <  ( F `  y ) )   &    |-  L  =  { w  e.  ( A [,] B )  |  ( F `  w )  <  U }   &    |-  R  =  { w  e.  ( A [,] B )  |  U  <  ( F `
  w ) }   =>    |-  ( ph  ->  E! z  e.  ( A (,) B ) ( A. q  e.  L  q  <  z  /\  A. r  e.  R  z  <  r ) )
 
19-Feb-2024ivthinclemuopn 14277 Lemma for ivthinc 14282. The upper cut is open. (Contributed by Jim Kingdon, 19-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  U  e.  RR )   &    |-  ( ph  ->  A  <  B )   &    |-  ( ph  ->  ( A [,] B ) 
 C_  D )   &    |-  ( ph  ->  F  e.  ( D -cn-> CC ) )   &    |-  (
 ( ph  /\  x  e.  ( A [,] B ) )  ->  ( F `
  x )  e. 
 RR )   &    |-  ( ph  ->  ( ( F `  A )  <  U  /\  U  <  ( F `  B ) ) )   &    |-  (
 ( ( ph  /\  x  e.  ( A [,] B ) )  /\  ( y  e.  ( A [,] B )  /\  x  < 
 y ) )  ->  ( F `  x )  <  ( F `  y ) )   &    |-  L  =  { w  e.  ( A [,] B )  |  ( F `  w )  <  U }   &    |-  R  =  { w  e.  ( A [,] B )  |  U  <  ( F `
  w ) }   &    |-  ( ph  ->  S  e.  R )   =>    |-  ( ph  ->  E. q  e.  R  q  <  S )
 
19-Feb-2024dedekindicc 14272 A Dedekind cut identifies a unique real number. Similar to df-inp 7468 except that the Dedekind cut is formed by sets of reals (rather than positive rationals). But in both cases the defining property of a Dedekind cut is that it is inhabited (bounded), rounded, disjoint, and located. (Contributed by Jim Kingdon, 19-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  L  C_  ( A [,] B ) )   &    |-  ( ph  ->  U  C_  ( A [,] B ) )   &    |-  ( ph  ->  E. q  e.  ( A [,] B ) q  e.  L )   &    |-  ( ph  ->  E. r  e.  ( A [,] B ) r  e.  U )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) ( q  e.  L  <->  E. r  e.  L  q  <  r ) )   &    |-  ( ph  ->  A. r  e.  ( A [,] B ) ( r  e.  U  <->  E. q  e.  U  q  <  r ) )   &    |-  ( ph  ->  ( L  i^i  U )  =  (/) )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) A. r  e.  ( A [,] B ) ( q  <  r  ->  ( q  e.  L  \/  r  e.  U ) ) )   &    |-  ( ph  ->  A  <  B )   =>    |-  ( ph  ->  E! x  e.  ( A (,) B ) ( A. q  e.  L  q  <  x  /\  A. r  e.  U  x  <  r
 ) )
 
19-Feb-2024grpsubfvalg 12925 Group subtraction (division) operation. (Contributed by NM, 31-Mar-2014.) (Revised by Stefan O'Rear, 27-Mar-2015.) (Proof shortened by AV, 19-Feb-2024.)
 |-  B  =  ( Base `  G )   &    |-  .+  =  ( +g  `  G )   &    |-  I  =  ( invg `  G )   &    |-  .-  =  ( -g `  G )   =>    |-  ( G  e.  V  ->  .-  =  ( x  e.  B ,  y  e.  B  |->  ( x 
 .+  ( I `  y ) ) ) )
 
18-Feb-2024ivthinclemloc 14280 Lemma for ivthinc 14282. Locatedness. (Contributed by Jim Kingdon, 18-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  U  e.  RR )   &    |-  ( ph  ->  A  <  B )   &    |-  ( ph  ->  ( A [,] B ) 
 C_  D )   &    |-  ( ph  ->  F  e.  ( D -cn-> CC ) )   &    |-  (
 ( ph  /\  x  e.  ( A [,] B ) )  ->  ( F `
  x )  e. 
 RR )   &    |-  ( ph  ->  ( ( F `  A )  <  U  /\  U  <  ( F `  B ) ) )   &    |-  (
 ( ( ph  /\  x  e.  ( A [,] B ) )  /\  ( y  e.  ( A [,] B )  /\  x  < 
 y ) )  ->  ( F `  x )  <  ( F `  y ) )   &    |-  L  =  { w  e.  ( A [,] B )  |  ( F `  w )  <  U }   &    |-  R  =  { w  e.  ( A [,] B )  |  U  <  ( F `
  w ) }   =>    |-  ( ph  ->  A. q  e.  ( A [,] B ) A. r  e.  ( A [,] B ) ( q  <  r  ->  (
 q  e.  L  \/  r  e.  R )
 ) )
 
18-Feb-2024ivthinclemdisj 14279 Lemma for ivthinc 14282. The lower and upper cuts are disjoint. (Contributed by Jim Kingdon, 18-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  U  e.  RR )   &    |-  ( ph  ->  A  <  B )   &    |-  ( ph  ->  ( A [,] B ) 
 C_  D )   &    |-  ( ph  ->  F  e.  ( D -cn-> CC ) )   &    |-  (
 ( ph  /\  x  e.  ( A [,] B ) )  ->  ( F `
  x )  e. 
 RR )   &    |-  ( ph  ->  ( ( F `  A )  <  U  /\  U  <  ( F `  B ) ) )   &    |-  (
 ( ( ph  /\  x  e.  ( A [,] B ) )  /\  ( y  e.  ( A [,] B )  /\  x  < 
 y ) )  ->  ( F `  x )  <  ( F `  y ) )   &    |-  L  =  { w  e.  ( A [,] B )  |  ( F `  w )  <  U }   &    |-  R  =  { w  e.  ( A [,] B )  |  U  <  ( F `
  w ) }   =>    |-  ( ph  ->  ( L  i^i  R )  =  (/) )
 
18-Feb-2024ivthinclemur 14278 Lemma for ivthinc 14282. The upper cut is rounded. (Contributed by Jim Kingdon, 18-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  U  e.  RR )   &    |-  ( ph  ->  A  <  B )   &    |-  ( ph  ->  ( A [,] B ) 
 C_  D )   &    |-  ( ph  ->  F  e.  ( D -cn-> CC ) )   &    |-  (
 ( ph  /\  x  e.  ( A [,] B ) )  ->  ( F `
  x )  e. 
 RR )   &    |-  ( ph  ->  ( ( F `  A )  <  U  /\  U  <  ( F `  B ) ) )   &    |-  (
 ( ( ph  /\  x  e.  ( A [,] B ) )  /\  ( y  e.  ( A [,] B )  /\  x  < 
 y ) )  ->  ( F `  x )  <  ( F `  y ) )   &    |-  L  =  { w  e.  ( A [,] B )  |  ( F `  w )  <  U }   &    |-  R  =  { w  e.  ( A [,] B )  |  U  <  ( F `
  w ) }   =>    |-  ( ph  ->  A. r  e.  ( A [,] B ) ( r  e.  R  <->  E. q  e.  R  q  <  r ) )
 
18-Feb-2024ivthinclemlr 14276 Lemma for ivthinc 14282. The lower cut is rounded. (Contributed by Jim Kingdon, 18-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  U  e.  RR )   &    |-  ( ph  ->  A  <  B )   &    |-  ( ph  ->  ( A [,] B ) 
 C_  D )   &    |-  ( ph  ->  F  e.  ( D -cn-> CC ) )   &    |-  (
 ( ph  /\  x  e.  ( A [,] B ) )  ->  ( F `
  x )  e. 
 RR )   &    |-  ( ph  ->  ( ( F `  A )  <  U  /\  U  <  ( F `  B ) ) )   &    |-  (
 ( ( ph  /\  x  e.  ( A [,] B ) )  /\  ( y  e.  ( A [,] B )  /\  x  < 
 y ) )  ->  ( F `  x )  <  ( F `  y ) )   &    |-  L  =  { w  e.  ( A [,] B )  |  ( F `  w )  <  U }   &    |-  R  =  { w  e.  ( A [,] B )  |  U  <  ( F `
  w ) }   =>    |-  ( ph  ->  A. q  e.  ( A [,] B ) ( q  e.  L  <->  E. r  e.  L  q  <  r ) )
 
18-Feb-2024ivthinclemum 14274 Lemma for ivthinc 14282. The upper cut is bounded. (Contributed by Jim Kingdon, 18-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  U  e.  RR )   &    |-  ( ph  ->  A  <  B )   &    |-  ( ph  ->  ( A [,] B ) 
 C_  D )   &    |-  ( ph  ->  F  e.  ( D -cn-> CC ) )   &    |-  (
 ( ph  /\  x  e.  ( A [,] B ) )  ->  ( F `
  x )  e. 
 RR )   &    |-  ( ph  ->  ( ( F `  A )  <  U  /\  U  <  ( F `  B ) ) )   &    |-  (
 ( ( ph  /\  x  e.  ( A [,] B ) )  /\  ( y  e.  ( A [,] B )  /\  x  < 
 y ) )  ->  ( F `  x )  <  ( F `  y ) )   &    |-  L  =  { w  e.  ( A [,] B )  |  ( F `  w )  <  U }   &    |-  R  =  { w  e.  ( A [,] B )  |  U  <  ( F `
  w ) }   =>    |-  ( ph  ->  E. r  e.  ( A [,] B ) r  e.  R )
 
18-Feb-2024ivthinclemlm 14273 Lemma for ivthinc 14282. The lower cut is bounded. (Contributed by Jim Kingdon, 18-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  U  e.  RR )   &    |-  ( ph  ->  A  <  B )   &    |-  ( ph  ->  ( A [,] B ) 
 C_  D )   &    |-  ( ph  ->  F  e.  ( D -cn-> CC ) )   &    |-  (
 ( ph  /\  x  e.  ( A [,] B ) )  ->  ( F `
  x )  e. 
 RR )   &    |-  ( ph  ->  ( ( F `  A )  <  U  /\  U  <  ( F `  B ) ) )   &    |-  (
 ( ( ph  /\  x  e.  ( A [,] B ) )  /\  ( y  e.  ( A [,] B )  /\  x  < 
 y ) )  ->  ( F `  x )  <  ( F `  y ) )   &    |-  L  =  { w  e.  ( A [,] B )  |  ( F `  w )  <  U }   &    |-  R  =  { w  e.  ( A [,] B )  |  U  <  ( F `
  w ) }   =>    |-  ( ph  ->  E. q  e.  ( A [,] B ) q  e.  L )
 
17-Feb-20240subm 12878 The zero submonoid of an arbitrary monoid. (Contributed by AV, 17-Feb-2024.)
 |- 
 .0.  =  ( 0g `  G )   =>    |-  ( G  e.  Mnd  ->  {  .0.  }  e.  (SubMnd `  G ) )
 
17-Feb-2024mndissubm 12873 If the base set of a monoid is contained in the base set of another monoid, and the group operation of the monoid is the restriction of the group operation of the other monoid to its base set, and the identity element of the the other monoid is contained in the base set of the monoid, then the (base set of the) monoid is a submonoid of the other monoid. (Contributed by AV, 17-Feb-2024.)
 |-  B  =  ( Base `  G )   &    |-  S  =  (
 Base `  H )   &    |-  .0.  =  ( 0g `  G )   =>    |-  ( ( G  e.  Mnd  /\  H  e.  Mnd )  ->  ( ( S  C_  B  /\  .0.  e.  S  /\  ( +g  `  H )  =  ( ( +g  `  G )  |`  ( S  X.  S ) ) )  ->  S  e.  (SubMnd `  G )
 ) )
 
17-Feb-2024mgmsscl 12787 If the base set of a magma is contained in the base set of another magma, and the group operation of the magma is the restriction of the group operation of the other magma to its base set, then the base set of the magma is closed under the group operation of the other magma. (Contributed by AV, 17-Feb-2024.)
 |-  B  =  ( Base `  G )   &    |-  S  =  (
 Base `  H )   =>    |-  ( ( ( G  e. Mgm  /\  H  e. Mgm )  /\  ( S 
 C_  B  /\  ( +g  `  H )  =  ( ( +g  `  G )  |`  ( S  X.  S ) ) ) 
 /\  ( X  e.  S  /\  Y  e.  S ) )  ->  ( X ( +g  `  G ) Y )  e.  S )
 
15-Feb-2024dedekindicclemeu 14270 Lemma for dedekindicc 14272. Part of proving uniqueness. (Contributed by Jim Kingdon, 15-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  L  C_  ( A [,] B ) )   &    |-  ( ph  ->  U  C_  ( A [,] B ) )   &    |-  ( ph  ->  E. q  e.  ( A [,] B ) q  e.  L )   &    |-  ( ph  ->  E. r  e.  ( A [,] B ) r  e.  U )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) ( q  e.  L  <->  E. r  e.  L  q  <  r ) )   &    |-  ( ph  ->  A. r  e.  ( A [,] B ) ( r  e.  U  <->  E. q  e.  U  q  <  r ) )   &    |-  ( ph  ->  ( L  i^i  U )  =  (/) )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) A. r  e.  ( A [,] B ) ( q  <  r  ->  ( q  e.  L  \/  r  e.  U ) ) )   &    |-  ( ph  ->  A  <  B )   &    |-  ( ph  ->  C  e.  ( A [,] B ) )   &    |-  ( ph  ->  (
 A. q  e.  L  q  <  C  /\  A. r  e.  U  C  <  r ) )   &    |-  ( ph  ->  D  e.  ( A [,] B ) )   &    |-  ( ph  ->  ( A. q  e.  L  q  <  D  /\  A. r  e.  U  D  <  r
 ) )   &    |-  ( ph  ->  C  <  D )   =>    |-  ( ph  -> F.  )
 
15-Feb-2024dedekindicclemlu 14269 Lemma for dedekindicc 14272. There is a number which separates the lower and upper cuts. (Contributed by Jim Kingdon, 15-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  L  C_  ( A [,] B ) )   &    |-  ( ph  ->  U  C_  ( A [,] B ) )   &    |-  ( ph  ->  E. q  e.  ( A [,] B ) q  e.  L )   &    |-  ( ph  ->  E. r  e.  ( A [,] B ) r  e.  U )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) ( q  e.  L  <->  E. r  e.  L  q  <  r ) )   &    |-  ( ph  ->  A. r  e.  ( A [,] B ) ( r  e.  U  <->  E. q  e.  U  q  <  r ) )   &    |-  ( ph  ->  ( L  i^i  U )  =  (/) )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) A. r  e.  ( A [,] B ) ( q  <  r  ->  ( q  e.  L  \/  r  e.  U ) ) )   &    |-  ( ph  ->  A  <  B )   =>    |-  ( ph  ->  E. x  e.  ( A [,] B ) ( A. q  e.  L  q  <  x  /\  A. r  e.  U  x  <  r ) )
 
15-Feb-2024dedekindicclemlub 14268 Lemma for dedekindicc 14272. The set L has a least upper bound. (Contributed by Jim Kingdon, 15-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  L  C_  ( A [,] B ) )   &    |-  ( ph  ->  U  C_  ( A [,] B ) )   &    |-  ( ph  ->  E. q  e.  ( A [,] B ) q  e.  L )   &    |-  ( ph  ->  E. r  e.  ( A [,] B ) r  e.  U )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) ( q  e.  L  <->  E. r  e.  L  q  <  r ) )   &    |-  ( ph  ->  A. r  e.  ( A [,] B ) ( r  e.  U  <->  E. q  e.  U  q  <  r ) )   &    |-  ( ph  ->  ( L  i^i  U )  =  (/) )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) A. r  e.  ( A [,] B ) ( q  <  r  ->  ( q  e.  L  \/  r  e.  U ) ) )   &    |-  ( ph  ->  A  <  B )   =>    |-  ( ph  ->  E. x  e.  ( A [,] B ) ( A. y  e.  L  -.  x  < 
 y  /\  A. y  e.  ( A [,] B ) ( y  < 
 x  ->  E. z  e.  L  y  <  z
 ) ) )
 
15-Feb-2024dedekindicclemloc 14267 Lemma for dedekindicc 14272. The set L is located. (Contributed by Jim Kingdon, 15-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  L  C_  ( A [,] B ) )   &    |-  ( ph  ->  U  C_  ( A [,] B ) )   &    |-  ( ph  ->  E. q  e.  ( A [,] B ) q  e.  L )   &    |-  ( ph  ->  E. r  e.  ( A [,] B ) r  e.  U )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) ( q  e.  L  <->  E. r  e.  L  q  <  r ) )   &    |-  ( ph  ->  A. r  e.  ( A [,] B ) ( r  e.  U  <->  E. q  e.  U  q  <  r ) )   &    |-  ( ph  ->  ( L  i^i  U )  =  (/) )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) A. r  e.  ( A [,] B ) ( q  <  r  ->  ( q  e.  L  \/  r  e.  U ) ) )   =>    |-  ( ph  ->  A. x  e.  ( A [,] B ) A. y  e.  ( A [,] B ) ( x  <  y  ->  ( E. z  e.  L  x  <  z  \/  A. z  e.  L  z  <  y ) ) )
 
15-Feb-2024dedekindicclemub 14266 Lemma for dedekindicc 14272. The lower cut has an upper bound. (Contributed by Jim Kingdon, 15-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  L  C_  ( A [,] B ) )   &    |-  ( ph  ->  U  C_  ( A [,] B ) )   &    |-  ( ph  ->  E. q  e.  ( A [,] B ) q  e.  L )   &    |-  ( ph  ->  E. r  e.  ( A [,] B ) r  e.  U )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) ( q  e.  L  <->  E. r  e.  L  q  <  r ) )   &    |-  ( ph  ->  A. r  e.  ( A [,] B ) ( r  e.  U  <->  E. q  e.  U  q  <  r ) )   &    |-  ( ph  ->  ( L  i^i  U )  =  (/) )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) A. r  e.  ( A [,] B ) ( q  <  r  ->  ( q  e.  L  \/  r  e.  U ) ) )   =>    |-  ( ph  ->  E. x  e.  ( A [,] B ) A. y  e.  L  y  <  x )
 
15-Feb-2024dedekindicclemuub 14265 Lemma for dedekindicc 14272. Any element of the upper cut is an upper bound for the lower cut. (Contributed by Jim Kingdon, 15-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  L  C_  ( A [,] B ) )   &    |-  ( ph  ->  U  C_  ( A [,] B ) )   &    |-  ( ph  ->  E. q  e.  ( A [,] B ) q  e.  L )   &    |-  ( ph  ->  E. r  e.  ( A [,] B ) r  e.  U )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) ( q  e.  L  <->  E. r  e.  L  q  <  r ) )   &    |-  ( ph  ->  A. r  e.  ( A [,] B ) ( r  e.  U  <->  E. q  e.  U  q  <  r ) )   &    |-  ( ph  ->  ( L  i^i  U )  =  (/) )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) A. r  e.  ( A [,] B ) ( q  <  r  ->  ( q  e.  L  \/  r  e.  U ) ) )   &    |-  ( ph  ->  C  e.  U )   =>    |-  ( ph  ->  A. z  e.  L  z  <  C )
 
14-Feb-2024suplociccex 14264 An inhabited, bounded-above, located set of reals in a closed interval has a supremum. A similar theorem is axsuploc 8033 but that one is for the entire real line rather than a closed interval. (Contributed by Jim Kingdon, 14-Feb-2024.)
 |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  C  e.  RR )   &    |-  ( ph  ->  B  <  C )   &    |-  ( ph  ->  A  C_  ( B [,] C ) )   &    |-  ( ph  ->  E. x  x  e.  A )   &    |-  ( ph  ->  A. x  e.  ( B [,] C ) A. y  e.  ( B [,] C ) ( x  <  y  ->  ( E. z  e.  A  x  <  z  \/  A. z  e.  A  z  <  y ) ) )   =>    |-  ( ph  ->  E. x  e.  ( B [,] C ) ( A. y  e.  A  -.  x  < 
 y  /\  A. y  e.  ( B [,] C ) ( y  < 
 x  ->  E. z  e.  A  y  <  z
 ) ) )
 
14-Feb-2024suplociccreex 14263 An inhabited, bounded-above, located set of reals in a closed interval has a supremum. A similar theorem is axsuploc 8033 but that one is for the entire real line rather than a closed interval. (Contributed by Jim Kingdon, 14-Feb-2024.)
 |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  C  e.  RR )   &    |-  ( ph  ->  B  <  C )   &    |-  ( ph  ->  A  C_  ( B [,] C ) )   &    |-  ( ph  ->  E. x  x  e.  A )   &    |-  ( ph  ->  A. x  e.  ( B [,] C ) A. y  e.  ( B [,] C ) ( x  <  y  ->  ( E. z  e.  A  x  <  z  \/  A. z  e.  A  z  <  y ) ) )   =>    |-  ( ph  ->  E. x  e.  RR  ( A. y  e.  A  -.  x  < 
 y  /\  A. y  e. 
 RR  ( y  < 
 x  ->  E. z  e.  A  y  <  z
 ) ) )
 
6-Feb-2024ivthinclemlopn 14275 Lemma for ivthinc 14282. The lower cut is open. (Contributed by Jim Kingdon, 6-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  U  e.  RR )   &    |-  ( ph  ->  A  <  B )   &    |-  ( ph  ->  ( A [,] B ) 
 C_  D )   &    |-  ( ph  ->  F  e.  ( D -cn-> CC ) )   &    |-  (
 ( ph  /\  x  e.  ( A [,] B ) )  ->  ( F `
  x )  e. 
 RR )   &    |-  ( ph  ->  ( ( F `  A )  <  U  /\  U  <  ( F `  B ) ) )   &    |-  (
 ( ( ph  /\  x  e.  ( A [,] B ) )  /\  ( y  e.  ( A [,] B )  /\  x  < 
 y ) )  ->  ( F `  x )  <  ( F `  y ) )   &    |-  L  =  { w  e.  ( A [,] B )  |  ( F `  w )  <  U }   &    |-  R  =  { w  e.  ( A [,] B )  |  U  <  ( F `
  w ) }   &    |-  ( ph  ->  Q  e.  L )   =>    |-  ( ph  ->  E. r  e.  L  Q  <  r
 )
 
5-Feb-2024ivthinc 14282 The intermediate value theorem, increasing case, for a strictly monotonic function. Theorem 5.5 of [Bauer], p. 494. This is Metamath 100 proof #79. (Contributed by Jim Kingdon, 5-Feb-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  U  e.  RR )   &    |-  ( ph  ->  A  <  B )   &    |-  ( ph  ->  ( A [,] B ) 
 C_  D )   &    |-  ( ph  ->  F  e.  ( D -cn-> CC ) )   &    |-  (
 ( ph  /\  x  e.  ( A [,] B ) )  ->  ( F `
  x )  e. 
 RR )   &    |-  ( ph  ->  ( ( F `  A )  <  U  /\  U  <  ( F `  B ) ) )   &    |-  (
 ( ( ph  /\  x  e.  ( A [,] B ) )  /\  ( y  e.  ( A [,] B )  /\  x  < 
 y ) )  ->  ( F `  x )  <  ( F `  y ) )   =>    |-  ( ph  ->  E. c  e.  ( A (,) B ) ( F `  c )  =  U )
 
2-Feb-2024dedekindeulemuub 14256 Lemma for dedekindeu 14262. Any element of the upper cut is an upper bound for the lower cut. (Contributed by Jim Kingdon, 2-Feb-2024.)
 |-  ( ph  ->  L  C_ 
 RR )   &    |-  ( ph  ->  U 
 C_  RR )   &    |-  ( ph  ->  E. q  e.  RR  q  e.  L )   &    |-  ( ph  ->  E. r  e.  RR  r  e.  U )   &    |-  ( ph  ->  A. q  e.  RR  (
 q  e.  L  <->  E. r  e.  L  q  <  r ) )   &    |-  ( ph  ->  A. r  e. 
 RR  ( r  e.  U  <->  E. q  e.  U  q  <  r ) )   &    |-  ( ph  ->  ( L  i^i  U )  =  (/) )   &    |-  ( ph  ->  A. q  e.  RR  A. r  e. 
 RR  ( q  < 
 r  ->  ( q  e.  L  \/  r  e.  U ) ) )   &    |-  ( ph  ->  A  e.  U )   =>    |-  ( ph  ->  A. z  e.  L  z  <  A )
 
31-Jan-2024dedekindeulemeu 14261 Lemma for dedekindeu 14262. Part of proving uniqueness. (Contributed by Jim Kingdon, 31-Jan-2024.)
 |-  ( ph  ->  L  C_ 
 RR )   &    |-  ( ph  ->  U 
 C_  RR )   &    |-  ( ph  ->  E. q  e.  RR  q  e.  L )   &    |-  ( ph  ->  E. r  e.  RR  r  e.  U )   &    |-  ( ph  ->  A. q  e.  RR  (
 q  e.  L  <->  E. r  e.  L  q  <  r ) )   &    |-  ( ph  ->  A. r  e. 
 RR  ( r  e.  U  <->  E. q  e.  U  q  <  r ) )   &    |-  ( ph  ->  ( L  i^i  U )  =  (/) )   &    |-  ( ph  ->  A. q  e.  RR  A. r  e. 
 RR  ( q  < 
 r  ->  ( q  e.  L  \/  r  e.  U ) ) )   &    |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  (
 A. q  e.  L  q  <  A  /\  A. r  e.  U  A  <  r ) )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  ( A. q  e.  L  q  <  B  /\  A. r  e.  U  B  <  r ) )   &    |-  ( ph  ->  A  <  B )   =>    |-  ( ph  -> F.  )
 
31-Jan-2024dedekindeulemlu 14260 Lemma for dedekindeu 14262. There is a number which separates the lower and upper cuts. (Contributed by Jim Kingdon, 31-Jan-2024.)
 |-  ( ph  ->  L  C_ 
 RR )   &    |-  ( ph  ->  U 
 C_  RR )   &    |-  ( ph  ->  E. q  e.  RR  q  e.  L )   &    |-  ( ph  ->  E. r  e.  RR  r  e.  U )   &    |-  ( ph  ->  A. q  e.  RR  (
 q  e.  L  <->  E. r  e.  L  q  <  r ) )   &    |-  ( ph  ->  A. r  e. 
 RR  ( r  e.  U  <->  E. q  e.  U  q  <  r ) )   &    |-  ( ph  ->  ( L  i^i  U )  =  (/) )   &    |-  ( ph  ->  A. q  e.  RR  A. r  e. 
 RR  ( q  < 
 r  ->  ( q  e.  L  \/  r  e.  U ) ) )   =>    |-  ( ph  ->  E. x  e.  RR  ( A. q  e.  L  q  <  x  /\  A. r  e.  U  x  <  r ) )
 
31-Jan-2024dedekindeulemlub 14259 Lemma for dedekindeu 14262. The set L has a least upper bound. (Contributed by Jim Kingdon, 31-Jan-2024.)
 |-  ( ph  ->  L  C_ 
 RR )   &    |-  ( ph  ->  U 
 C_  RR )   &    |-  ( ph  ->  E. q  e.  RR  q  e.  L )   &    |-  ( ph  ->  E. r  e.  RR  r  e.  U )   &    |-  ( ph  ->  A. q  e.  RR  (
 q  e.  L  <->  E. r  e.  L  q  <  r ) )   &    |-  ( ph  ->  A. r  e. 
 RR  ( r  e.  U  <->  E. q  e.  U  q  <  r ) )   &    |-  ( ph  ->  ( L  i^i  U )  =  (/) )   &    |-  ( ph  ->  A. q  e.  RR  A. r  e. 
 RR  ( q  < 
 r  ->  ( q  e.  L  \/  r  e.  U ) ) )   =>    |-  ( ph  ->  E. x  e.  RR  ( A. y  e.  L  -.  x  < 
 y  /\  A. y  e. 
 RR  ( y  < 
 x  ->  E. z  e.  L  y  <  z
 ) ) )
 
31-Jan-2024dedekindeulemloc 14258 Lemma for dedekindeu 14262. The set L is located. (Contributed by Jim Kingdon, 31-Jan-2024.)
 |-  ( ph  ->  L  C_ 
 RR )   &    |-  ( ph  ->  U 
 C_  RR )   &    |-  ( ph  ->  E. q  e.  RR  q  e.  L )   &    |-  ( ph  ->  E. r  e.  RR  r  e.  U )   &    |-  ( ph  ->  A. q  e.  RR  (
 q  e.  L  <->  E. r  e.  L  q  <  r ) )   &    |-  ( ph  ->  A. r  e. 
 RR  ( r  e.  U  <->  E. q  e.  U  q  <  r ) )   &    |-  ( ph  ->  ( L  i^i  U )  =  (/) )   &    |-  ( ph  ->  A. q  e.  RR  A. r  e. 
 RR  ( q  < 
 r  ->  ( q  e.  L  \/  r  e.  U ) ) )   =>    |-  ( ph  ->  A. x  e. 
 RR  A. y  e.  RR  ( x  <  y  ->  ( E. z  e.  L  x  <  z  \/  A. z  e.  L  z  <  y ) ) )
 
31-Jan-2024dedekindeulemub 14257 Lemma for dedekindeu 14262. The lower cut has an upper bound. (Contributed by Jim Kingdon, 31-Jan-2024.)
 |-  ( ph  ->  L  C_ 
 RR )   &    |-  ( ph  ->  U 
 C_  RR )   &    |-  ( ph  ->  E. q  e.  RR  q  e.  L )   &    |-  ( ph  ->  E. r  e.  RR  r  e.  U )   &    |-  ( ph  ->  A. q  e.  RR  (
 q  e.  L  <->  E. r  e.  L  q  <  r ) )   &    |-  ( ph  ->  A. r  e. 
 RR  ( r  e.  U  <->  E. q  e.  U  q  <  r ) )   &    |-  ( ph  ->  ( L  i^i  U )  =  (/) )   &    |-  ( ph  ->  A. q  e.  RR  A. r  e. 
 RR  ( q  < 
 r  ->  ( q  e.  L  \/  r  e.  U ) ) )   =>    |-  ( ph  ->  E. x  e.  RR  A. y  e.  L  y  <  x )
 
30-Jan-2024axsuploc 8033 An inhabited, bounded-above, located set of reals has a supremum. Axiom for real and complex numbers, derived from ZF set theory. (This restates ax-pre-suploc 7935 with ordering on the extended reals.) (Contributed by Jim Kingdon, 30-Jan-2024.)
 |-  ( ( ( A 
 C_  RR  /\  E. x  x  e.  A )  /\  ( E. x  e. 
 RR  A. y  e.  A  y  <  x  /\  A. x  e.  RR  A. y  e.  RR  ( x  < 
 y  ->  ( E. z  e.  A  x  <  z  \/  A. z  e.  A  z  <  y
 ) ) ) ) 
 ->  E. x  e.  RR  ( A. y  e.  A  -.  x  <  y  /\  A. y  e.  RR  (
 y  <  x  ->  E. z  e.  A  y  <  z ) ) )
 
30-Jan-2024iotam 5210 Representation of "the unique element such that  ph " with a class expression  A which is inhabited (that means that "the unique element such that  ph " exists). (Contributed by AV, 30-Jan-2024.)
 |-  ( x  =  A  ->  ( ph  <->  ps ) )   =>    |-  ( ( A  e.  V  /\  E. w  w  e.  A  /\  A  =  ( iota
 x ph ) )  ->  ps )
 
29-Jan-2024sgrpidmndm 12828 A semigroup with an identity element which is inhabited is a monoid. Of course there could be monoids with the empty set as identity element, but these cannot be proven to be monoids with this theorem. (Contributed by AV, 29-Jan-2024.)
 |-  B  =  ( Base `  G )   &    |-  .0.  =  ( 0g `  G )   =>    |-  ( ( G  e. Smgrp  /\ 
 E. e  e.  B  ( E. w  w  e.  e  /\  e  =  .0.  ) )  ->  G  e.  Mnd )
 
24-Jan-2024axpre-suploclemres 7903 Lemma for axpre-suploc 7904. The result. The proof just needs to define  B as basically the same set as  A (but expressed as a subset of  R. rather than a subset of  RR), and apply suplocsr 7811. (Contributed by Jim Kingdon, 24-Jan-2024.)
 |-  ( ph  ->  A  C_ 
 RR )   &    |-  ( ph  ->  C  e.  A )   &    |-  ( ph  ->  E. x  e.  RR  A. y  e.  A  y 
 <RR  x )   &    |-  ( ph  ->  A. x  e.  RR  A. y  e.  RR  ( x  <RR  y  ->  ( E. z  e.  A  x  <RR  z  \/  A. z  e.  A  z  <RR  y ) ) )   &    |-  B  =  { w  e.  R.  |  <. w ,  0R >.  e.  A }   =>    |-  ( ph  ->  E. x  e.  RR  ( A. y  e.  A  -.  x  <RR  y  /\  A. y  e.  RR  (
 y  <RR  x  ->  E. z  e.  A  y  <RR  z ) ) )
 
23-Jan-2024ax-pre-suploc 7935 An inhabited, bounded-above, located set of reals has a supremum.

Locatedness here means that given  x  <  y, either there is an element of the set greater than  x, or  y is an upper bound.

Although this and ax-caucvg 7934 are both completeness properties, countable choice would probably be needed to derive this from ax-caucvg 7934.

(Contributed by Jim Kingdon, 23-Jan-2024.)

 |-  ( ( ( A 
 C_  RR  /\  E. x  x  e.  A )  /\  ( E. x  e. 
 RR  A. y  e.  A  y  <RR  x  /\  A. x  e.  RR  A. y  e.  RR  ( x  <RR  y 
 ->  ( E. z  e.  A  x  <RR  z  \/ 
 A. z  e.  A  z  <RR  y ) ) ) )  ->  E. x  e.  RR  ( A. y  e.  A  -.  x  <RR  y 
 /\  A. y  e.  RR  ( y  <RR  x  ->  E. z  e.  A  y  <RR  z ) ) )
 
23-Jan-2024axpre-suploc 7904 An inhabited, bounded-above, located set of reals has a supremum.

Locatedness here means that given  x  <  y, either there is an element of the set greater than  x, or  y is an upper bound.

This construction-dependent theorem should not be referenced directly; instead, use ax-pre-suploc 7935. (Contributed by Jim Kingdon, 23-Jan-2024.) (New usage is discouraged.)

 |-  ( ( ( A 
 C_  RR  /\  E. x  x  e.  A )  /\  ( E. x  e. 
 RR  A. y  e.  A  y  <RR  x  /\  A. x  e.  RR  A. y  e.  RR  ( x  <RR  y 
 ->  ( E. z  e.  A  x  <RR  z  \/ 
 A. z  e.  A  z  <RR  y ) ) ) )  ->  E. x  e.  RR  ( A. y  e.  A  -.  x  <RR  y 
 /\  A. y  e.  RR  ( y  <RR  x  ->  E. z  e.  A  y  <RR  z ) ) )
 
22-Jan-2024suplocsr 7811 An inhabited, bounded, located set of signed reals has a supremum. (Contributed by Jim Kingdon, 22-Jan-2024.)
 |-  ( ph  ->  E. x  x  e.  A )   &    |-  ( ph  ->  E. x  e.  R.  A. y  e.  A  y 
 <R  x )   &    |-  ( ph  ->  A. x  e.  R.  A. y  e.  R.  ( x  <R  y  ->  ( E. z  e.  A  x  <R  z  \/  A. z  e.  A  z  <R  y ) ) )   =>    |-  ( ph  ->  E. x  e.  R.  ( A. y  e.  A  -.  x  <R  y 
 /\  A. y  e.  R.  ( y  <R  x  ->  E. z  e.  A  y  <R  z ) ) )
 
21-Jan-2024bj-el2oss1o 14687 Shorter proof of el2oss1o 6447 using more axioms. (Contributed by BJ, 21-Jan-2024.) (Proof modification is discouraged.) (New usage is discouraged.)
 |-  ( A  e.  2o  ->  A 
 C_  1o )
 
21-Jan-2024ltm1sr 7779 Adding minus one to a signed real yields a smaller signed real. (Contributed by Jim Kingdon, 21-Jan-2024.)
 |-  ( A  e.  R.  ->  ( A  +R  -1R )  <R  A )
 
20-Jan-2024mndinvmod 12853 Uniqueness of an inverse element in a monoid, if it exists. (Contributed by AV, 20-Jan-2024.)
 |-  B  =  ( Base `  G )   &    |-  .0.  =  ( 0g `  G )   &    |-  .+  =  ( +g  `  G )   &    |-  ( ph  ->  G  e.  Mnd )   &    |-  ( ph  ->  A  e.  B )   =>    |-  ( ph  ->  E* w  e.  B  ( ( w  .+  A )  =  .0.  /\  ( A  .+  w )  =  .0.  ) )
 
19-Jan-2024suplocsrlempr 7809 Lemma for suplocsr 7811. The set  B has a least upper bound. (Contributed by Jim Kingdon, 19-Jan-2024.)
 |-  B  =  { w  e.  P.  |  ( C  +R  [ <. w ,  1P >. ]  ~R  )  e.  A }   &    |-  ( ph  ->  A 
 C_  R. )   &    |-  ( ph  ->  C  e.  A )   &    |-  ( ph  ->  E. x  e.  R.  A. y  e.  A  y 
 <R  x )   &    |-  ( ph  ->  A. x  e.  R.  A. y  e.  R.  ( x  <R  y  ->  ( E. z  e.  A  x  <R  z  \/  A. z  e.  A  z  <R  y ) ) )   =>    |-  ( ph  ->  E. v  e.  P.  ( A. w  e.  B  -.  v  <P  w 
 /\  A. w  e.  P.  ( w  <P  v  ->  E. u  e.  B  w  <P  u ) ) )
 
18-Jan-2024suplocsrlemb 7808 Lemma for suplocsr 7811. The set  B is located. (Contributed by Jim Kingdon, 18-Jan-2024.)
 |-  B  =  { w  e.  P.  |  ( C  +R  [ <. w ,  1P >. ]  ~R  )  e.  A }   &    |-  ( ph  ->  A 
 C_  R. )   &    |-  ( ph  ->  C  e.  A )   &    |-  ( ph  ->  E. x  e.  R.  A. y  e.  A  y 
 <R  x )   &    |-  ( ph  ->  A. x  e.  R.  A. y  e.  R.  ( x  <R  y  ->  ( E. z  e.  A  x  <R  z  \/  A. z  e.  A  z  <R  y ) ) )   =>    |-  ( ph  ->  A. u  e. 
 P.  A. v  e.  P.  ( u  <P  v  ->  ( E. q  e.  B  u  <P  q  \/  A. q  e.  B  q  <P  v ) ) )
 
16-Jan-2024suplocsrlem 7810 Lemma for suplocsr 7811. The set  A has a least upper bound. (Contributed by Jim Kingdon, 16-Jan-2024.)
 |-  B  =  { w  e.  P.  |  ( C  +R  [ <. w ,  1P >. ]  ~R  )  e.  A }   &    |-  ( ph  ->  A 
 C_  R. )   &    |-  ( ph  ->  C  e.  A )   &    |-  ( ph  ->  E. x  e.  R.  A. y  e.  A  y 
 <R  x )   &    |-  ( ph  ->  A. x  e.  R.  A. y  e.  R.  ( x  <R  y  ->  ( E. z  e.  A  x  <R  z  \/  A. z  e.  A  z  <R  y ) ) )   =>    |-  ( ph  ->  E. x  e.  R.  ( A. y  e.  A  -.  x  <R  y 
 /\  A. y  e.  R.  ( y  <R  x  ->  E. z  e.  A  y  <R  z ) ) )
 
14-Jan-2024suplocexprlemlub 7726 Lemma for suplocexpr 7727. The putative supremum is a least upper bound. (Contributed by Jim Kingdon, 14-Jan-2024.)
 |-  ( ph  ->  E. x  x  e.  A )   &    |-  ( ph  ->  E. x  e.  P.  A. y  e.  A  y 
 <P  x )   &    |-  ( ph  ->  A. x  e.  P.  A. y  e.  P.  ( x  <P  y  ->  ( E. z  e.  A  x  <P  z  \/  A. z  e.  A  z  <P  y ) ) )   &    |-  B  =  <. U. ( 1st " A ) ,  { u  e.  Q.  |  E. w  e.  |^| ( 2nd " A ) w  <Q  u } >.   =>    |-  ( ph  ->  ( y  <P  B  ->  E. z  e.  A  y  <P  z ) )
 
14-Jan-2024suplocexprlemub 7725 Lemma for suplocexpr 7727. The putative supremum is an upper bound. (Contributed by Jim Kingdon, 14-Jan-2024.)
 |-  ( ph  ->  E. x  x  e.  A )   &    |-  ( ph  ->  E. x  e.  P.  A. y  e.  A  y 
 <P  x )   &    |-  ( ph  ->  A. x  e.  P.  A. y  e.  P.  ( x  <P  y  ->  ( E. z  e.  A  x  <P  z  \/  A. z  e.  A  z  <P  y ) ) )   &    |-  B  =  <. U. ( 1st " A ) ,  { u  e.  Q.  |  E. w  e.  |^| ( 2nd " A ) w  <Q  u } >.   =>    |-  ( ph  ->  A. y  e.  A  -.  B  <P  y )
 
10-Jan-2024nfcsbw 3095 Bound-variable hypothesis builder for substitution into a class. Version of nfcsb 3096 with a disjoint variable condition. (Contributed by Mario Carneiro, 12-Oct-2016.) (Revised by Gino Giotto, 10-Jan-2024.)
 |-  F/_ x A   &    |-  F/_ x B   =>    |-  F/_ x [_ A  /  y ]_ B
 
10-Jan-2024nfsbcdw 3093 Version of nfsbcd 2984 with a disjoint variable condition. (Contributed by NM, 23-Nov-2005.) (Revised by Gino Giotto, 10-Jan-2024.)
 |- 
 F/ y ph   &    |-  ( ph  ->  F/_ x A )   &    |-  ( ph  ->  F/ x ps )   =>    |-  ( ph  ->  F/ x [. A  /  y ]. ps )
 
10-Jan-2024cbvcsbw 3063 Version of cbvcsb 3064 with a disjoint variable condition. (Contributed by Gino Giotto, 10-Jan-2024.)
 |-  F/_ y C   &    |-  F/_ x D   &    |-  ( x  =  y  ->  C  =  D )   =>    |-  [_ A  /  x ]_ C  =  [_ A  /  y ]_ D
 
10-Jan-2024cbvsbcw 2992 Version of cbvsbc 2993 with a disjoint variable condition. (Contributed by Gino Giotto, 10-Jan-2024.)
 |- 
 F/ y ph   &    |-  F/ x ps   &    |-  ( x  =  y  ->  (
 ph 
 <->  ps ) )   =>    |-  ( [. A  /  x ]. ph  <->  [. A  /  y ]. ps )
 
10-Jan-2024cbvrex2vw 2717 Change bound variables of double restricted universal quantification, using implicit substitution. Version of cbvrex2v 2719 with a disjoint variable condition, which does not require ax-13 2150. (Contributed by FL, 2-Jul-2012.) (Revised by Gino Giotto, 10-Jan-2024.)
 |-  ( x  =  z 
 ->  ( ph  <->  ch ) )   &    |-  (
 y  =  w  ->  ( ch  <->  ps ) )   =>    |-  ( E. x  e.  A  E. y  e.  B  ph  <->  E. z  e.  A  E. w  e.  B  ps )
 
10-Jan-2024cbvral2vw 2716 Change bound variables of double restricted universal quantification, using implicit substitution. Version of cbvral2v 2718 with a disjoint variable condition, which does not require ax-13 2150. (Contributed by NM, 10-Aug-2004.) (Revised by Gino Giotto, 10-Jan-2024.)
 |-  ( x  =  z 
 ->  ( ph  <->  ch ) )   &    |-  (
 y  =  w  ->  ( ch  <->  ps ) )   =>    |-  ( A. x  e.  A  A. y  e.  B  ph  <->  A. z  e.  A  A. w  e.  B  ps )
 
10-Jan-2024cbvrexw 2700 Rule used to change bound variables, using implicit substitution. Version of cbvrexfw 2696 with more disjoint variable conditions. Although we don't do so yet, we expect the disjoint variable conditions will allow us to remove reliance on ax-i12 1507 and ax-bndl 1509 in the proof. (Contributed by NM, 31-Jul-2003.) (Revised by Gino Giotto, 10-Jan-2024.)
 |- 
 F/ y ph   &    |-  F/ x ps   &    |-  ( x  =  y  ->  (
 ph 
 <->  ps ) )   =>    |-  ( E. x  e.  A  ph  <->  E. y  e.  A  ps )
 
10-Jan-2024cbvralw 2699 Rule used to change bound variables, using implicit substitution. Version of cbvral 2701 with a disjoint variable condition. Although we don't do so yet, we expect this disjoint variable condition will allow us to remove reliance on ax-i12 1507 and ax-bndl 1509 in the proof. (Contributed by NM, 31-Jul-2003.) (Revised by Gino Giotto, 10-Jan-2024.)
 |- 
 F/ y ph   &    |-  F/ x ps   &    |-  ( x  =  y  ->  (
 ph 
 <->  ps ) )   =>    |-  ( A. x  e.  A  ph  <->  A. y  e.  A  ps )
 
10-Jan-2024cbvrexfw 2696 Rule used to change bound variables, using implicit substitution. Version of cbvrexf 2698 with a disjoint variable condition. Although we don't do so yet, we expect this disjoint variable condition will allow us to remove reliance on ax-i12 1507 and ax-bndl 1509 in the proof. (Contributed by FL, 27-Apr-2008.) (Revised by Gino Giotto, 10-Jan-2024.)
 |-  F/_ x A   &    |-  F/_ y A   &    |-  F/ y ph   &    |-  F/ x ps   &    |-  ( x  =  y  ->  (
 ph 
 <->  ps ) )   =>    |-  ( E. x  e.  A  ph  <->  E. y  e.  A  ps )
 
10-Jan-2024nfralw 2514 Bound-variable hypothesis builder for restricted quantification. See nfralya 2517 for a version with  y and 
A distinct instead of  x and  y. (Contributed by NM, 1-Sep-1999.) (Revised by Gino Giotto, 10-Jan-2024.)
 |-  F/_ x A   &    |-  F/ x ph   =>    |-  F/ x A. y  e.  A  ph
 
10-Jan-2024nfraldw 2509 Not-free for restricted universal quantification where  x and  y are distinct. See nfraldya 2512 for a version with  y and  A distinct instead. (Contributed by NM, 15-Feb-2013.) (Revised by Gino Giotto, 10-Jan-2024.)
 |- 
 F/ y ph   &    |-  ( ph  ->  F/_ x A )   &    |-  ( ph  ->  F/ x ps )   =>    |-  ( ph  ->  F/ x A. y  e.  A  ps )
 
10-Jan-2024nfabdw 2338 Bound-variable hypothesis builder for a class abstraction. Version of nfabd 2339 with a disjoint variable condition. (Contributed by Mario Carneiro, 8-Oct-2016.) (Revised by Gino Giotto, 10-Jan-2024.)
 |- 
 F/ y ph   &    |-  ( ph  ->  F/ x ps )   =>    |-  ( ph  ->  F/_ x { y  |  ps } )
 
10-Jan-2024cbv2w 1750 Rule used to change bound variables, using implicit substitution. Version of cbv2 1749 with a disjoint variable condition. (Contributed by NM, 5-Aug-1993.) (Revised by Gino Giotto, 10-Jan-2024.)
 |- 
 F/ x ph   &    |-  F/ y ph   &    |-  ( ph  ->  F/ y ps )   &    |-  ( ph  ->  F/ x ch )   &    |-  ( ph  ->  ( x  =  y  ->  ( ps  <->  ch ) ) )   =>    |-  ( ph  ->  (
 A. x ps  <->  A. y ch )
 )
 
9-Jan-2024suplocexprlemloc 7723 Lemma for suplocexpr 7727. The putative supremum is located. (Contributed by Jim Kingdon, 9-Jan-2024.)
 |-  ( ph  ->  E. x  x  e.  A )   &    |-  ( ph  ->  E. x  e.  P.  A. y  e.  A  y 
 <P  x )   &    |-  ( ph  ->  A. x  e.  P.  A. y  e.  P.  ( x  <P  y  ->  ( E. z  e.  A  x  <P  z  \/  A. z  e.  A  z  <P  y ) ) )   &    |-  B  =  <. U. ( 1st " A ) ,  { u  e.  Q.  |  E. w  e.  |^| ( 2nd " A ) w  <Q  u } >.   =>    |-  ( ph  ->  A. q  e. 
 Q.  A. r  e.  Q.  ( q  <Q  r  ->  ( q  e.  U. ( 1st " A )  \/  r  e.  ( 2nd `  B ) ) ) )
 
9-Jan-2024suplocexprlemdisj 7722 Lemma for suplocexpr 7727. The putative supremum is disjoint. (Contributed by Jim Kingdon, 9-Jan-2024.)
 |-  ( ph  ->  E. x  x  e.  A )   &    |-  ( ph  ->  E. x  e.  P.  A. y  e.  A  y 
 <P  x )   &    |-  ( ph  ->  A. x  e.  P.  A. y  e.  P.  ( x  <P  y  ->  ( E. z  e.  A  x  <P  z  \/  A. z  e.  A  z  <P  y ) ) )   &    |-  B  =  <. U. ( 1st " A ) ,  { u  e.  Q.  |  E. w  e.  |^| ( 2nd " A ) w  <Q  u } >.   =>    |-  ( ph  ->  A. q  e. 
 Q.  -.  ( q  e.  U. ( 1st " A )  /\  q  e.  ( 2nd `  B ) ) )
 
9-Jan-2024suplocexprlemru 7721 Lemma for suplocexpr 7727. The upper cut of the putative supremum is rounded. (Contributed by Jim Kingdon, 9-Jan-2024.)
 |-  ( ph  ->  E. x  x  e.  A )   &    |-  ( ph  ->  E. x  e.  P.  A. y  e.  A  y 
 <P  x )   &    |-  ( ph  ->  A. x  e.  P.  A. y  e.  P.  ( x  <P  y  ->  ( E. z  e.  A  x  <P  z  \/  A. z  e.  A  z  <P  y ) ) )   &    |-  B  =  <. U. ( 1st " A ) ,  { u  e.  Q.  |  E. w  e.  |^| ( 2nd " A ) w  <Q  u } >.   =>    |-  ( ph  ->  A. r  e. 
 Q.  ( r  e.  ( 2nd `  B ) 
 <-> 
 E. q  e.  Q.  ( q  <Q  r  /\  q  e.  ( 2nd `  B ) ) ) )
 
9-Jan-2024suplocexprlemrl 7719 Lemma for suplocexpr 7727. The lower cut of the putative supremum is rounded. (Contributed by Jim Kingdon, 9-Jan-2024.)
 |-  ( ph  ->  E. x  x  e.  A )   &    |-  ( ph  ->  E. x  e.  P.  A. y  e.  A  y 
 <P  x )   &    |-  ( ph  ->  A. x  e.  P.  A. y  e.  P.  ( x  <P  y  ->  ( E. z  e.  A  x  <P  z  \/  A. z  e.  A  z  <P  y ) ) )   =>    |-  ( ph  ->  A. q  e. 
 Q.  ( q  e. 
 U. ( 1st " A ) 
 <-> 
 E. r  e.  Q.  ( q  <Q  r  /\  r  e.  U. ( 1st " A ) ) ) )
 
9-Jan-2024suplocexprlem2b 7716 Lemma for suplocexpr 7727. Expression for the lower cut of the putative supremum. (Contributed by Jim Kingdon, 9-Jan-2024.)
 |-  B  =  <. U. ( 1st " A ) ,  { u  e.  Q.  |  E. w  e.  |^| ( 2nd " A ) w  <Q  u } >.   =>    |-  ( A  C_  P.  ->  ( 2nd `  B )  =  { u  e.  Q.  |  E. w  e.  |^| ( 2nd " A ) w  <Q  u }
 )
 
9-Jan-2024suplocexprlemell 7715 Lemma for suplocexpr 7727. Membership in the lower cut of the putative supremum. (Contributed by Jim Kingdon, 9-Jan-2024.)
 |-  ( B  e.  U. ( 1st " A )  <->  E. x  e.  A  B  e.  ( 1st `  x ) )
 
7-Jan-2024suplocexpr 7727 An inhabited, bounded-above, located set of positive reals has a supremum. (Contributed by Jim Kingdon, 7-Jan-2024.)
 |-  ( ph  ->  E. x  x  e.  A )   &    |-  ( ph  ->  E. x  e.  P.  A. y  e.  A  y 
 <P  x )   &    |-  ( ph  ->  A. x  e.  P.  A. y  e.  P.  ( x  <P  y  ->  ( E. z  e.  A  x  <P  z  \/  A. z  e.  A  z  <P  y ) ) )   =>    |-  ( ph  ->  E. x  e.  P.  ( A. y  e.  A  -.  x  <P  y 
 /\  A. y  e.  P.  ( y  <P  x  ->  E. z  e.  A  y  <P  z ) ) )
 
7-Jan-2024suplocexprlemex 7724 Lemma for suplocexpr 7727. The putative supremum is a positive real. (Contributed by Jim Kingdon, 7-Jan-2024.)
 |-  ( ph  ->  E. x  x  e.  A )   &    |-  ( ph  ->  E. x  e.  P.  A. y  e.  A  y 
 <P  x )   &    |-  ( ph  ->  A. x  e.  P.  A. y  e.  P.  ( x  <P  y  ->  ( E. z  e.  A  x  <P  z  \/  A. z  e.  A  z  <P  y ) ) )   &    |-  B  =  <. U. ( 1st " A ) ,  { u  e.  Q.  |  E. w  e.  |^| ( 2nd " A ) w  <Q  u } >.   =>    |-  ( ph  ->  B  e.  P. )
 
7-Jan-2024suplocexprlemmu 7720 Lemma for suplocexpr 7727. The upper cut of the putative supremum is inhabited. (Contributed by Jim Kingdon, 7-Jan-2024.)
 |-  ( ph  ->  E. x  x  e.  A )   &    |-  ( ph  ->  E. x  e.  P.  A. y  e.  A  y 
 <P  x )   &    |-  ( ph  ->  A. x  e.  P.  A. y  e.  P.  ( x  <P  y  ->  ( E. z  e.  A  x  <P  z  \/  A. z  e.  A  z  <P  y ) ) )   &    |-  B  =  <. U. ( 1st " A ) ,  { u  e.  Q.  |  E. w  e.  |^| ( 2nd " A ) w  <Q  u } >.   =>    |-  ( ph  ->  E. s  e.  Q.  s  e.  ( 2nd `  B ) )
 
7-Jan-2024suplocexprlemml 7718 Lemma for suplocexpr 7727. The lower cut of the putative supremum is inhabited. (Contributed by Jim Kingdon, 7-Jan-2024.)
 |-  ( ph  ->  E. x  x  e.  A )   &    |-  ( ph  ->  E. x  e.  P.  A. y  e.  A  y 
 <P  x )   &    |-  ( ph  ->  A. x  e.  P.  A. y  e.  P.  ( x  <P  y  ->  ( E. z  e.  A  x  <P  z  \/  A. z  e.  A  z  <P  y ) ) )   =>    |-  ( ph  ->  E. s  e.  Q.  s  e.  U. ( 1st " A ) )
 
7-Jan-2024suplocexprlemss 7717 Lemma for suplocexpr 7727. 
A is a set of positive reals. (Contributed by Jim Kingdon, 7-Jan-2024.)
 |-  ( ph  ->  E. x  x  e.  A )   &    |-  ( ph  ->  E. x  e.  P.  A. y  e.  A  y 
 <P  x )   &    |-  ( ph  ->  A. x  e.  P.  A. y  e.  P.  ( x  <P  y  ->  ( E. z  e.  A  x  <P  z  \/  A. z  e.  A  z  <P  y ) ) )   =>    |-  ( ph  ->  A  C_  P. )
 
5-Jan-2024dedekindicclemicc 14271 Lemma for dedekindicc 14272. Same as dedekindicc 14272, except that we merely show  x to be an element of  ( A [,] B ). Later we will strengthen that to  ( A (,) B
). (Contributed by Jim Kingdon, 5-Jan-2024.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  L  C_  ( A [,] B ) )   &    |-  ( ph  ->  U  C_  ( A [,] B ) )   &    |-  ( ph  ->  E. q  e.  ( A [,] B ) q  e.  L )   &    |-  ( ph  ->  E. r  e.  ( A [,] B ) r  e.  U )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) ( q  e.  L  <->  E. r  e.  L  q  <  r ) )   &    |-  ( ph  ->  A. r  e.  ( A [,] B ) ( r  e.  U  <->  E. q  e.  U  q  <  r ) )   &    |-  ( ph  ->  ( L  i^i  U )  =  (/) )   &    |-  ( ph  ->  A. q  e.  ( A [,] B ) A. r  e.  ( A [,] B ) ( q  <  r  ->  ( q  e.  L  \/  r  e.  U ) ) )   &    |-  ( ph  ->  A  <  B )   =>    |-  ( ph  ->  E! x  e.  ( A [,] B ) ( A. q  e.  L  q  <  x  /\  A. r  e.  U  x  <  r
 ) )
 
5-Jan-2024dedekindeu 14262 A Dedekind cut identifies a unique real number. Similar to df-inp 7468 except that the the Dedekind cut is formed by sets of reals (rather than positive rationals). But in both cases the defining property of a Dedekind cut is that it is inhabited (bounded), rounded, disjoint, and located. (Contributed by Jim Kingdon, 5-Jan-2024.)
 |-  ( ph  ->  L  C_ 
 RR )   &    |-  ( ph  ->  U 
 C_  RR )   &    |-  ( ph  ->  E. q  e.  RR  q  e.  L )   &    |-  ( ph  ->  E. r  e.  RR  r  e.  U )   &    |-  ( ph  ->  A. q  e.  RR  (
 q  e.  L  <->  E. r  e.  L  q  <  r ) )   &    |-  ( ph  ->  A. r  e. 
 RR  ( r  e.  U  <->  E. q  e.  U  q  <  r ) )   &    |-  ( ph  ->  ( L  i^i  U )  =  (/) )   &    |-  ( ph  ->  A. q  e.  RR  A. r  e. 
 RR  ( q  < 
 r  ->  ( q  e.  L  \/  r  e.  U ) ) )   =>    |-  ( ph  ->  E! x  e.  RR  ( A. q  e.  L  q  <  x  /\  A. r  e.  U  x  <  r ) )
 
31-Dec-2023dvmptsubcn 14346 Function-builder for derivative, subtraction rule. (Contributed by Mario Carneiro, 1-Sep-2014.) (Revised by Jim Kingdon, 31-Dec-2023.)
 |-  ( ( ph  /\  x  e.  CC )  ->  A  e.  CC )   &    |-  ( ( ph  /\  x  e.  CC )  ->  B  e.  V )   &    |-  ( ph  ->  ( CC  _D  ( x  e.  CC  |->  A ) )  =  ( x  e.  CC  |->  B ) )   &    |-  (
 ( ph  /\  x  e. 
 CC )  ->  C  e.  CC )   &    |-  ( ( ph  /\  x  e.  CC )  ->  D  e.  W )   &    |-  ( ph  ->  ( CC  _D  ( x  e.  CC  |->  C ) )  =  ( x  e.  CC  |->  D ) )   =>    |-  ( ph  ->  ( CC  _D  ( x  e.  CC  |->  ( A  -  C ) ) )  =  ( x  e.  CC  |->  ( B  -  D ) ) )
 
31-Dec-2023dvmptnegcn 14345 Function-builder for derivative, product rule for negatives. (Contributed by Mario Carneiro, 1-Sep-2014.) (Revised by Jim Kingdon, 31-Dec-2023.)
 |-  ( ( ph  /\  x  e.  CC )  ->  A  e.  CC )   &    |-  ( ( ph  /\  x  e.  CC )  ->  B  e.  V )   &    |-  ( ph  ->  ( CC  _D  ( x  e.  CC  |->  A ) )  =  ( x  e.  CC  |->  B ) )   =>    |-  ( ph  ->  ( CC  _D  ( x  e.  CC  |->  -u A ) )  =  ( x  e.  CC  |->  -u B ) )
 
31-Dec-2023dvmptcmulcn 14344 Function-builder for derivative, product rule for constant multiplier. (Contributed by Mario Carneiro, 1-Sep-2014.) (Revised by Jim Kingdon, 31-Dec-2023.)
 |-  ( ( ph  /\  x  e.  CC )  ->  A  e.  CC )   &    |-  ( ( ph  /\  x  e.  CC )  ->  B  e.  V )   &    |-  ( ph  ->  ( CC  _D  ( x  e.  CC  |->  A ) )  =  ( x  e.  CC  |->  B ) )   &    |-  ( ph  ->  C  e.  CC )   =>    |-  ( ph  ->  ( CC  _D  ( x  e. 
 CC  |->  ( C  x.  A ) ) )  =  ( x  e. 
 CC  |->  ( C  x.  B ) ) )
 
31-Dec-2023rinvmod 13123 Uniqueness of a right inverse element in a commutative monoid, if it exists. Corresponds to caovimo 6071. (Contributed by AV, 31-Dec-2023.)
 |-  B  =  ( Base `  G )   &    |-  .0.  =  ( 0g `  G )   &    |-  .+  =  ( +g  `  G )   &    |-  ( ph  ->  G  e. CMnd )   &    |-  ( ph  ->  A  e.  B )   =>    |-  ( ph  ->  E* w  e.  B  ( A  .+  w )  =  .0.  )
 
31-Dec-2023brm 4055 If two sets are in a binary relation, the relation is inhabited. (Contributed by Jim Kingdon, 31-Dec-2023.)
 |-  ( A R B  ->  E. x  x  e.  R )
 
30-Dec-2023dvmptccn 14340 Function-builder for derivative: derivative of a constant. (Contributed by Mario Carneiro, 1-Sep-2014.) (Revised by Jim Kingdon, 30-Dec-2023.)
 |-  ( ph  ->  A  e.  CC )   =>    |-  ( ph  ->  ( CC  _D  ( x  e. 
 CC  |->  A ) )  =  ( x  e. 
 CC  |->  0 ) )
 
30-Dec-2023dvmptidcn 14339 Function-builder for derivative: derivative of the identity. (Contributed by Mario Carneiro, 1-Sep-2014.) (Revised by Jim Kingdon, 30-Dec-2023.)
 |-  ( CC  _D  ( x  e.  CC  |->  x ) )  =  ( x  e.  CC  |->  1 )
 
29-Dec-2023mndbn0 12839 The base set of a monoid is not empty. (It is also inhabited, as seen at mndidcl 12838). Statement in [Lang] p. 3. (Contributed by AV, 29-Dec-2023.)
 |-  B  =  ( Base `  G )   =>    |-  ( G  e.  Mnd  ->  B  =/=  (/) )
 
26-Dec-2023lidrididd 12808 If there is a left and right identity element for any binary operation (group operation)  .+, the left identity element (and therefore also the right identity element according to lidrideqd 12807) is equal to the two-sided identity element. (Contributed by AV, 26-Dec-2023.)
 |-  ( ph  ->  L  e.  B )   &    |-  ( ph  ->  R  e.  B )   &    |-  ( ph  ->  A. x  e.  B  ( L  .+  x )  =  x )   &    |-  ( ph  ->  A. x  e.  B  ( x  .+  R )  =  x )   &    |-  B  =  ( Base `  G )   &    |-  .+  =  ( +g  `  G )   &    |-  .0.  =  ( 0g `  G )   =>    |-  ( ph  ->  L  =  .0.  )
 
26-Dec-2023lidrideqd 12807 If there is a left and right identity element for any binary operation (group operation)  .+, both identity elements are equal. Generalization of statement in [Lang] p. 3: it is sufficient that "e" is a left identity element and "e`" is a right identity element instead of both being (two-sided) identity elements. (Contributed by AV, 26-Dec-2023.)
 |-  ( ph  ->  L  e.  B )   &    |-  ( ph  ->  R  e.  B )   &    |-  ( ph  ->  A. x  e.  B  ( L  .+  x )  =  x )   &    |-  ( ph  ->  A. x  e.  B  ( x  .+  R )  =  x )   =>    |-  ( ph  ->  L  =  R )
 
25-Dec-2023ctfoex 7120 A countable class is a set. (Contributed by Jim Kingdon, 25-Dec-2023.)
 |-  ( E. f  f : om -onto-> ( A 1o )  ->  A  e.  _V )
 
23-Dec-2023enct 12437 Countability is invariant relative to equinumerosity. (Contributed by Jim Kingdon, 23-Dec-2023.)
 |-  ( A  ~~  B  ->  ( E. f  f : om -onto-> ( A 1o )  <->  E. g  g : om -onto-> ( B 1o )
 ) )
 
23-Dec-2023enctlem 12436 Lemma for enct 12437. One direction of the biconditional. (Contributed by Jim Kingdon, 23-Dec-2023.)
 |-  ( A  ~~  B  ->  ( E. f  f : om -onto-> ( A 1o )  ->  E. g  g : om -onto-> ( B 1o ) ) )
 
23-Dec-2023omct 7119  om is countable. (Contributed by Jim Kingdon, 23-Dec-2023.)
 |- 
 E. f  f : om -onto-> ( om 1o )
 
21-Dec-2023dvcoapbr 14332 The chain rule for derivatives at a point. The  u #  C  -> 
( G `  u
) #  ( G `  C ) hypothesis constrains what functions work for  G. (Contributed by Mario Carneiro, 9-Aug-2014.) (Revised by Jim Kingdon, 21-Dec-2023.)
 |-  ( ph  ->  F : X --> CC )   &    |-  ( ph  ->  X  C_  S )   &    |-  ( ph  ->  G : Y --> X )   &    |-  ( ph  ->  Y  C_  T )   &    |-  ( ph  ->  A. u  e.  Y  ( u #  C  ->  ( G `  u ) #  ( G `  C ) ) )   &    |-  ( ph  ->  S  C_  CC )   &    |-  ( ph  ->  T  C_ 
 CC )   &    |-  ( ph  ->  ( G `  C ) ( S  _D  F ) K )   &    |-  ( ph  ->  C ( T  _D  G ) L )   &    |-  J  =  (
 MetOpen `  ( abs  o.  -  ) )   =>    |-  ( ph  ->  C ( T  _D  ( F  o.  G ) ) ( K  x.  L ) )
 
19-Dec-2023apsscn 8607 The points apart from a given point are complex numbers. (Contributed by Jim Kingdon, 19-Dec-2023.)
 |- 
 { x  e.  A  |  x #  B }  C_ 
 CC
 
19-Dec-2023aprcl 8606 Reverse closure for apartness. (Contributed by Jim Kingdon, 19-Dec-2023.)
 |-  ( A #  B  ->  ( A  e.  CC  /\  B  e.  CC )
 )
 
18-Dec-2023limccoap 14308 Composition of two limits. This theorem is only usable in the case where  x #  X implies R(x) #  C so it is less general than might appear at first. (Contributed by Mario Carneiro, 29-Dec-2016.) (Revised by Jim Kingdon, 18-Dec-2023.)
 |-  ( ( ph  /\  x  e.  { w  e.  A  |  w #  X }
 )  ->  R  e.  { w  e.  B  |  w #  C } )   &    |-  (
 ( ph  /\  y  e. 
 { w  e.  B  |  w #  C }
 )  ->  S  e.  CC )   &    |-  ( ph  ->  C  e.  ( ( x  e.  { w  e.  A  |  w #  X }  |->  R ) lim CC  X ) )   &    |-  ( ph  ->  D  e.  (
 ( y  e.  { w  e.  B  |  w #  C }  |->  S ) lim
 CC  C ) )   &    |-  ( y  =  R  ->  S  =  T )   =>    |-  ( ph  ->  D  e.  ( ( x  e. 
 { w  e.  A  |  w #  X }  |->  T ) lim CC  X ) )
 
16-Dec-2023cnreim 10990 Complex apartness in terms of real and imaginary parts. See also apreim 8563 which is similar but with different notation. (Contributed by Jim Kingdon, 16-Dec-2023.)
 |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A #  B  <->  ( ( Re `  A ) #  ( Re `  B )  \/  ( Im `  A ) #  ( Im `  B ) ) ) )
 
14-Dec-2023cnopnap 14255 The complex numbers apart from a given complex number form an open set. (Contributed by Jim Kingdon, 14-Dec-2023.)
 |-  ( A  e.  CC  ->  { w  e.  CC  |  w #  A }  e.  ( MetOpen `  ( abs  o. 
 -  ) ) )
 
14-Dec-2023cnovex 13857 The class of all continuous functions from a topology to another is a set. (Contributed by Jim Kingdon, 14-Dec-2023.)
 |-  ( ( J  e.  Top  /\  K  e.  Top )  ->  ( J  Cn  K )  e.  _V )
 
13-Dec-2023reopnap 14199 The real numbers apart from a given real number form an open set. (Contributed by Jim Kingdon, 13-Dec-2023.)
 |-  ( A  e.  RR  ->  { w  e.  RR  |  w #  A }  e.  ( topGen `  ran  (,) )
 )
 
12-Dec-2023cnopncntop 14198 The set of complex numbers is open with respect to the standard topology on complex numbers. (Contributed by Glauco Siliprandi, 11-Dec-2019.) (Revised by Jim Kingdon, 12-Dec-2023.)
 |- 
 CC  e.  ( MetOpen `  ( abs  o.  -  )
 )
 
12-Dec-2023unicntopcntop 14197 The underlying set of the standard topology on the complex numbers is the set of complex numbers. (Contributed by Glauco Siliprandi, 11-Dec-2019.) (Revised by Jim Kingdon, 12-Dec-2023.)
 |- 
 CC  =  U. ( MetOpen `  ( abs  o.  -  ) )
 
4-Dec-2023bj-pm2.18st 14663 Clavius law for stable formulas. See pm2.18dc 855. (Contributed by BJ, 4-Dec-2023.)
 |-  (STAB  ph  ->  ( ( -.  ph  ->  ph )  ->  ph ) )
 
4-Dec-2023bj-nnclavius 14650 Clavius law with doubly negated consequent. (Contributed by BJ, 4-Dec-2023.)
 |-  (
 ( -.  ph  ->  ph )  ->  -.  -.  ph )
 
2-Dec-2023dvmulxx 14329 The product rule for derivatives at a point. For the (more general) relation version, see dvmulxxbr 14327. (Contributed by Mario Carneiro, 9-Aug-2014.) (Revised by Jim Kingdon, 2-Dec-2023.)
 |-  ( ph  ->  F : X --> CC )   &    |-  ( ph  ->  X  C_  S )   &    |-  ( ph  ->  G : X --> CC )   &    |-  ( ph  ->  S  e.  { RR ,  CC } )   &    |-  ( ph  ->  C  e.  dom  ( S  _D  F ) )   &    |-  ( ph  ->  C  e.  dom  ( S  _D  G ) )   =>    |-  ( ph  ->  ( ( S  _D  ( F  oF  x.  G ) ) `  C )  =  ( (
 ( ( S  _D  F ) `  C )  x.  ( G `  C ) )  +  ( ( ( S  _D  G ) `  C )  x.  ( F `  C ) ) ) )
 
1-Dec-2023dvmulxxbr 14327 The product rule for derivatives at a point. For the (simpler but more limited) function version, see dvmulxx 14329. (Contributed by Mario Carneiro, 9-Aug-2014.) (Revised by Jim Kingdon, 1-Dec-2023.)
 |-  ( ph  ->  F : X --> CC )   &    |-  ( ph  ->  X  C_  S )   &    |-  ( ph  ->  G : X --> CC )   &    |-  ( ph  ->  S  C_  CC )   &    |-  ( ph  ->  C ( S  _D  F ) K )   &    |-  ( ph  ->  C ( S  _D  G ) L )   &    |-  J  =  (
 MetOpen `  ( abs  o.  -  ) )   =>    |-  ( ph  ->  C ( S  _D  ( F  oF  x.  G ) ) ( ( K  x.  ( G `
  C ) )  +  ( L  x.  ( F `  C ) ) ) )
 
29-Nov-2023subctctexmid 14912 If every subcountable set is countable and Markov's principle holds, excluded middle follows. Proposition 2.6 of [BauerSwan], p. 14:4. The proof is taken from that paper. (Contributed by Jim Kingdon, 29-Nov-2023.)
 |-  ( ph  ->  A. x ( E. s ( s  C_  om 
 /\  E. f  f : s -onto-> x )  ->  E. g  g : om -onto-> ( x 1o ) ) )   &    |-  ( ph  ->  om  e. Markov )   =>    |-  ( ph  -> EXMID )
 
29-Nov-2023ismkvnex 7156 The predicate of being Markov stated in terms of double negation and comparison with  1o. (Contributed by Jim Kingdon, 29-Nov-2023.)
 |-  ( A  e.  V  ->  ( A  e. Markov  <->  A. f  e.  ( 2o  ^m  A ) ( -.  -.  E. x  e.  A  ( f `  x )  =  1o  ->  E. x  e.  A  ( f `  x )  =  1o )
 ) )
 
28-Nov-2023ccfunen 7266 Existence of a choice function for a countably infinite set. (Contributed by Jim Kingdon, 28-Nov-2023.)
 |-  ( ph  -> CCHOICE )   &    |-  ( ph  ->  A 
 ~~  om )   &    |-  ( ph  ->  A. x  e.  A  E. w  w  e.  x )   =>    |-  ( ph  ->  E. f
 ( f  Fn  A  /\  A. x  e.  A  ( f `  x )  e.  x )
 )
 
28-Nov-2023exmid1stab 4210 If every proposition is stable, excluded middle follows. We are thinking of  x as a proposition and  x  =  { (/)
} as " x is true". (Contributed by Jim Kingdon, 28-Nov-2023.)
 |-  ( ( ph  /\  x  C_ 
 { (/) } )  -> STAB  x  =  { (/) } )   =>    |-  ( ph  -> EXMID )
 
27-Nov-2023df-cc 7265 The expression CCHOICE will be used as a readable shorthand for any form of countable choice, analogous to df-ac 7208 for full choice. (Contributed by Jim Kingdon, 27-Nov-2023.)
 |-  (CCHOICE  <->  A. x ( dom  x  ~~ 
 om  ->  E. f ( f 
 C_  x  /\  f  Fn  dom  x ) ) )
 
26-Nov-2023offeq 6099 Convert an identity of the operation to the analogous identity on the function operation. (Contributed by Jim Kingdon, 26-Nov-2023.)
 |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  T )
 )  ->  ( x R y )  e.  U )   &    |-  ( ph  ->  F : A --> S )   &    |-  ( ph  ->  G : B
 --> T )   &    |-  ( ph  ->  A  e.  V )   &    |-  ( ph  ->  B  e.  W )   &    |-  ( A  i^i  B )  =  C   &    |-  ( ph  ->  H : C --> U )   &    |-  ( ( ph  /\  x  e.  A )  ->  ( F `  x )  =  D )   &    |-  ( ( ph  /\  x  e.  B ) 
 ->  ( G `  x )  =  E )   &    |-  (
 ( ph  /\  x  e.  C )  ->  ( D R E )  =  ( H `  x ) )   =>    |-  ( ph  ->  ( F  oF R G )  =  H )
 
25-Nov-2023dvaddxx 14328 The sum rule for derivatives at a point. For the (more general) relation version, see dvaddxxbr 14326. (Contributed by Mario Carneiro, 9-Aug-2014.) (Revised by Jim Kingdon, 25-Nov-2023.)
 |-  ( ph  ->  F : X --> CC )   &    |-  ( ph  ->  X  C_  S )   &    |-  ( ph  ->  G : X --> CC )   &    |-  ( ph  ->  S  e.  { RR ,  CC } )   &    |-  ( ph  ->  C  e.  dom  ( S  _D  F ) )   &    |-  ( ph  ->  C  e.  dom  ( S  _D  G ) )   =>    |-  ( ph  ->  ( ( S  _D  ( F  oF  +  G ) ) `  C )  =  ( (
 ( S  _D  F ) `  C )  +  ( ( S  _D  G ) `  C ) ) )
 
25-Nov-2023dvaddxxbr 14326 The sum rule for derivatives at a point. That is, if the derivative of  F at  C is  K and the derivative of  G at  C is  L, then the derivative of the pointwise sum of those two functions at  C is  K  +  L. (Contributed by Mario Carneiro, 9-Aug-2014.) (Revised by Jim Kingdon, 25-Nov-2023.)
 |-  ( ph  ->  F : X --> CC )   &    |-  ( ph  ->  X  C_  S )   &    |-  ( ph  ->  G : X --> CC )   &    |-  ( ph  ->  S  C_  CC )   &    |-  ( ph  ->  C ( S  _D  F ) K )   &    |-  ( ph  ->  C ( S  _D  G ) L )   &    |-  J  =  (
 MetOpen `  ( abs  o.  -  ) )   =>    |-  ( ph  ->  C ( S  _D  ( F  oF  +  G ) ) ( K  +  L ) )
 
25-Nov-2023dcnn 848 Decidability of the negation of a proposition is equivalent to decidability of its double negation. See also dcn 842. The relation between dcn 842 and dcnn 848 is analogous to that between notnot 629 and notnotnot 634 (and directly stems from it). Using the notion of "testable proposition" (proposition whose negation is decidable), dcnn 848 means that a proposition is testable if and only if its negation is testable, and dcn 842 means that decidability implies testability. (Contributed by David A. Wheeler, 6-Dec-2018.) (Proof shortened by BJ, 25-Nov-2023.)
 |-  (DECID 
 -.  ph  <-> DECID  -.  -.  ph )
 
24-Nov-2023bj-dcst 14674 Stability of a proposition is decidable if and only if that proposition is stable. (Contributed by BJ, 24-Nov-2023.)
 |-  (DECID STAB  ph  <-> STAB  ph )
 
24-Nov-2023bj-nnbidc 14670 If a formula is not refutable, then it is decidable if and only if it is provable. See also comment of bj-nnbist 14657. (Contributed by BJ, 24-Nov-2023.)
 |-  ( -.  -.  ph  ->  (DECID  ph  <->  ph ) )
 
24-Nov-2023bj-dcstab 14669 A decidable formula is stable. (Contributed by BJ, 24-Nov-2023.) (Proof modification is discouraged.)
 |-  (DECID  ph  -> STAB  ph )
 
24-Nov-2023bj-fadc 14667 A refutable formula is decidable. (Contributed by BJ, 24-Nov-2023.)
 |-  ( -.  ph  -> DECID  ph )
 
24-Nov-2023bj-trdc 14665 A provable formula is decidable. (Contributed by BJ, 24-Nov-2023.)
 |-  ( ph  -> DECID  ph )
 
24-Nov-2023bj-stal 14662 The universal quantification of a stable formula is stable. See bj-stim 14659 for implication, stabnot 833 for negation, and bj-stan 14660 for conjunction. (Contributed by BJ, 24-Nov-2023.)
 |-  ( A. xSTAB 
 ph  -> STAB  A. x ph )
 
24-Nov-2023bj-stand 14661 The conjunction of two stable formulas is stable. Deduction form of bj-stan 14660. Its proof is shorter (when counting all steps, including syntactic steps), so one could prove it first and then bj-stan 14660 from it, the usual way. (Contributed by BJ, 24-Nov-2023.) (Proof modification is discouraged.)
 |-  ( ph  -> STAB  ps )   &    |-  ( ph  -> STAB  ch )   =>    |-  ( ph  -> STAB 
 ( ps  /\  ch ) )
 
24-Nov-2023bj-stan 14660 The conjunction of two stable formulas is stable. See bj-stim 14659 for implication, stabnot 833 for negation, and bj-stal 14662 for universal quantification. (Contributed by BJ, 24-Nov-2023.)
 |-  (
 (STAB  ph  /\ STAB 
 ps )  -> STAB  ( ph  /\  ps ) )
 
24-Nov-2023bj-stim 14659 A conjunction with a stable consequent is stable. See stabnot 833 for negation , bj-stan 14660 for conjunction , and bj-stal 14662 for universal quantification. (Contributed by BJ, 24-Nov-2023.)
 |-  (STAB  ps  -> STAB  (
 ph  ->  ps ) )
 
24-Nov-2023bj-nnbist 14657 If a formula is not refutable, then it is stable if and only if it is provable. By double-negation translation, if  ph is a classical tautology, then  -.  -.  ph is an intuitionistic tautology. Therefore, if  ph is a classical tautology, then  ph is intuitionistically equivalent to its stability (and to its decidability, see bj-nnbidc 14670). (Contributed by BJ, 24-Nov-2023.)
 |-  ( -.  -.  ph  ->  (STAB  ph  <->  ph ) )
 
24-Nov-2023bj-fast 14654 A refutable formula is stable. (Contributed by BJ, 24-Nov-2023.)
 |-  ( -.  ph  -> STAB  ph )
 
24-Nov-2023bj-trst 14652 A provable formula is stable. (Contributed by BJ, 24-Nov-2023.)
 |-  ( ph  -> STAB  ph )
 
24-Nov-2023bj-nnan 14649 The double negation of a conjunction implies the conjunction of the double negations. (Contributed by BJ, 24-Nov-2023.)
 |-  ( -.  -.  ( ph  /\  ps )  ->  ( -.  -.  ph 
 /\  -.  -.  ps )
 )
 
24-Nov-2023bj-nnim 14648 The double negation of an implication implies the implication with the consequent doubly negated. (Contributed by BJ, 24-Nov-2023.)
 |-  ( -.  -.  ( ph  ->  ps )  ->  ( ph  ->  -.  -.  ps )
 )
 
24-Nov-2023bj-nnsn 14646 As far as implying a negated formula is concerned, a formula is equivalent to its double negation. (Contributed by BJ, 24-Nov-2023.)
 |-  (
 ( ph  ->  -.  ps ) 
 <->  ( -.  -.  ph  ->  -.  ps ) )
 
24-Nov-2023nnal 1649 The double negation of a universal quantification implies the universal quantification of the double negation. (Contributed by BJ, 24-Nov-2023.)
 |-  ( -.  -.  A. x ph  ->  A. x  -.  -.  ph )
 
22-Nov-2023ofvalg 6095 Evaluate a function operation at a point. (Contributed by Mario Carneiro, 20-Jul-2014.) (Revised by Jim Kingdon, 22-Nov-2023.)
 |-  ( ph  ->  F  Fn  A )   &    |-  ( ph  ->  G  Fn  B )   &    |-  ( ph  ->  A  e.  V )   &    |-  ( ph  ->  B  e.  W )   &    |-  ( A  i^i  B )  =  S   &    |-  (
 ( ph  /\  X  e.  A )  ->  ( F `
  X )  =  C )   &    |-  ( ( ph  /\  X  e.  B ) 
 ->  ( G `  X )  =  D )   &    |-  (
 ( ph  /\  X  e.  S )  ->  ( C R D )  e.  U )   =>    |-  ( ( ph  /\  X  e.  S )  ->  (
 ( F  oF R G ) `  X )  =  ( C R D ) )
 
21-Nov-2023exmidac 7211 The axiom of choice implies excluded middle. See acexmid 5877 for more discussion of this theorem and a way of stating it without using CHOICE or EXMID. (Contributed by Jim Kingdon, 21-Nov-2023.)
 |-  (CHOICE 
 -> EXMID )
 
21-Nov-2023exmidaclem 7210 Lemma for exmidac 7211. The result, with a few hypotheses to break out commonly used expressions. (Contributed by Jim Kingdon, 21-Nov-2023.)
 |-  A  =  { x  e.  { (/) ,  { (/) } }  |  ( x  =  (/)  \/  y  =  { (/) } ) }   &    |-  B  =  { x  e.  { (/) ,  { (/) } }  |  ( x  =  { (/)
 }  \/  y  =  { (/) } ) }   &    |-  C  =  { A ,  B }   =>    |-  (CHOICE 
 -> EXMID )
 
21-Nov-2023exmid1dc 4202 A convenience theorem for proving that something implies EXMID. Think of this as an alternative to using a proposition, as in proofs like undifexmid 4195 or ordtriexmid 4522. In this context  x  =  { (/) } can be thought of as "x is true". (Contributed by Jim Kingdon, 21-Nov-2023.)
 |-  ( ( ph  /\  x  C_ 
 { (/) } )  -> DECID  x  =  { (/) } )   =>    |-  ( ph  -> EXMID )
 
20-Nov-2023acfun 7209 A convenient form of choice. The goal here is to state choice as the existence of a choice function on a set of inhabited sets, while making full use of our notation around functions and function values. (Contributed by Jim Kingdon, 20-Nov-2023.)
 |-  ( ph  -> CHOICE )   &    |-  ( ph  ->  A  e.  V )   &    |-  ( ph  ->  A. x  e.  A  E. w  w  e.  x )   =>    |-  ( ph  ->  E. f
 ( f  Fn  A  /\  A. x  e.  A  ( f `  x )  e.  x )
 )
 
18-Nov-2023condc 853 Contraposition of a decidable proposition.

This theorem swaps or "transposes" the order of the consequents when negation is removed. An informal example is that the statement "if there are no clouds in the sky, it is not raining" implies the statement "if it is raining, there are clouds in the sky". This theorem (without the decidability condition, of course) is called Transp or "the principle of transposition" in Principia Mathematica (Theorem *2.17 of [WhiteheadRussell] p. 103) and is Axiom A3 of [Margaris] p. 49. We will also use the term "contraposition" for this principle, although the reader is advised that in the field of philosophical logic, "contraposition" has a different technical meaning.

(Contributed by Jim Kingdon, 13-Mar-2018.) (Proof shortened by BJ, 18-Nov-2023.)

 |-  (DECID 
 ph  ->  ( ( -.  ph  ->  -.  ps )  ->  ( ps  ->  ph )
 ) )
 
18-Nov-2023stdcn 847 A formula is stable if and only if the decidability of its negation implies its decidability. Note that the right-hand side of this biconditional is the converse of dcn 842. (Contributed by BJ, 18-Nov-2023.)
 |-  (STAB 
 ph 
 <->  (DECID 
 -.  ph  -> DECID  ph ) )
 
17-Nov-2023cnplimclemr 14299 Lemma for cnplimccntop 14300. The reverse direction. (Contributed by Mario Carneiro and Jim Kingdon, 17-Nov-2023.)
 |-  K  =  ( MetOpen `  ( abs  o.  -  )
 )   &    |-  J  =  ( Kt  A )   &    |-  ( ph  ->  A 
 C_  CC )   &    |-  ( ph  ->  F : A --> CC )   &    |-  ( ph  ->  B  e.  A )   &    |-  ( ph  ->  ( F `  B )  e.  ( F lim CC  B ) )   =>    |-  ( ph  ->  F  e.  ( ( J  CnP  K ) `  B ) )
 
17-Nov-2023cnplimclemle 14298 Lemma for cnplimccntop 14300. Satisfying the epsilon condition for continuity. (Contributed by Mario Carneiro and Jim Kingdon, 17-Nov-2023.)
 |-  K  =  ( MetOpen `  ( abs  o.  -  )
 )   &    |-  J  =  ( Kt  A )   &    |-  ( ph  ->  A 
 C_  CC )   &    |-  ( ph  ->  F : A --> CC )   &    |-  ( ph  ->  B  e.  A )   &    |-  ( ph  ->  ( F `  B )  e.  ( F lim CC  B ) )   &    |-  ( ph  ->  E  e.  RR+ )   &    |-  ( ph  ->  D  e.  RR+ )   &    |-  ( ph  ->  Z  e.  A )   &    |-  (
 ( ph  /\  Z #  B  /\  ( abs `  ( Z  -  B ) )  <  D )  ->  ( abs `  ( ( F `  Z )  -  ( F `  B ) ) )  <  ( E  /  2 ) )   &    |-  ( ph  ->  ( abs `  ( Z  -  B ) )  <  D )   =>    |-  ( ph  ->  ( abs `  ( ( F `  Z )  -  ( F `  B ) ) )  <  E )
 
14-Nov-2023limccnp2cntop 14307 The image of a convergent sequence under a continuous map is convergent to the image of the original point. Binary operation version. (Contributed by Mario Carneiro, 28-Dec-2016.) (Revised by Jim Kingdon, 14-Nov-2023.)
 |-  ( ( ph  /\  x  e.  A )  ->  R  e.  X )   &    |-  ( ( ph  /\  x  e.  A ) 
 ->  S  e.  Y )   &    |-  ( ph  ->  X  C_  CC )   &    |-  ( ph  ->  Y  C_ 
 CC )   &    |-  K  =  (
 MetOpen `  ( abs  o.  -  ) )   &    |-  J  =  ( ( K  tX  K )t  ( X  X.  Y ) )   &    |-  ( ph  ->  C  e.  ( ( x  e.  A  |->  R ) lim
 CC  B ) )   &    |-  ( ph  ->  D  e.  ( ( x  e.  A  |->  S ) lim CC  B ) )   &    |-  ( ph  ->  H  e.  (
 ( J  CnP  K ) `  <. C ,  D >. ) )   =>    |-  ( ph  ->  ( C H D )  e.  ( ( x  e.  A  |->  ( R H S ) ) lim CC  B ) )
 
10-Nov-2023rpmaxcl 11235 The maximum of two positive real numbers is a positive real number. (Contributed by Jim Kingdon, 10-Nov-2023.)
 |-  ( ( A  e.  RR+  /\  B  e.  RR+ )  ->  sup ( { A ,  B } ,  RR ,  <  )  e.  RR+ )
 
9-Nov-2023limccnp2lem 14306 Lemma for limccnp2cntop 14307. This is most of the result, expressed in epsilon-delta form, with a large number of hypotheses so that lengthy expressions do not need to be repeated. (Contributed by Jim Kingdon, 9-Nov-2023.)
 |-  ( ( ph  /\  x  e.  A )  ->  R  e.  X )   &    |-  ( ( ph  /\  x  e.  A ) 
 ->  S  e.  Y )   &    |-  ( ph  ->  X  C_  CC )   &    |-  ( ph  ->  Y  C_ 
 CC )   &    |-  K  =  (
 MetOpen `  ( abs  o.  -  ) )   &    |-  J  =  ( ( K  tX  K )t  ( X  X.  Y ) )   &    |-  ( ph  ->  C  e.  ( ( x  e.  A  |->  R ) lim
 CC  B ) )   &    |-  ( ph  ->  D  e.  ( ( x  e.  A  |->  S ) lim CC  B ) )   &    |-  ( ph  ->  H  e.  (
 ( J  CnP  K ) `  <. C ,  D >. ) )   &    |-  F/ x ph   &    |-  ( ph  ->  E  e.  RR+ )   &    |-  ( ph  ->  L  e.  RR+ )   &    |-  ( ph  ->  A. r  e.  X  A. s  e.  Y  (
 ( ( C ( ( abs  o.  -  )  |`  ( X  X.  X ) ) r )  <  L  /\  ( D ( ( abs 
 o.  -  )  |`  ( Y  X.  Y ) ) s )  <  L )  ->  ( ( C H D ) ( abs  o.  -  )
 ( r H s ) )  <  E ) )   &    |-  ( ph  ->  F  e.  RR+ )   &    |-  ( ph  ->  A. x  e.  A  ( ( x #  B  /\  ( abs `  ( x  -  B ) )  <  F )  ->  ( abs `  ( R  -  C ) )  <  L ) )   &    |-  ( ph  ->  G  e.  RR+ )   &    |-  ( ph  ->  A. x  e.  A  ( ( x #  B  /\  ( abs `  ( x  -  B ) )  <  G )  ->  ( abs `  ( S  -  D ) )  <  L ) )   =>    |-  ( ph  ->  E. d  e.  RR+  A. x  e.  A  ( ( x #  B  /\  ( abs `  ( x  -  B ) )  <  d )  ->  ( abs `  ( ( R H S )  -  ( C H D ) ) )  <  E ) )
 
4-Nov-2023ellimc3apf 14290 Write the epsilon-delta definition of a limit. (Contributed by Mario Carneiro, 28-Dec-2016.) (Revised by Jim Kingdon, 4-Nov-2023.)
 |-  ( ph  ->  F : A --> CC )   &    |-  ( ph  ->  A  C_  CC )   &    |-  ( ph  ->  B  e.  CC )   &    |-  F/_ z F   =>    |-  ( ph  ->  ( C  e.  ( F lim
 CC  B )  <->  ( C  e.  CC  /\  A. x  e.  RR+  E. y  e.  RR+  A. z  e.  A  ( ( z #  B  /\  ( abs `  ( z  -  B ) )  < 
 y )  ->  ( abs `  ( ( F `
  z )  -  C ) )  < 
 x ) ) ) )
 
3-Nov-2023limcmpted 14293 Express the limit operator for a function defined by a mapping, via epsilon-delta. (Contributed by Jim Kingdon, 3-Nov-2023.)
 |-  ( ph  ->  A  C_ 
 CC )   &    |-  ( ph  ->  B  e.  CC )   &    |-  (
 ( ph  /\  z  e.  A )  ->  D  e.  CC )   =>    |-  ( ph  ->  ( C  e.  ( (
 z  e.  A  |->  D ) lim CC  B )  <-> 
 ( C  e.  CC  /\ 
 A. x  e.  RR+  E. y  e.  RR+  A. z  e.  A  ( ( z #  B  /\  ( abs `  ( z  -  B ) )  <  y ) 
 ->  ( abs `  ( D  -  C ) )  <  x ) ) ) )
 
1-Nov-2023unct 12446 The union of two countable sets is countable. Corollary 8.1.20 of [AczelRathjen], p. 75. (Contributed by Jim Kingdon, 1-Nov-2023.)
 |-  ( ( E. f  f : om -onto-> ( A 1o )  /\  E. g  g : om -onto-> ( B 1o ) )  ->  E. h  h : om -onto-> ( ( A  u.  B ) 1o ) )
 
31-Oct-2023ctiunct 12444 A sequence of enumerations gives an enumeration of the union. We refer to "sequence of enumerations" rather than "countably many countable sets" because the hypothesis provides more than countability for each  B ( x ): it refers to  B ( x ) together with the  G ( x ) which enumerates it. Theorem 8.1.19 of [AczelRathjen], p. 74.

For "countably many countable sets" the key hypothesis would be  ( ph  /\  x  e.  A )  ->  E. g g : om -onto-> ( B 1o ). This is almost omiunct 12448 (which uses countable choice) although that is for a countably infinite collection not any countable collection.

Compare with the case of two sets instead of countably many, as seen at unct 12446, which says that the union of two countable sets is countable .

The proof proceeds by mapping a natural number to a pair of natural numbers (by xpomen 12399) and using the first number to map to an element  x of  A and the second number to map to an element of B(x) . In this way we are able to map to every element of  U_ x  e.  A B. Although it would be possible to work directly with countability expressed as  F : om -onto-> ( A 1o ), we instead use functions from subsets of the natural numbers via ctssdccl 7113 and ctssdc 7115.

(Contributed by Jim Kingdon, 31-Oct-2023.)

 |-  ( ph  ->  F : om -onto-> ( A 1o )
 )   &    |-  ( ( ph  /\  x  e.  A )  ->  G : om -onto-> ( B 1o )
 )   =>    |-  ( ph  ->  E. h  h : om -onto-> ( U_ x  e.  A  B 1o ) )
 
30-Oct-2023ctssdccl 7113 A mapping from a decidable subset of the natural numbers onto a countable set. This is similar to one direction of ctssdc 7115 but expressed in terms of classes rather than  E.. (Contributed by Jim Kingdon, 30-Oct-2023.)
 |-  ( ph  ->  F : om -onto-> ( A 1o )
 )   &    |-  S  =  { x  e.  om  |  ( F `
  x )  e.  (inl " A ) }   &    |-  G  =  ( `'inl  o.  F )   =>    |-  ( ph  ->  ( S  C_  om  /\  G : S -onto-> A  /\  A. n  e.  om DECID  n  e.  S ) )
 
28-Oct-2023ctiunctlemfo 12443 Lemma for ctiunct 12444. (Contributed by Jim Kingdon, 28-Oct-2023.)
 |-  ( ph  ->  S  C_ 
 om )   &    |-  ( ph  ->  A. n  e.  om DECID  n  e.  S )   &    |-  ( ph  ->  F : S -onto-> A )   &    |-  ( ( ph  /\  x  e.  A )  ->  T  C_ 
 om )   &    |-  ( ( ph  /\  x  e.  A ) 
 ->  A. n  e.  om DECID  n  e.  T )   &    |-  ( ( ph  /\  x  e.  A ) 
 ->  G : T -onto-> B )   &    |-  ( ph  ->  J : om
 -1-1-onto-> ( om  X.  om )
 )   &    |-  U  =  { z  e.  om  |  ( ( 1st `  ( J `  z ) )  e.  S  /\  ( 2nd `  ( J `  z
 ) )  e.  [_ ( F `  ( 1st `  ( J `  z
 ) ) )  /  x ]_ T ) }   &    |-  H  =  ( n  e.  U  |->  ( [_ ( F `  ( 1st `  ( J `  n ) ) ) 
 /  x ]_ G `  ( 2nd `  ( J `  n ) ) ) )   &    |-  F/_ x H   &    |-  F/_ x U   =>    |-  ( ph  ->  H : U -onto-> U_ x  e.  A  B )
 
28-Oct-2023ctiunctlemf 12442 Lemma for ctiunct 12444. (Contributed by Jim Kingdon, 28-Oct-2023.)
 |-  ( ph  ->  S  C_ 
 om )   &    |-  ( ph  ->  A. n  e.  om DECID  n  e.  S )   &    |-  ( ph  ->  F : S -onto-> A )   &    |-  ( ( ph  /\  x  e.  A )  ->  T  C_ 
 om )   &    |-  ( ( ph  /\  x  e.  A ) 
 ->  A. n  e.  om DECID  n  e.  T )   &    |-  ( ( ph  /\  x  e.  A ) 
 ->  G : T -onto-> B )   &    |-  ( ph  ->  J : om
 -1-1-onto-> ( om  X.  om )
 )   &    |-  U  =  { z  e.  om  |  ( ( 1st `  ( J `  z ) )  e.  S  /\  ( 2nd `  ( J `  z
 ) )  e.  [_ ( F `  ( 1st `  ( J `  z
 ) ) )  /  x ]_ T ) }   &    |-  H  =  ( n  e.  U  |->  ( [_ ( F `  ( 1st `  ( J `  n ) ) ) 
 /  x ]_ G `  ( 2nd `  ( J `  n ) ) ) )   =>    |-  ( ph  ->  H : U --> U_ x  e.  A  B )
 
28-Oct-2023ctiunctlemudc 12441 Lemma for ctiunct 12444. (Contributed by Jim Kingdon, 28-Oct-2023.)
 |-  ( ph  ->  S  C_ 
 om )   &    |-  ( ph  ->  A. n  e.  om DECID  n  e.  S )   &    |-  ( ph  ->  F : S -onto-> A )   &    |-  ( ( ph  /\  x  e.  A )  ->  T  C_ 
 om )   &    |-  ( ( ph  /\  x  e.  A ) 
 ->  A. n  e.  om DECID  n  e.  T )   &    |-  ( ( ph  /\  x  e.  A ) 
 ->  G : T -onto-> B )   &    |-  ( ph  ->  J : om
 -1-1-onto-> ( om  X.  om )
 )   &    |-  U  =  { z  e.  om  |  ( ( 1st `  ( J `  z ) )  e.  S  /\  ( 2nd `  ( J `  z
 ) )  e.  [_ ( F `  ( 1st `  ( J `  z
 ) ) )  /  x ]_ T ) }   =>    |-  ( ph  ->  A. n  e.  om DECID  n  e.  U )
 
28-Oct-2023ctiunctlemuom 12440 Lemma for ctiunct 12444. (Contributed by Jim Kingdon, 28-Oct-2023.)
 |-  ( ph  ->  S  C_ 
 om )   &    |-  ( ph  ->  A. n  e.  om DECID  n  e.  S )   &    |-  ( ph  ->  F : S -onto-> A )   &    |-  ( ( ph  /\  x  e.  A )  ->  T  C_ 
 om )   &    |-  ( ( ph  /\  x  e.  A ) 
 ->  A. n  e.  om DECID  n  e.  T )   &    |-  ( ( ph  /\  x  e.  A ) 
 ->  G : T -onto-> B )   &    |-  ( ph  ->  J : om
 -1-1-onto-> ( om  X.  om )
 )   &    |-  U  =  { z  e.  om  |  ( ( 1st `  ( J `  z ) )  e.  S  /\  ( 2nd `  ( J `  z
 ) )  e.  [_ ( F `  ( 1st `  ( J `  z
 ) ) )  /  x ]_ T ) }   =>    |-  ( ph  ->  U  C_  om )
 
28-Oct-2023ctiunctlemu2nd 12439 Lemma for ctiunct 12444. (Contributed by Jim Kingdon, 28-Oct-2023.)
 |-  ( ph  ->  S  C_ 
 om )   &    |-  ( ph  ->  A. n  e.  om DECID  n  e.  S )   &    |-  ( ph  ->  F : S -onto-> A )   &    |-  ( ( ph  /\  x  e.  A )  ->  T  C_ 
 om )   &    |-  ( ( ph  /\  x  e.  A ) 
 ->  A. n  e.  om DECID  n  e.  T )   &    |-  ( ( ph  /\  x  e.  A ) 
 ->  G : T -onto-> B )   &    |-  ( ph  ->  J : om
 -1-1-onto-> ( om  X.  om )
 )   &    |-  U  =  { z  e.  om  |  ( ( 1st `  ( J `  z ) )  e.  S  /\  ( 2nd `  ( J `  z
 ) )  e.  [_ ( F `  ( 1st `  ( J `  z
 ) ) )  /  x ]_ T ) }   &    |-  ( ph  ->  N  e.  U )   =>    |-  ( ph  ->  ( 2nd `  ( J `  N ) )  e.  [_ ( F `  ( 1st `  ( J `  N ) ) ) 
 /  x ]_ T )
 
28-Oct-2023ctiunctlemu1st 12438 Lemma for ctiunct 12444. (Contributed by Jim Kingdon, 28-Oct-2023.)
 |-  ( ph  ->  S  C_ 
 om )   &    |-  ( ph  ->  A. n  e.  om DECID  n  e.  S )   &    |-  ( ph  ->  F : S -onto-> A )   &    |-  ( ( ph  /\  x  e.  A )  ->  T  C_ 
 om )   &    |-  ( ( ph  /\  x  e.  A ) 
 ->  A. n  e.  om DECID  n  e.  T )   &    |-  ( ( ph  /\  x  e.  A ) 
 ->  G : T -onto-> B )   &    |-  ( ph  ->  J : om
 -1-1-onto-> ( om  X.  om )
 )   &    |-  U  =  { z  e.  om  |  ( ( 1st `  ( J `  z ) )  e.  S  /\  ( 2nd `  ( J `  z
 ) )  e.  [_ ( F `  ( 1st `  ( J `  z
 ) ) )  /  x ]_ T ) }   &    |-  ( ph  ->  N  e.  U )   =>    |-  ( ph  ->  ( 1st `  ( J `  N ) )  e.  S )
 
28-Oct-2023pm2.521gdc 868 A general instance of Theorem *2.521 of [WhiteheadRussell] p. 107, under a decidability condition. (Contributed by BJ, 28-Oct-2023.)
 |-  (DECID 
 ph  ->  ( -.  ( ph  ->  ps )  ->  ( ch  ->  ph ) ) )
 
28-Oct-2023stdcndc 845 A formula is decidable if and only if its negation is decidable and it is stable (that is, it is testable and stable). (Contributed by David A. Wheeler, 13-Aug-2018.) (Proof shortened by BJ, 28-Oct-2023.)
 |-  ( (STAB 
 ph  /\ DECID  -.  ph )  <-> DECID  ph )
 
28-Oct-2023conax1k 654 Weakening of conax1 653. General instance of pm2.51 655 and of pm2.52 656. (Contributed by BJ, 28-Oct-2023.)
 |-  ( -.  ( ph  ->  ps )  ->  ( ch  ->  -.  ps )
 )
 
28-Oct-2023conax1 653 Contrapositive of ax-1 6. (Contributed by BJ, 28-Oct-2023.)
 |-  ( -.  ( ph  ->  ps )  ->  -.  ps )
 
25-Oct-2023divcnap 14216 Complex number division is a continuous function, when the second argument is apart from zero. (Contributed by Mario Carneiro, 12-Aug-2014.) (Revised by Jim Kingdon, 25-Oct-2023.)
 |-  J  =  ( MetOpen `  ( abs  o.  -  )
 )   &    |-  K  =  ( Jt  { x  e.  CC  |  x #  0 } )   =>    |-  ( y  e.  CC ,  z  e.  { x  e.  CC  |  x #  0 }  |->  ( y  /  z ) )  e.  ( ( J  tX  K )  Cn  J )
 
23-Oct-2023cnm 7834 A complex number is an inhabited set. Note: do not use this after the real number axioms are developed, since it is a construction-dependent property. (Contributed by Jim Kingdon, 23-Oct-2023.) (New usage is discouraged.)
 |-  ( A  e.  CC  ->  E. x  x  e.  A )
 
23-Oct-2023oprssdmm 6175 Domain of closure of an operation. (Contributed by Jim Kingdon, 23-Oct-2023.)
 |-  ( ( ph  /\  u  e.  S )  ->  E. v  v  e.  u )   &    |-  (
 ( ph  /\  ( x  e.  S  /\  y  e.  S ) )  ->  ( x F y )  e.  S )   &    |-  ( ph  ->  Rel  F )   =>    |-  ( ph  ->  ( S  X.  S )  C_  dom  F )
 
22-Oct-2023addcncntoplem 14212 Lemma for addcncntop 14213, subcncntop 14214, and mulcncntop 14215. (Contributed by Mario Carneiro, 5-May-2014.) (Revised by Jim Kingdon, 22-Oct-2023.)
 |-  J  =  ( MetOpen `  ( abs  o.  -  )
 )   &    |- 
 .+  : ( CC 
 X.  CC ) --> CC   &    |-  (
 ( a  e.  RR+  /\  b  e.  CC  /\  c  e.  CC )  ->  E. y  e.  RR+  E. z  e.  RR+  A. u  e.  CC  A. v  e. 
 CC  ( ( ( abs `  ( u  -  b ) )  < 
 y  /\  ( abs `  ( v  -  c
 ) )  <  z
 )  ->  ( abs `  ( ( u  .+  v )  -  (
 b  .+  c )
 ) )  <  a
 ) )   =>    |- 
 .+  e.  ( ( J  tX  J )  Cn  J )
 
22-Oct-2023txmetcnp 14179 Continuity of a binary operation on metric spaces. (Contributed by Mario Carneiro, 2-Sep-2015.) (Revised by Jim Kingdon, 22-Oct-2023.)
 |-  J  =  ( MetOpen `  C )   &    |-  K  =  (
 MetOpen `  D )   &    |-  L  =  ( MetOpen `  E )   =>    |-  (
 ( ( C  e.  ( *Met `  X )  /\  D  e.  ( *Met `  Y )  /\  E  e.  ( *Met `  Z ) ) 
 /\  ( A  e.  X  /\  B  e.  Y ) )  ->  ( F  e.  ( ( ( J  tX  K )  CnP  L ) `  <. A ,  B >. )  <->  ( F :
 ( X  X.  Y )
 --> Z  /\  A. z  e.  RR+  E. w  e.  RR+  A. u  e.  X  A. v  e.  Y  ( ( ( A C u )  <  w  /\  ( B D v )  <  w )  ->  ( ( A F B ) E ( u F v ) )  <  z ) ) ) )
 
22-Oct-2023xmetxpbl 14169 The maximum metric (Chebyshev distance) on the product of two sets, expressed in terms of balls centered on a point  C with radius  R. (Contributed by Jim Kingdon, 22-Oct-2023.)
 |-  P  =  ( u  e.  ( X  X.  Y ) ,  v  e.  ( X  X.  Y )  |->  sup ( { (
 ( 1st `  u ) M ( 1st `  v
 ) ) ,  (
 ( 2nd `  u ) N ( 2nd `  v
 ) ) } ,  RR*
 ,  <  ) )   &    |-  ( ph  ->  M  e.  ( *Met `  X )
 )   &    |-  ( ph  ->  N  e.  ( *Met `  Y ) )   &    |-  ( ph  ->  R  e.  RR* )   &    |-  ( ph  ->  C  e.  ( X  X.  Y ) )   =>    |-  ( ph  ->  ( C ( ball `  P ) R )  =  ( ( ( 1st `  C ) ( ball `  M ) R )  X.  (
 ( 2nd `  C )
 ( ball `  N ) R ) ) )
 
15-Oct-2023xmettxlem 14170 Lemma for xmettx 14171. (Contributed by Jim Kingdon, 15-Oct-2023.)
 |-  P  =  ( u  e.  ( X  X.  Y ) ,  v  e.  ( X  X.  Y )  |->  sup ( { (
 ( 1st `  u ) M ( 1st `  v
 ) ) ,  (
 ( 2nd `  u ) N ( 2nd `  v
 ) ) } ,  RR*
 ,  <  ) )   &    |-  ( ph  ->  M  e.  ( *Met `  X )
 )   &    |-  ( ph  ->  N  e.  ( *Met `  Y ) )   &    |-  J  =  (
 MetOpen `  M )   &    |-  K  =  ( MetOpen `  N )   &    |-  L  =  ( MetOpen `  P )   =>    |-  ( ph  ->  L  C_  ( J  tX  K ) )
 
11-Oct-2023xmettx 14171 The maximum metric (Chebyshev distance) on the product of two sets, expressed as a binary topological product. (Contributed by Jim Kingdon, 11-Oct-2023.)
 |-  P  =  ( u  e.  ( X  X.  Y ) ,  v  e.  ( X  X.  Y )  |->  sup ( { (
 ( 1st `  u ) M ( 1st `  v
 ) ) ,  (
 ( 2nd `  u ) N ( 2nd `  v
 ) ) } ,  RR*
 ,  <  ) )   &    |-  ( ph  ->  M  e.  ( *Met `  X )
 )   &    |-  ( ph  ->  N  e.  ( *Met `  Y ) )   &    |-  J  =  (
 MetOpen `  M )   &    |-  K  =  ( MetOpen `  N )   &    |-  L  =  ( MetOpen `  P )   =>    |-  ( ph  ->  L  =  ( J  tX  K )
 )
 
11-Oct-2023xmetxp 14168 The maximum metric (Chebyshev distance) on the product of two sets. (Contributed by Jim Kingdon, 11-Oct-2023.)
 |-  P  =  ( u  e.  ( X  X.  Y ) ,  v  e.  ( X  X.  Y )  |->  sup ( { (
 ( 1st `  u ) M ( 1st `  v
 ) ) ,  (
 ( 2nd `  u ) N ( 2nd `  v
 ) ) } ,  RR*
 ,  <  ) )   &    |-  ( ph  ->  M  e.  ( *Met `  X )
 )   &    |-  ( ph  ->  N  e.  ( *Met `  Y ) )   =>    |-  ( ph  ->  P  e.  ( *Met `  ( X  X.  Y ) ) )
 
7-Oct-2023df-iress 12473 Define a multifunction restriction operator for extensible structures, which can be used to turn statements about rings into statements about subrings, modules into submodules, etc. This definition knows nothing about individual structures and merely truncates the  Base set while leaving operators alone; individual kinds of structures will need to handle this behavior, by ignoring operators' values outside the range, defining a function using the base set and applying that, or explicitly truncating the slot before use.

(Credit for this operator, as well as the 2023 modification for iset.mm, goes to Mario Carneiro.)

(Contributed by Stefan O'Rear, 29-Nov-2014.) (Revised by Jim Kingdon, 7-Oct-2023.)

 |-s  =  ( w  e.  _V ,  x  e.  _V  |->  ( w sSet  <. ( Base ` 
 ndx ) ,  ( x  i^i  ( Base `  w ) ) >. ) )
 
29-Sep-2023syl2anc2 412 Double syllogism inference combined with contraction. (Contributed by BTernaryTau, 29-Sep-2023.)
 |-  ( ph  ->  ps )   &    |-  ( ps  ->  ch )   &    |-  ( ( ps 
 /\  ch )  ->  th )   =>    |-  ( ph  ->  th )
 
27-Sep-2023fnpr2ob 12766 Biconditional version of fnpr2o 12765. (Contributed by Jim Kingdon, 27-Sep-2023.)
 |-  ( ( A  e.  _V 
 /\  B  e.  _V ) 
 <->  { <. (/) ,  A >. , 
 <. 1o ,  B >. }  Fn  2o )
 
25-Sep-2023xpsval 12778 Value of the binary structure product function. (Contributed by Mario Carneiro, 14-Aug-2015.) (Revised by Jim Kingdon, 25-Sep-2023.)
 |-  T  =  ( R  X.s  S )   &    |-  X  =  (
 Base `  R )   &    |-  Y  =  ( Base `  S )   &    |-  ( ph  ->  R  e.  V )   &    |-  ( ph  ->  S  e.  W )   &    |-  F  =  ( x  e.  X ,  y  e.  Y  |->  { <. (/) ,  x >. ,  <. 1o ,  y >. } )   &    |-  G  =  (Scalar `  R )   &    |-  U  =  ( G X_s { <. (/) ,  R >. , 
 <. 1o ,  S >. } )   =>    |-  ( ph  ->  T  =  ( `' F  "s  U ) )
 
25-Sep-2023fvpr1o 12768 The value of a function with a domain of (at most) two elements. (Contributed by Jim Kingdon, 25-Sep-2023.)
 |-  ( B  e.  V  ->  ( { <. (/) ,  A >. ,  <. 1o ,  B >. } `  1o )  =  B )
 
25-Sep-2023fvpr0o 12767 The value of a function with a domain of (at most) two elements. (Contributed by Jim Kingdon, 25-Sep-2023.)
 |-  ( A  e.  V  ->  ( { <. (/) ,  A >. ,  <. 1o ,  B >. } `  (/) )  =  A )
 
25-Sep-2023fnpr2o 12765 Function with a domain of  2o. (Contributed by Jim Kingdon, 25-Sep-2023.)
 |-  ( ( A  e.  V  /\  B  e.  W )  ->  { <. (/) ,  A >. ,  <. 1o ,  B >. }  Fn  2o )
 
25-Sep-2023df-xps 12731 Define a binary product on structures. (Contributed by Mario Carneiro, 14-Aug-2015.) (Revised by Jim Kingdon, 25-Sep-2023.)
 |- 
 X.s 
 =  ( r  e. 
 _V ,  s  e. 
 _V  |->  ( `' ( x  e.  ( Base `  r ) ,  y  e.  ( Base `  s )  |->  { <. (/) ,  x >. , 
 <. 1o ,  y >. } )  "s  ( (Scalar `  r
 ) X_s { <. (/) ,  r >. , 
 <. 1o ,  s >. } ) ) )
 
12-Sep-2023pwntru 4201 A slight strengthening of pwtrufal 14909. (Contributed by Mario Carneiro and Jim Kingdon, 12-Sep-2023.)
 |-  ( ( A  C_  { (/) }  /\  A  =/=  { (/) } )  ->  A  =  (/) )
 
11-Sep-2023pwtrufal 14909 A subset of the singleton  { (/) } cannot be anything other than  (/) or  { (/) }. Removing the double negation would change the meaning, as seen at exmid01 4200. If we view a subset of a singleton as a truth value (as seen in theorems like exmidexmid 4198), then this theorem states there are no truth values other than true and false, as described in section 1.1 of [Bauer], p. 481. (Contributed by Mario Carneiro and Jim Kingdon, 11-Sep-2023.)
 |-  ( A  C_  { (/) }  ->  -. 
 -.  ( A  =  (/) 
 \/  A  =  { (/)
 } ) )
 
9-Sep-2023mathbox 14645 (This theorem is a dummy placeholder for these guidelines. The label of this theorem, "mathbox", is hard-coded into the Metamath program to identify the start of the mathbox section for web page generation.)

A "mathbox" is a user-contributed section that is maintained by its contributor independently from the main part of iset.mm.

For contributors:

By making a contribution, you agree to release it into the public domain, according to the statement at the beginning of iset.mm.

Guidelines:

Mathboxes in iset.mm follow the same practices as in set.mm, so refer to the mathbox guidelines there for more details.

(Contributed by NM, 20-Feb-2007.) (Revised by the Metamath team, 9-Sep-2023.) (New usage is discouraged.)

 |-  ph   =>    |-  ph
 
6-Sep-2023djuexb 7046 The disjoint union of two classes is a set iff both classes are sets. (Contributed by Jim Kingdon, 6-Sep-2023.)
 |-  ( ( A  e.  _V 
 /\  B  e.  _V ) 
 <->  ( A B )  e.  _V )
 
3-Sep-2023pwf1oexmid 14911 An exercise related to  N copies of a singleton and the power set of a singleton (where the latter can also be thought of as representing truth values). Posed as an exercise by Martin Escardo online. (Contributed by Jim Kingdon, 3-Sep-2023.)
 |-  T  =  U_ x  e.  N  ( { x }  X.  1o )   =>    |-  ( ( N  e.  om 
 /\  G : T -1-1-> ~P 1o )  ->  ( ran  G  =  ~P 1o  <->  ( N  =  2o  /\ EXMID ) ) )
 
3-Sep-2023pwle2 14910 An exercise related to  N copies of a singleton and the power set of a singleton (where the latter can also be thought of as representing truth values). Posed as an exercise by Martin Escardo online. (Contributed by Jim Kingdon, 3-Sep-2023.)
 |-  T  =  U_ x  e.  N  ( { x }  X.  1o )   =>    |-  ( ( N  e.  om 
 /\  G : T -1-1-> ~P 1o )  ->  N  C_ 
 2o )
 
30-Aug-2023isomninn 14941 Omniscience stated in terms of natural numbers. Similar to isomnimap 7138 but it will sometimes be more convenient to use  0 and  1 rather than  (/) and  1o. (Contributed by Jim Kingdon, 30-Aug-2023.)
 |-  ( A  e.  V  ->  ( A  e. Omni  <->  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 )
 ) )
 
30-Aug-2023isomninnlem 14940 Lemma for isomninn 14941. The result, with a hypothesis to provide a convenient notation. (Contributed by Jim Kingdon, 30-Aug-2023.)
 |-  G  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   =>    |-  ( A  e.  V  ->  ( A  e. Omni  <->  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 )
 ) )
 
28-Aug-2023trilpolemisumle 14948 Lemma for trilpo 14953. An upper bound for the sum of the digits beyond a certain point. (Contributed by Jim Kingdon, 28-Aug-2023.)
 |-  ( ph  ->  F : NN --> { 0 ,  1 } )   &    |-  A  =  sum_ i  e.  NN  ( ( 1  /  ( 2 ^ i ) )  x.  ( F `  i ) )   &    |-  Z  =  ( ZZ>= `  M )   &    |-  ( ph  ->  M  e.  NN )   =>    |-  ( ph  ->  sum_ i  e.  Z  ( ( 1 
 /  ( 2 ^
 i ) )  x.  ( F `  i
 ) )  <_  sum_ i  e.  Z  ( 1  /  ( 2 ^ i
 ) ) )
 
25-Aug-2023cvgcmp2n 14943 A comparison test for convergence of a real infinite series. (Contributed by Jim Kingdon, 25-Aug-2023.)
 |-  (
 ( ph  /\  k  e. 
 NN )  ->  ( G `  k )  e. 
 RR )   &    |-  ( ( ph  /\  k  e.  NN )  ->  0  <_  ( G `  k ) )   &    |-  (
 ( ph  /\  k  e. 
 NN )  ->  ( G `  k )  <_  ( 1  /  (
 2 ^ k ) ) )   =>    |-  ( ph  ->  seq 1
 (  +  ,  G )  e.  dom  ~~>  )
 
25-Aug-2023cvgcmp2nlemabs 14942 Lemma for cvgcmp2n 14943. The partial sums get closer to each other as we go further out. The proof proceeds by rewriting  (  seq 1
(  +  ,  G
) `  N ) as the sum of  (  seq 1
(  +  ,  G
) `  M ) and a term which gets smaller as  M gets large. (Contributed by Jim Kingdon, 25-Aug-2023.)
 |-  (
 ( ph  /\  k  e. 
 NN )  ->  ( G `  k )  e. 
 RR )   &    |-  ( ( ph  /\  k  e.  NN )  ->  0  <_  ( G `  k ) )   &    |-  (
 ( ph  /\  k  e. 
 NN )  ->  ( G `  k )  <_  ( 1  /  (
 2 ^ k ) ) )   &    |-  ( ph  ->  M  e.  NN )   &    |-  ( ph  ->  N  e.  ( ZZ>=
 `  M ) )   =>    |-  ( ph  ->  ( abs `  ( (  seq 1
 (  +  ,  G ) `  N )  -  (  seq 1 (  +  ,  G ) `  M ) ) )  < 
 ( 2  /  M ) )
 
24-Aug-2023trilpolemclim 14946 Lemma for trilpo 14953. Convergence of the series. (Contributed by Jim Kingdon, 24-Aug-2023.)
 |-  ( ph  ->  F : NN --> { 0 ,  1 } )   &    |-  G  =  ( n  e.  NN  |->  ( ( 1  /  (
 2 ^ n ) )  x.  ( F `
  n ) ) )   =>    |-  ( ph  ->  seq 1
 (  +  ,  G )  e.  dom  ~~>  )
 
23-Aug-2023trilpo 14953 Real number trichotomy implies the Limited Principle of Omniscience (LPO). We expect that we'd need some form of countable choice to prove the converse.

Here's the outline of the proof. Given an infinite sequence F of zeroes and ones, we need to show the sequence contains a zero or it is all ones. Construct a real number A whose representation in base two consists of a zero, a decimal point, and then the numbers of the sequence. Compare it with one using trichotomy. The three cases from trichotomy are trilpolemlt1 14951 (which means the sequence contains a zero), trilpolemeq1 14950 (which means the sequence is all ones), and trilpolemgt1 14949 (which is not possible).

Equivalent ways to state real number trichotomy (sometimes called "analytic LPO") include decidability of real number apartness (see triap 14939) or that the real numbers are a discrete field (see trirec0 14954).

LPO is known to not be provable in IZF (and most constructive foundations), so this theorem establishes that we will be unable to prove an analogue to qtri3or 10246 for real numbers. (Contributed by Jim Kingdon, 23-Aug-2023.)

 |-  ( A. x  e.  RR  A. y  e.  RR  ( x  <  y  \/  x  =  y  \/  y  <  x )  ->  om  e. Omni )
 
23-Aug-2023trilpolemres 14952 Lemma for trilpo 14953. The result. (Contributed by Jim Kingdon, 23-Aug-2023.)
 |-  ( ph  ->  F : NN --> { 0 ,  1 } )   &    |-  A  =  sum_ i  e.  NN  ( ( 1  /  ( 2 ^ i ) )  x.  ( F `  i ) )   &    |-  ( ph  ->  ( A  <  1  \/  A  =  1  \/  1  <  A ) )   =>    |-  ( ph  ->  ( E. x  e.  NN  ( F `  x )  =  0  \/  A. x  e.  NN  ( F `  x )  =  1 ) )
 
23-Aug-2023trilpolemlt1 14951 Lemma for trilpo 14953. The  A  <  1 case. We can use the distance between  A and one (that is,  1  -  A) to find a position in the sequence  n where terms after that point will not add up to as much as  1  -  A. By finomni 7141 we know the terms up to  n either contain a zero or are all one. But if they are all one that contradicts the way we constructed  n, so we know that the sequence contains a zero. (Contributed by Jim Kingdon, 23-Aug-2023.)
 |-  ( ph  ->  F : NN --> { 0 ,  1 } )   &    |-  A  =  sum_ i  e.  NN  ( ( 1  /  ( 2 ^ i ) )  x.  ( F `  i ) )   &    |-  ( ph  ->  A  <  1
 )   =>    |-  ( ph  ->  E. x  e.  NN  ( F `  x )  =  0
 )
 
23-Aug-2023trilpolemeq1 14950 Lemma for trilpo 14953. The  A  =  1 case. This is proved by noting that if any  ( F `  x
) is zero, then the infinite sum  A is less than one based on the term which is zero. We are using the fact that the  F sequence is decidable (in the sense that each element is either zero or one). (Contributed by Jim Kingdon, 23-Aug-2023.)
 |-  ( ph  ->  F : NN --> { 0 ,  1 } )   &    |-  A  =  sum_ i  e.  NN  ( ( 1  /  ( 2 ^ i ) )  x.  ( F `  i ) )   &    |-  ( ph  ->  A  =  1 )   =>    |-  ( ph  ->  A. x  e.  NN  ( F `  x )  =  1
 )
 
23-Aug-2023trilpolemgt1 14949 Lemma for trilpo 14953. The  1  <  A case. (Contributed by Jim Kingdon, 23-Aug-2023.)
 |-  ( ph  ->  F : NN --> { 0 ,  1 } )   &    |-  A  =  sum_ i  e.  NN  ( ( 1  /  ( 2 ^ i ) )  x.  ( F `  i ) )   =>    |-  ( ph  ->  -.  1  <  A )
 
23-Aug-2023trilpolemcl 14947 Lemma for trilpo 14953. The sum exists. (Contributed by Jim Kingdon, 23-Aug-2023.)
 |-  ( ph  ->  F : NN --> { 0 ,  1 } )   &    |-  A  =  sum_ i  e.  NN  ( ( 1  /  ( 2 ^ i ) )  x.  ( F `  i ) )   =>    |-  ( ph  ->  A  e.  RR )
 
23-Aug-2023triap 14939 Two ways of stating real number trichotomy. (Contributed by Jim Kingdon, 23-Aug-2023.)
 |-  (
 ( A  e.  RR  /\  B  e.  RR )  ->  ( ( A  <  B  \/  A  =  B  \/  B  <  A )  <-> DECID  A #  B ) )
 
19-Aug-2023djuenun 7214 Disjoint union is equinumerous to union for disjoint sets. (Contributed by Mario Carneiro, 29-Apr-2015.) (Revised by Jim Kingdon, 19-Aug-2023.)
 |-  ( ( A  ~~  B  /\  C  ~~  D  /\  ( B  i^i  D )  =  (/) )  ->  ( A C )  ~~  ( B  u.  D ) )
 
16-Aug-2023ctssdclemr 7114 Lemma for ctssdc 7115. Showing that our usual definition of countable implies the alternate one. (Contributed by Jim Kingdon, 16-Aug-2023.)
 |-  ( E. f  f : om -onto-> ( A 1o )  ->  E. s
 ( s  C_  om  /\  E. f  f : s
 -onto-> A  /\  A. n  e.  om DECID  n  e.  s ) )
 
16-Aug-2023ctssdclemn0 7112 Lemma for ctssdc 7115. The  -.  (/)  e.  S case. (Contributed by Jim Kingdon, 16-Aug-2023.)
 |-  ( ph  ->  S  C_ 
 om )   &    |-  ( ph  ->  A. n  e.  om DECID  n  e.  S )   &    |-  ( ph  ->  F : S -onto-> A )   &    |-  ( ph  ->  -.  (/)  e.  S )   =>    |-  ( ph  ->  E. g  g : om -onto-> ( A 1o ) )
 
15-Aug-2023ctssexmid 7151 The decidability condition in ctssdc 7115 is needed. More specifically, ctssdc 7115 minus that condition, plus the Limited Principle of Omniscience (LPO), implies excluded middle. (Contributed by Jim Kingdon, 15-Aug-2023.)
 |-  ( ( y  C_  om 
 /\  E. f  f : y -onto-> x )  ->  E. f  f : om -onto-> ( x 1o ) )   &    |-  om  e. Omni   =>    |-  ( ph  \/  -.  ph )
 
15-Aug-2023ctssdc 7115 A set is countable iff there is a surjection from a decidable subset of the natural numbers onto it. The decidability condition is needed as shown at ctssexmid 7151. (Contributed by Jim Kingdon, 15-Aug-2023.)
 |-  ( E. s ( s  C_  om  /\  E. f  f : s -onto-> A 
 /\  A. n  e.  om DECID  n  e.  s )  <->  E. f  f : om -onto-> ( A 1o )
 )
 
14-Aug-2023mpoexw 6217 Weak version of mpoex 6218 that holds without ax-coll 4120. If the domain and codomain of an operation given by maps-to notation are sets, the operation is a set. (Contributed by Rohan Ridenour, 14-Aug-2023.)
 |-  A  e.  _V   &    |-  B  e.  _V   &    |-  D  e.  _V   &    |-  A. x  e.  A  A. y  e.  B  C  e.  D   =>    |-  ( x  e.  A ,  y  e.  B  |->  C )  e.  _V
 
13-Aug-2023grpinvfvalg 12922 The inverse function of a group. (Contributed by NM, 24-Aug-2011.) (Revised by Mario Carneiro, 7-Aug-2013.) (Revised by Rohan Ridenour, 13-Aug-2023.)
 |-  B  =  ( Base `  G )   &    |-  .+  =  ( +g  `  G )   &    |-  .0.  =  ( 0g `  G )   &    |-  N  =  ( invg `  G )   =>    |-  ( G  e.  V  ->  N  =  ( x  e.  B  |->  ( iota_ y  e.  B  ( y 
 .+  x )  =  .0.  ) ) )
 
13-Aug-2023ltntri 8088 Negative trichotomy property for real numbers. It is well known that we cannot prove real number trichotomy,  A  <  B  \/  A  =  B  \/  B  <  A. Does that mean there is a pair of real numbers where none of those hold (that is, where we can refute each of those three relationships)? Actually, no, as shown here. This is another example of distinguishing between being unable to prove something, or being able to refute it. (Contributed by Jim Kingdon, 13-Aug-2023.)
 |-  ( ( A  e.  RR  /\  B  e.  RR )  ->  -.  ( -.  A  <  B  /\  -.  A  =  B  /\  -.  B  <  A ) )
 
13-Aug-2023mptexw 6117 Weak version of mptex 5745 that holds without ax-coll 4120. If the domain and codomain of a function given by maps-to notation are sets, the function is a set. (Contributed by Rohan Ridenour, 13-Aug-2023.)
 |-  A  e.  _V   &    |-  C  e.  _V   &    |-  A. x  e.  A  B  e.  C   =>    |-  ( x  e.  A  |->  B )  e.  _V
 
13-Aug-2023funexw 6116 Weak version of funex 5742 that holds without ax-coll 4120. If the domain and codomain of a function exist, so does the function. (Contributed by Rohan Ridenour, 13-Aug-2023.)
 |-  ( ( Fun  F  /\  dom  F  e.  B  /\  ran  F  e.  C )  ->  F  e.  _V )
 
11-Aug-2023qnnen 12435 The rational numbers are countably infinite. Corollary 8.1.23 of [AczelRathjen], p. 75. This is Metamath 100 proof #3. (Contributed by Jim Kingdon, 11-Aug-2023.)
 |- 
 QQ  ~~  NN
 
10-Aug-2023ctinfomlemom 12431 Lemma for ctinfom 12432. Converting between  om and  NN0. (Contributed by Jim Kingdon, 10-Aug-2023.)
 |-  N  = frec ( ( x  e.  ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  G  =  ( F  o.  `' N )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e. 
 om  E. k  e.  om  -.  ( F `  k
 )  e.  ( F
 " n ) )   =>    |-  ( ph  ->  ( G : NN0 -onto-> A  /\  A. m  e.  NN0  E. j  e. 
 NN0  A. i  e.  (
 0 ... m ) ( G `  j )  =/=  ( G `  i ) ) )
 
9-Aug-2023difinfsnlem 7101 Lemma for difinfsn 7102. The case where we need to swap  B and  (inr `  (/) ) in building the mapping  G. (Contributed by Jim Kingdon, 9-Aug-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  B  e.  A )   &    |-  ( ph  ->  F : ( om 1o ) -1-1-> A )   &    |-  ( ph  ->  ( F `  (inr `  (/) ) )  =/=  B )   &    |-  G  =  ( n  e.  om  |->  if (
 ( F `  (inl `  n ) )  =  B ,  ( F `
  (inr `  (/) ) ) ,  ( F `  (inl `  n ) ) ) )   =>    |-  ( ph  ->  G : om -1-1-> ( A  \  { B } ) )
 
8-Aug-2023difinfinf 7103 An infinite set minus a finite subset is infinite. We require that the set has decidable equality. (Contributed by Jim Kingdon, 8-Aug-2023.)
 |-  ( ( ( A. x  e.  A  A. y  e.  A DECID  x  =  y  /\  om  ~<_  A )  /\  ( B  C_  A  /\  B  e.  Fin ) )  ->  om 
 ~<_  ( A  \  B ) )
 
8-Aug-2023difinfsn 7102 An infinite set minus one element is infinite. We require that the set has decidable equality. (Contributed by Jim Kingdon, 8-Aug-2023.)
 |-  ( ( A. x  e.  A  A. y  e.  A DECID  x  =  y  /\  om  ~<_  A  /\  B  e.  A )  ->  om  ~<_  ( A 
 \  { B }
 ) )
 
7-Aug-2023ctinf 12434 A set is countably infinite if and only if it has decidable equality, is countable, and is infinite. (Contributed by Jim Kingdon, 7-Aug-2023.)
 |-  ( A  ~~  NN  <->  ( A. x  e.  A  A. y  e.  A DECID  x  =  y  /\  E. f  f : om -onto-> A  /\  om  ~<_  A ) )
 
7-Aug-2023inffinp1 12433 An infinite set contains an element not contained in a given finite subset. (Contributed by Jim Kingdon, 7-Aug-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  om  ~<_  A )   &    |-  ( ph  ->  B  C_  A )   &    |-  ( ph  ->  B  e.  Fin )   =>    |-  ( ph  ->  E. x  e.  A  -.  x  e.  B )
 
7-Aug-2023ctinfom 12432 A condition for a set being countably infinite. Restates ennnfone 12429 in terms of  om and function image. Like ennnfone 12429 the condition can be summarized as  A being countable, infinite, and having decidable equality. (Contributed by Jim Kingdon, 7-Aug-2023.)
 |-  ( A  ~~  NN  <->  ( A. x  e.  A  A. y  e.  A DECID  x  =  y  /\  E. f
 ( f : om -onto-> A  /\  A. n  e. 
 om  E. k  e.  om  -.  ( f `  k
 )  e.  ( f
 " n ) ) ) )
 
6-Aug-2023rerestcntop 14211 The subspace topology induced by a subset of the reals. (Contributed by Mario Carneiro, 13-Aug-2014.) (Revised by Jim Kingdon, 6-Aug-2023.)
 |-  J  =  ( MetOpen `  ( abs  o.  -  )
 )   &    |-  R  =  ( topGen `  ran  (,) )   =>    |-  ( A  C_  RR  ->  ( Jt  A )  =  ( Rt  A ) )
 
6-Aug-2023tgioo2cntop 14210 The standard topology on the reals is a subspace of the complex metric topology. (Contributed by Mario Carneiro, 13-Aug-2014.) (Revised by Jim Kingdon, 6-Aug-2023.)
 |-  J  =  ( MetOpen `  ( abs  o.  -  )
 )   =>    |-  ( topGen `  ran  (,) )  =  ( Jt  RR )
 
4-Aug-2023nninffeq 14931 Equality of two functions on ℕ which agree at every integer and at the point at infinity. From an online post by Martin Escardo. Remark: the last two hypotheses can be grouped into one,  |-  ( ph  ->  A. n  e.  suc  om
... ). (Contributed by Jim Kingdon, 4-Aug-2023.)
 |-  ( ph  ->  F : --> NN0 )   &    |-  ( ph  ->  G : --> NN0 )   &    |-  ( ph  ->  ( F `  ( x  e.  om  |->  1o )
 )  =  ( G `
  ( x  e. 
 om  |->  1o ) ) )   &    |-  ( ph  ->  A. n  e. 
 om  ( F `  ( i  e.  om  |->  if ( i  e.  n ,  1o ,  (/) ) ) )  =  ( G `
  ( i  e. 
 om  |->  if ( i  e.  n ,  1o ,  (/) ) ) ) )   =>    |-  ( ph  ->  F  =  G )
 
3-Aug-2023txvalex 13915 Existence of the binary topological product. If  R and 
S are known to be topologies, see txtop 13921. (Contributed by Jim Kingdon, 3-Aug-2023.)
 |-  ( ( R  e.  V  /\  S  e.  W )  ->  ( R  tX  S )  e.  _V )
 
3-Aug-2023ablgrpd 13105 An Abelian group is a group, deduction form of ablgrp 13104. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  ( ph  ->  G  e.  Abel )   =>    |-  ( ph  ->  G  e.  Grp )
 
3-Aug-20231nsgtrivd 13089 A group with exactly one normal subgroup is trivial. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  B  =  ( Base `  G )   &    |-  .0.  =  ( 0g `  G )   &    |-  ( ph  ->  G  e.  Grp )   &    |-  ( ph  ->  (NrmSGrp `  G )  ~~  1o )   =>    |-  ( ph  ->  B  =  {  .0.  } )
 
3-Aug-2023triv1nsgd 13088 A trivial group has exactly one normal subgroup. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  B  =  ( Base `  G )   &    |-  .0.  =  ( 0g `  G )   &    |-  ( ph  ->  G  e.  Grp )   &    |-  ( ph  ->  B  =  {  .0.  }
 )   =>    |-  ( ph  ->  (NrmSGrp `  G )  ~~  1o )
 
3-Aug-2023trivnsgd 13087 The only normal subgroup of a trivial group is itself. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  B  =  ( Base `  G )   &    |-  .0.  =  ( 0g `  G )   &    |-  ( ph  ->  G  e.  Grp )   &    |-  ( ph  ->  B  =  {  .0.  }
 )   =>    |-  ( ph  ->  (NrmSGrp `  G )  =  { B } )
 
3-Aug-20230idnsgd 13086 The whole group and the zero subgroup are normal subgroups of a group. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  B  =  ( Base `  G )   &    |-  .0.  =  ( 0g `  G )   &    |-  ( ph  ->  G  e.  Grp )   =>    |-  ( ph  ->  { {  .0.  } ,  B }  C_  (NrmSGrp `  G )
 )
 
3-Aug-2023trivsubgsnd 13071 The only subgroup of a trivial group is itself. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  B  =  ( Base `  G )   &    |-  .0.  =  ( 0g `  G )   &    |-  ( ph  ->  G  e.  Grp )   &    |-  ( ph  ->  B  =  {  .0.  }
 )   =>    |-  ( ph  ->  (SubGrp `  G )  =  { B } )
 
3-Aug-2023trivsubgd 13070 The only subgroup of a trivial group is itself. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  B  =  ( Base `  G )   &    |-  .0.  =  ( 0g `  G )   &    |-  ( ph  ->  G  e.  Grp )   &    |-  ( ph  ->  B  =  {  .0.  }
 )   &    |-  ( ph  ->  A  e.  (SubGrp `  G )
 )   =>    |-  ( ph  ->  A  =  B )
 
3-Aug-2023mulgcld 13015 Deduction associated with mulgcl 13010. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  B  =  ( Base `  G )   &    |-  .x.  =  (.g `  G )   &    |-  ( ph  ->  G  e.  Grp )   &    |-  ( ph  ->  N  e.  ZZ )   &    |-  ( ph  ->  X  e.  B )   =>    |-  ( ph  ->  ( N  .x.  X )  e.  B )
 
3-Aug-2023hashfingrpnn 12916 A finite group has positive integer size. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  B  =  ( Base `  G )   &    |-  ( ph  ->  G  e.  Grp )   &    |-  ( ph  ->  B  e.  Fin )   =>    |-  ( ph  ->  ( `  B )  e.  NN )
 
3-Aug-2023hashfinmndnn 12840 A finite monoid has positive integer size. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  B  =  ( Base `  G )   &    |-  ( ph  ->  G  e.  Mnd )   &    |-  ( ph  ->  B  e.  Fin )   =>    |-  ( ph  ->  ( `  B )  e.  NN )
 
3-Aug-2023dvdsgcdidd 11998 The greatest common divisor of a positive integer and another integer it divides is itself. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  ( ph  ->  M  e.  NN )   &    |-  ( ph  ->  N  e.  ZZ )   &    |-  ( ph  ->  M  ||  N )   =>    |-  ( ph  ->  ( M  gcd  N )  =  M )
 
3-Aug-2023gcdmultipled 11997 The greatest common divisor of a nonnegative integer  M and a multiple of it is  M itself. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  ( ph  ->  M  e.  NN0 )   &    |-  ( ph  ->  N  e.  ZZ )   =>    |-  ( ph  ->  ( M  gcd  ( N  x.  M ) )  =  M )
 
3-Aug-2023fihashelne0d 10780 A finite set with an element has nonzero size. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  ( ph  ->  B  e.  A )   &    |-  ( ph  ->  A  e.  Fin )   =>    |-  ( ph  ->  -.  ( `  A )  =  0 )
 
3-Aug-2023phpeqd 6935 Corollary of the Pigeonhole Principle using equality. Strengthening of phpm 6868 expressed without negation. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  ( ph  ->  A  e.  Fin )   &    |-  ( ph  ->  B 
 C_  A )   &    |-  ( ph  ->  A  ~~  B )   =>    |-  ( ph  ->  A  =  B )
 
3-Aug-2023enpr2d 6820 A pair with distinct elements is equinumerous to ordinal two. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  ( ph  ->  A  e.  C )   &    |-  ( ph  ->  B  e.  D )   &    |-  ( ph  ->  -.  A  =  B )   =>    |-  ( ph  ->  { A ,  B }  ~~  2o )
 
3-Aug-2023elrnmpt2d 4884 Elementhood in the range of a function in maps-to notation, deduction form. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  F  =  ( x  e.  A  |->  B )   &    |-  ( ph  ->  C  e.  ran 
 F )   =>    |-  ( ph  ->  E. x  e.  A  C  =  B )
 
3-Aug-2023elrnmptdv 4883 Elementhood in the range of a function in maps-to notation, deduction form. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  F  =  ( x  e.  A  |->  B )   &    |-  ( ph  ->  C  e.  A )   &    |-  ( ph  ->  D  e.  V )   &    |-  (
 ( ph  /\  x  =  C )  ->  D  =  B )   =>    |-  ( ph  ->  D  e.  ran  F )
 
3-Aug-2023rspcime 2850 Prove a restricted existential. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  ( ( ph  /\  x  =  A )  ->  ps )   &    |-  ( ph  ->  A  e.  B )   =>    |-  ( ph  ->  E. x  e.  B  ps )
 
3-Aug-2023neqcomd 2182 Commute an inequality. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  ( ph  ->  -.  A  =  B )   =>    |-  ( ph  ->  -.  B  =  A )
 
2-Aug-2023dvid 14323 Derivative of the identity function. (Contributed by Mario Carneiro, 8-Aug-2014.) (Revised by Jim Kingdon, 2-Aug-2023.)
 |-  ( CC  _D  (  _I  |`  CC ) )  =  ( CC  X.  { 1 } )
 
2-Aug-2023dvconst 14322 Derivative of a constant function. (Contributed by Mario Carneiro, 8-Aug-2014.) (Revised by Jim Kingdon, 2-Aug-2023.)
 |-  ( A  e.  CC  ->  ( CC  _D  ( CC  X.  { A }
 ) )  =  ( CC  X.  { 0 } ) )
 
2-Aug-2023dvidlemap 14321 Lemma for dvid 14323 and dvconst 14322. (Contributed by Mario Carneiro, 8-Aug-2014.) (Revised by Jim Kingdon, 2-Aug-2023.)
 |-  ( ph  ->  F : CC --> CC )   &    |-  (
 ( ph  /\  ( x  e.  CC  /\  z  e.  CC  /\  z #  x ) )  ->  ( ( ( F `  z
 )  -  ( F `
  x ) ) 
 /  ( z  -  x ) )  =  B )   &    |-  B  e.  CC   =>    |-  ( ph  ->  ( CC  _D  F )  =  ( CC  X.  { B }
 ) )
 
2-Aug-2023diveqap1bd 8796 If two complex numbers are equal, their quotient is one. One-way deduction form of diveqap1 8665. Converse of diveqap1d 8758. (Contributed by David Moews, 28-Feb-2017.) (Revised by Jim Kingdon, 2-Aug-2023.)
 |-  ( ph  ->  B  e.  CC )   &    |-  ( ph  ->  B #  0 )   &    |-  ( ph  ->  A  =  B )   =>    |-  ( ph  ->  ( A  /  B )  =  1 )
 
31-Jul-2023mul0inf 11252 Equality of a product with zero. A bit of a curiosity, in the sense that theorems like abs00ap 11074 and mulap0bd 8617 may better express the ideas behind it. (Contributed by Jim Kingdon, 31-Jul-2023.)
 |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  x.  B )  =  0  <-> inf ( { ( abs `  A ) ,  ( abs `  B ) } ,  RR ,  <  )  =  0 ) )
 
31-Jul-2023mul0eqap 8630 If two numbers are apart from each other and their product is zero, one of them must be zero. (Contributed by Jim Kingdon, 31-Jul-2023.)
 |-  ( ph  ->  A  e.  CC )   &    |-  ( ph  ->  B  e.  CC )   &    |-  ( ph  ->  A #  B )   &    |-  ( ph  ->  ( A  x.  B )  =  0
 )   =>    |-  ( ph  ->  ( A  =  0  \/  B  =  0 )
 )
 
31-Jul-2023apcon4bid 8584 Contrapositive law deduction for apartness. (Contributed by Jim Kingdon, 31-Jul-2023.)
 |-  ( ph  ->  A  e.  CC )   &    |-  ( ph  ->  B  e.  CC )   &    |-  ( ph  ->  C  e.  CC )   &    |-  ( ph  ->  D  e.  CC )   &    |-  ( ph  ->  ( A #  B  <->  C #  D )
 )   =>    |-  ( ph  ->  ( A  =  B  <->  C  =  D ) )
 
30-Jul-2023uzennn 10439 An upper integer set is equinumerous to the set of natural numbers. (Contributed by Jim Kingdon, 30-Jul-2023.)
 |-  ( M  e.  ZZ  ->  ( ZZ>= `  M )  ~~  NN )
 
30-Jul-2023djuen 7213 Disjoint unions of equinumerous sets are equinumerous. (Contributed by Jim Kingdon, 30-Jul-2023.)
 |-  ( ( A  ~~  B  /\  C  ~~  D )  ->  ( A C ) 
 ~~  ( B D ) )
 
30-Jul-2023endjudisj 7212 Equinumerosity of a disjoint union and a union of two disjoint sets. (Contributed by Jim Kingdon, 30-Jul-2023.)
 |-  ( ( A  e.  V  /\  B  e.  W  /\  ( A  i^i  B )  =  (/) )  ->  ( A B )  ~~  ( A  u.  B ) )
 
30-Jul-2023eninr 7100 Equinumerosity of a set and its image under right injection. (Contributed by Jim Kingdon, 30-Jul-2023.)
 |-  ( A  e.  V  ->  (inr " A )  ~~  A )
 
30-Jul-2023eninl 7099 Equinumerosity of a set and its image under left injection. (Contributed by Jim Kingdon, 30-Jul-2023.)
 |-  ( A  e.  V  ->  (inl " A )  ~~  A )
 
29-Jul-2023exmidunben 12430 If any unbounded set of positive integers is equinumerous to  NN, then the Limited Principle of Omniscience (LPO) implies excluded middle. (Contributed by Jim Kingdon, 29-Jul-2023.)
 |-  ( ( A. x ( ( x  C_  NN  /\  A. m  e. 
 NN  E. n  e.  x  m  <  n )  ->  x  ~~  NN )  /\  om  e. Omni )  -> EXMID )
 
29-Jul-2023exmidsssnc 4205 Excluded middle in terms of subsets of a singleton. This is similar to exmid01 4200 but lets you choose any set as the element of the singleton rather than just  (/). It is similar to exmidsssn 4204 but for a particular set  B rather than all sets. (Contributed by Jim Kingdon, 29-Jul-2023.)
 |-  ( B  e.  V  ->  (EXMID  <->  A. x ( x  C_  { B }  ->  ( x  =  (/)  \/  x  =  { B } )
 ) ) )
 
28-Jul-2023dvfcnpm 14320 The derivative is a function. (Contributed by Mario Carneiro, 9-Feb-2015.) (Revised by Jim Kingdon, 28-Jul-2023.)
 |-  ( F  e.  ( CC  ^pm  CC )  ->  ( CC  _D  F ) : dom  ( CC 
 _D  F ) --> CC )
 
28-Jul-2023dvfpm 14319 The derivative is a function. (Contributed by Mario Carneiro, 8-Aug-2014.) (Revised by Jim Kingdon, 28-Jul-2023.)
 |-  ( F  e.  ( CC  ^pm  RR )  ->  ( RR  _D  F ) : dom  ( RR 
 _D  F ) --> CC )
 
24-Jul-2023sraring 13547 Condition for a subring algebra to be a ring. (Contributed by Thierry Arnoux, 24-Jul-2023.)
 |-  A  =  ( (subringAlg  `  R ) `  V )   &    |-  B  =  ( Base `  R )   =>    |-  ( ( R  e.  Ring  /\  V  C_  B )  ->  A  e.  Ring )
 
23-Jul-2023ennnfonelemhdmp1 12413 Lemma for ennnfone 12429. Domain at a successor where we need to add an element to the sequence. (Contributed by Jim Kingdon, 23-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   &    |-  ( ph  ->  P  e.  NN0 )   &    |-  ( ph  ->  -.  ( F `  ( `' N `  P ) )  e.  ( F
 " ( `' N `  P ) ) )   =>    |-  ( ph  ->  dom  ( H `
  ( P  +  1 ) )  = 
 suc  dom  ( H `  P ) )
 
23-Jul-2023ennnfonelemp1 12410 Lemma for ennnfone 12429. Value of  H at a successor. (Contributed by Jim Kingdon, 23-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   &    |-  ( ph  ->  P  e.  NN0 )   =>    |-  ( ph  ->  ( H `  ( P  +  1 ) )  =  if ( ( F `
  ( `' N `  P ) )  e.  ( F " ( `' N `  P ) ) ,  ( H `
  P ) ,  ( ( H `  P )  u.  { <. dom  ( H `  P ) ,  ( F `  ( `' N `  P ) ) >. } ) ) )
 
22-Jul-2023nntr2 6507 Transitive law for natural numbers. (Contributed by Jim Kingdon, 22-Jul-2023.)
 |-  ( ( A  e.  om 
 /\  C  e.  om )  ->  ( ( A 
 C_  B  /\  B  e.  C )  ->  A  e.  C ) )
 
22-Jul-2023nnsssuc 6506 A natural number is a subset of another natural number if and only if it belongs to its successor. (Contributed by Jim Kingdon, 22-Jul-2023.)
 |-  ( ( A  e.  om 
 /\  B  e.  om )  ->  ( A  C_  B 
 <->  A  e.  suc  B ) )
 
21-Jul-2023ennnfoneleminc 12415 Lemma for ennnfone 12429. We only add elements to  H as the index increases. (Contributed by Jim Kingdon, 21-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   &    |-  ( ph  ->  P  e.  NN0 )   &    |-  ( ph  ->  Q  e.  NN0 )   &    |-  ( ph  ->  P 
 <_  Q )   =>    |-  ( ph  ->  ( H `  P )  C_  ( H `  Q ) )
 
20-Jul-2023ennnfonelemg 12407 Lemma for ennnfone 12429. Closure for  G. (Contributed by Jim Kingdon, 20-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   =>    |-  ( ( ph  /\  (
 f  e.  { g  e.  ( A  ^pm  om )  |  dom  g  e.  om } 
 /\  j  e.  om ) )  ->  ( f G j )  e. 
 { g  e.  ( A  ^pm  om )  | 
 dom  g  e.  om } )
 
20-Jul-2023ennnfonelemjn 12406 Lemma for ennnfone 12429. Non-initial state for  J. (Contributed by Jim Kingdon, 20-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   =>    |-  ( ( ph  /\  f  e.  ( ZZ>= `  ( 0  +  1 ) ) )  ->  ( J `  f )  e.  om )
 
20-Jul-2023ennnfonelemj0 12405 Lemma for ennnfone 12429. Initial state for  J. (Contributed by Jim Kingdon, 20-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   =>    |-  ( ph  ->  ( J `  0 )  e. 
 { g  e.  ( A  ^pm  om )  | 
 dom  g  e.  om } )
 
20-Jul-2023seqp1cd 10469 Value of the sequence builder function at a successor. A version of seq3p1 10465 which provides two classes  D and  C for the terms and the value being accumulated, respectively. (Contributed by Jim Kingdon, 20-Jul-2023.)
 |-  ( ph  ->  N  e.  ( ZZ>= `  M )
 )   &    |-  ( ph  ->  ( F `  M )  e.  C )   &    |-  ( ( ph  /\  ( x  e.  C  /\  y  e.  D ) )  ->  ( x 
 .+  y )  e.  C )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  ( M  +  1
 ) ) )  ->  ( F `  x )  e.  D )   =>    |-  ( ph  ->  ( 
 seq M (  .+  ,  F ) `  ( N  +  1 )
 )  =  ( ( 
 seq M (  .+  ,  F ) `  N )  .+  ( F `  ( N  +  1
 ) ) ) )
 
20-Jul-2023seqovcd 10466 A closure law for the recursive sequence builder. This is a lemma for theorems such as seqf2 10467 and seq1cd 10468 and is unlikely to be needed once such theorems are proved. (Contributed by Jim Kingdon, 20-Jul-2023.)
 |-  ( ( ph  /\  x  e.  ( ZZ>= `  ( M  +  1 ) ) )  ->  ( F `  x )  e.  D )   &    |-  ( ( ph  /\  ( x  e.  C  /\  y  e.  D )
 )  ->  ( x  .+  y )  e.  C )   =>    |-  ( ( ph  /\  ( x  e.  ( ZZ>= `  M )  /\  y  e.  C ) )  ->  ( x ( z  e.  ( ZZ>= `  M ) ,  w  e.  C  |->  ( w  .+  ( F `
  ( z  +  1 ) ) ) ) y )  e.  C )
 
19-Jul-2023ennnfonelemhom 12419 Lemma for ennnfone 12429. The sequences in  H increase in length without bound if you go out far enough. (Contributed by Jim Kingdon, 19-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   &    |-  ( ph  ->  M  e.  om )   =>    |-  ( ph  ->  E. i  e.  NN0  M  e.  dom  ( H `  i ) )
 
19-Jul-2023ennnfonelemex 12418 Lemma for ennnfone 12429. Extending the sequence  ( H `  P ) to include an additional element. (Contributed by Jim Kingdon, 19-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   &    |-  ( ph  ->  P  e.  NN0 )   =>    |-  ( ph  ->  E. i  e.  NN0  dom  ( H `  P )  e.  dom  ( H `  i ) )
 
19-Jul-2023ennnfonelemkh 12416 Lemma for ennnfone 12429. Because we add zero or one entries for each new index, the length of each sequence is no greater than its index. (Contributed by Jim Kingdon, 19-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   &    |-  ( ph  ->  P  e.  NN0 )   =>    |-  ( ph  ->  dom  ( H `  P )  C_  ( `' N `  P ) )
 
19-Jul-2023ennnfonelemom 12412 Lemma for ennnfone 12429. 
H yields finite sequences. (Contributed by Jim Kingdon, 19-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   &    |-  ( ph  ->  P  e.  NN0 )   =>    |-  ( ph  ->  dom  ( H `  P )  e. 
 om )
 
19-Jul-2023ennnfonelem1 12411 Lemma for ennnfone 12429. Second value. (Contributed by Jim Kingdon, 19-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   =>    |-  ( ph  ->  ( H `  1 )  =  { <. (/) ,  ( F `
  (/) ) >. } )
 
19-Jul-2023seq1cd 10468 Initial value of the recursive sequence builder. A version of seq3-1 10463 which provides two classes 
D and  C for the terms and the value being accumulated, respectively. (Contributed by Jim Kingdon, 19-Jul-2023.)
 |-  ( ph  ->  ( F `  M )  e.  C )   &    |-  ( ( ph  /\  ( x  e.  C  /\  y  e.  D ) )  ->  ( x 
 .+  y )  e.  C )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  (
 ( ph  /\  x  e.  ( ZZ>= `  ( M  +  1 ) ) )  ->  ( F `  x )  e.  D )   =>    |-  ( ph  ->  (  seq M (  .+  ,  F ) `  M )  =  ( F `  M ) )
 
17-Jul-2023ennnfonelemhf1o 12417 Lemma for ennnfone 12429. Each of the functions in  H is one to one and onto an image of  F. (Contributed by Jim Kingdon, 17-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   &    |-  ( ph  ->  P  e.  NN0 )   =>    |-  ( ph  ->  ( H `  P ) : dom  ( H `  P ) -1-1-onto-> ( F " ( `' N `  P ) ) )
 
16-Jul-2023ennnfonelemen 12425 Lemma for ennnfone 12429. The result. (Contributed by Jim Kingdon, 16-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   &    |-  L  =  U_ i  e.  NN0  ( H `  i )   =>    |-  ( ph  ->  A  ~~ 
 NN )
 
16-Jul-2023ennnfonelemdm 12424 Lemma for ennnfone 12429. The function  L is defined everywhere. (Contributed by Jim Kingdon, 16-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   &    |-  L  =  U_ i  e.  NN0  ( H `  i )   =>    |-  ( ph  ->  dom  L  =  om )
 
16-Jul-2023ennnfonelemrn 12423 Lemma for ennnfone 12429. 
L is onto  A. (Contributed by Jim Kingdon, 16-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   &    |-  L  =  U_ i  e.  NN0  ( H `  i )   =>    |-  ( ph  ->  ran  L  =  A )
 
16-Jul-2023ennnfonelemf1 12422 Lemma for ennnfone 12429. 
L is one-to-one. (Contributed by Jim Kingdon, 16-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   &    |-  L  =  U_ i  e.  NN0  ( H `  i )   =>    |-  ( ph  ->  L : dom  L -1-1-> A )
 
16-Jul-2023ennnfonelemfun 12421 Lemma for ennnfone 12429. 
L is a function. (Contributed by Jim Kingdon, 16-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   &    |-  L  =  U_ i  e.  NN0  ( H `  i )   =>    |-  ( ph  ->  Fun  L )
 
16-Jul-2023ennnfonelemrnh 12420 Lemma for ennnfone 12429. A consequence of ennnfonelemss 12414. (Contributed by Jim Kingdon, 16-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   &    |-  ( ph  ->  X  e.  ran  H )   &    |-  ( ph  ->  Y  e.  ran  H )   =>    |-  ( ph  ->  ( X  C_  Y  \/  Y  C_  X ) )
 
15-Jul-2023ennnfonelemss 12414 Lemma for ennnfone 12429. We only add elements to  H as the index increases. (Contributed by Jim Kingdon, 15-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   &    |-  ( ph  ->  P  e.  NN0 )   =>    |-  ( ph  ->  ( H `  P )  C_  ( H `  ( P  +  1 ) ) )
 
15-Jul-2023ennnfonelem0 12409 Lemma for ennnfone 12429. Initial value. (Contributed by Jim Kingdon, 15-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   =>    |-  ( ph  ->  ( H `  0 )  =  (/) )
 
15-Jul-2023ennnfonelemk 12404 Lemma for ennnfone 12429. (Contributed by Jim Kingdon, 15-Jul-2023.)
 |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  K  e.  om )   &    |-  ( ph  ->  N  e.  om )   &    |-  ( ph  ->  A. j  e.  suc  N ( F `
  K )  =/=  ( F `  j
 ) )   =>    |-  ( ph  ->  N  e.  K )
 
15-Jul-2023ennnfonelemdc 12403 Lemma for ennnfone 12429. A direct consequence of fidcenumlemrk 6956. (Contributed by Jim Kingdon, 15-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  P  e.  om )   =>    |-  ( ph  -> DECID  ( F `
  P )  e.  ( F " P ) )
 
14-Jul-2023djur 7071 A member of a disjoint union can be mapped from one of the classes which produced it. (Contributed by Jim Kingdon, 23-Jun-2022.) Upgrade implication to biconditional and shorten proof. (Revised by BJ, 14-Jul-2023.)
 |-  ( C  e.  ( A B )  <->  ( E. x  e.  A  C  =  (inl `  x )  \/  E. x  e.  B  C  =  (inr `  x )
 ) )
 
13-Jul-2023sbthomlem 14935 Lemma for sbthom 14936. (Contributed by Mario Carneiro and Jim Kingdon, 13-Jul-2023.)
 |-  ( ph  ->  om  e. Omni )   &    |-  ( ph  ->  Y  C_  { (/) } )   &    |-  ( ph  ->  F : om -1-1-onto-> ( Y om ) )   =>    |-  ( ph  ->  ( Y  =  (/)  \/  Y  =  { (/) } ) )
 
12-Jul-2023caseinr 7094 Applying the "case" construction to a right injection. (Contributed by Jim Kingdon, 12-Jul-2023.)
 |-  ( ph  ->  Fun  F )   &    |-  ( ph  ->  G  Fn  B )   &    |-  ( ph  ->  A  e.  B )   =>    |-  ( ph  ->  (case ( F ,  G ) `  (inr `  A ) )  =  ( G `  A ) )
 
12-Jul-2023inl11 7067 Left injection is one-to-one. (Contributed by Jim Kingdon, 12-Jul-2023.)
 |-  ( ( A  e.  V  /\  B  e.  W )  ->  ( (inl `  A )  =  (inl `  B )  <->  A  =  B ) )
 
11-Jul-2023djudomr 7222 A set is dominated by its disjoint union with another. (Contributed by Jim Kingdon, 11-Jul-2023.)
 |-  ( ( A  e.  V  /\  B  e.  W )  ->  B  ~<_  ( A B ) )
 
11-Jul-2023djudoml 7221 A set is dominated by its disjoint union with another. (Contributed by Jim Kingdon, 11-Jul-2023.)
 |-  ( ( A  e.  V  /\  B  e.  W )  ->  A  ~<_  ( A B ) )
 
11-Jul-2023omp1eomlem 7096 Lemma for omp1eom 7097. (Contributed by Jim Kingdon, 11-Jul-2023.)
 |-  F  =  ( x  e.  om  |->  if ( x  =  (/) ,  (inr `  x ) ,  (inl ` 
 U. x ) ) )   &    |-  S  =  ( x  e.  om  |->  suc 
 x )   &    |-  G  = case ( S ,  (  _I  |` 
 1o ) )   =>    |-  F : om -1-1-onto-> ( om 1o )
 
11-Jul-2023xp01disjl 6438 Cartesian products with the singletons of ordinals 0 and 1 are disjoint. (Contributed by Jim Kingdon, 11-Jul-2023.)
 |-  ( ( { (/) }  X.  A )  i^i  ( { 1o }  X.  C ) )  =  (/)
 
10-Jul-2023sbthom 14936 Schroeder-Bernstein is not possible even for  om. We know by exmidsbth 14934 that full Schroeder-Bernstein will not be provable but what about the case where one of the sets is  om? That case plus the Limited Principle of Omniscience (LPO) implies excluded middle, so we will not be able to prove it. (Contributed by Mario Carneiro and Jim Kingdon, 10-Jul-2023.)
 |-  (
 ( A. x ( ( x  ~<_  om  /\  om  ~<_  x ) 
 ->  x  ~~  om )  /\  om  e. Omni )  -> EXMID )
 
10-Jul-2023endjusym 7098 Reversing right and left operands of a disjoint union produces an equinumerous result. (Contributed by Jim Kingdon, 10-Jul-2023.)
 |-  ( ( A  e.  V  /\  B  e.  W )  ->  ( A B ) 
 ~~  ( B A ) )
 
10-Jul-2023omp1eom 7097 Adding one to  om. (Contributed by Jim Kingdon, 10-Jul-2023.)
 |-  ( om 1o )  ~~  om
 
9-Jul-2023refeq 14938 Equality of two real functions which agree at negative numbers, positive numbers, and zero. This holds even without real trichotomy. From an online post by Martin Escardo. (Contributed by Jim Kingdon, 9-Jul-2023.)
 |-  ( ph  ->  F : RR --> RR )   &    |-  ( ph  ->  G : RR --> RR )   &    |-  ( ph  ->  A. x  e.  RR  ( x  <  0  ->  ( F `  x )  =  ( G `  x ) ) )   &    |-  ( ph  ->  A. x  e. 
 RR  ( 0  < 
 x  ->  ( F `  x )  =  ( G `  x ) ) )   &    |-  ( ph  ->  ( F `  0 )  =  ( G `  0 ) )   =>    |-  ( ph  ->  F  =  G )
 
9-Jul-2023seqvalcd 10462 Value of the sequence builder function. Similar to seq3val 10461 but the classes  D (type of each term) and  C (type of the value we are accumulating) do not need to be the same. (Contributed by Jim Kingdon, 9-Jul-2023.)
 |-  ( ph  ->  M  e.  ZZ )   &    |-  R  = frec (
 ( x  e.  ( ZZ>=
 `  M ) ,  y  e.  _V  |->  <.
 ( x  +  1 ) ,  ( x ( z  e.  ( ZZ>=
 `  M ) ,  w  e.  C  |->  ( w  .+  ( F `
  ( z  +  1 ) ) ) ) y ) >. ) ,  <. M ,  ( F `  M ) >. )   &    |-  ( ph  ->  ( F `  M )  e.  C )   &    |-  ( ( ph  /\  ( x  e.  C  /\  y  e.  D )
 )  ->  ( x  .+  y )  e.  C )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  ( M  +  1 ) ) )  ->  ( F `  x )  e.  D )   =>    |-  ( ph  ->  seq M (  .+  ,  F )  =  ran  R )
 
9-Jul-2023djuun 7069 The disjoint union of two classes is the union of the images of those two classes under right and left injection. (Contributed by Jim Kingdon, 22-Jun-2022.) (Proof shortened by BJ, 9-Jul-2023.)
 |-  ( (inl " A )  u.  (inr " B ) )  =  ( A B )
 
9-Jul-2023djuin 7066 The images of any classes under right and left injection produce disjoint sets. (Contributed by Jim Kingdon, 21-Jun-2022.) (Proof shortened by BJ, 9-Jul-2023.)
 |-  ( (inl " A )  i^i  (inr " B ) )  =  (/)
 
8-Jul-2023limcimo 14295 Conditions which ensure there is at most one limit value of  F at  B. (Contributed by Mario Carneiro, 25-Dec-2016.) (Revised by Jim Kingdon, 8-Jul-2023.)
 |-  ( ph  ->  F : A --> CC )   &    |-  ( ph  ->  A  C_  CC )   &    |-  ( ph  ->  B  e.  CC )   &    |-  ( ph  ->  B  e.  C )   &    |-  ( ph  ->  B  e.  S )   &    |-  ( ph  ->  C  e.  ( Kt  S ) )   &    |-  ( ph  ->  S  e.  { RR ,  CC } )   &    |-  ( ph  ->  { q  e.  C  |  q #  B }  C_  A )   &    |-  K  =  ( MetOpen `  ( abs  o. 
 -  ) )   =>    |-  ( ph  ->  E* x  x  e.  ( F lim CC  B ) )
 
8-Jul-2023ennnfonelemh 12408 Lemma for ennnfone 12429. (Contributed by Jim Kingdon, 8-Jul-2023.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : om -onto-> A )   &    |-  ( ph  ->  A. n  e.  om  E. k  e.  om  A. j  e.  suc  n ( F `
  k )  =/=  ( F `  j
 ) )   &    |-  G  =  ( x  e.  ( A 
 ^pm  om ) ,  y  e.  om  |->  if ( ( F `
  y )  e.  ( F " y
 ) ,  x ,  ( x  u.  { <. dom 
 x ,  ( F `
  y ) >. } ) ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  J  =  ( x  e.  NN0  |->  if ( x  =  0 ,  (/)
 ,  ( `' N `  ( x  -  1
 ) ) ) )   &    |-  H  =  seq 0
 ( G ,  J )   =>    |-  ( ph  ->  H : NN0 --> ( A  ^pm  om ) )
 
7-Jul-2023seqf2 10467 Range of the recursive sequence builder. (Contributed by Mario Carneiro, 24-Jun-2013.) (Revised by Jim Kingdon, 7-Jul-2023.)
 |-  ( ph  ->  ( F `  M )  e.  C )   &    |-  ( ( ph  /\  ( x  e.  C  /\  y  e.  D ) )  ->  ( x 
 .+  y )  e.  C )   &    |-  Z  =  (
 ZZ>= `  M )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  ( M  +  1 ) ) )  ->  ( F `  x )  e.  D )   =>    |-  ( ph  ->  seq M (  .+  ,  F ) : Z --> C )
 
3-Jul-2023limcimolemlt 14294 Lemma for limcimo 14295. (Contributed by Jim Kingdon, 3-Jul-2023.)
 |-  ( ph  ->  F : A --> CC )   &    |-  ( ph  ->  A  C_  CC )   &    |-  ( ph  ->  B  e.  CC )   &    |-  ( ph  ->  B  e.  C )   &    |-  ( ph  ->  B  e.  S )   &    |-  ( ph  ->  C  e.  ( Kt  S ) )   &    |-  ( ph  ->  S  e.  { RR ,  CC } )   &    |-  ( ph  ->  { q  e.  C  |  q #  B }  C_  A )   &    |-  K  =  ( MetOpen `  ( abs  o. 
 -  ) )   &    |-  ( ph  ->  D  e.  RR+ )   &    |-  ( ph  ->  X  e.  ( F lim CC  B ) )   &    |-  ( ph  ->  Y  e.  ( F lim CC  B ) )   &    |-  ( ph  ->  A. z  e.  A  ( ( z #  B  /\  ( abs `  (
 z  -  B ) )  <  D ) 
 ->  ( abs `  (
 ( F `  z
 )  -  X ) )  <  ( ( abs `  ( X  -  Y ) )  / 
 2 ) ) )   &    |-  ( ph  ->  G  e.  RR+ )   &    |-  ( ph  ->  A. w  e.  A  ( ( w #  B  /\  ( abs `  ( w  -  B ) )  <  G )  ->  ( abs `  ( ( F `  w )  -  Y ) )  <  ( ( abs `  ( X  -  Y ) )  / 
 2 ) ) )   =>    |-  ( ph  ->  ( abs `  ( X  -  Y ) )  <  ( abs `  ( X  -  Y ) ) )
 
28-Jun-2023dvfgg 14318 Explicitly write out the functionality condition on derivative for  S  =  RR and 
CC. (Contributed by Mario Carneiro, 9-Feb-2015.) (Revised by Jim Kingdon, 28-Jun-2023.)
 |-  ( ( S  e.  { RR ,  CC }  /\  F  e.  ( CC 
 ^pm  S ) )  ->  ( S  _D  F ) : dom  ( S  _D  F ) --> CC )
 
28-Jun-2023dvbsssg 14316 The set of differentiable points is a subset of the ambient topology. (Contributed by Mario Carneiro, 18-Mar-2015.) (Revised by Jim Kingdon, 28-Jun-2023.)
 |-  ( ( S  C_  CC  /\  F  e.  ( CC  ^pm  S ) ) 
 ->  dom  ( S  _D  F )  C_  S )
 
27-Jun-2023dvbssntrcntop 14314 The set of differentiable points is a subset of the interior of the domain of the function. (Contributed by Mario Carneiro, 7-Aug-2014.) (Revised by Jim Kingdon, 27-Jun-2023.)
 |-  ( ph  ->  S  C_ 
 CC )   &    |-  ( ph  ->  F : A --> CC )   &    |-  ( ph  ->  A  C_  S )   &    |-  J  =  ( Kt  S )   &    |-  K  =  (
 MetOpen `  ( abs  o.  -  ) )   =>    |-  ( ph  ->  dom  ( S  _D  F )  C_  ( ( int `  J ) `  A ) )
 
27-Jun-2023eldvap 14312 The differentiable predicate. A function  F is differentiable at  B with derivative  C iff  F is defined in a neighborhood of  B and the difference quotient has limit  C at  B. (Contributed by Mario Carneiro, 7-Aug-2014.) (Revised by Jim Kingdon, 27-Jun-2023.)
 |-  T  =  ( Kt  S )   &    |-  K  =  (
 MetOpen `  ( abs  o.  -  ) )   &    |-  G  =  ( z  e.  { w  e.  A  |  w #  B }  |->  ( ( ( F `  z )  -  ( F `  B ) )  /  ( z  -  B ) ) )   &    |-  ( ph  ->  S  C_  CC )   &    |-  ( ph  ->  F : A --> CC )   &    |-  ( ph  ->  A  C_  S )   =>    |-  ( ph  ->  ( B ( S  _D  F ) C  <->  ( B  e.  ( ( int `  T ) `  A )  /\  C  e.  ( G lim CC  B ) ) ) )
 
27-Jun-2023dvfvalap 14311 Value and set bounds on the derivative operator. (Contributed by Mario Carneiro, 7-Aug-2014.) (Revised by Jim Kingdon, 27-Jun-2023.)
 |-  T  =  ( Kt  S )   &    |-  K  =  (
 MetOpen `  ( abs  o.  -  ) )   =>    |-  ( ( S  C_  CC  /\  F : A --> CC  /\  A  C_  S )  ->  ( ( S  _D  F )  = 
 U_ x  e.  (
 ( int `  T ) `  A ) ( { x }  X.  (
 ( z  e.  { w  e.  A  |  w #  x }  |->  ( ( ( F `  z
 )  -  ( F `
  x ) ) 
 /  ( z  -  x ) ) ) lim
 CC  x ) ) 
 /\  ( S  _D  F )  C_  ( ( ( int `  T ) `  A )  X.  CC ) ) )
 
27-Jun-2023dvlemap 14310 Closure for a difference quotient. (Contributed by Mario Carneiro, 1-Sep-2014.) (Revised by Jim Kingdon, 27-Jun-2023.)
 |-  ( ph  ->  F : D --> CC )   &    |-  ( ph  ->  D  C_  CC )   &    |-  ( ph  ->  B  e.  D )   =>    |-  ( ( ph  /\  A  e.  { w  e.  D  |  w #  B }
 )  ->  ( (
 ( F `  A )  -  ( F `  B ) )  /  ( A  -  B ) )  e.  CC )
 
25-Jun-2023reldvg 14309 The derivative function is a relation. (Contributed by Mario Carneiro, 7-Aug-2014.) (Revised by Jim Kingdon, 25-Jun-2023.)
 |-  ( ( S  C_  CC  /\  F  e.  ( CC  ^pm  S ) ) 
 ->  Rel  ( S  _D  F ) )
 
25-Jun-2023df-dvap 14287 Define the derivative operator. This acts on functions to produce a function that is defined where the original function is differentiable, with value the derivative of the function at these points. The set  s here is the ambient topological space under which we are evaluating the continuity of the difference quotient. Although the definition is valid for any subset of  CC and is well-behaved when  s contains no isolated points, we will restrict our attention to the cases  s  =  RR or  s  =  CC for the majority of the development, these corresponding respectively to real and complex differentiation. (Contributed by Mario Carneiro, 7-Aug-2014.) (Revised by Jim Kingdon, 25-Jun-2023.)
 |- 
 _D  =  ( s  e.  ~P CC ,  f  e.  ( CC  ^pm  s )  |->  U_ x  e.  ( ( int `  (
 ( MetOpen `  ( abs  o. 
 -  ) )t  s ) ) `  dom  f
 ) ( { x }  X.  ( ( z  e.  { w  e. 
 dom  f  |  w #  x }  |->  ( ( ( f `  z
 )  -  ( f `
  x ) ) 
 /  ( z  -  x ) ) ) lim
 CC  x ) ) )
 
18-Jun-2023limccnpcntop 14305 If the limit of  F at  B is  C and  G is continuous at  C, then the limit of  G  o.  F at  B is  G ( C ). (Contributed by Mario Carneiro, 28-Dec-2016.) (Revised by Jim Kingdon, 18-Jun-2023.)
 |-  ( ph  ->  F : A --> D )   &    |-  ( ph  ->  D  C_  CC )   &    |-  K  =  ( MetOpen `  ( abs  o.  -  )
 )   &    |-  J  =  ( Kt  D )   &    |-  ( ph  ->  C  e.  ( F lim CC  B ) )   &    |-  ( ph  ->  G  e.  (
 ( J  CnP  K ) `  C ) )   =>    |-  ( ph  ->  ( G `  C )  e.  (
 ( G  o.  F ) lim CC  B ) )
 
18-Jun-2023r19.30dc 2624 Restricted quantifier version of 19.30dc 1627. (Contributed by Scott Fenton, 25-Feb-2011.) (Proof shortened by Wolf Lammen, 18-Jun-2023.)
 |-  ( ( A. x  e.  A  ( ph  \/  ps )  /\ DECID  E. x  e.  A  ps )  ->  ( A. x  e.  A  ph  \/  E. x  e.  A  ps ) )
 
17-Jun-2023r19.28v 2605 Restricted quantifier version of one direction of 19.28 1563. (The other direction holds when  A is inhabited, see r19.28mv 3517.) (Contributed by NM, 2-Apr-2004.) (Proof shortened by Wolf Lammen, 17-Jun-2023.)
 |-  ( ( ph  /\  A. x  e.  A  ps )  ->  A. x  e.  A  ( ph  /\  ps )
 )
 
17-Jun-2023r19.27v 2604 Restricted quantitifer version of one direction of 19.27 1561. (The other direction holds when  A is inhabited, see r19.27mv 3521.) (Contributed by NM, 3-Jun-2004.) (Proof shortened by Andrew Salmon, 30-May-2011.) (Proof shortened by Wolf Lammen, 17-Jun-2023.)
 |-  ( ( A. x  e.  A  ph  /\  ps )  ->  A. x  e.  A  ( ph  /\  ps )
 )
 
16-Jun-2023cnlimcim 14301 If  F is a continuous function, the limit of the function at each point equals the value of the function. (Contributed by Mario Carneiro, 28-Dec-2016.) (Revised by Jim Kingdon, 16-Jun-2023.)
 |-  ( A  C_  CC  ->  ( F  e.  ( A -cn-> CC )  ->  ( F : A --> CC  /\  A. x  e.  A  ( F `  x )  e.  ( F lim CC  x ) ) ) )
 
16-Jun-2023cncfcn1cntop 14242 Relate complex function continuity to topological continuity. (Contributed by Paul Chapman, 28-Nov-2007.) (Revised by Mario Carneiro, 7-Sep-2015.) (Revised by Jim Kingdon, 16-Jun-2023.)
 |-  J  =  ( MetOpen `  ( abs  o.  -  )
 )   =>    |-  ( CC -cn-> CC )  =  ( J  Cn  J )
 
14-Jun-2023cnplimcim 14297 If a function is continuous at  B, its limit at  B equals the value of the function there. (Contributed by Mario Carneiro, 28-Dec-2016.) (Revised by Jim Kingdon, 14-Jun-2023.)
 |-  K  =  ( MetOpen `  ( abs  o.  -  )
 )   &    |-  J  =  ( Kt  A )   =>    |-  ( ( A  C_  CC  /\  B  e.  A )  ->  ( F  e.  ( ( J  CnP  K ) `  B ) 
 ->  ( F : A --> CC  /\  ( F `  B )  e.  ( F lim CC  B ) ) ) )
 
14-Jun-2023metcnpd 14181 Two ways to say a mapping from metric  C to metric  D is continuous at point  P. (Contributed by Jim Kingdon, 14-Jun-2023.)
 |-  ( ph  ->  J  =  ( MetOpen `  C )
 )   &    |-  ( ph  ->  K  =  ( MetOpen `  D )
 )   &    |-  ( ph  ->  C  e.  ( *Met `  X ) )   &    |-  ( ph  ->  D  e.  ( *Met `  Y ) )   &    |-  ( ph  ->  P  e.  X )   =>    |-  ( ph  ->  ( F  e.  ( ( J  CnP  K ) `  P )  <->  ( F : X
 --> Y  /\  A. y  e.  RR+  E. z  e.  RR+  A. w  e.  X  ( ( P C w )  <  z  ->  ( ( F `  P ) D ( F `  w ) )  <  y ) ) ) )
 
6-Jun-2023cntoptop 14194 The topology of the complex numbers is a topology. (Contributed by Jim Kingdon, 6-Jun-2023.)
 |-  J  =  ( MetOpen `  ( abs  o.  -  )
 )   =>    |-  J  e.  Top
 
6-Jun-2023cntoptopon 14193 The topology of the complex numbers is a topology. (Contributed by Jim Kingdon, 6-Jun-2023.)
 |-  J  =  ( MetOpen `  ( abs  o.  -  )
 )   =>    |-  J  e.  (TopOn `  CC )
 
3-Jun-2023limcdifap 14292 It suffices to consider functions which are not defined at  B to define the limit of a function. In particular, the value of the original function  F at  B does not affect the limit of  F. (Contributed by Mario Carneiro, 25-Dec-2016.) (Revised by Jim Kingdon, 3-Jun-2023.)
 |-  ( ph  ->  F : A --> CC )   &    |-  ( ph  ->  A  C_  CC )   =>    |-  ( ph  ->  ( F lim CC  B )  =  ( ( F  |`  { x  e.  A  |  x #  B } ) lim CC  B ) )
 
3-Jun-2023ellimc3ap 14291 Write the epsilon-delta definition of a limit. (Contributed by Mario Carneiro, 28-Dec-2016.) Use apartness. (Revised by Jim Kingdon, 3-Jun-2023.)
 |-  ( ph  ->  F : A --> CC )   &    |-  ( ph  ->  A  C_  CC )   &    |-  ( ph  ->  B  e.  CC )   =>    |-  ( ph  ->  ( C  e.  ( F lim CC  B )  <->  ( C  e.  CC  /\  A. x  e.  RR+  E. y  e.  RR+  A. z  e.  A  ( ( z #  B  /\  ( abs `  ( z  -  B ) )  < 
 y )  ->  ( abs `  ( ( F `
  z )  -  C ) )  < 
 x ) ) ) )
 
3-Jun-2023df-limced 14286 Define the set of limits of a complex function at a point. Under normal circumstances, this will be a singleton or empty, depending on whether the limit exists. (Contributed by Mario Carneiro, 24-Dec-2016.) (Revised by Jim Kingdon, 3-Jun-2023.)
 |- lim
 CC  =  ( f  e.  ( CC  ^pm  CC ) ,  x  e. 
 CC  |->  { y  e.  CC  |  ( ( f : dom  f --> CC  /\  dom  f  C_  CC )  /\  ( x  e.  CC  /\ 
 A. e  e.  RR+  E. d  e.  RR+  A. z  e.  dom  f ( ( z #  x  /\  ( abs `  ( z  -  x ) )  < 
 d )  ->  ( abs `  ( ( f `
  z )  -  y ) )  < 
 e ) ) ) } )
 
30-May-2023modprm1div 12250 A prime number divides an integer minus 1 iff the integer modulo the prime number is 1. (Contributed by Alexander van der Vekens, 17-May-2018.) (Proof shortened by AV, 30-May-2023.)
 |-  ( ( P  e.  Prime  /\  A  e.  ZZ )  ->  ( ( A 
 mod  P )  =  1  <->  P  ||  ( A  -  1 ) ) )
 
30-May-2023modm1div 11810 An integer greater than one divides another integer minus one iff the second integer modulo the first integer is one. (Contributed by AV, 30-May-2023.)
 |-  ( ( N  e.  ( ZZ>= `  2 )  /\  A  e.  ZZ )  ->  ( ( A  mod  N )  =  1  <->  N  ||  ( A  -  1 ) ) )
 
30-May-2023eluz4nn 9571 An integer greater than or equal to 4 is a positive integer. (Contributed by AV, 30-May-2023.)
 |-  ( X  e.  ( ZZ>=
 `  4 )  ->  X  e.  NN )
 
30-May-2023eluz4eluz2 9570 An integer greater than or equal to 4 is an integer greater than or equal to 2. (Contributed by AV, 30-May-2023.)
 |-  ( X  e.  ( ZZ>=
 `  4 )  ->  X  e.  ( ZZ>= `  2 ) )
 
29-May-2023mulcncflem 14251 Lemma for mulcncf 14252. (Contributed by Jim Kingdon, 29-May-2023.)
 |-  ( ph  ->  ( x  e.  X  |->  A )  e.  ( X -cn-> CC ) )   &    |-  ( ph  ->  ( x  e.  X  |->  B )  e.  ( X
 -cn-> CC ) )   &    |-  ( ph  ->  V  e.  X )   &    |-  ( ph  ->  E  e.  RR+ )   &    |-  ( ph  ->  F  e.  RR+ )   &    |-  ( ph  ->  G  e.  RR+ )   &    |-  ( ph  ->  S  e.  RR+ )   &    |-  ( ph  ->  T  e.  RR+ )   &    |-  ( ph  ->  A. u  e.  X  ( ( abs `  ( u  -  V ) )  <  S  ->  ( abs `  ( ( ( x  e.  X  |->  A ) `  u )  -  ( ( x  e.  X  |->  A ) `
  V ) ) )  <  F ) )   &    |-  ( ph  ->  A. u  e.  X  ( ( abs `  ( u  -  V ) )  <  T  ->  ( abs `  ( ( ( x  e.  X  |->  B ) `  u )  -  ( ( x  e.  X  |->  B ) `
  V ) ) )  <  G ) )   &    |-  ( ph  ->  A. u  e.  X  ( ( ( abs `  ( [_ u  /  x ]_ A  -  [_ V  /  x ]_ A ) )  <  F  /\  ( abs `  ( [_ u  /  x ]_ B  -  [_ V  /  x ]_ B ) )  <  G )  ->  ( abs `  ( ( [_ u  /  x ]_ A  x.  [_ u  /  x ]_ B )  -  ( [_ V  /  x ]_ A  x.  [_ V  /  x ]_ B ) ) )  <  E ) )   =>    |-  ( ph  ->  E. d  e.  RR+  A. u  e.  X  ( ( abs `  ( u  -  V ) )  <  d  ->  ( abs `  ( ( ( x  e.  X  |->  ( A  x.  B ) ) `  u )  -  ( ( x  e.  X  |->  ( A  x.  B ) ) `
  V ) ) )  <  E ) )
 
26-May-2023cdivcncfap 14248 Division with a constant numerator is continuous. (Contributed by Mario Carneiro, 28-Dec-2016.) (Revised by Jim Kingdon, 26-May-2023.)
 |-  F  =  ( x  e.  { y  e. 
 CC  |  y #  0 }  |->  ( A  /  x ) )   =>    |-  ( A  e.  CC  ->  F  e.  ( { y  e.  CC  |  y #  0 } -cn->
 CC ) )
 
26-May-2023reccn2ap 11324 The reciprocal function is continuous. The class  T is just for convenience in writing the proof and typically would be passed in as an instance of eqid 2177. (Contributed by Mario Carneiro, 9-Feb-2014.) Using apart, infimum of pair. (Revised by Jim Kingdon, 26-May-2023.)
 |-  T  =  (inf ( { 1 ,  (
 ( abs `  A )  x.  B ) } ,  RR ,  <  )  x.  ( ( abs `  A )  /  2 ) )   =>    |-  ( ( A  e.  CC  /\  A #  0  /\  B  e.  RR+ )  ->  E. y  e.  RR+  A. z  e.  { w  e.  CC  |  w #  0 }  ( ( abs `  (
 z  -  A ) )  <  y  ->  ( abs `  ( (
 1  /  z )  -  ( 1  /  A ) ) )  <  B ) )
 
23-May-2023iooretopg 14189 Open intervals are open sets of the standard topology on the reals . (Contributed by FL, 18-Jun-2007.) (Revised by Jim Kingdon, 23-May-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR* )  ->  ( A (,) B )  e.  ( topGen `  ran  (,) ) )
 
23-May-2023minclpr 11248 The minimum of two real numbers is one of those numbers if and only if dichotomy ( A  <_  B  \/  B  <_  A) holds. For example, this can be combined with zletric 9300 if one is dealing with integers, but real number dichotomy in general does not follow from our axioms. (Contributed by Jim Kingdon, 23-May-2023.)
 |-  ( ( A  e.  RR  /\  B  e.  RR )  ->  (inf ( { A ,  B } ,  RR ,  <  )  e.  { A ,  B } 
 <->  ( A  <_  B  \/  B  <_  A )
 ) )
 
22-May-2023qtopbasss 14182 The set of open intervals with endpoints in a subset forms a basis for a topology. (Contributed by Mario Carneiro, 17-Jun-2014.) (Revised by Jim Kingdon, 22-May-2023.)
 |-  S  C_  RR*   &    |-  ( ( x  e.  S  /\  y  e.  S )  ->  sup ( { x ,  y } ,  RR* ,  <  )  e.  S )   &    |-  ( ( x  e.  S  /\  y  e.  S )  -> inf ( { x ,  y } ,  RR* ,  <  )  e.  S )   =>    |-  ( (,) " ( S  X.  S ) )  e.  TopBases
 
22-May-2023iooinsup 11288 Intersection of two open intervals of extended reals. (Contributed by NM, 7-Feb-2007.) (Revised by Jim Kingdon, 22-May-2023.)
 |-  ( ( ( A  e.  RR*  /\  B  e.  RR* )  /\  ( C  e.  RR*  /\  D  e.  RR* ) )  ->  (
 ( A (,) B )  i^i  ( C (,) D ) )  =  ( sup ( { A ,  C } ,  RR* ,  <  ) (,)inf ( { B ,  D } ,  RR* ,  <  )
 ) )
 
21-May-2023df-sumdc 11365 Define the sum of a series with an index set of integers  A. The variable  k is normally a free variable in  B, i.e.,  B can be thought of as  B ( k ). This definition is the result of a collection of discussions over the most general definition for a sum that does not need the index set to have a specified ordering. This definition is in two parts, one for finite sums and one for subsets of the upper integers. When summing over a subset of the upper integers, we extend the index set to the upper integers by adding zero outside the domain, and then sum the set in order, setting the result to the limit of the partial sums, if it exists. This means that conditionally convergent sums can be evaluated meaningfully. For finite sums, we are explicitly order-independent, by picking any bijection to a 1-based finite sequence and summing in the induced order. In both cases we have an  if expression so that we only need  B to be defined where  k  e.  A. In the infinite case, we also require that the indexing set be a decidable subset of an upperset of integers (that is, membership of integers in it is decidable). These two methods of summation produce the same result on their common region of definition (i.e., finite sets of integers). Examples:  sum_ k  e. 
{ 1 ,  2 ,  4 } k means  1  +  2  +  4  =  7, and  sum_ k  e.  NN ( 1  / 
( 2 ^ k
) )  =  1 means 1/2 + 1/4 + 1/8 + ... = 1 (geoihalfsum 11533). (Contributed by NM, 11-Dec-2005.) (Revised by Jim Kingdon, 21-May-2023.)
 |- 
 sum_ k  e.  A  B  =  ( iota x ( E. m  e. 
 ZZ  ( A  C_  ( ZZ>= `  m )  /\  A. j  e.  ( ZZ>=
 `  m )DECID  j  e.  A  /\  seq m (  +  ,  ( n  e.  ZZ  |->  if ( n  e.  A ,  [_ n  /  k ]_ B ,  0 )
 ) )  ~~>  x )  \/  E. m  e.  NN  E. f ( f : ( 1 ... m )
 -1-1-onto-> A  /\  x  =  ( 
 seq 1 (  +  ,  ( n  e.  NN  |->  if ( n  <_  m ,  [_ ( f `  n )  /  k ]_ B ,  0 ) ) ) `  m ) ) ) )
 
19-May-2023bdmopn 14165 The standard bounded metric corresponding to  C generates the same topology as  C. (Contributed by Mario Carneiro, 26-Aug-2015.) (Revised by Jim Kingdon, 19-May-2023.)
 |-  D  =  ( x  e.  X ,  y  e.  X  |-> inf ( { ( x C y ) ,  R } ,  RR* ,  <  ) )   &    |-  J  =  ( MetOpen `  C )   =>    |-  (
 ( C  e.  ( *Met `  X )  /\  R  e.  RR*  /\  0  <  R )  ->  J  =  ( MetOpen `  D )
 )
 
19-May-2023bdbl 14164 The standard bounded metric corresponding to  C generates the same balls as  C for radii less than  R. (Contributed by Mario Carneiro, 26-Aug-2015.) (Revised by Jim Kingdon, 19-May-2023.)
 |-  D  =  ( x  e.  X ,  y  e.  X  |-> inf ( { ( x C y ) ,  R } ,  RR* ,  <  ) )   =>    |-  ( ( ( C  e.  ( *Met `  X )  /\  R  e.  RR*  /\  0  <  R )  /\  ( P  e.  X  /\  S  e.  RR*  /\  S  <_  R ) )  ->  ( P ( ball `  D ) S )  =  ( P ( ball `  C ) S ) )
 
19-May-2023bdmet 14163 The standard bounded metric is a proper metric given an extended metric and a positive real cutoff. (Contributed by Mario Carneiro, 26-Aug-2015.) (Revised by Jim Kingdon, 19-May-2023.)
 |-  D  =  ( x  e.  X ,  y  e.  X  |-> inf ( { ( x C y ) ,  R } ,  RR* ,  <  ) )   =>    |-  ( ( C  e.  ( *Met `  X )  /\  R  e.  RR+ )  ->  D  e.  ( Met `  X ) )
 
19-May-2023xrminltinf 11283 Two ways of saying an extended real is greater than the minimum of two others. (Contributed by Jim Kingdon, 19-May-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR*  /\  C  e.  RR* )  ->  (inf ( { B ,  C } ,  RR* ,  <  )  <  A  <->  ( B  <  A  \/  C  <  A ) ) )
 
19-May-2023clel5 2876 Alternate definition of class membership: a class  X is an element of another class  A iff there is an element of  A equal to  X. (Contributed by AV, 13-Nov-2020.) (Revised by Steven Nguyen, 19-May-2023.)
 |-  ( X  e.  A  <->  E. x  e.  A  X  =  x )
 
18-May-2023xrminrecl 11284 The minimum of two real numbers is the same when taken as extended reals or as reals. (Contributed by Jim Kingdon, 18-May-2023.)
 |-  ( ( A  e.  RR  /\  B  e.  RR )  -> inf ( { A ,  B } ,  RR* ,  <  )  = inf ( { A ,  B } ,  RR ,  <  )
 )
 
18-May-2023ralnex2 2616 Relationship between two restricted universal and existential quantifiers. (Contributed by Glauco Siliprandi, 11-Dec-2019.) (Proof shortened by Wolf Lammen, 18-May-2023.)
 |-  ( A. x  e.  A  A. y  e.  B  -.  ph  <->  -.  E. x  e.  A  E. y  e.  B  ph )
 
17-May-2023bdtrilem 11250 Lemma for bdtri 11251. (Contributed by Steven Nguyen and Jim Kingdon, 17-May-2023.)
 |-  ( ( ( A  e.  RR  /\  0  <_  A )  /\  ( B  e.  RR  /\  0  <_  B )  /\  C  e.  RR+ )  ->  (
 ( abs `  ( A  -  C ) )  +  ( abs `  ( B  -  C ) ) ) 
 <_  ( C  +  ( abs `  ( ( A  +  B )  -  C ) ) ) )
 
15-May-2023xrbdtri 11287 Triangle inequality for bounded values. (Contributed by Jim Kingdon, 15-May-2023.)
 |-  ( ( ( A  e.  RR*  /\  0  <_  A )  /\  ( B  e.  RR*  /\  0  <_  B )  /\  ( C  e.  RR*  /\  0  <  C ) )  -> inf ( { ( A +e B ) ,  C } ,  RR* ,  <  ) 
 <_  (inf ( { A ,  C } ,  RR* ,  <  ) +einf ( { B ,  C } ,  RR* ,  <  ) ) )
 
15-May-2023bdtri 11251 Triangle inequality for bounded values. (Contributed by Jim Kingdon, 15-May-2023.)
 |-  ( ( ( A  e.  RR  /\  0  <_  A )  /\  ( B  e.  RR  /\  0  <_  B )  /\  C  e.  RR+ )  -> inf ( {
 ( A  +  B ) ,  C } ,  RR ,  <  )  <_  (inf ( { A ,  C } ,  RR ,  <  )  + inf ( { B ,  C } ,  RR ,  <  )
 ) )
 
15-May-2023minabs 11247 The minimum of two real numbers in terms of absolute value. (Contributed by Jim Kingdon, 15-May-2023.)
 |-  ( ( A  e.  RR  /\  B  e.  RR )  -> inf ( { A ,  B } ,  RR ,  <  )  =  ( ( ( A  +  B )  -  ( abs `  ( A  -  B ) ) ) 
 /  2 ) )
 
11-May-2023xrmaxadd 11272 Distributing addition over maximum. (Contributed by Jim Kingdon, 11-May-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR*  /\  C  e.  RR* )  ->  sup ( { ( A +e B ) ,  ( A +e C ) } ,  RR* ,  <  )  =  ( A +e sup ( { B ,  C } ,  RR* ,  <  ) ) )
 
11-May-2023xrmaxaddlem 11271 Lemma for xrmaxadd 11272. The case where  A is real. (Contributed by Jim Kingdon, 11-May-2023.)
 |-  ( ( A  e.  RR  /\  B  e.  RR*  /\  C  e.  RR* )  ->  sup ( { ( A +e B ) ,  ( A +e C ) } ,  RR*
 ,  <  )  =  ( A +e sup ( { B ,  C } ,  RR* ,  <  ) ) )
 
10-May-2023xrminadd 11286 Distributing addition over minimum. (Contributed by Jim Kingdon, 10-May-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR*  /\  C  e.  RR* )  -> inf ( {
 ( A +e B ) ,  ( A +e C ) } ,  RR* ,  <  )  =  ( A +einf ( { B ,  C } ,  RR* ,  <  ) ) )
 
10-May-2023xrmaxlesup 11270 Two ways of saying the maximum of two numbers is less than or equal to a third. (Contributed by Mario Carneiro, 18-Jun-2014.) (Revised by Jim Kingdon, 10-May-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR*  /\  C  e.  RR* )  ->  ( sup ( { A ,  B } ,  RR* ,  <  ) 
 <_  C  <->  ( A  <_  C 
 /\  B  <_  C ) ) )
 
10-May-2023xrltmaxsup 11268 The maximum as a least upper bound. (Contributed by Jim Kingdon, 10-May-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR*  /\  C  e.  RR* )  ->  ( C  <  sup ( { A ,  B } ,  RR* ,  <  )  <->  ( C  <  A  \/  C  <  B ) ) )
 
9-May-2023bdxmet 14162 The standard bounded metric is an extended metric given an extended metric and a positive extended real cutoff. (Contributed by Mario Carneiro, 26-Aug-2015.) (Revised by Jim Kingdon, 9-May-2023.)
 |-  D  =  ( x  e.  X ,  y  e.  X  |-> inf ( { ( x C y ) ,  R } ,  RR* ,  <  ) )   =>    |-  ( ( C  e.  ( *Met `  X )  /\  R  e.  RR*  /\  0  <  R )  ->  D  e.  ( *Met `  X ) )
 
9-May-2023bdmetval 14161 Value of the standard bounded metric. (Contributed by Mario Carneiro, 26-Aug-2015.) (Revised by Jim Kingdon, 9-May-2023.)
 |-  D  =  ( x  e.  X ,  y  e.  X  |-> inf ( { ( x C y ) ,  R } ,  RR* ,  <  ) )   =>    |-  ( ( ( C : ( X  X.  X ) --> RR*  /\  R  e.  RR* )  /\  ( A  e.  X  /\  B  e.  X )
 )  ->  ( A D B )  = inf ( { ( A C B ) ,  R } ,  RR* ,  <  ) )
 
7-May-2023setsmstsetg 14142 The topology of a constructed metric space. (Contributed by Mario Carneiro, 28-Aug-2015.) (Revised by Jim Kingdon, 7-May-2023.)
 |-  ( ph  ->  X  =  ( Base `  M )
 )   &    |-  ( ph  ->  D  =  ( ( dist `  M )  |`  ( X  X.  X ) ) )   &    |-  ( ph  ->  K  =  ( M sSet  <. (TopSet `  ndx ) ,  ( MetOpen `  D ) >. ) )   &    |-  ( ph  ->  M  e.  V )   &    |-  ( ph  ->  (
 MetOpen `  D )  e.  W )   =>    |-  ( ph  ->  ( MetOpen `  D )  =  (TopSet `  K ) )
 
6-May-2023dsslid 12674 Slot property of  dist. (Contributed by Jim Kingdon, 6-May-2023.)
 |-  ( dist  = Slot  ( dist ` 
 ndx )  /\  ( dist `  ndx )  e. 
 NN )
 
5-May-2023mopnrel 14102 The class of open sets of a metric space is a relation. (Contributed by Jim Kingdon, 5-May-2023.)
 |- 
 Rel  MetOpen
 
5-May-2023fsumsersdc 11406 Special case of series sum over a finite upper integer index set. (Contributed by Mario Carneiro, 26-Jul-2013.) (Revised by Jim Kingdon, 5-May-2023.)
 |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( F `  k )  =  if ( k  e.  A ,  B ,  0 ) )   &    |-  ( ph  ->  N  e.  ( ZZ>= `  M ) )   &    |-  ( ( ph  /\  k  e.  A ) 
 ->  B  e.  CC )   &    |-  (
 ( ph  /\  k  e.  ( ZZ>= `  M )
 )  -> DECID  k  e.  A )   &    |-  ( ph  ->  A  C_  ( M ... N ) )   =>    |-  ( ph  ->  sum_ k  e.  A  B  =  ( 
 seq M (  +  ,  F ) `  N ) )
 
4-May-2023blex 14048 A ball is a set. (Contributed by Jim Kingdon, 4-May-2023.)
 |-  ( D  e.  ( *Met `  X )  ->  ( ball `  D )  e.  _V )
 
4-May-2023summodc 11394 A sum has at most one limit. (Contributed by Mario Carneiro, 3-Apr-2014.) (Revised by Jim Kingdon, 4-May-2023.)
 |-  F  =  ( k  e.  ZZ  |->  if (
 k  e.  A ,  B ,  0 )
 )   &    |-  ( ( ph  /\  k  e.  A )  ->  B  e.  CC )   &    |-  G  =  ( n  e.  NN  |->  if ( n  <_  ( `  A ) ,  [_ ( f `  n )  /  k ]_ B ,  0 ) )   &    |-  G  =  ( n  e.  NN  |->  if ( n  <_  ( `  A ) , 
 [_ ( f `  n )  /  k ]_ B ,  0 ) )   =>    |-  ( ph  ->  E* x ( E. m  e.  ZZ  ( A  C_  ( ZZ>= `  m )  /\  A. j  e.  ( ZZ>= `  m )DECID  j  e.  A  /\  seq m (  +  ,  F ) 
 ~~>  x )  \/  E. m  e.  NN  E. f
 ( f : ( 1 ... m ) -1-1-onto-> A 
 /\  x  =  ( 
 seq 1 (  +  ,  G ) `  m ) ) ) )
 
4-May-2023summodclem2 11393 Lemma for summodc 11394. (Contributed by Mario Carneiro, 3-Apr-2014.) (Revised by Jim Kingdon, 4-May-2023.)
 |-  F  =  ( k  e.  ZZ  |->  if (
 k  e.  A ,  B ,  0 )
 )   &    |-  ( ( ph  /\  k  e.  A )  ->  B  e.  CC )   &    |-  G  =  ( n  e.  NN  |->  if ( n  <_  ( `  A ) ,  [_ ( f `  n )  /  k ]_ B ,  0 ) )   =>    |-  ( ( ph  /\  E. m  e.  ZZ  ( A  C_  ( ZZ>= `  m )  /\  A. j  e.  ( ZZ>= `  m )DECID  j  e.  A  /\  seq m (  +  ,  F ) 
 ~~>  x ) )  ->  ( E. m  e.  NN  E. f ( f : ( 1 ... m )
 -1-1-onto-> A  /\  y  =  ( 
 seq 1 (  +  ,  G ) `  m ) )  ->  x  =  y ) )
 
4-May-2023xrminrpcl 11285 The minimum of two positive reals is a positive real. (Contributed by Jim Kingdon, 4-May-2023.)
 |-  ( ( A  e.  RR+  /\  B  e.  RR+ )  -> inf ( { A ,  B } ,  RR* ,  <  )  e.  RR+ )
 
4-May-2023xrlemininf 11282 Two ways of saying a number is less than or equal to the minimum of two others. (Contributed by Mario Carneiro, 18-Jun-2014.) (Revised by Jim Kingdon, 4-May-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR*  /\  C  e.  RR* )  ->  ( A  <_ inf ( { B ,  C } ,  RR* ,  <  )  <->  ( A  <_  B 
 /\  A  <_  C ) ) )
 
3-May-2023xrltmininf 11281 Two ways of saying an extended real is less than the minimum of two others. (Contributed by NM, 7-Feb-2007.) (Revised by Jim Kingdon, 3-May-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR*  /\  C  e.  RR* )  ->  ( A  < inf ( { B ,  C } ,  RR* ,  <  )  <->  ( A  <  B 
 /\  A  <  C ) ) )
 
3-May-2023xrmineqinf 11280 The minimum of two extended reals is equal to the second if the first is bigger. (Contributed by Mario Carneiro, 25-Mar-2015.) (Revised by Jim Kingdon, 3-May-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR*  /\  B  <_  A )  -> inf ( { A ,  B } ,  RR* ,  <  )  =  B )
 
3-May-2023xrmin2inf 11279 The minimum of two extended reals is less than or equal to the second. (Contributed by Jim Kingdon, 3-May-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR* )  -> inf ( { A ,  B } ,  RR* ,  <  ) 
 <_  B )
 
3-May-2023xrmin1inf 11278 The minimum of two extended reals is less than or equal to the first. (Contributed by Jim Kingdon, 3-May-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR* )  -> inf ( { A ,  B } ,  RR* ,  <  ) 
 <_  A )
 
3-May-2023xrmincl 11277 The minumum of two extended reals is an extended real. (Contributed by Jim Kingdon, 3-May-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR* )  -> inf ( { A ,  B } ,  RR* ,  <  )  e.  RR* )
 
2-May-2023xrminmax 11276 Minimum expressed in terms of maximum. (Contributed by Jim Kingdon, 2-May-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR* )  -> inf ( { A ,  B } ,  RR* ,  <  )  =  -e sup ( {  -e A ,  -e B } ,  RR* ,  <  ) )
 
2-May-2023xrnegcon1d 11275 Contraposition law for extended real unary minus. (Contributed by Jim Kingdon, 2-May-2023.)
 |-  ( ph  ->  A  e.  RR* )   &    |-  ( ph  ->  B  e.  RR* )   =>    |-  ( ph  ->  (  -e A  =  B  <->  -e B  =  A ) )
 
2-May-2023infxrnegsupex 11274 The infimum of a set of extended reals  A is the negative of the supremum of the negatives of its elements. (Contributed by Jim Kingdon, 2-May-2023.)
 |-  ( ph  ->  E. x  e.  RR*  ( A. y  e.  A  -.  y  < 
 x  /\  A. y  e.  RR*  ( x  <  y  ->  E. z  e.  A  z  <  y ) ) )   &    |-  ( ph  ->  A 
 C_  RR* )   =>    |-  ( ph  -> inf ( A ,  RR* ,  <  )  =  -e sup ( { z  e.  RR*  |  -e z  e.  A } ,  RR* ,  <  ) )
 
2-May-2023xrnegiso 11273 Negation is an order anti-isomorphism of the extended reals, which is its own inverse. (Contributed by Jim Kingdon, 2-May-2023.)
 |-  F  =  ( x  e.  RR*  |->  -e
 x )   =>    |-  ( F  Isom  <  ,  `'  <  ( RR* ,  RR* )  /\  `' F  =  F )
 
30-Apr-2023xrmaxltsup 11269 Two ways of saying the maximum of two numbers is less than a third. (Contributed by Jim Kingdon, 30-Apr-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR*  /\  C  e.  RR* )  ->  ( sup ( { A ,  B } ,  RR* ,  <  )  <  C  <->  ( A  <  C 
 /\  B  <  C ) ) )
 
30-Apr-2023xrmaxrecl 11266 The maximum of two real numbers is the same when taken as extended reals or as reals. (Contributed by Jim Kingdon, 30-Apr-2023.)
 |-  ( ( A  e.  RR  /\  B  e.  RR )  ->  sup ( { A ,  B } ,  RR* ,  <  )  =  sup ( { A ,  B } ,  RR ,  <  ) )
 
30-Apr-2023xrmax2sup 11265 An extended real is less than or equal to the maximum of it and another. (Contributed by NM, 7-Feb-2007.) (Revised by Jim Kingdon, 30-Apr-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR* )  ->  B  <_  sup ( { A ,  B } ,  RR* ,  <  )
 )
 
30-Apr-2023xrmax1sup 11264 An extended real is less than or equal to the maximum of it and another. (Contributed by NM, 7-Feb-2007.) (Revised by Jim Kingdon, 30-Apr-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR* )  ->  A  <_  sup ( { A ,  B } ,  RR* ,  <  )
 )
 
29-Apr-2023xrmaxcl 11263 The maximum of two extended reals is an extended real. (Contributed by Jim Kingdon, 29-Apr-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR* )  ->  sup ( { A ,  B } ,  RR* ,  <  )  e.  RR* )
 
29-Apr-2023xrmaxiflemval 11261 Lemma for xrmaxif 11262. Value of the supremum. (Contributed by Jim Kingdon, 29-Apr-2023.)
 |-  M  =  if ( B  = +oo , +oo ,  if ( B  = -oo ,  A ,  if ( A  = +oo , +oo ,  if ( A  = -oo ,  B ,  sup ( { A ,  B } ,  RR ,  <  ) ) ) ) )   =>    |-  ( ( A  e.  RR*  /\  B  e.  RR* )  ->  ( M  e.  RR*  /\ 
 A. x  e.  { A ,  B }  -.  M  <  x  /\  A. x  e.  RR*  ( x  <  M  ->  E. z  e.  { A ,  B } x  <  z ) ) )
 
29-Apr-2023xrmaxiflemcom 11260 Lemma for xrmaxif 11262. Commutativity of an expression which we will later show to be the supremum. (Contributed by Jim Kingdon, 29-Apr-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR* )  ->  if ( B  = +oo , +oo ,  if ( B  = -oo ,  A ,  if ( A  = +oo , +oo ,  if ( A  = -oo ,  B ,  sup ( { A ,  B } ,  RR ,  <  ) ) ) ) )  =  if ( A  = +oo , +oo ,  if ( A  = -oo ,  B ,  if ( B  = +oo , +oo ,  if ( B  = -oo ,  A ,  sup ( { B ,  A } ,  RR ,  <  ) ) ) ) ) )
 
29-Apr-2023xrmaxiflemcl 11256 Lemma for xrmaxif 11262. Closure. (Contributed by Jim Kingdon, 29-Apr-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR* )  ->  if ( B  = +oo , +oo ,  if ( B  = -oo ,  A ,  if ( A  = +oo , +oo ,  if ( A  = -oo ,  B ,  sup ( { A ,  B } ,  RR ,  <  ) ) ) ) )  e.  RR* )
 
29-Apr-2023sbco2v 1948 Version of sbco2 1965 with disjoint variable conditions. (Contributed by Wolf Lammen, 29-Apr-2023.)
 |- 
 F/ z ph   =>    |-  ( [ y  /  z ] [ z  /  x ] ph  <->  [ y  /  x ] ph )
 
28-Apr-2023xrmaxiflemlub 11259 Lemma for xrmaxif 11262. A least upper bound for  { A ,  B }. (Contributed by Jim Kingdon, 28-Apr-2023.)
 |-  ( ph  ->  A  e.  RR* )   &    |-  ( ph  ->  B  e.  RR* )   &    |-  ( ph  ->  C  e.  RR* )   &    |-  ( ph  ->  C  <  if ( B  = +oo , +oo ,  if ( B  = -oo ,  A ,  if ( A  = +oo , +oo ,  if ( A  = -oo ,  B ,  sup ( { A ,  B } ,  RR ,  <  ) ) ) ) ) )   =>    |-  ( ph  ->  ( C  <  A  \/  C  <  B ) )
 
26-Apr-2023xrmaxif 11262 Maximum of two extended reals in terms of  if expressions. (Contributed by Jim Kingdon, 26-Apr-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR* )  ->  sup ( { A ,  B } ,  RR* ,  <  )  =  if ( B  = +oo , +oo ,  if ( B  = -oo ,  A ,  if ( A  = +oo , +oo ,  if ( A  = -oo ,  B ,  sup ( { A ,  B } ,  RR ,  <  )
 ) ) ) ) )
 
26-Apr-2023xrmaxiflemab 11258 Lemma for xrmaxif 11262. A variation of xrmaxleim 11255- that is, if we know which of two real numbers is larger, we know the maximum of the two. (Contributed by Jim Kingdon, 26-Apr-2023.)
 |-  ( ph  ->  A  e.  RR* )   &    |-  ( ph  ->  B  e.  RR* )   &    |-  ( ph  ->  A  <  B )   =>    |-  ( ph  ->  if ( B  = +oo , +oo ,  if ( B  = -oo ,  A ,  if ( A  = +oo , +oo ,  if ( A  = -oo ,  B ,  sup ( { A ,  B } ,  RR ,  <  )
 ) ) ) )  =  B )
 
26-Apr-2023xrmaxifle 11257 An upper bound for  { A ,  B } in the extended reals. (Contributed by Jim Kingdon, 26-Apr-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR* )  ->  A  <_  if ( B  = +oo , +oo ,  if ( B  = -oo ,  A ,  if ( A  = +oo , +oo ,  if ( A  = -oo ,  B ,  sup ( { A ,  B } ,  RR ,  <  ) ) ) ) ) )
 
25-Apr-2023xrmaxleim 11255 Value of maximum when we know which extended real is larger. (Contributed by Jim Kingdon, 25-Apr-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR* )  ->  ( A  <_  B  ->  sup ( { A ,  B } ,  RR* ,  <  )  =  B ) )
 
25-Apr-2023rpmincl 11249 The minumum of two positive real numbers is a positive real number. (Contributed by Jim Kingdon, 25-Apr-2023.)
 |-  ( ( A  e.  RR+  /\  B  e.  RR+ )  -> inf ( { A ,  B } ,  RR ,  <  )  e.  RR+ )
 
25-Apr-2023mincl 11242 The minumum of two real numbers is a real number. (Contributed by Jim Kingdon, 25-Apr-2023.)
 |-  ( ( A  e.  RR  /\  B  e.  RR )  -> inf ( { A ,  B } ,  RR ,  <  )  e.  RR )
 
24-Apr-2023psmetrel 13983 The class of pseudometrics is a relation. (Contributed by Jim Kingdon, 24-Apr-2023.)
 |- 
 Rel PsMet
 
23-Apr-2023bcval5 10746 Write out the top and bottom parts of the binomial coefficient  ( N  _C  K )  =  ( N  x.  ( N  -  1 )  x. 
...  x.  ( ( N  -  K )  +  1 ) )  /  K ! explicitly. In this form, it is valid even for  N  <  K, although it is no longer valid for nonpositive  K. (Contributed by Mario Carneiro, 22-May-2014.) (Revised by Jim Kingdon, 23-Apr-2023.)
 |-  ( ( N  e.  NN0  /\  K  e.  NN )  ->  ( N  _C  K )  =  ( (  seq ( ( N  -  K )  +  1
 ) (  x.  ,  _I  ) `  N ) 
 /  ( ! `  K ) ) )
 
23-Apr-2023ser3le 10521 Comparison of partial sums of two infinite series of reals. (Contributed by NM, 27-Dec-2005.) (Revised by Jim Kingdon, 23-Apr-2023.)
 |-  ( ph  ->  N  e.  ( ZZ>= `  M )
 )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( F `  k )  e.  RR )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( G `  k )  e.  RR )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( F `  k )  <_  ( G `  k ) )   =>    |-  ( ph  ->  (  seq M (  +  ,  F ) `  N )  <_  (  seq M (  +  ,  G ) `  N ) )
 
23-Apr-2023seq3z 10514 If the operation  .+ has an absorbing element  Z (a.k.a. zero element), then any sequence containing a  Z evaluates to  Z. (Contributed by Mario Carneiro, 27-May-2014.) (Revised by Jim Kingdon, 23-Apr-2023.)
 |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( x  .+  y )  e.  S )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M )
 )  ->  ( F `  x )  e.  S )   &    |-  ( ( ph  /\  x  e.  S )  ->  ( Z  .+  x )  =  Z )   &    |-  ( ( ph  /\  x  e.  S ) 
 ->  ( x  .+  Z )  =  Z )   &    |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  ( F `  K )  =  Z )   =>    |-  ( ph  ->  (  seq M (  .+  ,  F ) `  N )  =  Z )
 
23-Apr-2023seq3caopr 10486 The sum of two infinite series (generalized to an arbitrary commutative and associative operation). (Contributed by NM, 17-Mar-2005.) (Revised by Jim Kingdon, 23-Apr-2023.)
 |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( x  .+  y )  e.  S )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( x  .+  y )  =  ( y  .+  x ) )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S  /\  z  e.  S ) )  ->  ( ( x  .+  y ) 
 .+  z )  =  ( x  .+  (
 y  .+  z )
 ) )   &    |-  ( ph  ->  N  e.  ( ZZ>= `  M ) )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M ) )  ->  ( F `  k )  e.  S )   &    |-  (
 ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( G `  k )  e.  S )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( H `  k )  =  ( ( F `  k
 )  .+  ( G `  k ) ) )   =>    |-  ( ph  ->  (  seq M (  .+  ,  H ) `  N )  =  ( (  seq M (  .+  ,  F ) `
  N )  .+  (  seq M (  .+  ,  G ) `  N ) ) )
 
23-Apr-2023seq3caopr2 10485 The sum of two infinite series (generalized to an arbitrary commutative and associative operation). (Contributed by Mario Carneiro, 30-May-2014.) (Revised by Jim Kingdon, 23-Apr-2023.)
 |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( x  .+  y )  e.  S )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( x Q y )  e.  S )   &    |-  ( ( ph  /\  ( ( x  e.  S  /\  y  e.  S )  /\  (
 z  e.  S  /\  w  e.  S )
 ) )  ->  (
 ( x Q z )  .+  ( y Q w ) )  =  ( ( x 
 .+  y ) Q ( z  .+  w ) ) )   &    |-  ( ph  ->  N  e.  ( ZZ>=
 `  M ) )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( F `  k )  e.  S )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( G `  k )  e.  S )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( H `  k )  =  ( ( F `  k
 ) Q ( G `
  k ) ) )   =>    |-  ( ph  ->  (  seq M (  .+  ,  H ) `  N )  =  ( (  seq M (  .+  ,  F ) `  N ) Q (  seq M (  .+  ,  G ) `
  N ) ) )
 
22-Apr-2023ser3sub 10509 The difference of two infinite series. (Contributed by NM, 17-Mar-2005.) (Revised by Jim Kingdon, 22-Apr-2023.)
 |-  ( ph  ->  N  e.  ( ZZ>= `  M )
 )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( F `  k )  e.  CC )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( G `  k )  e.  CC )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( H `  k )  =  ( ( F `  k
 )  -  ( G `
  k ) ) )   =>    |-  ( ph  ->  (  seq M (  +  ,  H ) `  N )  =  ( (  seq M (  +  ,  F ) `  N )  -  (  seq M (  +  ,  G ) `  N ) ) )
 
22-Apr-2023seq3caopr3 10484 Lemma for seq3caopr2 10485. (Contributed by Mario Carneiro, 25-Apr-2016.) (Revised by Jim Kingdon, 22-Apr-2023.)
 |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( x  .+  y )  e.  S )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( x Q y )  e.  S )   &    |-  ( ph  ->  N  e.  ( ZZ>= `  M ) )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M ) )  ->  ( F `  k )  e.  S )   &    |-  (
 ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( G `  k )  e.  S )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( H `  k )  =  ( ( F `  k
 ) Q ( G `
  k ) ) )   &    |-  ( ( ph  /\  n  e.  ( M..^ N ) )  ->  ( ( (  seq M (  .+  ,  F ) `  n ) Q (  seq M ( 
 .+  ,  G ) `  n ) )  .+  ( ( F `  ( n  +  1
 ) ) Q ( G `  ( n  +  1 ) ) ) )  =  ( ( (  seq M (  .+  ,  F ) `
  n )  .+  ( F `  ( n  +  1 ) ) ) Q ( ( 
 seq M (  .+  ,  G ) `  n )  .+  ( G `  ( n  +  1
 ) ) ) ) )   =>    |-  ( ph  ->  (  seq M (  .+  ,  H ) `  N )  =  ( (  seq M (  .+  ,  F ) `  N ) Q (  seq M (  .+  ,  G ) `
  N ) ) )
 
22-Apr-2023ser3mono 10481 The partial sums in an infinite series of positive terms form a monotonic sequence. (Contributed by NM, 17-Mar-2005.) (Revised by Jim Kingdon, 22-Apr-2023.)
 |-  ( ph  ->  K  e.  ( ZZ>= `  M )
 )   &    |-  ( ph  ->  N  e.  ( ZZ>= `  K )
 )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M )
 )  ->  ( F `  x )  e.  RR )   &    |-  ( ( ph  /\  x  e.  ( ( K  +  1 ) ... N ) )  ->  0  <_  ( F `  x ) )   =>    |-  ( ph  ->  (  seq M (  +  ,  F ) `  K )  <_  (  seq M (  +  ,  F ) `  N ) )
 
21-Apr-2023metrtri 14038 Reverse triangle inequality for the distance function of a metric space. (Contributed by Mario Carneiro, 5-May-2014.) (Revised by Jim Kingdon, 21-Apr-2023.)
 |-  ( ( D  e.  ( Met `  X )  /\  ( A  e.  X  /\  B  e.  X  /\  C  e.  X )
 )  ->  ( abs `  ( ( A D C )  -  ( B D C ) ) )  <_  ( A D B ) )
 
21-Apr-2023sqxpeq0 5054 A Cartesian square is empty iff its member is empty. (Contributed by Jim Kingdon, 21-Apr-2023.)
 |-  ( ( A  X.  A )  =  (/)  <->  A  =  (/) )
 
20-Apr-2023xmetrel 14004 The class of extended metrics is a relation. (Contributed by Jim Kingdon, 20-Apr-2023.)
 |- 
 Rel  *Met
 
20-Apr-2023metrel 14003 The class of metrics is a relation. (Contributed by Jim Kingdon, 20-Apr-2023.)
 |- 
 Rel  Met
 
19-Apr-2023psmetge0 13992 The distance function of a pseudometric space is nonnegative. (Contributed by Thierry Arnoux, 7-Feb-2018.) (Revised by Jim Kingdon, 19-Apr-2023.)
 |-  ( ( D  e.  (PsMet `  X )  /\  A  e.  X  /\  B  e.  X )  ->  0  <_  ( A D B ) )
 
18-Apr-2023xleaddadd 9890 Cancelling a factor of two in  <_ (expressed as addition rather than as a factor to avoid extended real multiplication). (Contributed by Jim Kingdon, 18-Apr-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR* )  ->  ( A  <_  B  <->  ( A +e A )  <_  ( B +e B ) ) )
 
17-Apr-2023xposdif 9885 Extended real version of posdif 8415. (Contributed by Mario Carneiro, 24-Aug-2015.) (Revised by Jim Kingdon, 17-Apr-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR* )  ->  ( A  <  B  <->  0  <  ( B +e  -e A ) ) )
 
17-Apr-2023nmnfgt 9821 An extended real is greater than minus infinite iff they are not equal. (Contributed by Jim Kingdon, 17-Apr-2023.)
 |-  ( A  e.  RR*  ->  ( -oo  <  A  <->  A  =/= -oo )
 )
 
17-Apr-2023npnflt 9818 An extended real is less than plus infinity iff they are not equal. (Contributed by Jim Kingdon, 17-Apr-2023.)
 |-  ( A  e.  RR*  ->  ( A  < +oo  <->  A  =/= +oo )
 )
 
16-Apr-2023xltadd1 9879 Extended real version of ltadd1 8389. (Contributed by Mario Carneiro, 23-Aug-2015.) (Revised by Jim Kingdon, 16-Apr-2023.)
 |-  ( ( A  e.  RR*  /\  B  e.  RR*  /\  C  e.  RR )  ->  ( A  <  B  <->  ( A +e C )  <  ( B +e C ) ) )
 
13-Apr-2023xrmnfdc 9846 An extended real is or is not minus infinity. (Contributed by Jim Kingdon, 13-Apr-2023.)
 |-  ( A  e.  RR*  -> DECID  A  = -oo )
 
13-Apr-2023xrpnfdc 9845 An extended real is or is not plus infinity. (Contributed by Jim Kingdon, 13-Apr-2023.)
 |-  ( A  e.  RR*  -> DECID  A  = +oo )
 
11-Apr-2023dmxpid 4850 The domain of a square Cartesian product. (Contributed by NM, 28-Jul-1995.) (Revised by Jim Kingdon, 11-Apr-2023.)
 |- 
 dom  ( A  X.  A )  =  A
 
9-Apr-2023isumz 11400 Any sum of zero over a summable set is zero. (Contributed by Mario Carneiro, 12-Aug-2013.) (Revised by Jim Kingdon, 9-Apr-2023.)
 |-  ( ( ( M  e.  ZZ  /\  A  C_  ( ZZ>= `  M )  /\  A. j  e.  ( ZZ>=
 `  M )DECID  j  e.  A )  \/  A  e.  Fin )  ->  sum_ k  e.  A  0  =  0 )
 
9-Apr-2023summodclem2a 11392 Lemma for summodc 11394. (Contributed by Mario Carneiro, 3-Apr-2014.) (Revised by Jim Kingdon, 9-Apr-2023.)
 |-  F  =  ( k  e.  ZZ  |->  if (
 k  e.  A ,  B ,  0 )
 )   &    |-  ( ( ph  /\  k  e.  A )  ->  B  e.  CC )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M ) )  -> DECID  k  e.  A )   &    |-  G  =  ( n  e.  NN  |->  if ( n  <_  ( `  A ) ,  [_ ( f `  n )  /  k ]_ B ,  0 ) )   &    |-  H  =  ( n  e.  NN  |->  if ( n  <_  N ,  [_ ( K `
  n )  /  k ]_ B ,  0 ) )   &    |-  ( ph  ->  N  e.  NN )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  A  C_  ( ZZ>= `  M )
 )   &    |-  ( ph  ->  f : ( 1 ...
 N ) -1-1-onto-> A )   &    |-  ( ph  ->  K 
 Isom  <  ,  <  (
 ( 1 ... ( `  A ) ) ,  A ) )   =>    |-  ( ph  ->  seq
 M (  +  ,  F )  ~~>  (  seq 1
 (  +  ,  G ) `  N ) )
 
9-Apr-2023summodclem3 11391 Lemma for summodc 11394. (Contributed by Mario Carneiro, 29-Mar-2014.) (Revised by Jim Kingdon, 9-Apr-2023.)
 |-  F  =  ( k  e.  ZZ  |->  if (
 k  e.  A ,  B ,  0 )
 )   &    |-  ( ( ph  /\  k  e.  A )  ->  B  e.  CC )   &    |-  ( ph  ->  ( M  e.  NN  /\  N  e.  NN )
 )   &    |-  ( ph  ->  f : ( 1 ...
 M ) -1-1-onto-> A )   &    |-  ( ph  ->  K : ( 1 ...
 N ) -1-1-onto-> A )   &    |-  G  =  ( n  e.  NN  |->  if ( n  <_  M ,  [_ ( f `  n )  /  k ]_ B ,  0 ) )   &    |-  H  =  ( n  e.  NN  |->  if ( n  <_  N ,  [_ ( K `  n )  /  k ]_ B ,  0 ) )   =>    |-  ( ph  ->  (  seq 1 (  +  ,  G ) `  M )  =  (  seq 1 (  +  ,  H ) `  N ) )
 
9-Apr-2023sumrbdc 11390 Rebase the starting point of a sum. (Contributed by Mario Carneiro, 14-Jul-2013.) (Revised by Jim Kingdon, 9-Apr-2023.)
 |-  F  =  ( k  e.  ZZ  |->  if (
 k  e.  A ,  B ,  0 )
 )   &    |-  ( ( ph  /\  k  e.  A )  ->  B  e.  CC )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  N  e.  ZZ )   &    |-  ( ph  ->  A  C_  ( ZZ>= `  M )
 )   &    |-  ( ph  ->  A  C_  ( ZZ>= `  N )
 )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  -> DECID  k  e.  A )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  N )
 )  -> DECID  k  e.  A )   =>    |-  ( ph  ->  (  seq M (  +  ,  F )  ~~>  C  <->  seq N (  +  ,  F )  ~~>  C )
 )
 
9-Apr-2023seq3coll 10825 The function  F contains a sparse set of nonzero values to be summed. The function  G is an order isomorphism from the set of nonzero values of  F to a 1-based finite sequence, and  H collects these nonzero values together. Under these conditions, the sum over the values in  H yields the same result as the sum over the original set  F. (Contributed by Mario Carneiro, 2-Apr-2014.) (Revised by Jim Kingdon, 9-Apr-2023.)
 |-  ( ( ph  /\  k  e.  S )  ->  ( Z  .+  k )  =  k )   &    |-  ( ( ph  /\  k  e.  S ) 
 ->  ( k  .+  Z )  =  k )   &    |-  (
 ( ph  /\  ( k  e.  S  /\  n  e.  S ) )  ->  ( k  .+  n )  e.  S )   &    |-  ( ph  ->  Z  e.  S )   &    |-  ( ph  ->  G  Isom  <  ,  <  (
 ( 1 ... ( `  A ) ) ,  A ) )   &    |-  ( ph  ->  N  e.  (
 1 ... ( `  A ) ) )   &    |-  ( ph  ->  A  C_  ( ZZ>=
 `  M ) )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( F `  k )  e.  S )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  1 )
 )  ->  ( H `  k )  e.  S )   &    |-  ( ( ph  /\  k  e.  ( ( M ... ( G `  ( `  A ) ) )  \  A ) )  ->  ( F `  k )  =  Z )   &    |-  (
 ( ph  /\  n  e.  ( 1 ... ( `  A ) ) ) 
 ->  ( H `  n )  =  ( F `  ( G `  n ) ) )   =>    |-  ( ph  ->  ( 
 seq M (  .+  ,  F ) `  ( G `  N ) )  =  (  seq 1
 (  .+  ,  H ) `  N ) )
 
8-Apr-2023zsumdc 11395 Series sum with index set a subset of the upper integers. (Contributed by Mario Carneiro, 13-Jun-2019.) (Revised by Jim Kingdon, 8-Apr-2023.)
 |-  Z  =  ( ZZ>= `  M )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  A  C_  Z )   &    |-  ( ( ph  /\  k  e.  Z )  ->  ( F `  k )  =  if ( k  e.  A ,  B , 
 0 ) )   &    |-  ( ph  ->  A. x  e.  Z DECID  x  e.  A )   &    |-  ( ( ph  /\  k  e.  A ) 
 ->  B  e.  CC )   =>    |-  ( ph  ->  sum_ k  e.  A  B  =  (  ~~>  `  seq M (  +  ,  F ) ) )
 
8-Apr-2023sumrbdclem 11388 Lemma for sumrbdc 11390. (Contributed by Mario Carneiro, 12-Aug-2013.) (Revised by Jim Kingdon, 8-Apr-2023.)
 |-  F  =  ( k  e.  ZZ  |->  if (
 k  e.  A ,  B ,  0 )
 )   &    |-  ( ( ph  /\  k  e.  A )  ->  B  e.  CC )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M ) )  -> DECID  k  e.  A )   &    |-  ( ph  ->  N  e.  ( ZZ>= `  M ) )   =>    |-  ( ( ph  /\  A  C_  ( ZZ>= `  N )
 )  ->  (  seq M (  +  ,  F )  |`  ( ZZ>= `  N ) )  =  seq N (  +  ,  F ) )
 
8-Apr-2023isermulc2 11351 Multiplication of an infinite series by a constant. (Contributed by Paul Chapman, 14-Nov-2007.) (Revised by Jim Kingdon, 8-Apr-2023.)
 |-  Z  =  ( ZZ>= `  M )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  C  e.  CC )   &    |-  ( ph  ->  seq M (  +  ,  F ) 
 ~~>  A )   &    |-  ( ( ph  /\  k  e.  Z ) 
 ->  ( F `  k
 )  e.  CC )   &    |-  (
 ( ph  /\  k  e.  Z )  ->  ( G `  k )  =  ( C  x.  ( F `  k ) ) )   =>    |-  ( ph  ->  seq M (  +  ,  G ) 
 ~~>  ( C  x.  A ) )
 
8-Apr-2023seq3id 10511 Discarding the first few terms of a sequence that starts with all zeroes (or any element which is a left-identity for  .+) has no effect on its sum. (Contributed by Mario Carneiro, 13-Jul-2013.) (Revised by Jim Kingdon, 8-Apr-2023.)
 |-  ( ( ph  /\  x  e.  S )  ->  ( Z  .+  x )  =  x )   &    |-  ( ph  ->  Z  e.  S )   &    |-  ( ph  ->  N  e.  ( ZZ>=
 `  M ) )   &    |-  ( ph  ->  ( F `  N )  e.  S )   &    |-  ( ( ph  /\  x  e.  ( M ... ( N  -  1 ) ) )  ->  ( F `  x )  =  Z )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M )
 )  ->  ( F `  x )  e.  S )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( x  .+  y )  e.  S )   =>    |-  ( ph  ->  (  seq M (  .+  ,  F )  |`  ( ZZ>= `  N ) )  = 
 seq N (  .+  ,  F ) )
 
8-Apr-2023seq3id3 10510 A sequence that consists entirely of "zeroes" sums to "zero". More precisely, a constant sequence with value an element which is a  .+ -idempotent sums (or " .+'s") to that element. (Contributed by Mario Carneiro, 15-Dec-2014.) (Revised by Jim Kingdon, 8-Apr-2023.)
 |-  ( ph  ->  ( Z  .+  Z )  =  Z )   &    |-  ( ph  ->  N  e.  ( ZZ>= `  M ) )   &    |-  ( ( ph  /\  x  e.  ( M
 ... N ) ) 
 ->  ( F `  x )  =  Z )   &    |-  ( ph  ->  Z  e.  S )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M )
 )  ->  ( F `  x )  e.  S )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( x  .+  y )  e.  S )   =>    |-  ( ph  ->  (  seq M (  .+  ,  F ) `  N )  =  Z )
 
7-Apr-2023seq3shft2 10476 Shifting the index set of a sequence. (Contributed by Jim Kingdon, 15-Aug-2021.) (Revised by Jim Kingdon, 7-Apr-2023.)
 |-  ( ph  ->  N  e.  ( ZZ>= `  M )
 )   &    |-  ( ph  ->  K  e.  ZZ )   &    |-  ( ( ph  /\  k  e.  ( M
 ... N ) ) 
 ->  ( F `  k
 )  =  ( G `
  ( k  +  K ) ) )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M )
 )  ->  ( F `  x )  e.  S )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  ( M  +  K ) ) ) 
 ->  ( G `  x )  e.  S )   &    |-  (
 ( ph  /\  ( x  e.  S  /\  y  e.  S ) )  ->  ( x  .+  y )  e.  S )   =>    |-  ( ph  ->  ( 
 seq M (  .+  ,  F ) `  N )  =  (  seq ( M  +  K ) (  .+  ,  G ) `  ( N  +  K ) ) )
 
7-Apr-2023seq3feq 10475 Equality of sequences. (Contributed by Jim Kingdon, 15-Aug-2021.) (Revised by Jim Kingdon, 7-Apr-2023.)
 |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M ) )  ->  ( F `  x )  e.  S )   &    |-  (
 ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( F `  k )  =  ( G `  k ) )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S ) )  ->  ( x 
 .+  y )  e.  S )   =>    |-  ( ph  ->  seq M (  .+  ,  F )  =  seq M ( 
 .+  ,  G )
 )
 
7-Apr-2023r19.2m 3511 Theorem 19.2 of [Margaris] p. 89 with restricted quantifiers (compare 19.2 1638). The restricted version is valid only when the domain of quantification is inhabited. (Contributed by Jim Kingdon, 5-Aug-2018.) (Revised by Jim Kingdon, 7-Apr-2023.)
 |-  ( ( E. y  y  e.  A  /\  A. x  e.  A  ph )  ->  E. x  e.  A  ph )
 
6-Apr-2023lmtopcnp 13911 The image of a convergent sequence under a continuous map is convergent to the image of the original point. (Contributed by Mario Carneiro, 3-May-2014.) (Revised by Jim Kingdon, 6-Apr-2023.)
 |-  ( ph  ->  F (
 ~~> t `  J ) P )   &    |-  ( ph  ->  K  e.  Top )   &    |-  ( ph  ->  G  e.  (
 ( J  CnP  K ) `  P ) )   =>    |-  ( ph  ->  ( G  o.  F ) ( ~~> t `  K ) ( G `
  P ) )
 
6-Apr-2023cnptoprest2 13901 Equivalence of point-continuity in the parent topology and point-continuity in a subspace. (Contributed by Mario Carneiro, 9-Aug-2014.) (Revised by Jim Kingdon, 6-Apr-2023.)
 |-  X  =  U. J   &    |-  Y  =  U. K   =>    |-  ( ( ( J  e.  Top  /\  K  e.  Top )  /\  ( F : X --> B  /\  B  C_  Y ) ) 
 ->  ( F  e.  (
 ( J  CnP  K ) `  P )  <->  F  e.  (
 ( J  CnP  ( Kt  B ) ) `  P ) ) )
 
5-Apr-2023cnptoprest 13900 Equivalence of continuity at a point and continuity of the restricted function at a point. (Contributed by Mario Carneiro, 8-Aug-2014.) (Revised by Jim Kingdon, 5-Apr-2023.)
 |-  X  =  U. J   &    |-  Y  =  U. K   =>    |-  ( ( ( J  e.  Top  /\  K  e.  Top  /\  A  C_  X )  /\  ( P  e.  (
 ( int `  J ) `  A )  /\  F : X --> Y ) ) 
 ->  ( F  e.  (
 ( J  CnP  K ) `  P )  <->  ( F  |`  A )  e.  ( ( ( Jt  A )  CnP  K ) `  P ) ) )
 
4-Apr-2023exmidmp 7158 Excluded middle implies Markov's Principle (MP). (Contributed by Jim Kingdon, 4-Apr-2023.)
 |-  (EXMID 
 ->  om  e. Markov )
 
2-Apr-2023sup3exmid 8917 If any inhabited set of real numbers bounded from above has a supremum, excluded middle follows. (Contributed by Jim Kingdon, 2-Apr-2023.)
 |-  ( ( u  C_  RR  /\  E. w  w  e.  u  /\  E. x  e.  RR  A. y  e.  u  y  <_  x )  ->  E. x  e.  RR  ( A. y  e.  u  -.  x  <  y  /\  A. y  e.  RR  ( y  < 
 x  ->  E. z  e.  u  y  <  z ) ) )   =>    |- DECID  ph
 
31-Mar-2023cnptopresti 13899 One direction of cnptoprest 13900 under the weaker condition that the point is in the subset rather than the interior of the subset. (Contributed by Mario Carneiro, 9-Feb-2015.) (Revised by Jim Kingdon, 31-Mar-2023.)
 |-  ( ( ( J  e.  (TopOn `  X )  /\  K  e.  Top )  /\  ( A  C_  X  /\  P  e.  A  /\  F  e.  ( ( J  CnP  K ) `
  P ) ) )  ->  ( F  |`  A )  e.  (
 ( ( Jt  A ) 
 CnP  K ) `  P ) )
 
30-Mar-2023cncnp2m 13892 A continuous function is continuous at all points. Theorem 7.2(g) of [Munkres] p. 107. (Contributed by Raph Levien, 20-Nov-2006.) (Revised by Jim Kingdon, 30-Mar-2023.)
 |-  X  =  U. J   &    |-  Y  =  U. K   =>    |-  ( ( J  e.  Top  /\  K  e.  Top  /\  E. y  y  e.  X )  ->  ( F  e.  ( J  Cn  K )  <->  A. x  e.  X  F  e.  ( ( J  CnP  K ) `  x ) ) )
 
29-Mar-2023exmidlpo 7144 Excluded middle implies the Limited Principle of Omniscience (LPO). (Contributed by Jim Kingdon, 29-Mar-2023.)
 |-  (EXMID 
 ->  om  e. Omni )
 
28-Mar-2023icnpimaex 13872 Property of a function continuous at a point. (Contributed by FL, 31-Dec-2006.) (Revised by Jim Kingdon, 28-Mar-2023.)
 |-  ( ( ( J  e.  (TopOn `  X )  /\  K  e.  (TopOn `  Y )  /\  P  e.  X )  /\  ( F  e.  ( ( J  CnP  K ) `  P )  /\  A  e.  K  /\  ( F `  P )  e.  A ) )  ->  E. x  e.  J  ( P  e.  x  /\  ( F " x )  C_  A ) )
 
28-Mar-2023cnpf2 13868 A continuous function at point  P is a mapping. (Contributed by Mario Carneiro, 21-Aug-2015.) (Revised by Jim Kingdon, 28-Mar-2023.)
 |-  ( ( J  e.  (TopOn `  X )  /\  K  e.  (TopOn `  Y )  /\  F  e.  (
 ( J  CnP  K ) `  P ) ) 
 ->  F : X --> Y )
 
28-Mar-2023cnprcl2k 13867 Reverse closure for a function continuous at a point. (Contributed by Mario Carneiro, 21-Aug-2015.) (Revised by Jim Kingdon, 28-Mar-2023.)
 |-  ( ( J  e.  (TopOn `  X )  /\  K  e.  Top  /\  F  e.  ( ( J  CnP  K ) `  P ) )  ->  P  e.  X )
 
27-Mar-2023mptrcl 5601 Reverse closure for a mapping: If the function value of a mapping has a member, the argument belongs to the base class of the mapping. (Contributed by AV, 4-Apr-2020.) (Revised by Jim Kingdon, 27-Mar-2023.)
 |-  F  =  ( x  e.  A  |->  B )   =>    |-  ( I  e.  ( F `  X )  ->  X  e.  A )
 
25-Mar-2023lmreltop 13854 The topological space convergence relation is a relation. (Contributed by Jim Kingdon, 25-Mar-2023.)
 |-  ( J  e.  Top  ->  Rel  ( ~~> t `  J ) )
 
25-Mar-2023fodjumkv 7161 A condition which ensures that a nonempty set is inhabited. (Contributed by Jim Kingdon, 25-Mar-2023.)
 |-  ( ph  ->  M  e. Markov )   &    |-  ( ph  ->  F : M -onto-> ( A B ) )   =>    |-  ( ph  ->  ( A  =/=  (/)  ->  E. x  x  e.  A )
 )
 
25-Mar-2023fodjumkvlemres 7160 Lemma for fodjumkv 7161. The final result with  P expressed as a local definition. (Contributed by Jim Kingdon, 25-Mar-2023.)
 |-  ( ph  ->  M  e. Markov )   &    |-  ( ph  ->  F : M -onto-> ( A B ) )   &    |-  P  =  ( y  e.  M  |->  if ( E. z  e.  A  ( F `  y )  =  (inl `  z ) ,  (/) ,  1o ) )   =>    |-  ( ph  ->  ( A  =/=  (/)  ->  E. x  x  e.  A )
 )
 
25-Mar-2023fodju0 7148 Lemma for fodjuomni 7150 and fodjumkv 7161. A condition which shows that  A is empty. (Contributed by Jim Kingdon, 27-Jul-2022.) (Revised by Jim Kingdon, 25-Mar-2023.)
 |-  ( ph  ->  F : O -onto-> ( A B ) )   &    |-  P  =  ( y  e.  O  |->  if ( E. z  e.  A  ( F `  y )  =  (inl `  z ) ,  (/) ,  1o ) )   &    |-  ( ph  ->  A. w  e.  O  ( P `  w )  =  1o )   =>    |-  ( ph  ->  A  =  (/) )
 
25-Mar-2023fodjum 7147 Lemma for fodjuomni 7150 and fodjumkv 7161. A condition which shows that  A is inhabited. (Contributed by Jim Kingdon, 27-Jul-2022.) (Revised by Jim Kingdon, 25-Mar-2023.)
 |-  ( ph  ->  F : O -onto-> ( A B ) )   &    |-  P  =  ( y  e.  O  |->  if ( E. z  e.  A  ( F `  y )  =  (inl `  z ) ,  (/) ,  1o ) )   &    |-  ( ph  ->  E. w  e.  O  ( P `  w )  =  (/) )   =>    |-  ( ph  ->  E. x  x  e.  A )
 
25-Mar-2023fodjuf 7146 Lemma for fodjuomni 7150 and fodjumkv 7161. Domain and range of  P. (Contributed by Jim Kingdon, 27-Jul-2022.) (Revised by Jim Kingdon, 25-Mar-2023.)
 |-  ( ph  ->  F : O -onto-> ( A B ) )   &    |-  P  =  ( y  e.  O  |->  if ( E. z  e.  A  ( F `  y )  =  (inl `  z ) ,  (/) ,  1o ) )   &    |-  ( ph  ->  O  e.  V )   =>    |-  ( ph  ->  P  e.  ( 2o  ^m  O ) )
 
23-Mar-2023restrcl 13828 Reverse closure for the subspace topology. (Contributed by Mario Carneiro, 19-Mar-2015.) (Proof shortened by Jim Kingdon, 23-Mar-2023.)
 |-  ( ( Jt  A )  e.  Top  ->  ( J  e.  _V  /\  A  e.  _V ) )
 
22-Mar-2023neipsm 13815 A neighborhood of a set is a neighborhood of every point in the set. Proposition 1 of [BourbakiTop1] p. I.2. (Contributed by FL, 16-Nov-2006.) (Revised by Jim Kingdon, 22-Mar-2023.)
 |-  X  =  U. J   =>    |-  (
 ( J  e.  Top  /\  S  C_  X  /\  E. x  x  e.  S )  ->  ( N  e.  ( ( nei `  J ) `  S )  <->  A. p  e.  S  N  e.  ( ( nei `  J ) `  { p } ) ) )
 
19-Mar-2023mkvprop 7159 Markov's Principle expressed in terms of propositions (or more precisely, the  A  =  om case is Markov's Principle). (Contributed by Jim Kingdon, 19-Mar-2023.)
 |-  ( ( A  e. Markov  /\ 
 A. n  e.  A DECID  ph  /\  -.  A. n  e.  A  -.  ph )  ->  E. n  e.  A  ph )
 
18-Mar-2023omnimkv 7157 An omniscient set is Markov. In particular, the case where  A is  om means that the Limited Principle of Omniscience (LPO) implies Markov's Principle (MP). (Contributed by Jim Kingdon, 18-Mar-2023.)
 |-  ( A  e. Omni  ->  A  e. Markov )
 
18-Mar-2023ismkvmap 7155 The predicate of being Markov stated in terms of set exponentiation. (Contributed by Jim Kingdon, 18-Mar-2023.)
 |-  ( A  e.  V  ->  ( A  e. Markov  <->  A. f  e.  ( 2o  ^m  A ) ( -.  A. x  e.  A  ( f `  x )  =  1o  ->  E. x  e.  A  ( f `  x )  =  (/) ) ) )
 
18-Mar-2023ismkv 7154 The predicate of being Markov. (Contributed by Jim Kingdon, 18-Mar-2023.)
 |-  ( A  e.  V  ->  ( A  e. Markov  <->  A. f ( f : A --> 2o  ->  ( -.  A. x  e.  A  ( f `  x )  =  1o  ->  E. x  e.  A  ( f `  x )  =  (/) ) ) ) )
 
18-Mar-2023df-markov 7153 A Markov set is one where if a predicate (here represented by a function  f) on that set does not hold (where hold means is equal to  1o) for all elements, then there exists an element where it fails (is equal to  (/)). Generalization of definition 2.5 of [Pierik], p. 9.

In particular,  om  e. Markov is known as Markov's Principle (MP). (Contributed by Jim Kingdon, 18-Mar-2023.)

 |- Markov  =  { y  |  A. f ( f : y --> 2o  ->  ( -. 
 A. x  e.  y  ( f `  x )  =  1o  ->  E. x  e.  y  ( f `  x )  =  (/) ) ) }
 
17-Mar-2023finct 7118 A finite set is countable. (Contributed by Jim Kingdon, 17-Mar-2023.)
 |-  ( A  e.  Fin  ->  E. g  g : om -onto-> ( A 1o )
 )
 
16-Mar-2023ctmlemr 7110 Lemma for ctm 7111. One of the directions of the biconditional. (Contributed by Jim Kingdon, 16-Mar-2023.)
 |-  ( E. x  x  e.  A  ->  ( E. f  f : om -onto-> A  ->  E. f  f : om -onto-> ( A 1o ) ) )
 
15-Mar-2023caseinl 7093 Applying the "case" construction to a left injection. (Contributed by Jim Kingdon, 15-Mar-2023.)
 |-  ( ph  ->  F  Fn  B )   &    |-  ( ph  ->  Fun 
 G )   &    |-  ( ph  ->  A  e.  B )   =>    |-  ( ph  ->  (case ( F ,  G ) `  (inl `  A ) )  =  ( F `  A ) )
 
13-Mar-2023enumct 7117 A finitely enumerable set is countable. Lemma 8.1.14 of [AczelRathjen], p. 73 (except that our definition of countable does not require the set to be inhabited). "Finitely enumerable" is defined as  E. n  e. 
om E. f f : n -onto-> A per Definition 8.1.4 of [AczelRathjen], p. 71 and "countable" is defined as  E. g g : om -onto-> ( A 1o ) per [BauerSwan], p. 14:3. (Contributed by Jim Kingdon, 13-Mar-2023.)
 |-  ( E. n  e. 
 om  E. f  f : n -onto-> A  ->  E. g  g : om -onto-> ( A 1o ) )
 
13-Mar-2023enumctlemm 7116 Lemma for enumct 7117. The case where  N is greater than zero. (Contributed by Jim Kingdon, 13-Mar-2023.)
 |-  ( ph  ->  F : N -onto-> A )   &    |-  ( ph  ->  N  e.  om )   &    |-  ( ph  ->  (/)  e.  N )   &    |-  G  =  ( k  e.  om  |->  if ( k  e.  N ,  ( F `
  k ) ,  ( F `  (/) ) ) )   =>    |-  ( ph  ->  G : om -onto-> A )
 
13-Mar-2023ctm 7111 Two equivalent definitions of countable for an inhabited set. Remark of [BauerSwan], p. 14:3. (Contributed by Jim Kingdon, 13-Mar-2023.)
 |-  ( E. x  x  e.  A  ->  ( E. f  f : om -onto-> ( A 1o )  <->  E. f  f : om -onto-> A ) )
 
13-Mar-20230ct 7109 The empty set is countable. Remark of [BauerSwan], p. 14:3 which also has the definition of countable used here. (Contributed by Jim Kingdon, 13-Mar-2023.)
 |- 
 E. f  f : om -onto-> ( (/) 1o )
 
13-Mar-2023ctex 6756 A class dominated by  om is a set. See also ctfoex 7120 which says that a countable class is a set. (Contributed by Thierry Arnoux, 29-Dec-2016.) (Proof shortened by Jim Kingdon, 13-Mar-2023.)
 |-  ( A  ~<_  om  ->  A  e.  _V )
 
12-Mar-2023cls0 13794 The closure of the empty set. (Contributed by NM, 2-Oct-2007.) (Proof shortened by Jim Kingdon, 12-Mar-2023.)
 |-  ( J  e.  Top  ->  ( ( cls `  J ) `  (/) )  =  (/) )
 
12-Mar-2023algrp1 12049 The value of the algorithm iterator 
R at  ( K  + 
1 ). (Contributed by Paul Chapman, 31-Mar-2011.) (Revised by Jim Kingdon, 12-Mar-2023.)
 |-  Z  =  ( ZZ>= `  M )   &    |-  R  =  seq M ( ( F  o.  1st ) ,  ( Z  X.  { A }
 ) )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  A  e.  S )   &    |-  ( ph  ->  F : S --> S )   =>    |-  ( ( ph  /\  K  e.  Z ) 
 ->  ( R `  ( K  +  1 )
 )  =  ( F `
  ( R `  K ) ) )
 
12-Mar-2023ialgr0 12047 The value of the algorithm iterator 
R at  0 is the initial state  A. (Contributed by Paul Chapman, 31-Mar-2011.) (Revised by Jim Kingdon, 12-Mar-2023.)
 |-  Z  =  ( ZZ>= `  M )   &    |-  R  =  seq M ( ( F  o.  1st ) ,  ( Z  X.  { A }
 ) )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  A  e.  S )   &    |-  ( ph  ->  F : S --> S )   =>    |-  ( ph  ->  ( R `  M )  =  A )
 
11-Mar-2023ntreq0 13793 Two ways to say that a subset has an empty interior. (Contributed by NM, 3-Oct-2007.) (Revised by Jim Kingdon, 11-Mar-2023.)
 |-  X  =  U. J   =>    |-  (
 ( J  e.  Top  /\  S  C_  X )  ->  ( ( ( int `  J ) `  S )  =  (/)  <->  A. x  e.  J  ( x  C_  S  ->  x  =  (/) ) ) )
 
11-Mar-2023clstop 13788 The closure of a topology's underlying set is the entire set. (Contributed by NM, 5-Oct-2007.) (Proof shortened by Jim Kingdon, 11-Mar-2023.)
 |-  X  =  U. J   =>    |-  ( J  e.  Top  ->  (
 ( cls `  J ) `  X )  =  X )
 
11-Mar-2023ntrss 13780 Subset relationship for interior. (Contributed by NM, 3-Oct-2007.) (Revised by Jim Kingdon, 11-Mar-2023.)
 |-  X  =  U. J   =>    |-  (
 ( J  e.  Top  /\  S  C_  X  /\  T  C_  S )  ->  ( ( int `  J ) `  T )  C_  ( ( int `  J ) `  S ) )
 
10-Mar-2023iuncld 13776 A finite indexed union of closed sets is closed. (Contributed by Mario Carneiro, 19-Sep-2015.) (Revised by Jim Kingdon, 10-Mar-2023.)
 |-  X  =  U. J   =>    |-  (
 ( J  e.  Top  /\  A  e.  Fin  /\  A. x  e.  A  B  e.  ( Clsd `  J )
 )  ->  U_ x  e.  A  B  e.  ( Clsd `  J ) )
 
5-Mar-20232basgeng 13743 Conditions that determine the equality of two generated topologies. (Contributed by NM, 8-May-2007.) (Revised by Jim Kingdon, 5-Mar-2023.)
 |-  ( ( B  e.  V  /\  B  C_  C  /\  C  C_  ( topGen `  B ) )  ->  ( topGen `  B )  =  ( topGen `  C )
 )
 
5-Mar-2023exmidsssn 4204 Excluded middle is equivalent to the biconditionalized version of sssnr 3755 for sets. (Contributed by Jim Kingdon, 5-Mar-2023.)
 |-  (EXMID  <->  A. x A. y ( x  C_  { y } 
 <->  ( x  =  (/)  \/  x  =  { y } ) ) )
 
5-Mar-2023exmidn0m 4203 Excluded middle is equivalent to any set being empty or inhabited. (Contributed by Jim Kingdon, 5-Mar-2023.)
 |-  (EXMID  <->  A. x ( x  =  (/)  \/  E. y  y  e.  x ) )
 
4-Mar-2023eltg3 13718 Membership in a topology generated by a basis. (Contributed by NM, 15-Jul-2006.) (Revised by Jim Kingdon, 4-Mar-2023.)
 |-  ( B  e.  V  ->  ( A  e.  ( topGen `
  B )  <->  E. x ( x 
 C_  B  /\  A  =  U. x ) ) )
 
4-Mar-2023tgvalex 12718 The topology generated by a basis is a set. (Contributed by Jim Kingdon, 4-Mar-2023.)
 |-  ( B  e.  V  ->  ( topGen `  B )  e.  _V )
 
4-Mar-2023biadanii 613 Inference associated with biadani 612. Add a conjunction to an equivalence. (Contributed by Jeff Madsen, 20-Jun-2011.) (Proof shortened by BJ, 4-Mar-2023.)
 |-  ( ph  ->  ps )   &    |-  ( ps  ->  ( ph  <->  ch ) )   =>    |-  ( ph  <->  ( ps  /\  ch ) )
 
4-Mar-2023biadani 612 An implication implies to the equivalence of some implied equivalence and some other equivalence involving a conjunction. (Contributed by BJ, 4-Mar-2023.)
 |-  ( ph  ->  ps )   =>    |-  (
 ( ps  ->  ( ph 
 <->  ch ) )  <->  ( ph  <->  ( ps  /\  ch ) ) )
 
16-Feb-2023ixp0 6734 The infinite Cartesian product of a family  B ( x ) with an empty member is empty. (Contributed by NM, 1-Oct-2006.) (Revised by Jim Kingdon, 16-Feb-2023.)
 |-  ( E. x  e.  A  B  =  (/)  ->  X_ x  e.  A  B  =  (/) )
 
16-Feb-2023ixpm 6733 If an infinite Cartesian product of a family  B ( x ) is inhabited, every  B ( x ) is inhabited. (Contributed by Mario Carneiro, 22-Jun-2016.) (Revised by Jim Kingdon, 16-Feb-2023.)
 |-  ( E. f  f  e.  X_ x  e.  A  B  ->  A. x  e.  A  E. z  z  e.  B )
 
16-Feb-2023exmidundifim 4209 Excluded middle is equivalent to every subset having a complement. Variation of exmidundif 4208 with an implication rather than a biconditional. (Contributed by Jim Kingdon, 16-Feb-2023.)
 |-  (EXMID  <->  A. x A. y ( x  C_  y  ->  ( x  u.  ( y 
 \  x ) )  =  y ) )
 
15-Feb-2023ixpintm 6728 The intersection of a collection of infinite Cartesian products. (Contributed by Mario Carneiro, 3-Feb-2015.) (Revised by Jim Kingdon, 15-Feb-2023.)
 |-  ( E. z  z  e.  B  ->  X_ x  e.  A  |^| B  =  |^|_ y  e.  B  X_ x  e.  A  y )
 
15-Feb-2023ixpiinm 6727 The indexed intersection of a collection of infinite Cartesian products. (Contributed by Mario Carneiro, 6-Feb-2015.) (Revised by Jim Kingdon, 15-Feb-2023.)
 |-  ( E. z  z  e.  B  ->  X_ x  e.  A  |^|_ y  e.  B  C  =  |^|_ y  e.  B  X_ x  e.  A  C )
 
15-Feb-2023ixpexgg 6725 The existence of an infinite Cartesian product.  x is normally a free-variable parameter in 
B. Remark in Enderton p. 54. (Contributed by NM, 28-Sep-2006.) (Revised by Jim Kingdon, 15-Feb-2023.)
 |-  ( ( A  e.  W  /\  A. x  e.  A  B  e.  V )  ->  X_ x  e.  A  B  e.  _V )
 
15-Feb-2023nfixpxy 6720 Bound-variable hypothesis builder for indexed Cartesian product. (Contributed by Mario Carneiro, 15-Oct-2016.) (Revised by Jim Kingdon, 15-Feb-2023.)
 |-  F/_ y A   &    |-  F/_ y B   =>    |-  F/_ y X_ x  e.  A  B
 
13-Feb-2023topnpropgd 12708 The topology extractor function depends only on the base and topology components. (Contributed by NM, 18-Jul-2006.) (Revised by Jim Kingdon, 13-Feb-2023.)
 |-  ( ph  ->  ( Base `  K )  =  ( Base `  L )
 )   &    |-  ( ph  ->  (TopSet `  K )  =  (TopSet `  L ) )   &    |-  ( ph  ->  K  e.  V )   &    |-  ( ph  ->  L  e.  W )   =>    |-  ( ph  ->  ( TopOpen `  K )  =  (
 TopOpen `  L ) )
 
12-Feb-2023slotex 12492 Existence of slot value. A corollary of slotslfn 12491. (Contributed by Jim Kingdon, 12-Feb-2023.)
 |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )   =>    |-  ( A  e.  V  ->  ( E `  A )  e.  _V )
 
11-Feb-2023topnvalg 12706 Value of the topology extractor function. (Contributed by Mario Carneiro, 13-Aug-2015.) (Revised by Jim Kingdon, 11-Feb-2023.)
 |-  B  =  ( Base `  W )   &    |-  J  =  (TopSet `  W )   =>    |-  ( W  e.  V  ->  ( Jt  B )  =  (
 TopOpen `  W ) )
 
10-Feb-2023slotslfn 12491 A slot is a function on sets, treated as structures. (Contributed by Mario Carneiro, 22-Sep-2015.) (Revised by Jim Kingdon, 10-Feb-2023.)
 |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )   =>    |-  E  Fn  _V
 
9-Feb-2023pleslid 12663 Slot property of  le. (Contributed by Jim Kingdon, 9-Feb-2023.)
 |-  ( le  = Slot  ( le `  ndx )  /\  ( le `  ndx )  e.  NN )
 
9-Feb-2023topgrptsetd 12660 The topology of a constructed topological group. (Contributed by Mario Carneiro, 29-Aug-2015.) (Revised by Jim Kingdon, 9-Feb-2023.)
 |-  W  =  { <. (
 Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. (TopSet `  ndx ) ,  J >. }   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  W )   &    |-  ( ph  ->  J  e.  X )   =>    |-  ( ph  ->  J  =  (TopSet `  W )
 )
 
9-Feb-2023topgrpplusgd 12659 The additive operation of a constructed topological group. (Contributed by Mario Carneiro, 29-Aug-2015.) (Revised by Jim Kingdon, 9-Feb-2023.)
 |-  W  =  { <. (
 Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. (TopSet `  ndx ) ,  J >. }   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  W )   &    |-  ( ph  ->  J  e.  X )   =>    |-  ( ph  ->  .+  =  ( +g  `  W )
 )
 
9-Feb-2023topgrpbasd 12658 The base set of a constructed topological group. (Contributed by Mario Carneiro, 29-Aug-2015.) (Revised by Jim Kingdon, 9-Feb-2023.)
 |-  W  =  { <. (
 Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. (TopSet `  ndx ) ,  J >. }   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  W )   &    |-  ( ph  ->  J  e.  X )   =>    |-  ( ph  ->  B  =  ( Base `  W )
 )
 
9-Feb-2023topgrpstrd 12657 A constructed topological group is a structure. (Contributed by Mario Carneiro, 29-Aug-2015.) (Revised by Jim Kingdon, 9-Feb-2023.)
 |-  W  =  { <. (
 Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. (TopSet `  ndx ) ,  J >. }   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  W )   &    |-  ( ph  ->  J  e.  X )   =>    |-  ( ph  ->  W Struct  <.
 1 ,  9 >.
 )
 
9-Feb-2023tsetslid 12649 Slot property of TopSet. (Contributed by Jim Kingdon, 9-Feb-2023.)
 |-  (TopSet  = Slot  (TopSet `  ndx )  /\  (TopSet `  ndx )  e.  NN )
 
8-Feb-2023ipsipd 12643 The multiplicative operation of a constructed inner product space. (Contributed by Stefan O'Rear, 27-Nov-2014.) (Revised by Jim Kingdon, 8-Feb-2023.)
 |-  A  =  ( { <. ( Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. ( .r `  ndx ) ,  .X.  >. }  u.  {
 <. (Scalar `  ndx ) ,  S >. ,  <. ( .s
 `  ndx ) ,  .x.  >. ,  <. ( .i `  ndx ) ,  I >. } )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  W )   &    |-  ( ph  ->  .X.  e.  X )   &    |-  ( ph  ->  S  e.  Y )   &    |-  ( ph  ->  .x.  e.  Q )   &    |-  ( ph  ->  I  e.  Z )   =>    |-  ( ph  ->  I  =  ( .i `  A ) )
 
8-Feb-2023ipsvscad 12642 The scalar product operation of a constructed inner product space. (Contributed by Stefan O'Rear, 27-Nov-2014.) (Revised by Jim Kingdon, 8-Feb-2023.)
 |-  A  =  ( { <. ( Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. ( .r `  ndx ) ,  .X.  >. }  u.  {
 <. (Scalar `  ndx ) ,  S >. ,  <. ( .s
 `  ndx ) ,  .x.  >. ,  <. ( .i `  ndx ) ,  I >. } )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  W )   &    |-  ( ph  ->  .X.  e.  X )   &    |-  ( ph  ->  S  e.  Y )   &    |-  ( ph  ->  .x.  e.  Q )   &    |-  ( ph  ->  I  e.  Z )   =>    |-  ( ph  ->  .x.  =  ( .s `  A ) )
 
8-Feb-2023ipsscad 12641 The set of scalars of a constructed inner product space. (Contributed by Stefan O'Rear, 27-Nov-2014.) (Revised by Jim Kingdon, 8-Feb-2023.)
 |-  A  =  ( { <. ( Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. ( .r `  ndx ) ,  .X.  >. }  u.  {
 <. (Scalar `  ndx ) ,  S >. ,  <. ( .s
 `  ndx ) ,  .x.  >. ,  <. ( .i `  ndx ) ,  I >. } )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  W )   &    |-  ( ph  ->  .X.  e.  X )   &    |-  ( ph  ->  S  e.  Y )   &    |-  ( ph  ->  .x.  e.  Q )   &    |-  ( ph  ->  I  e.  Z )   =>    |-  ( ph  ->  S  =  (Scalar `  A )
 )
 
7-Feb-2023ipsmulrd 12640 The multiplicative operation of a constructed inner product space. (Contributed by Stefan O'Rear, 27-Nov-2014.) (Revised by Jim Kingdon, 7-Feb-2023.)
 |-  A  =  ( { <. ( Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. ( .r `  ndx ) ,  .X.  >. }  u.  {
 <. (Scalar `  ndx ) ,  S >. ,  <. ( .s
 `  ndx ) ,  .x.  >. ,  <. ( .i `  ndx ) ,  I >. } )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  W )   &    |-  ( ph  ->  .X.  e.  X )   &    |-  ( ph  ->  S  e.  Y )   &    |-  ( ph  ->  .x.  e.  Q )   &    |-  ( ph  ->  I  e.  Z )   =>    |-  ( ph  ->  .X.  =  ( .r `  A ) )
 
7-Feb-2023ipsaddgd 12639 The additive operation of a constructed inner product space. (Contributed by Stefan O'Rear, 27-Nov-2014.) (Revised by Jim Kingdon, 7-Feb-2023.)
 |-  A  =  ( { <. ( Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. ( .r `  ndx ) ,  .X.  >. }  u.  {
 <. (Scalar `  ndx ) ,  S >. ,  <. ( .s
 `  ndx ) ,  .x.  >. ,  <. ( .i `  ndx ) ,  I >. } )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  W )   &    |-  ( ph  ->  .X.  e.  X )   &    |-  ( ph  ->  S  e.  Y )   &    |-  ( ph  ->  .x.  e.  Q )   &    |-  ( ph  ->  I  e.  Z )   =>    |-  ( ph  ->  .+  =  ( +g  `  A )
 )
 
7-Feb-2023ipsbased 12638 The base set of a constructed inner product space. (Contributed by Stefan O'Rear, 27-Nov-2014.) (Revised by Jim Kingdon, 7-Feb-2023.)
 |-  A  =  ( { <. ( Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. ( .r `  ndx ) ,  .X.  >. }  u.  {
 <. (Scalar `  ndx ) ,  S >. ,  <. ( .s
 `  ndx ) ,  .x.  >. ,  <. ( .i `  ndx ) ,  I >. } )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  W )   &    |-  ( ph  ->  .X.  e.  X )   &    |-  ( ph  ->  S  e.  Y )   &    |-  ( ph  ->  .x.  e.  Q )   &    |-  ( ph  ->  I  e.  Z )   =>    |-  ( ph  ->  B  =  ( Base `  A )
 )
 
7-Feb-2023ipsstrd 12637 A constructed inner product space is a structure. (Contributed by Stefan O'Rear, 27-Nov-2014.) (Revised by Jim Kingdon, 7-Feb-2023.)
 |-  A  =  ( { <. ( Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. ( .r `  ndx ) ,  .X.  >. }  u.  {
 <. (Scalar `  ndx ) ,  S >. ,  <. ( .s
 `  ndx ) ,  .x.  >. ,  <. ( .i `  ndx ) ,  I >. } )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  W )   &    |-  ( ph  ->  .X.  e.  X )   &    |-  ( ph  ->  S  e.  Y )   &    |-  ( ph  ->  .x.  e.  Q )   &    |-  ( ph  ->  I  e.  Z )   =>    |-  ( ph  ->  A Struct  <.
 1 ,  8 >.
 )
 
7-Feb-2023ipslid 12632 Slot property of  .i. (Contributed by Jim Kingdon, 7-Feb-2023.)
 |-  ( .i  = Slot  ( .i `  ndx )  /\  ( .i `  ndx )  e.  NN )
 
7-Feb-2023lmodvscad 12629 The scalar product operation of a constructed left vector space. (Contributed by Mario Carneiro, 2-Oct-2013.) (Revised by Jim Kingdon, 7-Feb-2023.)
 |-  W  =  ( { <. ( Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. (Scalar `  ndx ) ,  F >. }  u.  { <. ( .s `  ndx ) ,  .x.  >. } )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  X )   &    |-  ( ph  ->  F  e.  Y )   &    |-  ( ph  ->  .x.  e.  Z )   =>    |-  ( ph  ->  .x.  =  ( .s `  W ) )
 
6-Feb-2023lmodscad 12628 The set of scalars of a constructed left vector space. (Contributed by Mario Carneiro, 2-Oct-2013.) (Revised by Jim Kingdon, 6-Feb-2023.)
 |-  W  =  ( { <. ( Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. (Scalar `  ndx ) ,  F >. }  u.  { <. ( .s `  ndx ) ,  .x.  >. } )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  X )   &    |-  ( ph  ->  F  e.  Y )   &    |-  ( ph  ->  .x.  e.  Z )   =>    |-  ( ph  ->  F  =  (Scalar `  W )
 )
 
6-Feb-2023lmodplusgd 12627 The additive operation of a constructed left vector space. (Contributed by Mario Carneiro, 2-Oct-2013.) (Revised by Jim Kingdon, 6-Feb-2023.)
 |-  W  =  ( { <. ( Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. (Scalar `  ndx ) ,  F >. }  u.  { <. ( .s `  ndx ) ,  .x.  >. } )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  X )   &    |-  ( ph  ->  F  e.  Y )   &    |-  ( ph  ->  .x.  e.  Z )   =>    |-  ( ph  ->  .+  =  ( +g  `  W )
 )
 
6-Feb-2023lmodbased 12626 The base set of a constructed left vector space. (Contributed by Mario Carneiro, 2-Oct-2013.) (Revised by Jim Kingdon, 6-Feb-2023.)
 |-  W  =  ( { <. ( Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. (Scalar `  ndx ) ,  F >. }  u.  { <. ( .s `  ndx ) ,  .x.  >. } )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  X )   &    |-  ( ph  ->  F  e.  Y )   &    |-  ( ph  ->  .x.  e.  Z )   =>    |-  ( ph  ->  B  =  ( Base `  W )
 )
 
5-Feb-2023lmodstrd 12625 A constructed left module or left vector space is a structure. (Contributed by Mario Carneiro, 1-Oct-2013.) (Revised by Jim Kingdon, 5-Feb-2023.)
 |-  W  =  ( { <. ( Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. (Scalar `  ndx ) ,  F >. }  u.  { <. ( .s `  ndx ) ,  .x.  >. } )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  X )   &    |-  ( ph  ->  F  e.  Y )   &    |-  ( ph  ->  .x.  e.  Z )   =>    |-  ( ph  ->  W Struct  <.
 1 ,  6 >.
 )
 
5-Feb-2023vscaslid 12624 Slot property of  .s. (Contributed by Jim Kingdon, 5-Feb-2023.)
 |-  ( .s  = Slot  ( .s `  ndx )  /\  ( .s `  ndx )  e.  NN )
 
5-Feb-2023scaslid 12614 Slot property of Scalar. (Contributed by Jim Kingdon, 5-Feb-2023.)
 |-  (Scalar  = Slot  (Scalar `  ndx )  /\  (Scalar `  ndx )  e.  NN )
 
5-Feb-2023srngplusgd 12609 The addition operation of a constructed star ring. (Contributed by Mario Carneiro, 20-Jun-2015.) (Revised by Jim Kingdon, 5-Feb-2023.)
 |-  R  =  ( { <. ( Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. ( .r `  ndx ) ,  .x.  >. }  u.  {
 <. ( *r `  ndx ) ,  .*  >. } )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  W )   &    |-  ( ph  ->  .x.  e.  X )   &    |-  ( ph  ->  .*  e.  Y )   =>    |-  ( ph  ->  .+  =  ( +g  `  R ) )
 
5-Feb-2023srngbased 12608 The base set of a constructed star ring. (Contributed by Mario Carneiro, 18-Nov-2013.) (Revised by Jim Kingdon, 5-Feb-2023.)
 |-  R  =  ( { <. ( Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. ( .r `  ndx ) ,  .x.  >. }  u.  {
 <. ( *r `  ndx ) ,  .*  >. } )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  W )   &    |-  ( ph  ->  .x.  e.  X )   &    |-  ( ph  ->  .*  e.  Y )   =>    |-  ( ph  ->  B  =  ( Base `  R ) )
 
5-Feb-2023srngstrd 12607 A constructed star ring is a structure. (Contributed by Mario Carneiro, 18-Nov-2013.) (Revised by Jim Kingdon, 5-Feb-2023.)
 |-  R  =  ( { <. ( Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. ( .r `  ndx ) ,  .x.  >. }  u.  {
 <. ( *r `  ndx ) ,  .*  >. } )   &    |-  ( ph  ->  B  e.  V )   &    |-  ( ph  ->  .+  e.  W )   &    |-  ( ph  ->  .x.  e.  X )   &    |-  ( ph  ->  .*  e.  Y )   =>    |-  ( ph  ->  R Struct  <. 1 ,  4 >.
 )
 
5-Feb-2023opelstrsl 12576 The slot of a structure which contains an ordered pair for that slot. (Contributed by Jim Kingdon, 5-Feb-2023.)
 |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )   &    |-  ( ph  ->  S Struct  X )   &    |-  ( ph  ->  V  e.  Y )   &    |-  ( ph  ->  <. ( E `  ndx ) ,  V >.  e.  S )   =>    |-  ( ph  ->  V  =  ( E `  S ) )
 
4-Feb-2023starvslid 12602 Slot property of  *r. (Contributed by Jim Kingdon, 4-Feb-2023.)
 |-  ( *r  = Slot 
 ( *r `  ndx )  /\  ( *r `  ndx )  e.  NN )
 
3-Feb-2023rngbaseg 12597 The base set of a constructed ring. (Contributed by Mario Carneiro, 2-Oct-2013.) (Revised by Jim Kingdon, 3-Feb-2023.)
 |-  R  =  { <. (
 Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. ( .r `  ndx ) ,  .x.  >. }   =>    |-  ( ( B  e.  V  /\  .+  e.  W  /\  .x.  e.  X )  ->  B  =  ( Base `  R )
 )
 
3-Feb-2023rngstrg 12596 A constructed ring is a structure. (Contributed by Mario Carneiro, 28-Sep-2013.) (Revised by Jim Kingdon, 3-Feb-2023.)
 |-  R  =  { <. (
 Base `  ndx ) ,  B >. ,  <. ( +g  ` 
 ndx ) ,  .+  >. ,  <. ( .r `  ndx ) ,  .x.  >. }   =>    |-  ( ( B  e.  V  /\  .+  e.  W  /\  .x.  e.  X )  ->  R Struct  <. 1 ,  3 >. )
 
3-Feb-2023mulrslid 12593 Slot property of  .r. (Contributed by Jim Kingdon, 3-Feb-2023.)
 |-  ( .r  = Slot  ( .r `  ndx )  /\  ( .r `  ndx )  e.  NN )
 
3-Feb-2023plusgslid 12574 Slot property of  +g. (Contributed by Jim Kingdon, 3-Feb-2023.)
 |-  ( +g  = Slot  ( +g  `  ndx )  /\  ( +g  `  ndx )  e. 
 NN )
 
2-Feb-20232strop1g 12585 The other slot of a constructed two-slot structure. Version of 2stropg 12582 not depending on the hard-coded index value of the base set. (Contributed by AV, 22-Sep-2020.) (Revised by Jim Kingdon, 2-Feb-2023.)
 |-  G  =  { <. (
 Base `  ndx ) ,  B >. ,  <. N ,  .+  >. }   &    |-  ( Base `  ndx )  <  N   &    |-  N  e.  NN   &    |-  E  = Slot  N   =>    |-  ( ( B  e.  V  /\  .+  e.  W )  ->  .+  =  ( E `  G ) )
 
2-Feb-20232strbas1g 12584 The base set of a constructed two-slot structure. Version of 2strbasg 12581 not depending on the hard-coded index value of the base set. (Contributed by AV, 22-Sep-2020.) (Revised by Jim Kingdon, 2-Feb-2023.)
 |-  G  =  { <. (
 Base `  ndx ) ,  B >. ,  <. N ,  .+  >. }   &    |-  ( Base `  ndx )  <  N   &    |-  N  e.  NN   =>    |-  (
 ( B  e.  V  /\  .+  e.  W ) 
 ->  B  =  ( Base `  G ) )
 
2-Feb-20232strstr1g 12583 A constructed two-slot structure. Version of 2strstrg 12580 not depending on the hard-coded index value of the base set. (Contributed by AV, 22-Sep-2020.) (Revised by Jim Kingdon, 2-Feb-2023.)
 |-  G  =  { <. (
 Base `  ndx ) ,  B >. ,  <. N ,  .+  >. }   &    |-  ( Base `  ndx )  <  N   &    |-  N  e.  NN   =>    |-  (
 ( B  e.  V  /\  .+  e.  W ) 
 ->  G Struct  <. ( Base `  ndx ) ,  N >. )
 
31-Jan-2023baseslid 12522 The base set extractor is a slot. (Contributed by Jim Kingdon, 31-Jan-2023.)
 |-  ( Base  = Slot  ( Base ` 
 ndx )  /\  ( Base `  ndx )  e. 
 NN )
 
31-Jan-2023strsl0 12514 All components of the empty set are empty sets. (Contributed by Stefan O'Rear, 27-Nov-2014.) (Revised by Jim Kingdon, 31-Jan-2023.)
 |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )   =>    |-  (/)  =  ( E `  (/) )
 
31-Jan-2023strslss 12513 Propagate component extraction to a structure  T from a subset structure  S. (Contributed by Mario Carneiro, 11-Oct-2013.) (Revised by Jim Kingdon, 31-Jan-2023.)
 |-  T  e.  _V   &    |-  Fun  T   &    |-  S  C_  T   &    |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )   &    |-  <. ( E `
  ndx ) ,  C >.  e.  S   =>    |-  ( E `  T )  =  ( E `  S )
 
31-Jan-2023strslssd 12512 Deduction version of strslss 12513. (Contributed by Mario Carneiro, 15-Nov-2014.) (Revised by Mario Carneiro, 30-Apr-2015.) (Revised by Jim Kingdon, 31-Jan-2023.)
 |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )   &    |-  ( ph  ->  T  e.  V )   &    |-  ( ph  ->  Fun  T )   &    |-  ( ph  ->  S  C_  T )   &    |-  ( ph  ->  <. ( E `
  ndx ) ,  C >.  e.  S )   =>    |-  ( ph  ->  ( E `  T )  =  ( E `  S ) )
 
30-Jan-2023strslfv3 12511 Variant on strslfv 12510 for large structures. (Contributed by Mario Carneiro, 10-Jan-2017.) (Revised by Jim Kingdon, 30-Jan-2023.)
 |-  ( ph  ->  U  =  S )   &    |-  S Struct  X   &    |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )   &    |-  { <. ( E `  ndx ) ,  C >. }  C_  S   &    |-  ( ph  ->  C  e.  V )   &    |-  A  =  ( E `
  U )   =>    |-  ( ph  ->  A  =  C )
 
30-Jan-2023strslfv 12510 Extract a structure component  C (such as the base set) from a structure  S with a component extractor  E (such as the base set extractor df-base 12471). By virtue of ndxslid 12490, this can be done without having to refer to the hard-coded numeric index of  E. (Contributed by Mario Carneiro, 6-Oct-2013.) (Revised by Jim Kingdon, 30-Jan-2023.)
 |-  S Struct  X   &    |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )   &    |-  { <. ( E `  ndx ) ,  C >. }  C_  S   =>    |-  ( C  e.  V  ->  C  =  ( E `  S ) )
 
30-Jan-2023strslfv2 12509 A variation on strslfv 12510 to avoid asserting that  S itself is a function, which involves sethood of all the ordered pair components of  S. (Contributed by Mario Carneiro, 30-Apr-2015.) (Revised by Jim Kingdon, 30-Jan-2023.)
 |-  S  e.  _V   &    |-  Fun  `' `' S   &    |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )   &    |-  <. ( E `
  ndx ) ,  C >.  e.  S   =>    |-  ( C  e.  V  ->  C  =  ( E `
  S ) )
 
30-Jan-2023strslfv2d 12508 Deduction version of strslfv 12510. (Contributed by Mario Carneiro, 30-Apr-2015.) (Revised by Jim Kingdon, 30-Jan-2023.)
 |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )   &    |-  ( ph  ->  S  e.  V )   &    |-  ( ph  ->  Fun  `' `' S )   &    |-  ( ph  ->  <.
 ( E `  ndx ) ,  C >.  e.  S )   &    |-  ( ph  ->  C  e.  W )   =>    |-  ( ph  ->  C  =  ( E `  S ) )
 
30-Jan-2023strslfvd 12507 Deduction version of strslfv 12510. (Contributed by Mario Carneiro, 15-Nov-2014.) (Revised by Jim Kingdon, 30-Jan-2023.)
 |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )   &    |-  ( ph  ->  S  e.  V )   &    |-  ( ph  ->  Fun  S )   &    |-  ( ph  ->  <. ( E `  ndx ) ,  C >.  e.  S )   =>    |-  ( ph  ->  C  =  ( E `  S ) )
 
30-Jan-2023strsetsid 12498 Value of the structure replacement function. (Contributed by AV, 14-Mar-2020.) (Revised by Jim Kingdon, 30-Jan-2023.)
 |-  E  = Slot  ( E `
  ndx )   &    |-  ( ph  ->  S Struct  <. M ,  N >. )   &    |-  ( ph  ->  Fun  S )   &    |-  ( ph  ->  ( E ` 
 ndx )  e.  dom  S )   =>    |-  ( ph  ->  S  =  ( S sSet  <. ( E `
  ndx ) ,  ( E `  S ) >. ) )
 
30-Jan-2023funresdfunsndc 6510 Restricting a function to a domain without one element of the domain of the function, and adding a pair of this element and the function value of the element results in the function itself, where equality is decidable. (Contributed by AV, 2-Dec-2018.) (Revised by Jim Kingdon, 30-Jan-2023.)
 |-  ( ( A. x  e.  dom  F A. y  e.  dom  FDECID  x  =  y  /\  Fun 
 F  /\  X  e.  dom 
 F )  ->  (
 ( F  |`  ( _V  \  { X } )
 )  u.  { <. X ,  ( F `  X ) >. } )  =  F )
 
29-Jan-2023ndxslid 12490 A structure component extractor is defined by its own index. That the index is a natural number will also be needed in quite a few contexts so it is included in the conclusion of this theorem which can be used as a hypothesis of theorems like strslfv 12510. (Contributed by Jim Kingdon, 29-Jan-2023.)
 |-  E  = Slot  N   &    |-  N  e.  NN   =>    |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )
 
29-Jan-2023fnsnsplitdc 6509 Split a function into a single point and all the rest. (Contributed by Stefan O'Rear, 27-Feb-2015.) (Revised by Jim Kingdon, 29-Jan-2023.)
 |-  ( ( A. x  e.  A  A. y  e.  A DECID  x  =  y  /\  F  Fn  A  /\  X  e.  A )  ->  F  =  ( ( F  |`  ( A 
 \  { X }
 ) )  u.  { <. X ,  ( F `
  X ) >. } ) )
 
28-Jan-20232stropg 12582 The other slot of a constructed two-slot structure. (Contributed by Mario Carneiro, 29-Aug-2015.) (Revised by Jim Kingdon, 28-Jan-2023.)
 |-  G  =  { <. (
 Base `  ndx ) ,  B >. ,  <. ( E `
  ndx ) ,  .+  >. }   &    |-  E  = Slot  N   &    |-  1  <  N   &    |-  N  e.  NN   =>    |-  (
 ( B  e.  V  /\  .+  e.  W ) 
 ->  .+  =  ( E `
  G ) )
 
28-Jan-20232strbasg 12581 The base set of a constructed two-slot structure. (Contributed by Mario Carneiro, 29-Aug-2015.) (Revised by Jim Kingdon, 28-Jan-2023.)
 |-  G  =  { <. (
 Base `  ndx ) ,  B >. ,  <. ( E `
  ndx ) ,  .+  >. }   &    |-  E  = Slot  N   &    |-  1  <  N   &    |-  N  e.  NN   =>    |-  (
 ( B  e.  V  /\  .+  e.  W ) 
 ->  B  =  ( Base `  G ) )
 
28-Jan-20232strstrg 12580 A constructed two-slot structure. (Contributed by Mario Carneiro, 29-Aug-2015.) (Revised by Jim Kingdon, 28-Jan-2023.)
 |-  G  =  { <. (
 Base `  ndx ) ,  B >. ,  <. ( E `
  ndx ) ,  .+  >. }   &    |-  E  = Slot  N   &    |-  1  <  N   &    |-  N  e.  NN   =>    |-  (
 ( B  e.  V  /\  .+  e.  W ) 
 ->  G Struct  <. 1 ,  N >. )
 
28-Jan-20231strstrg 12578 A constructed one-slot structure. (Contributed by AV, 27-Mar-2020.) (Revised by Jim Kingdon, 28-Jan-2023.)
 |-  G  =  { <. (
 Base `  ndx ) ,  B >. }   =>    |-  ( B  e.  V  ->  G Struct  <. 1 ,  1
 >. )
 
27-Jan-2023strle2g 12569 Make a structure from a pair. (Contributed by Mario Carneiro, 29-Aug-2015.) (Revised by Jim Kingdon, 27-Jan-2023.)
 |-  I  e.  NN   &    |-  A  =  I   &    |-  I  <  J   &    |-  J  e.  NN   &    |-  B  =  J   =>    |-  (
 ( X  e.  V  /\  Y  e.  W ) 
 ->  { <. A ,  X >. ,  <. B ,  Y >. } Struct  <. I ,  J >. )
 
27-Jan-2023strle1g 12568 Make a structure from a singleton. (Contributed by Mario Carneiro, 29-Aug-2015.) (Revised by Jim Kingdon, 27-Jan-2023.)
 |-  I  e.  NN   &    |-  A  =  I   =>    |-  ( X  e.  V  ->  { <. A ,  X >. } Struct  <. I ,  I >. )
 
27-Jan-2023strleund 12565 Combine two structures into one. (Contributed by Mario Carneiro, 29-Aug-2015.) (Revised by Jim Kingdon, 27-Jan-2023.)
 |-  ( ph  ->  F Struct  <. A ,  B >. )   &    |-  ( ph  ->  G Struct  <. C ,  D >. )   &    |-  ( ph  ->  B  <  C )   =>    |-  ( ph  ->  ( F  u.  G ) Struct  <. A ,  D >. )
 
24-Jan-2023setsslnid 12517 Value of the structure replacement function at an untouched index. (Contributed by Mario Carneiro, 1-Dec-2014.) (Revised by Jim Kingdon, 24-Jan-2023.)
 |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )   &    |-  ( E `  ndx )  =/=  D   &    |-  D  e.  NN   =>    |-  ( ( W  e.  A  /\  C  e.  V )  ->  ( E `  W )  =  ( E `  ( W sSet  <. D ,  C >. ) ) )
 
24-Jan-2023setsslid 12516 Value of the structure replacement function at a replaced index. (Contributed by Mario Carneiro, 1-Dec-2014.) (Revised by Jim Kingdon, 24-Jan-2023.)
 |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )   =>    |-  ( ( W  e.  A  /\  C  e.  V )  ->  C  =  ( E `  ( W sSet  <. ( E `  ndx ) ,  C >. ) ) )
 
22-Jan-2023setsabsd 12504 Replacing the same components twice yields the same as the second setting only. (Contributed by Mario Carneiro, 2-Dec-2014.) (Revised by Jim Kingdon, 22-Jan-2023.)
 |-  ( ph  ->  S  e.  V )   &    |-  ( ph  ->  A  e.  W )   &    |-  ( ph  ->  B  e.  X )   &    |-  ( ph  ->  C  e.  U )   =>    |-  ( ph  ->  (
 ( S sSet  <. A ,  B >. ) sSet  <. A ,  C >. )  =  ( S sSet  <. A ,  C >. ) )
 
22-Jan-2023setsresg 12503 The structure replacement function does not affect the value of  S away from  A. (Contributed by Mario Carneiro, 1-Dec-2014.) (Revised by Jim Kingdon, 22-Jan-2023.)
 |-  ( ( S  e.  V  /\  A  e.  W  /\  B  e.  X ) 
 ->  ( ( S sSet  <. A ,  B >. )  |`  ( _V  \  { A } )
 )  =  ( S  |`  ( _V  \  { A } ) ) )
 
22-Jan-2023setsex 12497 Applying the structure replacement function yields a set. (Contributed by Jim Kingdon, 22-Jan-2023.)
 |-  ( ( S  e.  V  /\  A  e.  X  /\  B  e.  W ) 
 ->  ( S sSet  <. A ,  B >. )  e.  _V )
 
22-Jan-20232zsupmax 11237 Two ways to express the maximum of two integers. Because order of integers is decidable, we have more flexibility than for real numbers. (Contributed by Jim Kingdon, 22-Jan-2023.)
 |-  ( ( A  e.  ZZ  /\  B  e.  ZZ )  ->  sup ( { A ,  B } ,  RR ,  <  )  =  if ( A  <_  B ,  B ,  A )
 )
 
22-Jan-2023elpwpwel 4477 A class belongs to a double power class if and only if its union belongs to the power class. (Contributed by BJ, 22-Jan-2023.)
 |-  ( A  e.  ~P ~P B  <->  U. A  e.  ~P B )
 
21-Jan-2023funresdfunsnss 5722 Restricting a function to a domain without one element of the domain of the function, and adding a pair of this element and the function value of the element results in a subset of the function itself. (Contributed by AV, 2-Dec-2018.) (Revised by Jim Kingdon, 21-Jan-2023.)
 |-  ( ( Fun  F  /\  X  e.  dom  F )  ->  ( ( F  |`  ( _V  \  { X } ) )  u. 
 { <. X ,  ( F `  X ) >. } )  C_  F )
 
20-Jan-2023setsvala 12496 Value of the structure replacement function. (Contributed by Mario Carneiro, 1-Dec-2014.) (Revised by Jim Kingdon, 20-Jan-2023.)
 |-  ( ( S  e.  V  /\  A  e.  X  /\  B  e.  W ) 
 ->  ( S sSet  <. A ,  B >. )  =  ( ( S  |`  ( _V  \  { A } )
 )  u.  { <. A ,  B >. } )
 )
 
20-Jan-2023fnsnsplitss 5718 Split a function into a single point and all the rest. (Contributed by Stefan O'Rear, 27-Feb-2015.) (Revised by Jim Kingdon, 20-Jan-2023.)
 |-  ( ( F  Fn  A  /\  X  e.  A )  ->  ( ( F  |`  ( A  \  { X } ) )  u. 
 { <. X ,  ( F `  X ) >. } )  C_  F )
 
19-Jan-2023strfvssn 12487 A structure component extractor produces a value which is contained in a set dependent on  S, but not  E. This is sometimes useful for showing sethood. (Contributed by Mario Carneiro, 15-Aug-2015.) (Revised by Jim Kingdon, 19-Jan-2023.)
 |-  E  = Slot  N   &    |-  ( ph  ->  S  e.  V )   &    |-  ( ph  ->  N  e.  NN )   =>    |-  ( ph  ->  ( E `  S )  C_  U.
 ran  S )
 
19-Jan-2023strnfvn 12486 Value of a structure component extractor  E. Normally,  E is a defined constant symbol such as  Base (df-base 12471) and  N is a fixed integer such as  1.  S is a structure, i.e. a specific member of a class of structures.

Note: Normally, this theorem shouldn't be used outside of this section, because it requires hard-coded index values. Instead, use strslfv 12510. (Contributed by NM, 9-Sep-2011.) (Revised by Jim Kingdon, 19-Jan-2023.) (New usage is discouraged.)

 |-  S  e.  _V   &    |-  E  = Slot  N   &    |-  N  e.  NN   =>    |-  ( E `  S )  =  ( S `  N )
 
19-Jan-2023strnfvnd 12485 Deduction version of strnfvn 12486. (Contributed by Mario Carneiro, 15-Nov-2014.) (Revised by Jim Kingdon, 19-Jan-2023.)
 |-  E  = Slot  N   &    |-  ( ph  ->  S  e.  V )   &    |-  ( ph  ->  N  e.  NN )   =>    |-  ( ph  ->  ( E `  S )  =  ( S `  N ) )
 
18-Jan-2023isstructr 12480 The property of being a structure with components in  M ... N. (Contributed by Mario Carneiro, 29-Aug-2015.) (Revised by Jim Kingdon, 18-Jan-2023.)
 |-  ( ( ( M  e.  NN  /\  N  e.  NN  /\  M  <_  N )  /\  ( Fun  ( F  \  { (/)
 } )  /\  F  e.  V  /\  dom  F  C_  ( M ... N ) ) )  ->  F Struct 
 <. M ,  N >. )
 
18-Jan-2023isstructim 12479 The property of being a structure with components in  M ... N. (Contributed by Mario Carneiro, 29-Aug-2015.) (Revised by Jim Kingdon, 18-Jan-2023.)
 |-  ( F Struct  <. M ,  N >.  ->  ( ( M  e.  NN  /\  N  e.  NN  /\  M  <_  N )  /\  Fun  ( F  \  { (/) } )  /\  dom  F  C_  ( M ... N ) ) )
 
18-Jan-2023isstruct2r 12476 The property of being a structure with components in  ( 1st `  X
) ... ( 2nd `  X
). (Contributed by Mario Carneiro, 29-Aug-2015.) (Revised by Jim Kingdon, 18-Jan-2023.)
 |-  ( ( ( X  e.  (  <_  i^i  ( NN  X.  NN )
 )  /\  Fun  ( F 
 \  { (/) } )
 )  /\  ( F  e.  V  /\  dom  F  C_  ( ... `  X ) ) )  ->  F Struct  X )
 
18-Jan-2023isstruct2im 12475 The property of being a structure with components in  ( 1st `  X
) ... ( 2nd `  X
). (Contributed by Mario Carneiro, 29-Aug-2015.) (Revised by Jim Kingdon, 18-Jan-2023.)
 |-  ( F Struct  X  ->  ( X  e.  (  <_  i^i  ( NN  X.  NN ) )  /\  Fun  ( F  \  { (/) } )  /\  dom  F  C_  ( ... `  X ) ) )
 
18-Jan-2023sbiev 1792 Conversion of implicit substitution to explicit substitution. Version of sbie 1791 with a disjoint variable condition. (Contributed by Wolf Lammen, 18-Jan-2023.)
 |- 
 F/ x ps   &    |-  ( x  =  y  ->  (
 ph 
 <->  ps ) )   =>    |-  ( [ y  /  x ] ph  <->  ps )
 
16-Jan-2023toponsspwpwg 13683 The set of topologies on a set is included in the double power set of that set. (Contributed by BJ, 29-Apr-2021.) (Revised by Jim Kingdon, 16-Jan-2023.)
 |-  ( A  e.  V  ->  (TopOn `  A )  C_ 
 ~P ~P A )
 
14-Jan-2023istopfin 13661 Express the predicate " J is a topology" using nonempty finite intersections instead of binary intersections as in istopg 13660. It is not clear we can prove the converse without adding additional conditions. (Contributed by NM, 19-Jul-2006.) (Revised by Jim Kingdon, 14-Jan-2023.)
 |-  ( J  e.  Top  ->  ( A. x ( x 
 C_  J  ->  U. x  e.  J )  /\  A. x ( ( x 
 C_  J  /\  x  =/= 
 (/)  /\  x  e.  Fin )  ->  |^| x  e.  J ) ) )
 
14-Jan-2023fiintim 6931 If a class is closed under pairwise intersections, then it is closed under nonempty finite intersections. The converse would appear to require an additional condition, such as  x and  y not being equal, or  A having decidable equality.

This theorem is applicable to a topology, which (among other axioms) is closed under finite intersections. Some texts use a pairwise intersection and some texts use a finite intersection, but most topology texts assume excluded middle (in which case the two intersection properties would be equivalent). (Contributed by NM, 22-Sep-2002.) (Revised by Jim Kingdon, 14-Jan-2023.)

 |-  ( A. x  e.  A  A. y  e.  A  ( x  i^i  y )  e.  A  ->  A. x ( ( x  C_  A  /\  x  =/=  (/)  /\  x  e.  Fin )  ->  |^| x  e.  A ) )
 
9-Jan-2023divccncfap 14238 Division by a constant is continuous. (Contributed by Paul Chapman, 28-Nov-2007.) (Revised by Jim Kingdon, 9-Jan-2023.)
 |-  F  =  ( x  e.  CC  |->  ( x 
 /  A ) )   =>    |-  ( ( A  e.  CC  /\  A #  0 ) 
 ->  F  e.  ( CC
 -cn-> CC ) )
 
7-Jan-2023eap1 11796  _e is apart from 1. (Contributed by Jim Kingdon, 7-Jan-2023.)
 |-  _e #  1
 
7-Jan-2023eap0 11794  _e is apart from 0. (Contributed by Jim Kingdon, 7-Jan-2023.)
 |-  _e #  0
 
7-Jan-2023egt2lt3 11790 Euler's constant  _e = 2.71828... is bounded by 2 and 3. (Contributed by NM, 28-Nov-2008.) (Revised by Jim Kingdon, 7-Jan-2023.)
 |-  ( 2  <  _e  /\  _e  <  3 )
 
6-Jan-2023eirr 11789  _e is not rational. In the absence of excluded middle, we can distinguish between this and saying that  _e is irrational in the sense of being apart from any rational number, which is eirrap 11788. (Contributed by Paul Chapman, 9-Feb-2008.) (Revised by Jim Kingdon, 6-Jan-2023.)
 |-  _e  e/  QQ
 
6-Jan-2023eirrap 11788  _e is irrational. That is, for any rational number,  _e is apart from it. In the absence of excluded middle, we can distinguish between this and saying that  _e is not rational, which is eirr 11789. (Contributed by Jim Kingdon, 6-Jan-2023.)
 |-  ( Q  e.  QQ  ->  _e #  Q )
 
6-Jan-2023btwnapz 9386 A number between an integer and its successor is apart from any integer. (Contributed by Jim Kingdon, 6-Jan-2023.)
 |-  ( ph  ->  A  e.  ZZ )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  C  e.  ZZ )   &    |-  ( ph  ->  A  <  B )   &    |-  ( ph  ->  B  <  ( A  +  1 ) )   =>    |-  ( ph  ->  B #  C )
 
6-Jan-2023apmul2 8749 Multiplication of both sides of complex apartness by a complex number apart from zero. (Contributed by Jim Kingdon, 6-Jan-2023.)
 |-  ( ( A  e.  CC  /\  B  e.  CC  /\  ( C  e.  CC  /\  C #  0 ) ) 
 ->  ( A #  B  <->  ( C  x.  A ) #  ( C  x.  B ) ) )
 
1-Jan-2023nnap0i 8953 A positive integer is apart from zero (inference version). (Contributed by Jim Kingdon, 1-Jan-2023.)
 |-  A  e.  NN   =>    |-  A #  0
 
31-Dec-20222logb9irrALT 14553 Alternate proof of 2logb9irr 14550: The logarithm of nine to base two is not rational. (Contributed by AV, 31-Dec-2022.) (Proof modification is discouraged.) (New usage is discouraged.)
 |-  ( 2 logb  9 )  e.  ( RR  \  QQ )
 
31-Dec-20222logb3irr 14552 Example for logbprmirr 14551. The logarithm of three to base two is not rational. (Contributed by AV, 31-Dec-2022.)
 |-  ( 2 logb  3 )  e.  ( RR  \  QQ )
 
31-Dec-2022logbprmirr 14551 The logarithm of a prime to a different prime base is not rational. For example,  ( 2 logb  3 )  e.  ( RR  \  QQ ) (see 2logb3irr 14552). (Contributed by AV, 31-Dec-2022.)
 |-  ( ( X  e.  Prime  /\  B  e.  Prime  /\  X  =/=  B ) 
 ->  ( B logb  X )  e.  ( RR  \  QQ ) )
 
30-Dec-2022elpqb 9652 A class is a positive rational iff it is the quotient of two positive integers. (Contributed by AV, 30-Dec-2022.)
 |-  ( ( A  e.  QQ  /\  0  <  A ) 
 <-> 
 E. x  e.  NN  E. y  e.  NN  A  =  ( x  /  y
 ) )
 
29-Dec-2022sqrt2cxp2logb9e3 14554 The square root of two to the power of the logarithm of nine to base two is three.  ( sqr `  2
) and  ( 2 logb  9 ) are not rational (see sqrt2irr0 12167 resp. 2logb9irr 14550), satisfying the statement in 2irrexpq 14555. (Contributed by AV, 29-Dec-2022.)
 |-  ( ( sqr `  2
 )  ^c  ( 2 logb  9 ) )  =  3
 
29-Dec-20222logb9irr 14550 Example for logbgcd1irr 14546. The logarithm of nine to base two is not rational. Also see 2logb9irrap 14556 which says that it is irrational (in the sense of being apart from any rational number). (Contributed by AV, 29-Dec-2022.)
 |-  ( 2 logb  9 )  e.  ( RR  \  QQ )
 
29-Dec-2022logbgcd1irrap 14549 The logarithm of an integer greater than 1 to an integer base greater than 1 is irrational (in the sense of being apart from any rational number) if the argument and the base are relatively prime. For example,  ( 2 logb  9 ) #  Q where  Q is rational. (Contributed by AV, 29-Dec-2022.)
 |-  ( ( ( X  e.  ( ZZ>= `  2
 )  /\  B  e.  ( ZZ>= `  2 )
 )  /\  ( ( X  gcd  B )  =  1  /\  Q  e.  QQ ) )  ->  ( B logb  X ) #  Q )
 
29-Dec-2022logbgcd1irr 14546 The logarithm of an integer greater than 1 to an integer base greater than 1 is not rational if the argument and the base are relatively prime. For example,  ( 2 logb  9 )  e.  ( RR  \  QQ ). (Contributed by AV, 29-Dec-2022.)
 |-  ( ( X  e.  ( ZZ>= `  2 )  /\  B  e.  ( ZZ>= `  2 )  /\  ( X 
 gcd  B )  =  1 )  ->  ( B logb  X )  e.  ( RR  \  QQ ) )
 
29-Dec-2022logbgt0b 14545 The logarithm of a positive real number to a real base greater than 1 is positive iff the number is greater than 1. (Contributed by AV, 29-Dec-2022.)
 |-  ( ( A  e.  RR+  /\  ( B  e.  RR+  /\  1  <  B ) )  ->  ( 0  <  ( B logb  A )  <->  1  <  A ) )
 
29-Dec-2022cxpcom 14518 Commutative law for real exponentiation. (Contributed by AV, 29-Dec-2022.)
 |-  ( ( A  e.  RR+  /\  B  e.  RR  /\  C  e.  RR )  ->  ( ( A  ^c  B )  ^c  C )  =  (
 ( A  ^c  C )  ^c  B ) )
 
29-Dec-2022elpq 9651 A positive rational is the quotient of two positive integers. (Contributed by AV, 29-Dec-2022.)
 |-  ( ( A  e.  QQ  /\  0  <  A )  ->  E. x  e.  NN  E. y  e.  NN  A  =  ( x  /  y
 ) )
 
26-Dec-2022apdivmuld 8773 Relationship between division and multiplication. (Contributed by Jim Kingdon, 26-Dec-2022.)
 |-  ( ph  ->  A  e.  CC )   &    |-  ( ph  ->  B  e.  CC )   &    |-  ( ph  ->  C  e.  CC )   &    |-  ( ph  ->  B #  0 )   =>    |-  ( ph  ->  (
 ( A  /  B ) #  C  <->  ( B  x.  C ) #  A )
 )
 
25-Dec-2022tanaddaplem 11749 A useful intermediate step in tanaddap 11750 when showing that the addition of tangents is well-defined. (Contributed by Mario Carneiro, 4-Apr-2015.) (Revised by Jim Kingdon, 25-Dec-2022.)
 |-  ( ( ( A  e.  CC  /\  B  e.  CC )  /\  (
 ( cos `  A ) #  0  /\  ( cos `  B ) #  0 ) )  ->  ( ( cos `  ( A  +  B )
 ) #  0  <->  ( ( tan `  A )  x.  ( tan `  B ) ) #  1 ) )
 
25-Dec-2022subap0 8603 Two numbers being apart is equivalent to their difference being apart from zero. (Contributed by Jim Kingdon, 25-Dec-2022.)
 |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  -  B ) #  0  <->  A #  B ) )
 
23-Dec-20222irrexpq 14555 There exist real numbers  a and  b which are not rational such that  ( a ^
b ) is rational. Statement in the Metamath book, section 1.1.5, footnote 27 on page 17, and the "constructive proof" for theorem 1.2 of [Bauer], p. 483. This is a constructive proof because it is based on two explicitly named non-rational numbers  ( sqr `  2 ) and  ( 2 logb  9 ), see sqrt2irr0 12167, 2logb9irr 14550 and sqrt2cxp2logb9e3 14554. Therefore, this proof is acceptable/usable in intuitionistic logic.

For a theorem which is the same but proves that  a and  b are irrational (in the sense of being apart from any rational number), see 2irrexpqap 14557. (Contributed by AV, 23-Dec-2022.)

 |- 
 E. a  e.  ( RR  \  QQ ) E. b  e.  ( RR  \  QQ ) ( a 
 ^c  b )  e.  QQ
 
23-Dec-2022rpcxpsqrtth 14511 Square root theorem over the complex numbers for the complex power function. Compare with resqrtth 11043. (Contributed by AV, 23-Dec-2022.)
 |-  ( A  e.  RR+  ->  ( ( sqr `  A )  ^c  2 )  =  A )
 
23-Dec-2022sqrt2irr0 12167 The square root of 2 is not rational. (Contributed by AV, 23-Dec-2022.)
 |-  ( sqr `  2
 )  e.  ( RR  \  QQ )
 
22-Dec-2022tanval3ap 11725 Express the tangent function directly in terms of  exp. (Contributed by Mario Carneiro, 25-Feb-2015.) (Revised by Jim Kingdon, 22-Dec-2022.)
 |-  ( ( A  e.  CC  /\  ( ( exp `  ( 2  x.  ( _i  x.  A ) ) )  +  1 ) #  0 )  ->  ( tan `  A )  =  ( ( ( exp `  ( 2  x.  ( _i  x.  A ) ) )  -  1 ) 
 /  ( _i  x.  ( ( exp `  (
 2  x.  ( _i 
 x.  A ) ) )  +  1 ) ) ) )
 
22-Dec-2022tanval2ap 11724 Express the tangent function directly in terms of  exp. (Contributed by Mario Carneiro, 25-Feb-2015.) (Revised by Jim Kingdon, 22-Dec-2022.)
 |-  ( ( A  e.  CC  /\  ( cos `  A ) #  0 )  ->  ( tan `  A )  =  ( ( ( exp `  ( _i  x.  A ) )  -  ( exp `  ( -u _i  x.  A ) ) ) 
 /  ( _i  x.  ( ( exp `  ( _i  x.  A ) )  +  ( exp `  ( -u _i  x.  A ) ) ) ) ) )
 
22-Dec-2022tanclapd 11723 Closure of the tangent function. (Contributed by Mario Carneiro, 29-May-2016.) (Revised by Jim Kingdon, 22-Dec-2022.)
 |-  ( ph  ->  A  e.  CC )   &    |-  ( ph  ->  ( cos `  A ) #  0 )   =>    |-  ( ph  ->  ( tan `  A )  e. 
 CC )
 
21-Dec-2022tanclap 11720 The closure of the tangent function with a complex argument. (Contributed by David A. Wheeler, 15-Mar-2014.) (Revised by Jim Kingdon, 21-Dec-2022.)
 |-  ( ( A  e.  CC  /\  ( cos `  A ) #  0 )  ->  ( tan `  A )  e. 
 CC )
 
21-Dec-2022tanvalap 11719 Value of the tangent function. (Contributed by Mario Carneiro, 14-Mar-2014.) (Revised by Jim Kingdon, 21-Dec-2022.)
 |-  ( ( A  e.  CC  /\  ( cos `  A ) #  0 )  ->  ( tan `  A )  =  ( ( sin `  A )  /  ( cos `  A ) ) )
 
20-Dec-2022reef11 11710 The exponential function on real numbers is one-to-one. (Contributed by NM, 21-Aug-2008.) (Revised by Jim Kingdon, 20-Dec-2022.)
 |-  ( ( A  e.  RR  /\  B  e.  RR )  ->  ( ( exp `  A )  =  ( exp `  B )  <->  A  =  B ) )
 
20-Dec-2022efltim 11709 The exponential function on the reals is strictly increasing. (Contributed by Paul Chapman, 21-Aug-2007.) (Revised by Jim Kingdon, 20-Dec-2022.)
 |-  ( ( A  e.  RR  /\  B  e.  RR )  ->  ( A  <  B 
 ->  ( exp `  A )  <  ( exp `  B ) ) )
 
20-Dec-2022eqord1 8443 A strictly increasing real function on a subset of  RR is one-to-one. (Contributed by Mario Carneiro, 14-Jun-2014.) (Revised by Jim Kingdon, 20-Dec-2022.)
 |-  ( x  =  y 
 ->  A  =  B )   &    |-  ( x  =  C  ->  A  =  M )   &    |-  ( x  =  D  ->  A  =  N )   &    |-  S  C_  RR   &    |-  ( ( ph  /\  x  e.  S ) 
 ->  A  e.  RR )   &    |-  (
 ( ph  /\  ( x  e.  S  /\  y  e.  S ) )  ->  ( x  <  y  ->  A  <  B ) )   =>    |-  ( ( ph  /\  ( C  e.  S  /\  D  e.  S )
 )  ->  ( C  =  D  <->  M  =  N ) )
 
14-Dec-2022iserabs 11486 Generalized triangle inequality: the absolute value of an infinite sum is less than or equal to the sum of absolute values. (Contributed by Paul Chapman, 10-Sep-2007.) (Revised by Jim Kingdon, 14-Dec-2022.)
 |-  Z  =  ( ZZ>= `  M )   &    |-  ( ph  ->  seq
 M (  +  ,  F )  ~~>  A )   &    |-  ( ph  ->  seq M (  +  ,  G )  ~~>  B )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ( ph  /\  k  e.  Z )  ->  ( F `  k )  e. 
 CC )   &    |-  ( ( ph  /\  k  e.  Z ) 
 ->  ( G `  k
 )  =  ( abs `  ( F `  k
 ) ) )   =>    |-  ( ph  ->  ( abs `  A )  <_  B )
 
12-Dec-2022efap0 11688 The exponential of a complex number is apart from zero. (Contributed by Jim Kingdon, 12-Dec-2022.)
 |-  ( A  e.  CC  ->  ( exp `  A ) #  0 )
 
8-Dec-2022efcllem 11670 Lemma for efcl 11675. The series that defines the exponential function converges. (Contributed by NM, 26-Apr-2005.) (Revised by Jim Kingdon, 8-Dec-2022.)
 |-  F  =  ( n  e.  NN0  |->  ( ( A ^ n ) 
 /  ( ! `  n ) ) )   =>    |-  ( A  e.  CC  ->  seq 0 (  +  ,  F )  e.  dom  ~~>  )
 
8-Dec-2022efcllemp 11669 Lemma for efcl 11675. The series that defines the exponential function converges. The ratio test cvgratgt0 11544 is used to show convergence. (Contributed by NM, 26-Apr-2005.) (Revised by Jim Kingdon, 8-Dec-2022.)
 |-  F  =  ( n  e.  NN0  |->  ( ( A ^ n ) 
 /  ( ! `  n ) ) )   &    |-  ( ph  ->  A  e.  CC )   &    |-  ( ph  ->  K  e.  NN )   &    |-  ( ph  ->  ( 2  x.  ( abs `  A ) )  <  K )   =>    |-  ( ph  ->  seq 0
 (  +  ,  F )  e.  dom  ~~>  )
 
8-Dec-2022eftvalcn 11668 The value of a term in the series expansion of the exponential function. (Contributed by Paul Chapman, 21-Aug-2007.) (Revised by Jim Kingdon, 8-Dec-2022.)
 |-  F  =  ( n  e.  NN0  |->  ( ( A ^ n ) 
 /  ( ! `  n ) ) )   =>    |-  ( ( A  e.  CC  /\  N  e.  NN0 )  ->  ( F `  N )  =  (
 ( A ^ N )  /  ( ! `  N ) ) )
 
8-Dec-2022mertensabs 11548 Mertens' theorem. If  A ( j ) is an absolutely convergent series and  B ( k ) is convergent, then  ( sum_ j  e.  NN0 A ( j )  x.  sum_ k  e.  NN0 B ( k ) )  =  sum_ k  e. 
NN0 sum_ j  e.  ( 0 ... k ) ( A ( j )  x.  B ( k  -  j ) ) (and this latter series is convergent). This latter sum is commonly known as the Cauchy product of the sequences. The proof follows the outline at http://en.wikipedia.org/wiki/Cauchy_product#Proof_of_Mertens.27_theorem. (Contributed by Mario Carneiro, 29-Apr-2014.) (Revised by Jim Kingdon, 8-Dec-2022.)
 |-  ( ( ph  /\  j  e.  NN0 )  ->  ( F `  j )  =  A )   &    |-  ( ( ph  /\  j  e.  NN0 )  ->  ( K `  j
 )  =  ( abs `  A ) )   &    |-  (
 ( ph  /\  j  e. 
 NN0 )  ->  A  e.  CC )   &    |-  ( ( ph  /\  k  e.  NN0 )  ->  ( G `  k
 )  =  B )   &    |-  ( ( ph  /\  k  e.  NN0 )  ->  B  e.  CC )   &    |-  ( ( ph  /\  k  e.  NN0 )  ->  ( H `  k
 )  =  sum_ j  e.  ( 0 ... k
 ) ( A  x.  ( G `  ( k  -  j ) ) ) )   &    |-  ( ph  ->  seq 0 (  +  ,  K )  e.  dom  ~~>  )   &    |-  ( ph  ->  seq 0
 (  +  ,  G )  e.  dom  ~~>  )   &    |-  ( ph  ->  seq 0 (  +  ,  F )  e.  dom  ~~>  )   =>    |-  ( ph  ->  seq 0
 (  +  ,  H ) 
 ~~>  ( sum_ j  e.  NN0  A  x.  sum_ k  e.  NN0  B ) )
 
3-Dec-2022mertenslemub 11545 Lemma for mertensabs 11548. An upper bound for  T. (Contributed by Jim Kingdon, 3-Dec-2022.)
 |-  ( ( ph  /\  k  e.  NN0 )  ->  ( G `  k )  =  B )   &    |-  ( ( ph  /\  k  e.  NN0 )  ->  B  e.  CC )   &    |-  ( ph  ->  seq 0 (  +  ,  G )  e.  dom  ~~>  )   &    |-  T  =  { z  |  E. n  e.  (
 0 ... ( S  -  1 ) ) z  =  ( abs `  sum_ k  e.  ( ZZ>= `  ( n  +  1 ) ) ( G `  k
 ) ) }   &    |-  ( ph  ->  X  e.  T )   &    |-  ( ph  ->  S  e.  NN )   =>    |-  ( ph  ->  X  <_ 
 sum_ n  e.  (
 0 ... ( S  -  1 ) ) ( abs `  sum_ k  e.  ( ZZ>= `  ( n  +  1 ) ) ( G `  k
 ) ) )
 
2-Dec-2022mertenslemi1 11546 Lemma for mertensabs 11548. (Contributed by Mario Carneiro, 29-Apr-2014.) (Revised by Jim Kingdon, 2-Dec-2022.)
 |-  ( ( ph  /\  j  e.  NN0 )  ->  ( F `  j )  =  A )   &    |-  ( ( ph  /\  j  e.  NN0 )  ->  ( K `  j
 )  =  ( abs `  A ) )   &    |-  (
 ( ph  /\  j  e. 
 NN0 )  ->  A  e.  CC )   &    |-  ( ( ph  /\  k  e.  NN0 )  ->  ( G `  k
 )  =  B )   &    |-  ( ( ph  /\  k  e.  NN0 )  ->  B  e.  CC )   &    |-  ( ( ph  /\  k  e.  NN0 )  ->  ( H `  k
 )  =  sum_ j  e.  ( 0 ... k
 ) ( A  x.  ( G `  ( k  -  j ) ) ) )   &    |-  ( ph  ->  seq 0 (  +  ,  K )  e.  dom  ~~>  )   &    |-  ( ph  ->  seq 0
 (  +  ,  G )  e.  dom  ~~>  )   &    |-  ( ph  ->  E  e.  RR+ )   &    |-  T  =  { z  |  E. n  e.  (
 0 ... ( s  -  1 ) ) z  =  ( abs `  sum_ k  e.  ( ZZ>= `  ( n  +  1 ) ) ( G `  k
 ) ) }   &    |-  ( ps 
 <->  ( s  e.  NN  /\ 
 A. n  e.  ( ZZ>=
 `  s ) ( abs `  sum_ k  e.  ( ZZ>= `  ( n  +  1 ) ) ( G `  k
 ) )  <  (
 ( E  /  2
 )  /  ( sum_ j  e.  NN0  ( K `  j )  +  1 ) ) ) )   &    |-  ( ph  ->  P  e.  RR )   &    |-  ( ph  ->  ( ps  /\  ( t  e.  NN0  /\  A. m  e.  ( ZZ>= `  t )
 ( K `  m )  <  ( ( ( E  /  2 ) 
 /  s )  /  ( P  +  1
 ) ) ) ) )   &    |-  ( ph  ->  0 
 <_  P )   &    |-  ( ph  ->  A. w  e.  T  w  <_  P )   =>    |-  ( ph  ->  E. y  e.  NN0  A. m  e.  ( ZZ>=
 `  y ) ( abs `  sum_ j  e.  ( 0 ... m ) ( A  x.  sum_
 k  e.  ( ZZ>= `  ( ( m  -  j )  +  1
 ) ) B ) )  <  E )
 
2-Dec-2022fsum3cvg3 11407 A finite sum is convergent. (Contributed by Mario Carneiro, 24-Apr-2014.) (Revised by Jim Kingdon, 2-Dec-2022.)
 |-  Z  =  ( ZZ>= `  M )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  A  e.  Fin )   &    |-  ( ph  ->  A  C_  Z )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M ) )  -> DECID  k  e.  A )   &    |-  ( ( ph  /\  k  e.  Z ) 
 ->  ( F `  k
 )  =  if (
 k  e.  A ,  B ,  0 )
 )   &    |-  ( ( ph  /\  k  e.  A )  ->  B  e.  CC )   =>    |-  ( ph  ->  seq M (  +  ,  F )  e.  dom  ~~>  )
 
2-Dec-2022fsum3cvg2 11405 The sequence of partial sums of a finite sum converges to the whole sum. (Contributed by Mario Carneiro, 20-Apr-2014.) (Revised by Jim Kingdon, 2-Dec-2022.)
 |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( F `  k )  =  if ( k  e.  A ,  B ,  0 ) )   &    |-  ( ph  ->  N  e.  ( ZZ>= `  M ) )   &    |-  ( ( ph  /\  k  e.  A ) 
 ->  B  e.  CC )   &    |-  (
 ( ph  /\  k  e.  ( ZZ>= `  M )
 )  -> DECID  k  e.  A )   &    |-  ( ph  ->  A  C_  ( M ... N ) )   =>    |-  ( ph  ->  seq M (  +  ,  F ) 
 ~~>  (  seq M (  +  ,  F ) `
  N ) )
 
24-Nov-2022cvgratnnlembern 11534 Lemma for cvgratnn 11542. Upper bound for a geometric progression of positive ratio less than one. (Contributed by Jim Kingdon, 24-Nov-2022.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  A  <  1 )   &    |-  ( ph  ->  0  <  A )   &    |-  ( ph  ->  M  e.  NN )   =>    |-  ( ph  ->  ( A ^ M )  < 
 ( ( 1  /  ( ( 1  /  A )  -  1
 ) )  /  M ) )
 
23-Nov-2022cvgratnnlemfm 11540 Lemma for cvgratnn 11542. (Contributed by Jim Kingdon, 23-Nov-2022.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  A  <  1 )   &    |-  ( ph  ->  0  <  A )   &    |-  ( ( ph  /\  k  e.  NN )  ->  ( F `  k )  e. 
 CC )   &    |-  ( ( ph  /\  k  e.  NN )  ->  ( abs `  ( F `  ( k  +  1 ) ) ) 
 <_  ( A  x.  ( abs `  ( F `  k ) ) ) )   &    |-  ( ph  ->  M  e.  NN )   =>    |-  ( ph  ->  ( abs `  ( F `  M ) )  < 
 ( ( ( ( 1  /  ( ( 1  /  A )  -  1 ) ) 
 /  A )  x.  ( ( abs `  ( F `  1 ) )  +  1 ) ) 
 /  M ) )
 
23-Nov-2022cvgratnnlemsumlt 11539 Lemma for cvgratnn 11542. (Contributed by Jim Kingdon, 23-Nov-2022.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  A  <  1 )   &    |-  ( ph  ->  0  <  A )   &    |-  ( ( ph  /\  k  e.  NN )  ->  ( F `  k )  e. 
 CC )   &    |-  ( ( ph  /\  k  e.  NN )  ->  ( abs `  ( F `  ( k  +  1 ) ) ) 
 <_  ( A  x.  ( abs `  ( F `  k ) ) ) )   &    |-  ( ph  ->  M  e.  NN )   &    |-  ( ph  ->  N  e.  ( ZZ>=
 `  M ) )   =>    |-  ( ph  ->  sum_ i  e.  ( ( M  +  1 ) ... N ) ( A ^
 ( i  -  M ) )  <  ( A 
 /  ( 1  -  A ) ) )
 
21-Nov-2022cvgratnnlemrate 11541 Lemma for cvgratnn 11542. (Contributed by Jim Kingdon, 21-Nov-2022.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  A  <  1 )   &    |-  ( ph  ->  0  <  A )   &    |-  ( ( ph  /\  k  e.  NN )  ->  ( F `  k )  e. 
 CC )   &    |-  ( ( ph  /\  k  e.  NN )  ->  ( abs `  ( F `  ( k  +  1 ) ) ) 
 <_  ( A  x.  ( abs `  ( F `  k ) ) ) )   &    |-  ( ph  ->  M  e.  NN )   &    |-  ( ph  ->  N  e.  ( ZZ>=
 `  M ) )   =>    |-  ( ph  ->  ( abs `  ( (  seq 1
 (  +  ,  F ) `  N )  -  (  seq 1 (  +  ,  F ) `  M ) ) )  < 
 ( ( ( ( ( 1  /  (
 ( 1  /  A )  -  1 ) ) 
 /  A )  x.  ( ( abs `  ( F `  1 ) )  +  1 ) )  x.  ( A  /  ( 1  -  A ) ) )  /  M ) )
 
21-Nov-2022cvgratnnlemabsle 11538 Lemma for cvgratnn 11542. (Contributed by Jim Kingdon, 21-Nov-2022.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  A  <  1 )   &    |-  ( ph  ->  0  <  A )   &    |-  ( ( ph  /\  k  e.  NN )  ->  ( F `  k )  e. 
 CC )   &    |-  ( ( ph  /\  k  e.  NN )  ->  ( abs `  ( F `  ( k  +  1 ) ) ) 
 <_  ( A  x.  ( abs `  ( F `  k ) ) ) )   &    |-  ( ph  ->  M  e.  NN )   &    |-  ( ph  ->  N  e.  ( ZZ>=
 `  M ) )   =>    |-  ( ph  ->  ( abs ` 
 sum_ i  e.  (
 ( M  +  1 ) ... N ) ( F `  i
 ) )  <_  (
 ( abs `  ( F `  M ) )  x. 
 sum_ i  e.  (
 ( M  +  1 ) ... N ) ( A ^ (
 i  -  M ) ) ) )
 
21-Nov-2022cvgratnnlemseq 11537 Lemma for cvgratnn 11542. (Contributed by Jim Kingdon, 21-Nov-2022.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  A  <  1 )   &    |-  ( ph  ->  0  <  A )   &    |-  ( ( ph  /\  k  e.  NN )  ->  ( F `  k )  e. 
 CC )   &    |-  ( ( ph  /\  k  e.  NN )  ->  ( abs `  ( F `  ( k  +  1 ) ) ) 
 <_  ( A  x.  ( abs `  ( F `  k ) ) ) )   &    |-  ( ph  ->  M  e.  NN )   &    |-  ( ph  ->  N  e.  ( ZZ>=
 `  M ) )   =>    |-  ( ph  ->  ( (  seq 1 (  +  ,  F ) `  N )  -  (  seq 1
 (  +  ,  F ) `  M ) )  =  sum_ i  e.  (
 ( M  +  1 ) ... N ) ( F `  i
 ) )
 
15-Nov-2022cvgratnnlemmn 11536 Lemma for cvgratnn 11542. (Contributed by Jim Kingdon, 15-Nov-2022.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  A  <  1 )   &    |-  ( ph  ->  0  <  A )   &    |-  ( ( ph  /\  k  e.  NN )  ->  ( F `  k )  e. 
 CC )   &    |-  ( ( ph  /\  k  e.  NN )  ->  ( abs `  ( F `  ( k  +  1 ) ) ) 
 <_  ( A  x.  ( abs `  ( F `  k ) ) ) )   &    |-  ( ph  ->  M  e.  NN )   &    |-  ( ph  ->  N  e.  ( ZZ>=
 `  M ) )   =>    |-  ( ph  ->  ( abs `  ( F `  N ) )  <_  ( ( abs `  ( F `  M ) )  x.  ( A ^ ( N  -  M ) ) ) )
 
15-Nov-2022cvgratnnlemnexp 11535 Lemma for cvgratnn 11542. (Contributed by Jim Kingdon, 15-Nov-2022.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  A  <  1 )   &    |-  ( ph  ->  0  <  A )   &    |-  ( ( ph  /\  k  e.  NN )  ->  ( F `  k )  e. 
 CC )   &    |-  ( ( ph  /\  k  e.  NN )  ->  ( abs `  ( F `  ( k  +  1 ) ) ) 
 <_  ( A  x.  ( abs `  ( F `  k ) ) ) )   &    |-  ( ph  ->  N  e.  NN )   =>    |-  ( ph  ->  ( abs `  ( F `  N ) )  <_  ( ( abs `  ( F `  1 ) )  x.  ( A ^
 ( N  -  1
 ) ) ) )

  Copyright terms: Public domain W3C HTML validation [external]