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 21-Dec-2024 at 6:40 AM ET.
Recent Additions to the Intuitionistic Logic Explorer
DateLabelDescription
Theorem
 
9-Dec-2024nninfwlpoim 7154 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 7153 Lemma for nninfwlpoim 7154. (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 7152 Lemma for nninfwlpoim 7154. (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 7151 Lemma for nninfwlpoim 7154. (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 7150 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 7149 Lemma for nninfwlpor 7150. 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 7148 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 7155 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 7147 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 12475 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 5187 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 5186 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 12474 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 )
 
11-Nov-2024bj-con1st 13786 Contraposition when the antecedent is a negated stable proposition. See con1dc 851. (Contributed by BJ, 11-Nov-2024.)
 |-  (STAB  ph  ->  ( ( -.  ph  ->  ps )  ->  ( -.  ps 
 ->  ph ) ) )
 
11-Nov-2024const 847 Contraposition when the antecedent is a negated stable proposition. See comment of condc 848. (Contributed by BJ, 18-Nov-2023.) (Proof shortened by BJ, 11-Nov-2024.)
 |-  (STAB 
 ph  ->  ( ( -.  ph  ->  -.  ps )  ->  ( ps  ->  ph )
 ) )
 
4-Nov-2024lgsfvalg 13700 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 ) )
 
1-Nov-2024qsqeqor 10586 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 ) ) )
 
29-Oct-2024fiubnn 10765 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 10764 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 10763 Lemma for fiubz 10764 and fiubnn 10765. 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 )
 
27-Oct-2024bj-nnst 13778 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 14025 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 105, ax-ia2 106, ax-ia3 107 are via sylibr 133, 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 13773 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 13772 as its last step. (Contributed by BJ, 27-Oct-2024.)
 |-  ( ph  ->  ps )   &    |-  ( -.  ph  ->  ps )   =>    |- 
 -.  -.  ps
 
25-Oct-2024nnwosdc 11994 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 11991 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 11992 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 14025 Double negation of double negation elimination. Suggested by an online post by Martin Escardo. Although this statement resembles nnexmid 845, 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 )
 
20-Oct-2024isprm5lem 12095 Lemma for isprm5 12096. 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 )
 
17-Oct-2024elnndc 9571 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 11206 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 11205 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 12264 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 9760 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 9759 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 10645 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 12242 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 9570 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 12241 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 12240 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 10644 Special case of ltexp2 13654 which we use here because we haven't yet defined df-rpcxp 13574 which is used in the current proof of ltexp2 13654. (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 11910 The supremum of a bounded-above decidable set of integers is a member of the set. (This theorem avoids ax-pre-suploc 7895.) (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 11909 An inhabited decidable bounded subset of integers has a supremum in the set. (The proof does not use ax-pre-suploc 7895.) (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 11907 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 7011 Existence of infimum. (Contributed by Jim Kingdon, 1-Oct-2024.)
 |-  ( A  e.  C  -> inf ( B ,  A ,  R )  e.  _V )
 
30-Sep-2024unbendc 12409 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 12084 Primality is decidable. (Contributed by Jim Kingdon, 30-Sep-2024.)
 |-  ( N  e.  NN  -> DECID  N  e.  Prime )
 
30-Sep-2024dcfi 6958 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 12402 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 12401 Lemma for ssnnct 12402. 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 11908 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 9557 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 12405 Lemma for nninfdc 12408. 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 11990 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 11989. (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 12403 Lemma for nninfdc 12408. (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 12406 Lemma for nninfdc 12408. The function from nninfdclemf 12404 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 12408 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 12407 Lemma for nninfdc 12408. The function from nninfdclemf 12404 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 12404 Lemma for nninfdc 12408. 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 11989 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 12400 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 4608 The predecessor (see nnpredcl 4607) of a nonzero natural number is less than (see df-iord 4351) that number. (Contributed by Jim Kingdon, 14-Sep-2024.)
 |-  ( ( A  e.  om 
 /\  A  =/=  (/) )  ->  U. A  e.  A )
 
13-Sep-2024nninfisollemeq 7108 Lemma for nninfisol 7109. 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 7107 Lemma for nninfisol 7109. 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 7106 Lemma for nninfisol 7109. 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 7109 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 12182 Lemma for eulerth 12187. 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 10602 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 12185 Lemma for eulerth 12187. 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 12186 Lemma for eulerth 12187. 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 12184 Lemma for eulerth 12187. (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 12183 Lemma for eulerth 12187. 
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 11599 A finite product of terms apart from zero is apart from zero. A version of fprodap0 11584 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 11592 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 7220 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 7216 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 4556 Ordinal trichotomy implies excluded middle. Closed form of ordtri2or2exmid 4555. (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 4506 Ordinal trichotomy implies excluded middle. Closed form of ordtriexmid 4505. (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 7223 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 7222 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 3060 Composition law for chained substitutions into a class. Version of csbco 3059 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 2702 Version of cbvreuv 2698 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 2701 Version of cbvrexv 2697 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 2700 Version of cbvralv 2696 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 2293 Version of cbvab 2294 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 1940 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 1939 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 1913 Change bound variable. See cbvexv 1911 for a version with fewer disjoint variable conditions. (Contributed by NM, 19-Apr-2017.) Avoid ax-7 1441. (Revised by Gino Giotto, 25-Aug-2024.)
 |-  ( x  =  y 
 ->  ( ph  <->  ps ) )   =>    |-  ( E. x ph  <->  E. y ps )
 
25-Aug-2024cbvalvw 1912 Change bound variable. See cbvalv 1910 for a version with fewer disjoint variable conditions. (Contributed by NM, 9-Apr-2017.) Avoid ax-7 1441. (Revised by Gino Giotto, 25-Aug-2024.)
 |-  ( x  =  y 
 ->  ( ph  <->  ps ) )   =>    |-  ( A. x ph  <->  A. y ps )
 
25-Aug-2024nfal 1569 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 1503. (Revised by Gino Giotto, 25-Aug-2024.)
 |- 
 F/ x ph   =>    |- 
 F/ x A. y ph
 
24-Aug-2024gcdcomd 11929 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 11791 Deduction form of dvds2add 11787. (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 11568 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 13840 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 3574,  |-  ( A  e.  V  ->  if ( ph ,  A ,  (/) )  e.  ~P A
), from which fmelpw1o 13841 could be derived, yielding an alternative proof. (Contributed by BJ, 16-Aug-2024.)

 |-  if ( ph ,  A ,  (/) )  =  { x  e.  A  |  ph }
 
16-Aug-2024fprodunsn 11567 Multiply in an additional term in a finite product. See also fprodsplitsn 11596 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 13844 Alternate proof of bj-charfundc 13843. It was expected to be much shorter since it uses bj-charfun 13842 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 13842 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 13841 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 846, which translate to  1o and  (/) respectively by iftrue 3531 and iffalse 3534, giving pwtrufal 14030).

As proved in if0ab 13840, 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 8564 Equality of complex numbers is stable. Stability here means  -.  -.  A  =  B  ->  A  =  B as defined at df-stab 826. 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 8563 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 4469 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 4468 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 4467 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 4466 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 3541 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 3540 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 7199 Lemma for exmidontriim 7202. (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 7198 Lemma for exmidontriim 7202. A variation of r19.30dc 2617. (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 846 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 845 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 1642 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 4181): 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 2460 does not hold.

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

 |- 
 -.  -. DECID  ph
 
10-Aug-2024exmidontriim 7202 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 7201 Lemma for exmidontriim 7202. 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 7200 Lemma for exmidontriim 7202. 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 7103 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 7100 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 4658 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 6890 Reformulation of ss1o0el1 4183 using  1o instead of 
{ (/) }. (Contributed by BJ, 9-Aug-2024.)
 |-  ( A  C_  1o  ->  ( (/)  e.  A  <->  A  =  1o ) )
 
9-Aug-2024pw1dc0el 6889 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 4183 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 6891 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 6888 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 4589 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 4590. (Revised by BJ, 7-Aug-2024.)
 |-  ( A  e.  om  ->  A  C_  om )
 
6-Aug-2024bj-charfunbi 13846 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 13845 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 13843 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 11552 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 13839 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 13838 The maps-to notation defines a function (deduction form).

Note: one should similarly prove a deduction form of funopab4 5235, then prove funmptd 13838 from it, and then prove funmpt 5236 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 13790 The false truth value is decidable. (Contributed by BJ, 5-Aug-2024.)
 |- DECID F.
 
5-Aug-2024bj-dctru 13788 The true truth value is decidable. (Contributed by BJ, 5-Aug-2024.)
 |- DECID T.
 
5-Aug-2024bj-stfal 13777 The false truth value is stable. (Contributed by BJ, 5-Aug-2024.)
 |- STAB F.
 
5-Aug-2024bj-sttru 13775 The true truth value is stable. (Contributed by BJ, 5-Aug-2024.)
 |- STAB T.
 
5-Aug-2024prod1dc 11549 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 6503 The ordinal 2 is included in the set of natural number ordinals. (Contributed by BJ, 5-Aug-2024.)
 |- 
 2o  C_  om
 
2-Aug-2024onntri52 7221 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 7219 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 7218 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 7217 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 7215 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 7214 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 7215), (3) implies (5) (onntri35 7214), (5) implies (1) (onntri51 7217), (2) implies (4) (onntri24 7219), (4) implies (5) (onntri45 7218), and (5) implies (2) (onntri52 7221).

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 7216 and exmidontri2or 7220, respectively. Thus  -.  -. EXMID is equivalent to (1) or (2). In addition, 
-.  -. EXMID is equivalent to (3) by onntri3or 7222 and (4) by onntri2or 7223.

(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 2460 The double negation of a universal quantification implies the universal quantification of the double negation. Restricted quantifier version of nnal 1642. (Contributed by Jim Kingdon, 1-Aug-2024.)
 |-  ( -.  -.  A. x  e.  A  ph  ->  A. x  e.  A  -.  -.  ph )
 
31-Jul-20243nsssucpw1 7213 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 7212 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 7211 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 7210 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 7209 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 7208 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 7207 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 7206 The power set of  1o is not one. (Contributed by Jim Kingdon, 30-Jul-2024.)
 |- 
 ~P 1o  =/=  1o
 
30-Jul-2024pw1ne0 7205 The power set of  1o is not zero. (Contributed by Jim Kingdon, 30-Jul-2024.)
 |- 
 ~P 1o  =/=  (/)
 
29-Jul-2024grpcld 12721 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 7203 The power set of  1o is an ordinal. (Contributed by Jim Kingdon, 29-Jul-2024.)
 |- 
 ~P 1o  e.  On
 
28-Jul-2024exmidpweq 6887 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 14093 Decidability of real number apartness implies the existence of a certain non-constant function from real numbers to integers. A proof of dcapnconst 14092 by means of dceqnconst 14091. (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 14090 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 14095 Lemma for nconstwlpo 14097. 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 14094 Lemma for nconstwlpo 14097. 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 14088 Real trichotomy implies decidability of real number equality. Or in other words, analytic LPO implies analytic WLPO (see trilpo 14075 and redcwlpo 14087). Thus, this is an analytic analogue to lpowlpo 7144. (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 14083 Weak omniscience stated in terms of equality with  0. Like iswomninn 14082 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 7144 LPO implies WLPO. Easy corollary of the more general omniwomnimkv 7143. There is an analogue in terms of analytic omniscience principles at tridceq 14088. (Contributed by Jim Kingdon, 24-Jul-2024.)
 |-  ( om  e. Omni  ->  om  e. WOmni )
 
23-Jul-2024nconstwlpolem 14096 Lemma for nconstwlpo 14097. (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 14091 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 14087 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 14089 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 5807 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 1493 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 14097 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 11546 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 2475 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 2474 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 13690 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 12134, 2logb9irrap 13689 and sqrt2cxp2logb9e3 13687. 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 13689 Example for logbgcd1irrap 13682. 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 )
 
11-Jul-2024logbgcd1irraplemexp 13680 Lemma for logbgcd1irrap 13682. 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 13493 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 13652 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 13681 Lemma for logbgcd1irrap 13682. 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 10652 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 13592 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 13657 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 13593 Deduction form of logrpap0 13592. (Contributed by Jim Kingdon, 3-Jul-2024.)
 |-  ( ph  ->  A  e.  RR+ )   &    |-  ( ph  ->  A #  1 )   =>    |-  ( ph  ->  ( log `  A ) #  0 )
 
3-Jul-2024logrpap0b 13591 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 14029 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 14028 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 14067 An open interval is equinumerous to the real numbers. (Contributed by Jim Kingdon, 27-Jun-2024.)
 |-  (
 0 (,) 1 )  ~~  RR
 
27-Jun-2024iooref1o 14066 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 14098 Lemma for neapmkv 14099. 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 14085 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 14084 Lemma for ismkvnn 14085. 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 7137 Lemma for enmkv 7138. One direction of the biconditional. (Contributed by Jim Kingdon, 25-Jun-2024.)
 |-  ( A  ~~  B  ->  ( A  e. Markov  ->  B  e. Markov ) )
 
24-Jun-2024neapmkv 14099 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 14092 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 14075 for more discussion of decidability of real number apartness.

This is a weaker form of dceqnconst 14091 and in fact this theorem can be proved using dceqnconst 14091 as shown at dcapnconstALT 14093. (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 7138 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 6409 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 14086 Lemma for redcwlpo 14087. A biconditionalized version of trilpolemeq1 14072. (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 14087 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 14086). 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 10203 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 14082 Weak omniscience stated in terms of natural numbers. Similar to iswomnimap 7142 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 14081 Lemma for iswomnimap 7142. 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 7146 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 6409 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 7145 Lemma for enwomni 7146. One direction of the biconditional. (Contributed by Jim Kingdon, 20-Jun-2024.)
 |-  ( A  ~~  B  ->  ( A  e. WOmni  ->  B  e. WOmni ) )
 
19-Jun-2024rpabscxpbnd 13653 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 13636 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 13620 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 13619 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 13617 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 13613 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 13611 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 13610 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 13609 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 13574 Define the power function on complex numbers. Because df-relog 13573 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 14077 Version of trirec0 14076 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 14076 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 14075). (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 7143 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 7142 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 7141 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 7140 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-2024grpmndd 12720 A group is a monoid. (Contributed by SN, 1-Jun-2024.)
 |-  ( ph  ->  G  e.  Grp )   =>    |-  ( ph  ->  G  e.  Mnd )
 
29-May-2024pw1nct 14036 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 14035 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 4144 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 13480 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 2687 Rule used to change bound variables, using implicit substitution. Version of cbvralf 2689 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 1500 and ax-bndl 1502 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 13489 Lemma for eflt 13490. The converse of efltim 11661 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 13490 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 14079 Lemma for apdiff 14080. (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 14078 Lemma for apdiff 14080. 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 14080 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 ) ) ) ) )
 
15-May-2024reeff1oleme 13487 Lemma for reeff1o 13488. (Contributed by Jim Kingdon, 15-May-2024.)
 |-  ( U  e.  (
 0 (,) _e )  ->  E. x  e.  RR  ( exp `  x )  =  U )
 
14-May-2024df-relog 13573 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 11792 The divides relation is transitive, a deduction version of dvdstr 11790. (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 13569 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 13567 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 13568 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 12399 The union of a countably infinite collection of countable sets is countable. Theorem 8.1.28 of [AczelRathjen], p. 78. Compare with ctiunct 12395 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 12396 Variation of ctiunct 12395 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 7233 Countable choice with a simpler restriction on how every set in the countable collection needs to be inhabited. That is, compared with cc4 7232, 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 7231 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 7232 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 7230 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 7229 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 7228 Lemma for cc2 7229. (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 7227 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 ) )
 
19-Apr-2024omctfn 12398 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 11540 Lemma for prodmodc 11541. (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 11539 Lemma for prodmodc 11541. (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 11538 Lemma for prodmodc 11541. (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 647 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 11534 Lemma for prodrbdc 11537. (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 11510 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 11509 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 11508 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 11504 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 11514 Define the product of a series with an index set of integers  A. This definition takes most of the aspects of df-sumdc 11317 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 13566 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 13565 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 13549 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 13548 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 13498 Lemma for pi related theorems. (Contributed by Jim Kingdon, 9-Mar-2024.)
 |-  ( pi  e.  (
 2 (,) 4 )  /\  ( sin `  pi )  =  0 )
 
9-Mar-2024exmidonfin 7171 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 6850 and nnon 4594. (Contributed by Andrew W Swan and Jim Kingdon, 9-Mar-2024.)
 |-  ( om  =  ( On  i^i  Fin )  -> EXMID )
 
9-Mar-2024exmidonfinlem 7170 Lemma for exmidonfin 7171. (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 13497 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 13496 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 13495 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 11730 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-2024plusffvalg 12616 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 12703 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 9721 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 9720 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 8567 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 8550 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 8568 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 13416 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 13414 Lemma for ivthinc 13415. 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 13410 Lemma for ivthinc 13415. 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 13405 A Dedekind cut identifies a unique real number. Similar to df-inp 7428 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 12748 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 13413 Lemma for ivthinc 13415. 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 13412 Lemma for ivthinc 13415. 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 13411 Lemma for ivthinc 13415. 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 13409 Lemma for ivthinc 13415. 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 13407 Lemma for ivthinc 13415. 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 13406 Lemma for ivthinc 13415. 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 12702 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 12697 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 12615 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 13403 Lemma for dedekindicc 13405. 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 13402 Lemma for dedekindicc 13405. 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 13401 Lemma for dedekindicc 13405. 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 13400 Lemma for dedekindicc 13405. 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 13399 Lemma for dedekindicc 13405. 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 13398 Lemma for dedekindicc 13405. 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 13397 An inhabited, bounded-above, located set of reals in a closed interval has a supremum. A similar theorem is axsuploc 7992 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 13396 An inhabited, bounded-above, located set of reals in a closed interval has a supremum. A similar theorem is axsuploc 7992 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 13408 Lemma for ivthinc 13415. 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 13415 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 13389 Lemma for dedekindeu 13395. 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 13394 Lemma for dedekindeu 13395. 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 13393 Lemma for dedekindeu 13395. 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 13392 Lemma for dedekindeu 13395. 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 13391 Lemma for dedekindeu 13395. 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 13390 Lemma for dedekindeu 13395. 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 7992 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 7895 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 5190 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 12656 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 7863 Lemma for axpre-suploc 7864. 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 7771. (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 7895 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 7894 are both completeness properties, countable choice would probably be needed to derive this from ax-caucvg 7894.

(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 7864 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 7895. (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 7771 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 13809 Shorter proof of el2oss1o 6422 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 7739 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 12678 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 7769 Lemma for suplocsr 7771. 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 7768 Lemma for suplocsr 7771. 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 7770 Lemma for suplocsr 7771. 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 7686 Lemma for suplocexpr 7687. 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 7685 Lemma for suplocexpr 7687. 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 3085 Bound-variable hypothesis builder for substitution into a class. Version of nfcsb 3086 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 3083 Version of nfsbcd 2974 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 3053 Version of cbvcsb 3054 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 2982 Version of cbvsbc 2983 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 2708 Change bound variables of double restricted universal quantification, using implicit substitution. Version of cbvrex2v 2710 with a disjoint variable condition, which does not require ax-13 2143. (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 2707 Change bound variables of double restricted universal quantification, using implicit substitution. Version of cbvral2v 2709 with a disjoint variable condition, which does not require ax-13 2143. (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-2024cbvralw 2691 Rule used to change bound variables, using implicit substitution. Version of cbvral 2692 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 1500 and ax-bndl 1502 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 2688 Rule used to change bound variables, using implicit substitution. Version of cbvrexf 2690 with a disjoint variable condition, which does not require ax-13 2143. (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 2507 Bound-variable hypothesis builder for restricted quantification. See nfralya 2510 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 2502 Not-free for restricted universal quantification where  x and  y are distinct. See nfraldya 2505 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 2331 Bound-variable hypothesis builder for a class abstraction. Version of nfabd 2332 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 1743 Rule used to change bound variables, using implicit substitution. Version of cbv2 1742 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 7683 Lemma for suplocexpr 7687. 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 7682 Lemma for suplocexpr 7687. 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 7681 Lemma for suplocexpr 7687. 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 7679 Lemma for suplocexpr 7687. 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 7676 Lemma for suplocexpr 7687. 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 7675 Lemma for suplocexpr 7687. 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 7687 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 7684 Lemma for suplocexpr 7687. 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 7680 Lemma for suplocexpr 7687. 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 7678 Lemma for suplocexpr 7687. 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 7677 Lemma for suplocexpr 7687. 
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 13404 Lemma for dedekindicc 13405. Same as dedekindicc 13405, 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 13395 A Dedekind cut identifies a unique real number. Similar to df-inp 7428 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 13479 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 13478 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 13477 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-2023brm 4039 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 13473 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 13472 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 12667 The base set of a monoid is not empty. (It is also inhabited, as seen at mndidcl 12666). Statement in [Lang] p. 3. (Contributed by AV, 29-Dec-2023.)
 |-  B  =  ( Base `  G )   =>    |-  ( G  e.  Mnd  ->  B  =/=  (/) )
 
26-Dec-2023lidrididd 12636 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 12635) 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 12635 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 7095 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 12388 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 12387 Lemma for enct 12388. 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 7094  om is countable. (Contributed by Jim Kingdon, 23-Dec-2023.)
 |- 
 E. f  f : om -onto-> ( om 1o )
 
21-Dec-2023dvcoapbr 13465 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 8566 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 8565 Reverse closure for apartness. (Contributed by Jim Kingdon, 19-Dec-2023.)
 |-  ( A #  B  ->  ( A  e.  CC  /\  B  e.  CC )
 )
 
18-Dec-2023limccoap 13441 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 10942 Complex apartness in terms of real and imaginary parts. See also apreim 8522 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 13388 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 12990 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 13332 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 13331 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 13330 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 13785 Clavius law for stable formulas. See pm2.18dc 850. (Contributed by BJ, 4-Dec-2023.)
 |-  (STAB  ph  ->  ( ( -.  ph  ->  ph )  ->  ph ) )
 
4-Dec-2023bj-nnclavius 13772 Clavius law with doubly negated consequent. (Contributed by BJ, 4-Dec-2023.)
 |-  (
 ( -.  ph  ->  ph )  ->  -.  -.  ph )
 
2-Dec-2023dvmulxx 13462 The product rule for derivatives at a point. For the (more general) relation version, see dvmulxxbr 13460. (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 13460 The product rule for derivatives at a point. For the (simpler but more limited) function version, see dvmulxx 13462. (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 14034 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 7131 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-2023exmid1stab 14033 If any 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 )
 
28-Nov-2023ccfunen 7226 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 )
 )
 
27-Nov-2023df-cc 7225 The expression CCHOICE will be used as a readable shorthand for any form of countable choice, analogous to df-ac 7183 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 6074 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 13461 The sum rule for derivatives at a point. For the (more general) relation version, see dvaddxxbr 13459. (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 13459 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 843 Decidability of the negation of a proposition is equivalent to decidability of its double negation. See also dcn 837. The relation between dcn 837 and dcnn 843 is analogous to that between notnot 624 and notnotnot 629 (and directly stems from it). Using the notion of "testable proposition" (proposition whose negation is decidable), dcnn 843 means that a proposition is testable if and only if its negation is testable, and dcn 837 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 13796 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 13792 If a formula is not refutable, then it is decidable if and only if it is provable. See also comment of bj-nnbist 13779. (Contributed by BJ, 24-Nov-2023.)
 |-  ( -.  -.  ph  ->  (DECID  ph  <->  ph ) )
 
24-Nov-2023bj-dcstab 13791 A decidable formula is stable. (Contributed by BJ, 24-Nov-2023.) (Proof modification is discouraged.)
 |-  (DECID  ph  -> STAB  ph )
 
24-Nov-2023bj-fadc 13789 A refutable formula is decidable. (Contributed by BJ, 24-Nov-2023.)
 |-  ( -.  ph  -> DECID  ph )
 
24-Nov-2023bj-trdc 13787 A provable formula is decidable. (Contributed by BJ, 24-Nov-2023.)
 |-  ( ph  -> DECID  ph )
 
24-Nov-2023bj-stal 13784 The universal quantification of a stable formula is stable. See bj-stim 13781 for implication, stabnot 828 for negation, and bj-stan 13782 for conjunction. (Contributed by BJ, 24-Nov-2023.)
 |-  ( A. xSTAB 
 ph  -> STAB  A. x ph )
 
24-Nov-2023bj-stand 13783 The conjunction of two stable formulas is stable. Deduction form of bj-stan 13782. Its proof is shorter (when counting all steps, including syntactic steps), so one could prove it first and then bj-stan 13782 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 13782 The conjunction of two stable formulas is stable. See bj-stim 13781 for implication, stabnot 828 for negation, and bj-stal 13784 for universal quantification. (Contributed by BJ, 24-Nov-2023.)
 |-  (
 (STAB  ph  /\ STAB 
 ps )  -> STAB  ( ph  /\  ps ) )
 
24-Nov-2023bj-stim 13781 A conjunction with a stable consequent is stable. See stabnot 828 for negation , bj-stan 13782 for conjunction , and bj-stal 13784 for universal quantification. (Contributed by BJ, 24-Nov-2023.)
 |-  (STAB  ps  -> STAB  (
 ph  ->  ps ) )
 
24-Nov-2023bj-nnbist 13779 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 13792). (Contributed by BJ, 24-Nov-2023.)
 |-  ( -.  -.  ph  ->  (STAB  ph  <->  ph ) )
 
24-Nov-2023bj-fast 13776 A refutable formula is stable. (Contributed by BJ, 24-Nov-2023.)
 |-  ( -.  ph  -> STAB  ph )
 
24-Nov-2023bj-trst 13774 A provable formula is stable. (Contributed by BJ, 24-Nov-2023.)
 |-  ( ph  -> STAB  ph )
 
24-Nov-2023bj-nnan 13771 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 13770 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 13768 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 1642 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 6070 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 7186 The axiom of choice implies excluded middle. See acexmid 5852 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 7185 Lemma for exmidac 7186. 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 4186 A convenience theorem for proving that something implies EXMID. Think of this as an alternative to using a proposition, as in proofs like undifexmid 4179 or ordtriexmid 4505. 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 7184 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 848 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 842 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 837. (Contributed by BJ, 18-Nov-2023.)
 |-  (STAB 
 ph 
 <->  (DECID 
 -.  ph  -> DECID  ph ) )
 
17-Nov-2023cnplimclemr 13432 Lemma for cnplimccntop 13433. 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 13431 Lemma for cnplimccntop 13433. 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 13440 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 11187 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 13439 Lemma for limccnp2cntop 13440. 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 13423 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 13426 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 12397 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 12395 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 12399 (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 12397, 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 12350) 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 7088 and ctssdc 7090.

(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 7088 A mapping from a decidable subset of the natural numbers onto a countable set. This is similar to one direction of ctssdc 7090 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 12394 Lemma for ctiunct 12395. (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 12393 Lemma for ctiunct 12395. (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 12392 Lemma for ctiunct 12395. (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 12391 Lemma for ctiunct 12395. (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 12390 Lemma for ctiunct 12395. (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 12389 Lemma for ctiunct 12395. (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 863 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 840 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 649 Weakening of conax1 648. General instance of pm2.51 650 and of pm2.52 651. (Contributed by BJ, 28-Oct-2023.)
 |-  ( -.  ( ph  ->  ps )  ->  ( ch  ->  -.  ps )
 )
 
28-Oct-2023conax1 648 Contrapositive of ax-1 6. (Contributed by BJ, 28-Oct-2023.)
 |-  ( -.  ( ph  ->  ps )  ->  -.  ps )
 
25-Oct-2023divcnap 13349 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 7794 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 6150 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 13345 Lemma for addcncntop 13346, subcncntop 13347, and mulcncntop 13348. (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 13312 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 13302 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 13303 Lemma for xmettx 13304. (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 13304 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 13301 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 ) ) )
 
29-Sep-2023syl2anc2 410 Double syllogism inference combined with contraction. (Contributed by BTernaryTau, 29-Sep-2023.)
 |-  ( ph  ->  ps )   &    |-  ( ps  ->  ch )   &    |-  ( ( ps 
 /\  ch )  ->  th )   =>    |-  ( ph  ->  th )
 
12-Sep-2023pwntru 4185 A slight strengthening of pwtrufal 14030. (Contributed by Mario Carneiro and Jim Kingdon, 12-Sep-2023.)
 |-  ( ( A  C_  { (/) }  /\  A  =/=  { (/) } )  ->  A  =  (/) )
 
11-Sep-2023pwtrufal 14030 A subset of the singleton  { (/) } cannot be anything other than  (/) or  { (/) }. Removing the double negation would change the meaning, as seen at exmid01 4184. If we view a subset of a singleton as a truth value (as seen in theorems like exmidexmid 4182), 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 13767 (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 7021 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 14032 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 14031 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 14063 Omniscience stated in terms of natural numbers. Similar to isomnimap 7113 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 14062 Lemma for isomninn 14063. 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 14070 Lemma for trilpo 14075. 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 14065 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 14064 Lemma for cvgcmp2n 14065. 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 14068 Lemma for trilpo 14075. 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 14075 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 14073 (which means the sequence contains a zero), trilpolemeq1 14072 (which means the sequence is all ones), and trilpolemgt1 14071 (which is not possible).

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

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 10199 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 14074 Lemma for trilpo 14075. 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 14073 Lemma for trilpo 14075. 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 7116 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 14072 Lemma for trilpo 14075. 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 14071 Lemma for trilpo 14075. 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 14069 Lemma for trilpo 14075. 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 14061 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 7189 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 7089 Lemma for ctssdc 7090. 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 7087 Lemma for ctssdc 7090. 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 7126 The decidability condition in ctssdc 7090 is needed. More specifically, ctssdc 7090 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 7090 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 7126. (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 6192 Weak version of mpoex 6193 that holds without ax-coll 4104. 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 12745 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 8047 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 6092 Weak version of mptex 5722 that holds without ax-coll 4104. 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 6091 Weak version of funex 5719 that holds without ax-coll 4104. 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 12386 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 12382 Lemma for ctinfom 12383. 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 7076 Lemma for difinfsn 7077. 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 7078 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 7077 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 12385 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 12384 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 12383 A condition for a set being countably infinite. Restates ennnfone 12380 in terms of  om and function image. Like ennnfone 12380 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 13344 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 13343 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 14053 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 13048 Existence of the binary topological product. If  R and 
S are known to be topologies, see txtop 13054. (Contributed by Jim Kingdon, 3-Aug-2023.)
 |-  ( ( R  e.  V  /\  S  e.  W )  ->  ( R  tX  S )  e.  _V )
 
3-Aug-2023hashfingrpnn 12739 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 12668 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 11949 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 11948 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 10732 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 6910 Corollary of the Pigeonhole Principle using equality. Strengthening of phpm 6843 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 6795 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 4866 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 4865 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 2841 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 2175 Commute an inequality. (Contributed by Rohan Ridenour, 3-Aug-2023.)
 |-  ( ph  ->  -.  A  =  B )   =>    |-  ( ph  ->  -.  B  =  A )
 
2-Aug-2023dvid 13456 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 13455 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 13454 Lemma for dvid 13456 and dvconst 13455. (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 8753 If two complex numbers are equal, their quotient is one. One-way deduction form of diveqap1 8622. Converse of diveqap1d 8715. (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 11204 Equality of a product with zero. A bit of a curiosity, in the sense that theorems like abs00ap 11026 and mulap0bd 8575 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 8588 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 8543 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 10392 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 7188 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 7187 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 7075 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 7074 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 12381 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 4189 Excluded middle in terms of subsets of a singleton. This is similar to exmid01 4184 but lets you choose any set as the element of the singleton rather than just  (/). It is similar to exmidsssn 4188 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 13453 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 13452 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 )
 
23-Jul-2023ennnfonelemhdmp1 12364 Lemma for ennnfone 12380. 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 12361 Lemma for ennnfone 12380. 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 6482 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 6481 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 12366 Lemma for ennnfone 12380. 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 12358 Lemma for ennnfone 12380. 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 12357 Lemma for ennnfone 12380. 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 12356 Lemma for ennnfone 12380. 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 10422 Value of the sequence builder function at a successor. A version of seq3p1 10418 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 10419 A closure law for the recursive sequence builder. This is a lemma for theorems such as seqf2 10420 and seq1cd 10421 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 12370 Lemma for ennnfone 12380. 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 12369 Lemma for ennnfone 12380. 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 12367 Lemma for ennnfone 12380. 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 12363 Lemma for ennnfone 12380. 
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 12362 Lemma for ennnfone 12380. 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 10421 Initial value of the recursive sequence builder. A version of seq3-1 10416 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 12368 Lemma for ennnfone 12380. 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 12376 Lemma for ennnfone 12380. 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 12375 Lemma for ennnfone 12380. 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 12374 Lemma for ennnfone 12380. 
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 12373 Lemma for ennnfone 12380. 
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 12372 Lemma for ennnfone 12380. 
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 12371 Lemma for ennnfone 12380. A consequence of ennnfonelemss 12365. (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 12365 Lemma for ennnfone 12380. 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 12360 Lemma for ennnfone 12380. 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 12355 Lemma for ennnfone 12380. (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 12354 Lemma for ennnfone 12380. A direct consequence of fidcenumlemrk 6931. (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 7046 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 14057 Lemma for sbthom 14058. (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 7069 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 7042 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 7197 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 7196 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 7071 Lemma for omp1eom 7072. (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 6413 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 14058 Schroeder-Bernstein is not possible even for  om. We know by exmidsbth 14056 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 7073 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 7072 Adding one to  om. (Contributed by Jim Kingdon, 10-Jul-2023.)
 |-  ( om 1o )  ~~  om
 
9-Jul-2023refeq 14060 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 10415 Value of the sequence builder function. Similar to seq3val 10414 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 7044 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 7041 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 13428 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 12359 Lemma for ennnfone 12380. (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 10420 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 13427 Lemma for limcimo 13428. (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 13451 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 13449 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 13447 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 13445 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 13444 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 13443 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 13442 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 13420 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 13438 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 2617 Restricted quantifier version of 19.30dc 1620. (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 2598 Restricted quantifier version of one direction of 19.28 1556. (The other direction holds when  A is inhabited, see r19.28mv 3507.) (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 2597 Restricted quantitifer version of one direction of 19.27 1554. (The other direction holds when  A is inhabited, see r19.27mv 3511.) (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 13434 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 13375 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 13430 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 13314 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 13327 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 13326 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 13425 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 13424 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 13419 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 12201 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 11762 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 9527 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 9526 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 13384 Lemma for mulcncf 13385. (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 13381 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 11276 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 2170. (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 13322 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 11200 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 9256 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 13315 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 11240 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 11317 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 11485). (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 13298 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 13297 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 13296 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 11235 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 2867 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 11236 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 2609 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 11202 Lemma for bdtri 11203. (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 11239 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 11203 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 11199 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 11224 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 11223 Lemma for xrmaxadd 11224. 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 11238 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 11222 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 11220 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 13295 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 13294 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 13275 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 12578 Slot property of  dist. (Contributed by Jim Kingdon, 6-May-2023.)
 |-  ( dist  = Slot  ( dist ` 
 ndx )  /\  ( dist `  ndx )  e. 
 NN )
 
5-May-2023mopnrel 13235 The class of open sets of a metric space is a relation. (Contributed by Jim Kingdon, 5-May-2023.)
 |- 
 Rel  MetOpen
 
5-May-2023fsumsersdc 11358 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 13181 A ball is a set. (Contributed by Jim Kingdon, 4-May-2023.)
 |-  ( D  e.  ( *Met `  X )  ->  ( ball `  D )  e.  _V )
 
4-May-2023summodc 11346 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 11345 Lemma for summodc 11346. (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 11237 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 11234 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 11233 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 11232 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 11231 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 11230 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 11229 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 11228 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 11227 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 11226 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 11225 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 11221 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 11218 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 11217 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 11216 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 11215 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 11213 Lemma for xrmaxif 11214. 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 11212 Lemma for xrmaxif 11214. 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 11208 Lemma for xrmaxif 11214. 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 1941 Version of sbco2 1958 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 11211 Lemma for xrmaxif 11214. 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 11214 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 11210 Lemma for xrmaxif 11214. A variation of xrmaxleim 11207- 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 11209 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 11207 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 11201 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 11194 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 13116 The class of pseudometrics is a relation. (Contributed by Jim Kingdon, 24-Apr-2023.)
 |- 
 Rel PsMet
 
23-Apr-2023bcval5 10697 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 10474 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 10467 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 10439 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 10438 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 10462 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 10437 Lemma for seq3caopr2 10438. (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 10434 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 13171 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 5034 A Cartesian square is empty iff its member is empty. (Contributed by Jim Kingdon, 21-Apr-2023.)
 |-  ( ( A  X.  A )  =  (/)  <->  A  =  (/) )
 
20-Apr-2023xmetrel 13137 The class of extended metrics is a relation. (Contributed by Jim Kingdon, 20-Apr-2023.)
 |- 
 Rel  *Met
 
20-Apr-2023metrel 13136 The class of metrics is a relation. (Contributed by Jim Kingdon, 20-Apr-2023.)
 |- 
 Rel  Met
 
19-Apr-2023psmetge0 13125 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 9844 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 9839 Extended real version of posdif 8374. (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 9775 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 9772 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 9833 Extended real version of ltadd1 8348. (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 9800 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 9799 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 4832 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 11352 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 11344 Lemma for summodc 11346. (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 11343 Lemma for summodc 11346. (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 11342 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 10777 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 11347 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 11340 Lemma for sumrbdc 11342. (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 11303 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 10464 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 10463 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 10429 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 10428 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 3501 Theorem 19.2 of [Margaris] p. 89 with restricted quantifiers (compare 19.2 1631). 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 13044 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 13034 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 13033 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 7133 Excluded middle implies Markov's Principle (MP). (Contributed by Jim Kingdon, 4-Apr-2023.)
 |-  (EXMID 
 ->  om  e. Markov )
 
2-Apr-2023sup3exmid 8873 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 13032 One direction of cnptoprest 13033 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 13025 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 7119 Excluded middle implies the Limited Principle of Omniscience (LPO). (Contributed by Jim Kingdon, 29-Mar-2023.)
 |-  (EXMID 
 ->  om  e. Omni )
 
28-Mar-2023icnpimaex 13005 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 13001 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 13000 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 5578 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 12987 The topological space convergence relation is a relation. (Contributed by Jim Kingdon, 25-Mar-2023.)
 |-  ( J  e.  Top  ->  Rel  ( ~~> t `  J ) )
 
25-Mar-2023fodjumkv 7136 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 7135 Lemma for fodjumkv 7136. 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 7123 Lemma for fodjuomni 7125 and fodjumkv 7136. 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 7122 Lemma for fodjuomni 7125 and fodjumkv 7136. 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 7121 Lemma for fodjuomni 7125 and fodjumkv 7136. 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 12961 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 12948 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 7134 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 7132 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 7130 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 7129 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 7128 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 7093 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 7085 Lemma for ctm 7086. 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 7068 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 7092 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 7091 Lemma for enumct 7092. 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 7086 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 7084 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 6731 A class dominated by  om is a set. See also ctfoex 7095 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 12927 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 12000 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 11998 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 12926 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 12921 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 12913 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 12909 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 12876 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 4188 Excluded middle is equivalent to the biconditionalized version of sssnr 3740 for sets. (Contributed by Jim Kingdon, 5-Mar-2023.)
 |-  (EXMID  <->  A. x A. y ( x  C_  { y } 
 <->  ( x  =  (/)  \/  x  =  { y } ) ) )
 
5-Mar-2023exmidn0m 4187 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 12851 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 12844 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 608 Inference associated with biadani 607. 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 607 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 6709 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 6708 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 4193 Excluded middle is equivalent to every subset having a complement. Variation of exmidundif 4192 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 6703 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 6702 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 6700 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 6695 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 12593 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 12443 Existence of slot value. A corollary of slotslfn 12442. (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 12591 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 12442 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 12575 Slot property of  le. (Contributed by Jim Kingdon, 9-Feb-2023.)
 |-  ( le  = Slot  ( le `  ndx )  /\  ( le `  ndx )  e.  NN )
 
9-Feb-2023topgrptsetd 12572 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 12571 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 12570 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 12569 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 12568 Slot property of TopSet. (Contributed by Jim Kingdon, 9-Feb-2023.)
 |-  (TopSet  = Slot  (TopSet `  ndx )  /\  (TopSet `  ndx )  e.  NN )
 
8-Feb-2023ipsipd 12565 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 12564 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 12563 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 12562 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 12561 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 12560 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 12559 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 12558 Slot property of  .i. (Contributed by Jim Kingdon, 7-Feb-2023.)
 |-  ( .i  = Slot  ( .i `  ndx )  /\  ( .i `  ndx )  e.  NN )
 
7-Feb-2023lmodvscad 12555 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 12554 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 12553 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 12552 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 12551 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 12550 Slot property of  .s. (Contributed by Jim Kingdon, 5-Feb-2023.)
 |-  ( .s  = Slot  ( .s `  ndx )  /\  ( .s `  ndx )  e.  NN )
 
5-Feb-2023scaslid 12547 Slot property of Scalar. (Contributed by Jim Kingdon, 5-Feb-2023.)
 |-  (Scalar  = Slot  (Scalar `  ndx )  /\  (Scalar `  ndx )  e.  NN )
 
5-Feb-2023srngplusgd 12542 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 12541 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 12540 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 12514 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 12539 Slot property of  *r. (Contributed by Jim Kingdon, 4-Feb-2023.)
 |-  ( *r  = Slot 
 ( *r `  ndx )  /\  ( *r `  ndx )  e.  NN )
 
3-Feb-2023rngbaseg 12534 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 12533 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 12530 Slot property of  .r. (Contributed by Jim Kingdon, 3-Feb-2023.)
 |-  ( .r  = Slot  ( .r `  ndx )  /\  ( .r `  ndx )  e.  NN )
 
3-Feb-2023plusgslid 12513 Slot property of  +g. (Contributed by Jim Kingdon, 3-Feb-2023.)
 |-  ( +g  = Slot  ( +g  `  ndx )  /\  ( +g  `  ndx )  e. 
 NN )
 
2-Feb-20232strop1g 12523 The other slot of a constructed two-slot structure. Version of 2stropg 12520 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 12522 The base set of a constructed two-slot structure. Version of 2strbasg 12519 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 12521 A constructed two-slot structure. Version of 2strstrg 12518 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 12472 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 12464 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 12463 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 12462 Deduction version of strslss 12463. (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 12461 Variant on strslfv 12460 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 12460 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 12422). By virtue of ndxslid 12441, 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 12459 A variation on strslfv 12460 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 12458 Deduction version of strslfv 12460. (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 12457 Deduction version of strslfv 12460. (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 12449 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 6485 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 12441 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 12460. (Contributed by Jim Kingdon, 29-Jan-2023.)
 |-  E  = Slot  N   &    |-  N  e.  NN   =>    |-  ( E  = Slot  ( E `  ndx )  /\  ( E `  ndx )  e.  NN )
 
29-Jan-2023fnsnsplitdc 6484 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 12520 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 12519 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 12518 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 12516 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 12509 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 12508 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 12506 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 >. )
 
26-Jan-2023ressid2 12477 General behavior of trivial restriction. (Contributed by Stefan O'Rear, 29-Nov-2014.) (Revised by Jim Kingdon, 26-Jan-2023.)
 |-  R  =  ( Ws  A )   &    |-  B  =  (
 Base `  W )   =>    |-  ( ( B 
 C_  A  /\  W  e.  X  /\  A  e.  Y )  ->  R  =  W )
 
24-Jan-2023setsslnid 12467 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 12466 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 12455 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 12454 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 12448 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 11189 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 4460 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 5699 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 12447 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 5695 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 12438 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 12437 Value of a structure component extractor  E. Normally,  E is a defined constant symbol such as  Base (df-base 12422) 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 12460. (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 12436 Deduction version of strnfvn 12437. (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 12431 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 12430 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 12427 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 12426 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 1785 Conversion of implicit substitution to explicit substitution. Version of sbie 1784 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 12814 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 12792 Express the predicate " J is a topology" using nonempty finite intersections instead of binary intersections as in istopg 12791. 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 6906 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 13371 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 11748  _e is apart from 1. (Contributed by Jim Kingdon, 7-Jan-2023.)
 |-  _e #  1
 
7-Jan-2023eap0 11746  _e is apart from 0. (Contributed by Jim Kingdon, 7-Jan-2023.)
 |-  _e #  0
 
7-Jan-2023egt2lt3 11742 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 11741  _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 11740. (Contributed by Paul Chapman, 9-Feb-2008.) (Revised by Jim Kingdon, 6-Jan-2023.)
 |-  _e  e/  QQ
 
6-Jan-2023eirrap 11740  _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 11741. (Contributed by Jim Kingdon, 6-Jan-2023.)
 |-  ( Q  e.  QQ  ->  _e #  Q )
 
6-Jan-2023btwnapz 9342 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 8706 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 8909 A positive integer is apart from zero (inference version). (Contributed by Jim Kingdon, 1-Jan-2023.)
 |-  A  e.  NN   =>    |-  A #  0
 
31-Dec-20222logb9irrALT 13686 Alternate proof of 2logb9irr 13683: 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 13685 Example for logbprmirr 13684. 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 13684 The logarithm of a prime to a different prime base is not rational. For example,  ( 2 logb  3 )  e.  ( RR  \  QQ ) (see 2logb3irr 13685). (Contributed by AV, 31-Dec-2022.)
 |-  ( ( X  e.  Prime  /\  B  e.  Prime  /\  X  =/=  B ) 
 ->  ( B logb  X )  e.  ( RR  \  QQ ) )
 
30-Dec-2022elpqb 9608 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 13687 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 12118 resp. 2logb9irr 13683), satisfying the statement in 2irrexpq 13688. (Contributed by AV, 29-Dec-2022.)
 |-  ( ( sqr `  2
 )  ^c  ( 2 logb  9 ) )  =  3
 
29-Dec-20222logb9irr 13683 Example for logbgcd1irr 13679. The logarithm of nine to base two is not rational. Also see 2logb9irrap 13689 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 13682 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 13679 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 13678 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 13651 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 9607 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 8730 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 11701 A useful intermediate step in tanaddap 11702 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 8562 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 13688 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 12118, 2logb9irr 13683 and sqrt2cxp2logb9e3 13687. 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 13690. (Contributed by AV, 23-Dec-2022.)

 |- 
 E. a  e.  ( RR  \  QQ ) E. b  e.  ( RR  \  QQ ) ( a 
 ^c  b )  e.  QQ
 
23-Dec-2022rpcxpsqrtth 13644 Square root theorem over the complex numbers for the complex power function. Compare with resqrtth 10995. (Contributed by AV, 23-Dec-2022.)
 |-  ( A  e.  RR+  ->  ( ( sqr `  A )  ^c  2 )  =  A )
 
23-Dec-2022sqrt2irr0 12118 The square root of 2 is not rational. (Contributed by AV, 23-Dec-2022.)
 |-  ( sqr `  2
 )  e.  ( RR  \  QQ )
 
22-Dec-2022tanval3ap 11677 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 11676 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 11675 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 11672 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 11671 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 11662 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 11661 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 8402 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 11438 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 11640 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 11622 Lemma for efcl 11627. 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 11621 Lemma for efcl 11627. The series that defines the exponential function converges. The ratio test cvgratgt0 11496 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 11620 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 11500 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 11497 Lemma for mertensabs 11500. 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 11498 Lemma for mertensabs 11500. (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 11359 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 11357 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 11486 Lemma for cvgratnn 11494. 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 11492 Lemma for cvgratnn 11494. (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 11491 Lemma for cvgratnn 11494. (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 11493 Lemma for cvgratnn 11494. (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 11490 Lemma for cvgratnn 11494. (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 11489 Lemma for cvgratnn 11494. (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 11488 Lemma for cvgratnn 11494. (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 11487 Lemma for cvgratnn 11494. (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
 ) ) ) )
 
12-Nov-2022cvgratnn 11494 Ratio test for convergence of a complex infinite series. If the ratio  A of the absolute values of successive terms in an infinite sequence  F is less than 1 for all terms, then the infinite sum of the terms of  F converges to a complex number. Although this theorem is similar to cvgratz 11495 and cvgratgt0 11496, the decision to index starting at one is not merely cosmetic, as proving convergence using climcvg1n 11313 is sensitive to how a sequence is indexed. (Contributed by NM, 26-Apr-2005.) (Revised by Jim Kingdon, 12-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  ->  seq 1
 (  +  ,  F )  e.  dom  ~~>  )
 
12-Nov-2022fsum3cvg 11341 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, 12-Nov-2022.)
 |-  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_  ( M ... N ) )   =>    |-  ( ph  ->  seq M (  +  ,  F ) 
 ~~>  (  seq M (  +  ,  F ) `
  N ) )
 
12-Nov-2022seq3id2 10465 The last few partial sums of a sequence that ends with all zeroes (or any element which is a right-identity for  .+) are all the same. (Contributed by Mario Carneiro, 13-Jul-2013.) (Revised by Jim Kingdon, 12-Nov-2022.)
 |-  ( ( ph  /\  x  e.  S )  ->  ( x  .+  Z )  =  x )   &    |-  ( ph  ->  K  e.  ( ZZ>= `  M ) )   &    |-  ( ph  ->  N  e.  ( ZZ>= `  K ) )   &    |-  ( ph  ->  ( 
 seq M (  .+  ,  F ) `  K )  e.  S )   &    |-  (
 ( ph  /\  x  e.  ( ( K  +  1 ) ... N ) )  ->  ( 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 ) `  K )  =  (  seq M (  .+  ,  F ) `  N ) )
 
11-Nov-2022cvgratgt0 11496 Ratio test for convergence of a complex infinite series. If the ratio  A of the absolute values of successive terms in an infinite sequence  F is less than 1 for all terms beyond some index  B, then the infinite sum of the terms of 
F converges to a complex number. (Contributed by NM, 26-Apr-2005.) (Revised by Jim Kingdon, 11-Nov-2022.)
 |-  Z  =  ( ZZ>= `  M )   &    |-  W  =  (
 ZZ>= `  N )   &    |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  A  <  1 )   &    |-  ( ph  ->  0  <  A )   &    |-  ( ph  ->  N  e.  Z )   &    |-  ( ( ph  /\  k  e.  Z )  ->  ( F `  k )  e. 
 CC )   &    |-  ( ( ph  /\  k  e.  W ) 
 ->  ( abs `  ( F `  ( k  +  1 ) ) ) 
 <_  ( A  x.  ( abs `  ( F `  k ) ) ) )   =>    |-  ( ph  ->  seq M (  +  ,  F )  e.  dom  ~~>  )
 
11-Nov-2022cvgratz 11495 Ratio test for convergence of a complex infinite series. If the ratio  A of the absolute values of successive terms in an infinite sequence  F is less than 1 for all terms, then the infinite sum of the terms of  F converges to a complex number. (Contributed by NM, 26-Apr-2005.) (Revised by Jim Kingdon, 11-Nov-2022.)
 |-  Z  =  ( ZZ>= `  M )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  A  <  1 )   &    |-  ( ph  ->  0  <  A )   &    |-  (
 ( ph  /\  k  e.  Z )  ->  ( F `  k )  e. 
 CC )   &    |-  ( ( ph  /\  k  e.  Z ) 
 ->  ( abs `  ( F `  ( k  +  1 ) ) ) 
 <_  ( A  x.  ( abs `  ( F `  k ) ) ) )   =>    |-  ( ph  ->  seq M (  +  ,  F )  e.  dom  ~~>  )
 
4-Nov-2022seq3val 10414 Value of the sequence builder function. This helps expand the definition although there should be little need for it once we have proved seqf 10417, seq3-1 10416 and seq3p1 10418, as further development can be done in terms of those. (Contributed by Mario Carneiro, 24-Jun-2013.) (Revised by Jim Kingdon, 4-Nov-2022.)
 |-  ( ph  ->  M  e.  ZZ )   &    |-  R  = frec (
 ( x  e.  ( ZZ>=
 `  M ) ,  y  e.  _V  |->  <.
 ( x  +  1 ) ,  ( x ( z  e.  ( ZZ>=
 `  M ) ,  w  e.  S  |->  ( w  .+  ( F `
  ( z  +  1 ) ) ) ) y ) >. ) ,  <. M ,  ( F `  M ) >. )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M )
 )  ->  ( F `  x )  e.  S )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( x  .+  y )  e.  S )   =>    |-  ( ph  ->  seq M (  .+  ,  F )  =  ran  R )
 
4-Nov-2022df-seqfrec 10402 Define a general-purpose operation that builds a recursive sequence (i.e., a function on an upper integer set such as  NN or  NN0) whose value at an index is a function of its previous value and the value of an input sequence at that index. This definition is complicated, but fortunately it is not intended to be used directly. Instead, the only purpose of this definition is to provide us with an object that has the properties expressed by seqf 10417, seq3-1 10416 and seq3p1 10418. Typically, those are the main theorems that would be used in practice.

The first operand in the parentheses is the operation that is applied to the previous value and the value of the input sequence (second operand). The operand to the left of the parenthesis is the integer to start from. For example, for the operation  +, an input sequence  F with values 1, 1/2, 1/4, 1/8,... would be transformed into the output sequence  seq 1 (  +  ,  F ) with values 1, 3/2, 7/4, 15/8,.., so that  (  seq 1
(  +  ,  F
) `  1 )  =  1,  (  seq 1 (  +  ,  F ) `  2
)  = 3/2, etc. In other words,  seq M (  +  ,  F ) transforms a sequence  F into an infinite series. 
seq M (  +  ,  F )  ~~>  2 means "the sum of F(n) from n = M to infinity is 2". Since limits are unique (climuni 11256), by climdm 11258 the "sum of F(n) from n = 1 to infinity" can be expressed as  (  ~~>  `  seq 1
(  +  ,  F
) ) (provided the sequence converges) and evaluates to 2 in this example.

Internally, the frec function generates as its values a set of ordered pairs starting at 
<. M ,  ( F `
 M ) >., with the first member of each pair incremented by one in each successive value. So, the range of frec is exactly the sequence we want, and we just extract the range and throw away the domain.

(Contributed by NM, 18-Apr-2005.) (Revised by Jim Kingdon, 4-Nov-2022.)

 |- 
 seq M (  .+  ,  F )  =  ran frec ( ( x  e.  ( ZZ>=
 `  M ) ,  y  e.  _V  |->  <.
 ( x  +  1 ) ,  ( y 
 .+  ( F `  ( x  +  1
 ) ) ) >. ) ,  <. M ,  ( F `  M ) >. )
 
3-Nov-2022seq3f1o 10460 Rearrange a sum via an arbitrary bijection on  ( M ... N ). (Contributed by Mario Carneiro, 27-Feb-2014.) (Revised by Jim Kingdon, 3-Nov-2022.)
 |-  ( ( 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  ->  F : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M ) )  ->  ( G `  x )  e.  S )   &    |-  (
 ( ph  /\  x  e.  ( ZZ>= `  M )
 )  ->  ( H `  x )  e.  S )   &    |-  ( ( ph  /\  k  e.  ( M ... N ) )  ->  ( H `
  k )  =  ( G `  ( F `  k ) ) )   =>    |-  ( ph  ->  (  seq M (  .+  ,  H ) `  N )  =  (  seq M (  .+  ,  G ) `  N ) )
 
3-Nov-2022seq3m1 10424 Value of the sequence builder function at a successor. (Contributed by Mario Carneiro, 24-Jun-2013.) (Revised by Jim Kingdon, 3-Nov-2022.)
 |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  N  e.  ( ZZ>= `  ( M  +  1 )
 ) )   &    |-  ( ( 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 )  =  ( (  seq M (  .+  ,  F ) `  ( N  -  1 ) ) 
 .+  ( F `  N ) ) )
 
29-Oct-2022absgtap 11473 Greater-than of absolute value implies apartness. (Contributed by Jim Kingdon, 29-Oct-2022.)
 |-  ( ph  ->  A  e.  CC )   &    |-  ( ph  ->  B  e.  RR+ )   &    |-  ( ph  ->  B  <  ( abs `  A ) )   =>    |-  ( ph  ->  A #  B )
 
29-Oct-2022absltap 11472 Less-than of absolute value implies apartness. (Contributed by Jim Kingdon, 29-Oct-2022.)
 |-  ( ph  ->  A  e.  CC )   &    |-  ( ph  ->  B  e.  RR )   &    |-  ( ph  ->  ( abs `  A )  <  B )   =>    |-  ( ph  ->  A #  B )
 
29-Oct-20221ap2 9085 1 is apart from 2. (Contributed by Jim Kingdon, 29-Oct-2022.)
 |-  1 #  2
 
28-Oct-2022expcnv 11467 A sequence of powers of a complex number  A with absolute value smaller than 1 converges to zero. (Contributed by NM, 8-May-2006.) (Revised by Jim Kingdon, 28-Oct-2022.)
 |-  ( ph  ->  A  e.  CC )   &    |-  ( ph  ->  ( abs `  A )  <  1 )   =>    |-  ( ph  ->  ( n  e.  NN0  |->  ( A ^ n ) )  ~~>  0 )
 
28-Oct-2022expcnvre 11466 A sequence of powers of a nonnegative real number less than one converges to zero. (Contributed by Jim Kingdon, 28-Oct-2022.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  A  <  1 )   &    |-  ( ph  ->  0  <_  A )   =>    |-  ( ph  ->  ( n  e.  NN0  |->  ( A ^ n ) )  ~~>  0 )
 
27-Oct-2022ennnfone 12380 A condition for a set being countably infinite. Corollary 8.1.13 of [AczelRathjen], p. 73. Roughly speaking, the condition says that 
A is countable (that's the  f : NN0 -onto-> A part, as seen in theorems like ctm 7086), infinite (that's the part about being able to find an element of  A distinct from any mapping of a natural number via  f), and has decidable equality. (Contributed by Jim Kingdon, 27-Oct-2022.)
 |-  ( A  ~~  NN  <->  ( A. x  e.  A  A. y  e.  A DECID  x  =  y  /\  E. f
 ( f : NN0 -onto-> A 
 /\  A. n  e.  NN0  E. k  e.  NN0  A. j  e.  ( 0 ... n ) ( f `  k )  =/=  (
 f `  j )
 ) ) )
 
27-Oct-2022ennnfonelemim 12379 Lemma for ennnfone 12380. The trivial direction. (Contributed by Jim Kingdon, 27-Oct-2022.)
 |-  ( A  ~~  NN  ->  ( A. x  e.  A  A. y  e.  A DECID  x  =  y  /\  E. f ( f :
 NN0 -onto-> A  /\  A. n  e.  NN0  E. k  e. 
 NN0  A. j  e.  (
 0 ... n ) ( f `  k )  =/=  ( f `  j ) ) ) )
 
27-Oct-2022ennnfonelemr 12378 Lemma for ennnfone 12380. The interesting direction, expressed in deduction form. (Contributed by Jim Kingdon, 27-Oct-2022.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : NN0
 -onto-> A )   &    |-  ( ph  ->  A. n  e.  NN0  E. k  e.  NN0  A. j  e.  (
 0 ... n ) ( F `  k )  =/=  ( F `  j ) )   =>    |-  ( ph  ->  A 
 ~~  NN )
 
27-Oct-2022ennnfonelemnn0 12377 Lemma for ennnfone 12380. A version of ennnfonelemen 12376 expressed in terms of  NN0 instead of  om. (Contributed by Jim Kingdon, 27-Oct-2022.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : NN0
 -onto-> A )   &    |-  ( ph  ->  A. n  e.  NN0  E. k  e.  NN0  A. j  e.  (
 0 ... n ) ( F `  k )  =/=  ( F `  j ) )   &    |-  N  = frec ( ( x  e. 
 ZZ  |->  ( x  +  1 ) ) ,  0 )   =>    |-  ( ph  ->  A  ~~ 
 NN )
 
24-Oct-2022pwm1geoserap1 11471 The n-th power of a number decreased by 1 expressed by the finite geometric series  1  +  A ^ 1  +  A ^ 2  +...  +  A ^ ( N  - 
1 ). (Contributed by AV, 14-Aug-2021.) (Revised by Jim Kingdon, 24-Oct-2022.)
 |-  ( ph  ->  A  e.  CC )   &    |-  ( ph  ->  N  e.  NN0 )   &    |-  ( ph  ->  A #  1 )   =>    |-  ( ph  ->  (
 ( A ^ N )  -  1 )  =  ( ( A  -  1 )  x.  sum_ k  e.  ( 0 ... ( N  -  1 ) ) ( A ^ k
 ) ) )
 
24-Oct-2022geoserap 11470 The value of the finite geometric series  1  +  A ^
1  +  A ^
2  +...  +  A ^
( N  -  1 ). This is Metamath 100 proof #66. (Contributed by NM, 12-May-2006.) (Revised by Jim Kingdon, 24-Oct-2022.)
 |-  ( ph  ->  A  e.  CC )   &    |-  ( ph  ->  A #  1 )   &    |-  ( ph  ->  N  e.  NN0 )   =>    |-  ( ph  ->  sum_ k  e.  ( 0 ... ( N  -  1 ) ) ( A ^ k
 )  =  ( ( 1  -  ( A ^ N ) ) 
 /  ( 1  -  A ) ) )
 
24-Oct-2022geosergap 11469 The value of the finite geometric series  A ^ M  +  A ^ ( M  + 
1 )  +...  +  A ^
( N  -  1 ). (Contributed by Mario Carneiro, 2-May-2016.) (Revised by Jim Kingdon, 24-Oct-2022.)
 |-  ( ph  ->  A  e.  CC )   &    |-  ( ph  ->  A #  1 )   &    |-  ( ph  ->  M  e.  NN0 )   &    |-  ( ph  ->  N  e.  ( ZZ>= `  M ) )   =>    |-  ( ph  ->  sum_ k  e.  ( M..^ N ) ( A ^ k
 )  =  ( ( ( A ^ M )  -  ( A ^ N ) )  /  ( 1  -  A ) ) )
 
23-Oct-2022expcnvap0 11465 A sequence of powers of a complex number  A with absolute value smaller than 1 converges to zero. (Contributed by NM, 8-May-2006.) (Revised by Jim Kingdon, 23-Oct-2022.)
 |-  ( ph  ->  A  e.  CC )   &    |-  ( ph  ->  ( abs `  A )  <  1 )   &    |-  ( ph  ->  A #  0 )   =>    |-  ( ph  ->  ( n  e.  NN0  |->  ( A ^ n ) )  ~~>  0 )
 
22-Oct-2022divcnv 11460 The sequence of reciprocals of positive integers, multiplied by the factor  A, converges to zero. (Contributed by NM, 6-Feb-2008.) (Revised by Jim Kingdon, 22-Oct-2022.)
 |-  ( A  e.  CC  ->  ( n  e.  NN  |->  ( A  /  n ) )  ~~>  0 )
 
22-Oct-2022impcomd 253 Importation deduction with commuted antecedents. (Contributed by Peter Mazsa, 24-Sep-2022.) (Proof shortened by Wolf Lammen, 22-Oct-2022.)
 |-  ( ph  ->  ( ps  ->  ( ch  ->  th ) ) )   =>    |-  ( ph  ->  ( ( ch  /\  ps )  ->  th ) )
 
21-Oct-2022isumsplit 11454 Split off the first  N terms of an infinite sum. (Contributed by Paul Chapman, 9-Feb-2008.) (Revised by Jim Kingdon, 21-Oct-2022.)
 |-  Z  =  ( ZZ>= `  M )   &    |-  W  =  (
 ZZ>= `  N )   &    |-  ( ph  ->  N  e.  Z )   &    |-  ( ( ph  /\  k  e.  Z )  ->  ( F `  k )  =  A )   &    |-  ( ( ph  /\  k  e.  Z ) 
 ->  A  e.  CC )   &    |-  ( ph  ->  seq M (  +  ,  F )  e.  dom  ~~>  )   =>    |-  ( ph  ->  sum_ k  e.  Z  A  =  (
 sum_ k  e.  ( M ... ( N  -  1 ) ) A  +  sum_ k  e.  W  A ) )
 
21-Oct-2022seq3split 10435 Split a sequence into two sequences. (Contributed by Jim Kingdon, 16-Aug-2021.) (Revised by Jim Kingdon, 21-Oct-2022.)
 |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( x  .+  y )  e.  S )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S  /\  z  e.  S )
 )  ->  ( ( x  .+  y )  .+  z )  =  ( x  .+  ( y  .+  z ) ) )   &    |-  ( ph  ->  N  e.  ( ZZ>= `  ( M  +  1 ) ) )   &    |-  ( ph  ->  M  e.  ( ZZ>= `  K ) )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  K ) )  ->  ( F `  x )  e.  S )   =>    |-  ( ph  ->  ( 
 seq K (  .+  ,  F ) `  N )  =  ( (  seq K (  .+  ,  F ) `  M )  .+  (  seq ( M  +  1 )
 (  .+  ,  F ) `  N ) ) )
 
20-Oct-2022fidcenumlemrk 6931 Lemma for fidcenum 6933. (Contributed by Jim Kingdon, 20-Oct-2022.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : N -onto-> A )   &    |-  ( ph  ->  K  e.  om )   &    |-  ( ph  ->  K  C_  N )   &    |-  ( ph  ->  X  e.  A )   =>    |-  ( ph  ->  ( X  e.  ( F " K )  \/  -.  X  e.  ( F " K ) ) )
 
20-Oct-2022fidcenumlemrks 6930 Lemma for fidcenum 6933. Induction step for fidcenumlemrk 6931. (Contributed by Jim Kingdon, 20-Oct-2022.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : N -onto-> A )   &    |-  ( ph  ->  J  e.  om )   &    |-  ( ph  ->  suc  J  C_  N )   &    |-  ( ph  ->  ( X  e.  ( F " J )  \/  -.  X  e.  ( F " J ) ) )   &    |-  ( ph  ->  X  e.  A )   =>    |-  ( ph  ->  ( X  e.  ( F " suc  J )  \/ 
 -.  X  e.  ( F " suc  J ) ) )
 
19-Oct-2022fidcenum 6933 A set is finite if and only if it has decidable equality and is finitely enumerable. Proposition 8.1.11 of [AczelRathjen], p. 72. The definition of "finitely enumerable" as  E. n  e. 
om E. f f : n -onto-> A is Definition 8.1.4 of [AczelRathjen], p. 71. (Contributed by Jim Kingdon, 19-Oct-2022.)
 |-  ( A  e.  Fin  <->  ( A. x  e.  A  A. y  e.  A DECID  x  =  y  /\  E. n  e.  om  E. f  f : n -onto-> A ) )
 
19-Oct-2022fidcenumlemr 6932 Lemma for fidcenum 6933. Reverse direction (put into deduction form). (Contributed by Jim Kingdon, 19-Oct-2022.)
 |-  ( ph  ->  A. x  e.  A  A. y  e.  A DECID  x  =  y )   &    |-  ( ph  ->  F : N -onto-> A )   &    |-  ( ph  ->  N  e.  om )   =>    |-  ( ph  ->  A  e.  Fin )
 
19-Oct-2022fidcenumlemim 6929 Lemma for fidcenum 6933. Forward direction. (Contributed by Jim Kingdon, 19-Oct-2022.)
 |-  ( A  e.  Fin  ->  ( A. x  e.  A  A. y  e.  A DECID  x  =  y  /\  E. n  e.  om  E. f  f : n -onto-> A ) )
 
17-Oct-2022iser3shft 11309 Index shift of the limit of an infinite series. (Contributed by Mario Carneiro, 6-Sep-2013.) (Revised by Jim Kingdon, 17-Oct-2022.)
 |-  ( ph  ->  F  e.  V )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  N  e.  ZZ )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M )
 )  ->  ( F `  x )  e.  S )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( x  .+  y )  e.  S )   =>    |-  ( ph  ->  (  seq M (  .+  ,  F )  ~~>  A  <->  seq ( M  +  N ) (  .+  ,  ( F  shift  N ) )  ~~>  A ) )
 
17-Oct-2022seq3shft 10802 Shifting the index set of a sequence. (Contributed by NM, 17-Mar-2005.) (Revised by Jim Kingdon, 17-Oct-2022.)
 |-  ( ph  ->  F  e.  V )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  N  e.  ZZ )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  ( M  -  N ) ) ) 
 ->  ( F `  x )  e.  S )   &    |-  (
 ( ph  /\  ( x  e.  S  /\  y  e.  S ) )  ->  ( x  .+  y )  e.  S )   =>    |-  ( ph  ->  seq
 M (  .+  ,  ( F  shift  N ) )  =  (  seq ( M  -  N ) (  .+  ,  F )  shift  N ) )
 
16-Oct-2022resqrexlemf1 10972 Lemma for resqrex 10990. Initial value. Although this sequence converges to the square root with any positive initial value, this choice makes various steps in the proof of convergence easier. (Contributed by Mario Carneiro and Jim Kingdon, 27-Jul-2021.) (Revised by Jim Kingdon, 16-Oct-2022.)
 |-  F  =  seq 1
 ( ( y  e.  RR+ ,  z  e.  RR+  |->  ( ( y  +  ( A  /  y
 ) )  /  2
 ) ) ,  ( NN  X.  { ( 1  +  A ) }
 ) )   &    |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  0  <_  A )   =>    |-  ( ph  ->  ( F `  1 )  =  ( 1  +  A ) )
 
16-Oct-2022resqrexlemf 10971 Lemma for resqrex 10990. The sequence is a function. (Contributed by Mario Carneiro and Jim Kingdon, 27-Jul-2021.) (Revised by Jim Kingdon, 16-Oct-2022.)
 |-  F  =  seq 1
 ( ( y  e.  RR+ ,  z  e.  RR+  |->  ( ( y  +  ( A  /  y
 ) )  /  2
 ) ) ,  ( NN  X.  { ( 1  +  A ) }
 ) )   &    |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  0  <_  A )   =>    |-  ( ph  ->  F : NN --> RR+ )
 
16-Oct-2022resqrexlemp1rp 10970 Lemma for resqrex 10990. Applying the recursion rule yields a positive real (expressed in a way that will help apply seqf 10417 and similar theorems). (Contributed by Jim Kingdon, 28-Jul-2021.) (Revised by Jim Kingdon, 16-Oct-2022.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  0 
 <_  A )   =>    |-  ( ( ph  /\  ( B  e.  RR+  /\  C  e.  RR+ ) )  ->  ( B ( y  e.  RR+ ,  z  e.  RR+  |->  ( ( y  +  ( A  /  y
 ) )  /  2
 ) ) C )  e.  RR+ )
 
16-Oct-2022resqrexlem1arp 10969 Lemma for resqrex 10990.  1  +  A is a positive real (expressed in a way that will help apply seqf 10417 and similar theorems). (Contributed by Jim Kingdon, 28-Jul-2021.) (Revised by Jim Kingdon, 16-Oct-2022.)
 |-  ( ph  ->  A  e.  RR )   &    |-  ( ph  ->  0 
 <_  A )   =>    |-  ( ( ph  /\  N  e.  NN )  ->  (
 ( NN  X.  {
 ( 1  +  A ) } ) `  N )  e.  RR+ )
 
15-Oct-2022inffz 14101 The infimum of a finite sequence of integers. (Contributed by Scott Fenton, 8-Aug-2013.) (Revised by Jim Kingdon, 15-Oct-2022.)
 |-  ( N  e.  ( ZZ>= `  M )  -> inf ( ( M ... N ) ,  ZZ ,  <  )  =  M )
 
15-Oct-2022supfz 14100 The supremum of a finite sequence of integers. (Contributed by Scott Fenton, 8-Aug-2013.) (Revised by Jim Kingdon, 15-Oct-2022.)
 |-  ( N  e.  ( ZZ>= `  M )  ->  sup (
 ( M ... N ) ,  ZZ ,  <  )  =  N )
 
12-Oct-2022fsumlessfi 11423 A shorter sum of nonnegative terms is no greater than a longer one. (Contributed by NM, 26-Dec-2005.) (Revised by Jim Kingdon, 12-Oct-2022.)
 |-  ( ph  ->  A  e.  Fin )   &    |-  ( ( ph  /\  k  e.  A ) 
 ->  B  e.  RR )   &    |-  (
 ( ph  /\  k  e.  A )  ->  0  <_  B )   &    |-  ( ph  ->  C 
 C_  A )   &    |-  ( ph  ->  C  e.  Fin )   =>    |-  ( ph  ->  sum_ k  e.  C  B  <_  sum_ k  e.  A  B )
 
12-Oct-2022modfsummodlemstep 11420 Induction step for modfsummod 11421. (Contributed by Alexander van der Vekens, 1-Sep-2018.) (Revised by Jim Kingdon, 12-Oct-2022.)
 |-  ( ph  ->  A  e.  Fin )   &    |-  ( ph  ->  N  e.  NN )   &    |-  ( ph  ->  A. k  e.  ( A  u.  { z }
 ) B  e.  ZZ )   &    |-  ( ph  ->  -.  z  e.  A )   &    |-  ( ph  ->  (
 sum_ k  e.  A  B  mod  N )  =  ( sum_ k  e.  A  ( B  mod  N ) 
 mod  N ) )   =>    |-  ( ph  ->  (
 sum_ k  e.  ( A  u.  { z }
 ) B  mod  N )  =  ( sum_ k  e.  ( A  u.  { z } ) ( B  mod  N ) 
 mod  N ) )
 
10-Oct-2022fsum3 11350 The value of a sum over a nonempty finite set. (Contributed by Jim Kingdon, 10-Oct-2022.)
 |-  ( 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  ->  sum_ k  e.  A  B  =  ( 
 seq 1 (  +  ,  ( n  e.  NN  |->  if ( n  <_  M ,  ( G `  n ) ,  0 )
 ) ) `  M ) )
 
10-Oct-2022fsumgcl 11349 Closure for a function used to describe a sum over a nonempty finite set. (Contributed by Jim Kingdon, 10-Oct-2022.)
 |-  ( 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  ->  A. n  e.  ( 1 ... M ) ( G `  n )  e.  CC )
 
10-Oct-2022seq3distr 10469 The distributive property for series. (Contributed by Jim Kingdon, 10-Oct-2022.)
 |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( x  .+  y )  e.  S )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( C T ( x  .+  y ) )  =  ( ( C T x )  .+  ( C T y ) ) )   &    |-  ( ph  ->  N  e.  ( ZZ>= `  M ) )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M ) )  ->  ( G `  x )  e.  S )   &    |-  (
 ( ph  /\  x  e.  ( ZZ>= `  M )
 )  ->  ( F `  x )  =  ( C T ( G `
  x ) ) )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S ) )  ->  ( x T y )  e.  S )   &    |-  ( ph  ->  C  e.  S )   =>    |-  ( ph  ->  ( 
 seq M (  .+  ,  F ) `  N )  =  ( C T (  seq M ( 
 .+  ,  G ) `  N ) ) )
 
10-Oct-2022seq3homo 10466 Apply a homomorphism to a sequence. (Contributed by Jim Kingdon, 10-Oct-2022.)
 |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( x  .+  y )  e.  S )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M )
 )  ->  ( F `  x )  e.  S )   &    |-  ( ph  ->  N  e.  ( ZZ>= `  M )
 )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( H `  ( x  .+  y
 ) )  =  ( ( H `  x ) Q ( H `  y ) ) )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M )
 )  ->  ( H `  ( F `  x ) )  =  ( G `  x ) )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M )
 )  ->  ( G `  x )  e.  S )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S )
 )  ->  ( x Q y )  e.  S )   =>    |-  ( ph  ->  ( H `  (  seq M (  .+  ,  F ) `
  N ) )  =  (  seq M ( Q ,  G ) `
  N ) )
 
8-Oct-2022fsum2dlemstep 11397 Lemma for fsum2d 11398- induction step. (Contributed by Mario Carneiro, 23-Apr-2014.) (Revised by Jim Kingdon, 8-Oct-2022.)
 |-  ( z  =  <. j ,  k >.  ->  D  =  C )   &    |-  ( ph  ->  A  e.  Fin )   &    |-  (
 ( ph  /\  j  e.  A )  ->  B  e.  Fin )   &    |-  ( ( ph  /\  ( j  e.  A  /\  k  e.  B ) )  ->  C  e.  CC )   &    |-  ( ph  ->  -.  y  e.  x )   &    |-  ( ph  ->  ( x  u.  { y } )  C_  A )   &    |-  ( ph  ->  x  e.  Fin )   &    |-  ( ps 
 <-> 
 sum_ j  e.  x  sum_
 k  e.  B  C  =  sum_ z  e.  U_  j  e.  x  ( { j }  X.  B ) D )   =>    |-  ( ( ph  /\  ps )  ->  sum_ j  e.  ( x  u.  { y }
 ) sum_ k  e.  B  C  =  sum_ z  e.  U_  j  e.  ( x  u.  { y }
 ) ( { j }  X.  B ) D )
 
7-Oct-2022iunfidisj 6923 The finite union of disjoint finite sets is finite. Note that  B depends on  x, i.e. can be thought of as  B ( x ). (Contributed by NM, 23-Mar-2006.) (Revised by Jim Kingdon, 7-Oct-2022.)
 |-  ( ( A  e.  Fin  /\  A. x  e.  A  B  e.  Fin  /\ Disj  x  e.  A  B )  ->  U_ x  e.  A  B  e.  Fin )
 
7-Oct-2022disjnims 3981 If a collection  B ( i ) for  i  e.  A is disjoint, then pairs are disjoint. (Contributed by Mario Carneiro, 14-Nov-2016.) (Revised by Jim Kingdon, 7-Oct-2022.)
 |-  (Disj  x  e.  A  B  ->  A. i  e.  A  A. j  e.  A  ( i  =/=  j  ->  ( [_ i  /  x ]_ B  i^i  [_ j  /  x ]_ B )  =  (/) ) )
 
6-Oct-2022disjnim 3980 If a collection  B ( i ) for  i  e.  A is disjoint, then pairs are disjoint. (Contributed by Mario Carneiro, 26-Mar-2015.) (Revised by Jim Kingdon, 6-Oct-2022.)
 |-  ( i  =  j 
 ->  B  =  C )   =>    |-  (Disj  i  e.  A  B  ->  A. i  e.  A  A. j  e.  A  ( i  =/=  j  ->  ( B  i^i  C )  =  (/) ) )
 
5-Oct-2022dcun 3525 The union of two decidable classes is decidable. (Contributed by Jim Kingdon, 5-Oct-2022.)
 |-  ( ph  -> DECID  k  e.  A )   &    |-  ( ph  -> DECID  k  e.  B )   =>    |-  ( ph  -> DECID  k  e.  ( A  u.  B ) )
 
4-Oct-2022ser3add 10461 The sum of two infinite series. (Contributed by NM, 17-Mar-2005.) (Revised by Jim Kingdon, 4-Oct-2022.)
 |-  ( 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 ) ) )
 
3-Oct-2022seq3-1 10416 Value of the sequence builder function at its initial value. (Contributed by Jim Kingdon, 3-Oct-2022.)
 |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M ) )  ->  ( F `  x )  e.  S )   &    |-  (
 ( ph  /\  ( x  e.  S  /\  y  e.  S ) )  ->  ( x  .+  y )  e.  S )   =>    |-  ( ph  ->  ( 
 seq M (  .+  ,  F ) `  M )  =  ( F `  M ) )
 
3-Oct-2022brrelex12i 4653 Two classes that are related by a binary relation are sets. (An artifact of our ordered pair definition.) (Contributed by BJ, 3-Oct-2022.)
 |- 
 Rel  R   =>    |-  ( A R B  ->  ( A  e.  _V  /\  B  e.  _V )
 )
 
1-Oct-2022fsum3ser 11360 A finite sum expressed in terms of a partial sum of an infinite series. The recursive definition follows as fsum1 11375 and fsump1 11383, which should make our notation clear and from which, along with closure fsumcl 11363, we will derive the basic properties of finite sums. (Contributed by NM, 11-Dec-2005.) (Revised by Jim Kingdon, 1-Oct-2022.)
 |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  ( F `  k )  =  A )   &    |-  ( ph  ->  N  e.  ( ZZ>= `  M )
 )   &    |-  ( ( ph  /\  k  e.  ( ZZ>= `  M )
 )  ->  A  e.  CC )   =>    |-  ( ph  ->  sum_ k  e.  ( M ... N ) A  =  (  seq M (  +  ,  F ) `  N ) )
 
1-Oct-2022tpfidisj 6905 A triple is finite if it consists of three unequal sets. (Contributed by Jim Kingdon, 1-Oct-2022.)
 |-  ( ph  ->  A  e.  V )   &    |-  ( ph  ->  B  e.  W )   &    |-  ( ph  ->  C  e.  X )   &    |-  ( ph  ->  A  =/=  B )   &    |-  ( ph  ->  A  =/=  C )   &    |-  ( ph  ->  B  =/=  C )   =>    |-  ( ph  ->  { A ,  B ,  C }  e.  Fin )
 
30-Sep-2022exdistrv 1903 Distribute a pair of existential quantifiers (over disjoint variables) over a conjunction. Combination of 19.41v 1895 and 19.42v 1899. For a version with fewer disjoint variable conditions but requiring more axioms, see eeanv 1925. (Contributed by BJ, 30-Sep-2022.)
 |-  ( E. x E. y ( ph  /\  ps ) 
 <->  ( E. x ph  /\ 
 E. y ps )
 )
 
28-Sep-2022seq3clss 10423 Closure property of the recursive sequence builder. (Contributed by Jim Kingdon, 28-Sep-2022.)
 |-  ( ph  ->  N  e.  ( ZZ>= `  M )
 )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M )
 )  ->  ( F `  x )  e.  T )   &    |-  ( ( ph  /\  x  e.  ( M ... N ) )  ->  ( F `
  x )  e.  S )   &    |-  ( ( ph  /\  ( x  e.  S  /\  y  e.  S ) )  ->  ( x 
 .+  y )  e.  S )   &    |-  ( ph  ->  S 
 C_  T )   &    |-  (
 ( ph  /\  ( x  e.  T  /\  y  e.  T ) )  ->  ( x  .+  y )  e.  T )   =>    |-  ( ph  ->  ( 
 seq M (  .+  ,  F ) `  N )  e.  S )
 
27-Sep-2022zmaxcl 11188 The maximum of two integers is an integer. (Contributed by Jim Kingdon, 27-Sep-2022.)
 |-  ( ( A  e.  ZZ  /\  B  e.  ZZ )  ->  sup ( { A ,  B } ,  RR ,  <  )  e.  ZZ )
 
24-Sep-2022isumss2 11356 Change the index set of a sum by adding zeroes. The nonzero elements are in the contained set  A and the added zeroes compose the rest of the containing set  B which needs to be summable. (Contributed by Mario Carneiro, 15-Jul-2013.) (Revised by Jim Kingdon, 24-Sep-2022.)
 |-  ( ph  ->  A  C_  B )   &    |-  ( ph  ->  A. j  e.  B DECID  j  e.  A )   &    |-  ( ph  ->  A. k  e.  A  C  e.  CC )   &    |-  ( ph  ->  ( ( M  e.  ZZ  /\  B  C_  ( ZZ>= `  M )  /\  A. j  e.  ( ZZ>= `  M )DECID  j  e.  B )  \/  B  e.  Fin ) )   =>    |-  ( ph  ->  sum_
 k  e.  A  C  =  sum_ k  e.  B  if ( k  e.  A ,  C ,  0 ) )
 
24-Sep-2022preimaf1ofi 6928 The preimage of a finite set under a one-to-one, onto function is finite. (Contributed by Jim Kingdon, 24-Sep-2022.)
 |-  ( ph  ->  C  C_  B )   &    |-  ( ph  ->  F : A -1-1-onto-> B )   &    |-  ( ph  ->  C  e.  Fin )   =>    |-  ( ph  ->  ( `' F " C )  e.  Fin )
 
24-Sep-2022ifmdc 3565 If a conditional class is inhabited, then the condition is decidable. This shows that conditionals are not very useful unless one can prove the condition decidable. (Contributed by BJ, 24-Sep-2022.)
 |-  ( A  e.  if ( ph ,  B ,  C )  -> DECID  ph )
 
24-Sep-2022bianassc 467 An inference to merge two lists of conjuncts. (Contributed by Peter Mazsa, 24-Sep-2022.)
 |-  ( ph  <->  ( ps  /\  ch ) )   =>    |-  ( ( et  /\  ph )  <->  ( ( ps 
 /\  et )  /\  ch ) )
 
24-Sep-2022mpbiran2d 440 Detach truth from conjunction in biconditional. Deduction form. (Contributed by Peter Mazsa, 24-Sep-2022.)
 |-  ( ph  ->  th )   &    |-  ( ph  ->  ( ps  <->  ( ch  /\  th ) ) )   =>    |-  ( ph  ->  ( ps  <->  ch ) )
 
24-Sep-2022anim1ci 339 Introduce conjunct to both sides of an implication. (Contributed by Peter Mazsa, 24-Sep-2022.)
 |-  ( ph  ->  ps )   =>    |-  (
 ( ph  /\  ch )  ->  ( ch  /\  ps ) )
 
23-Sep-2022fisumss 11355 Change the index set to a subset in a finite sum. (Contributed by Mario Carneiro, 21-Apr-2014.) (Revised by Jim Kingdon, 23-Sep-2022.)
 |-  ( ph  ->  A  C_  B )   &    |-  ( ( ph  /\  k  e.  A ) 
 ->  C  e.  CC )   &    |-  (
 ( ph  /\  k  e.  ( B  \  A ) )  ->  C  =  0 )   &    |-  ( ph  ->  A. j  e.  B DECID  j  e.  A )   &    |-  ( ph  ->  B  e.  Fin )   =>    |-  ( ph  ->  sum_
 k  e.  A  C  =  sum_ k  e.  B  C )
 
21-Sep-2022isumss 11354 Change the index set to a subset in an upper integer sum. (Contributed by Mario Carneiro, 21-Apr-2014.) (Revised by Jim Kingdon, 21-Sep-2022.)
 |-  ( ph  ->  A  C_  B )   &    |-  ( ( ph  /\  k  e.  A ) 
 ->  C  e.  CC )   &    |-  (
 ( ph  /\  k  e.  ( B  \  A ) )  ->  C  =  0 )   &    |-  ( ph  ->  A. j  e.  ( ZZ>= `  M )DECID  j  e.  A )   &    |-  ( ph  ->  M  e.  ZZ )   &    |-  ( ph  ->  B 
 C_  ( ZZ>= `  M ) )   &    |-  ( ph  ->  A. j  e.  ( ZZ>= `  M )DECID  j  e.  B )   =>    |-  ( ph  ->  sum_ k  e.  A  C  =  sum_ k  e.  B  C )
 
21-Sep-2022pw1dom2 7204 The power set of  1o dominates  2o. Also see pwpw0ss 3791 which is similar. (Contributed by Jim Kingdon, 21-Sep-2022.)
 |- 
 2o  ~<_  ~P 1o
 
18-Sep-2022sumfct 11337 A lemma to facilitate conversions from the function form to the class-variable form of a sum. (Contributed by Mario Carneiro, 12-Aug-2013.) (Revised by Jim Kingdon, 18-Sep-2022.)
 |-  ( A. k  e.  A  B  e.  CC  -> 
 sum_ j  e.  A  ( ( k  e.  A  |->  B ) `  j )  =  sum_ k  e.  A  B )
 
18-Sep-2022syl21anbrc 1177 Syllogism inference. (Contributed by Peter Mazsa, 18-Sep-2022.)
 |-  ( ph  ->  ps )   &    |-  ( ph  ->  ch )   &    |-  ( ph  ->  th )   &    |-  ( ta  <->  ( ( ps 
 /\  ch )  /\  th ) )   =>    |-  ( ph  ->  ta )
 
18-Sep-2022an21 468 Swap two conjuncts. (Contributed by Peter Mazsa, 18-Sep-2022.)
 |-  ( ( ( ph  /\ 
 ps )  /\  ch ) 
 <->  ( ps  /\  ( ph  /\  ch ) ) )
 
16-Sep-2022fser0const 10472 Simplifying an expression which turns out just to be a constant zero sequence. (Contributed by Jim Kingdon, 16-Sep-2022.)
 |-  Z  =  ( ZZ>= `  M )   =>    |-  ( N  e.  Z  ->  ( n  e.  Z  |->  if ( n  <_  N ,  ( ( Z  X.  { 0 } ) `  n ) ,  0 ) )  =  ( Z  X.  { 0 } ) )
 
8-Sep-2022zfz1isolemiso 10774 Lemma for zfz1iso 10776. Adding one element to the order isomorphism. (Contributed by Jim Kingdon, 8-Sep-2022.)
 |-  ( ph  ->  X  e.  Fin )   &    |-  ( ph  ->  X 
 C_  ZZ )   &    |-  ( ph  ->  M  e.  X )   &    |-  ( ph  ->  A. z  e.  X  z  <_  M )   &    |-  ( ph  ->  G  Isom  <  ,  <  ( ( 1
 ... ( `  ( X  \  { M } )
 ) ) ,  ( X  \  { M }
 ) ) )   &    |-  ( ph  ->  A  e.  (
 1 ... ( `  X ) ) )   &    |-  ( ph  ->  B  e.  (
 1 ... ( `  X ) ) )   =>    |-  ( ph  ->  ( A  <  B  <->  ( ( G  u.  { <. ( `  X ) ,  M >. } ) `  A )  <  ( ( G  u.  { <. ( `  X ) ,  M >. } ) `  B ) ) )
 
8-Sep-2022zfz1isolemsplit 10773 Lemma for zfz1iso 10776. Removing one element from an integer range. (Contributed by Jim Kingdon, 8-Sep-2022.)
 |-  ( ph  ->  X  e.  Fin )   &    |-  ( ph  ->  M  e.  X )   =>    |-  ( ph  ->  ( 1 ... ( `  X ) )  =  (
 ( 1 ... ( `  ( X  \  { M } ) ) )  u.  { ( `  X ) } ) )
 
7-Sep-2022zfz1isolem1 10775 Lemma for zfz1iso 10776. Existence of an order isomorphism given the existence of shorter isomorphisms. (Contributed by Jim Kingdon, 7-Sep-2022.)
 |-  ( ph  ->  K  e.  om )   &    |-  ( ph  ->  A. y ( ( ( y  C_  ZZ  /\  y  e.  Fin )  /\  y  ~~  K )  ->  E. f  f  Isom  <  ,  <  ( ( 1 ... ( `  y ) ) ,  y ) ) )   &    |-  ( ph  ->  X  C_  ZZ )   &    |-  ( ph  ->  X  e.  Fin )   &    |-  ( ph  ->  X 
 ~~  suc  K )   &    |-  ( ph  ->  M  e.  X )   &    |-  ( ph  ->  A. z  e.  X  z  <_  M )   =>    |-  ( ph  ->  E. f  f  Isom  <  ,  <  ( ( 1 ... ( `  X ) ) ,  X ) )
 
6-Sep-2022fimaxq 10762 A finite set of rational numbers has a maximum. (Contributed by Jim Kingdon, 6-Sep-2022.)
 |-  ( ( A  C_  QQ  /\  A  e.  Fin  /\  A  =/=  (/) )  ->  E. x  e.  A  A. y  e.  A  y 
 <_  x )
 
5-Sep-2022fimax2gtri 6879 A finite set has a maximum under a trichotomous order. (Contributed by Jim Kingdon, 5-Sep-2022.)
 |-  ( ph  ->  R  Po  A )   &    |-  ( ph  ->  A. x  e.  A  A. y  e.  A  ( x R y  \/  x  =  y  \/  y R x ) )   &    |-  ( ph  ->  A  e.  Fin )   &    |-  ( ph  ->  A  =/= 
 (/) )   =>    |-  ( ph  ->  E. x  e.  A  A. y  e.  A  -.  x R y )
 
5-Sep-2022fimax2gtrilemstep 6878 Lemma for fimax2gtri 6879. The induction step. (Contributed by Jim Kingdon, 5-Sep-2022.)
 |-  ( ph  ->  R  Po  A )   &    |-  ( ph  ->  A. x  e.  A  A. y  e.  A  ( x R y  \/  x  =  y  \/  y R x ) )   &    |-  ( ph  ->  A  e.  Fin )   &    |-  ( ph  ->  A  =/= 
 (/) )   &    |-  ( ph  ->  U  e.  Fin )   &    |-  ( ph  ->  U  C_  A )   &    |-  ( ph  ->  Z  e.  A )   &    |-  ( ph  ->  V  e.  A )   &    |-  ( ph  ->  -.  V  e.  U )   &    |-  ( ph  ->  A. y  e.  U  -.  Z R y )   =>    |-  ( ph  ->  E. x  e.  A  A. y  e.  ( U  u.  { V } )  -.  x R y )
 
5-Sep-2022tridc 6877 A trichotomous order is decidable. (Contributed by Jim Kingdon, 5-Sep-2022.)
 |-  ( ph  ->  R  Po  A )   &    |-  ( ph  ->  A. x  e.  A  A. y  e.  A  ( x R y  \/  x  =  y  \/  y R x ) )   &    |-  ( ph  ->  B  e.  A )   &    |-  ( ph  ->  C  e.  A )   =>    |-  ( ph  -> DECID  B R C )
 
3-Sep-2022zfz1iso 10776 A finite set of integers has an order isomorphism to a one-based finite sequence. (Contributed by Jim Kingdon, 3-Sep-2022.)
 |-  ( ( A  C_  ZZ  /\  A  e.  Fin )  ->  E. f  f  Isom  <  ,  <  ( ( 1
 ... ( `  A )
 ) ,  A ) )
 
2-Sep-2022rspceeqv 2852 Restricted existential specialization in an equality, using implicit substitution. (Contributed by BJ, 2-Sep-2022.)
 |-  ( x  =  A  ->  C  =  D )   =>    |-  ( ( A  e.  B  /\  E  =  D )  ->  E. x  e.  B  E  =  C )
 
1-Sep-2022ssidd 3168 Weakening of ssid 3167. (Contributed by BJ, 1-Sep-2022.)
 |-  ( ph  ->  A  C_  A )
 
31-Aug-2022fveqeq2 5505 Equality deduction for function value. (Contributed by BJ, 31-Aug-2022.)
 |-  ( A  =  B  ->  ( ( F `  A )  =  C  <->  ( F `  B )  =  C ) )
 
30-Aug-2022iseqf1olemfvp 10453 Lemma for seq3f1o 10460. (Contributed by Jim Kingdon, 30-Aug-2022.)
 |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  T : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  ( ph  ->  A  e.  ( M ... N ) )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M ) )  ->  ( G `  x )  e.  S )   &    |-  P  =  ( x  e.  ( ZZ>=
 `  M )  |->  if ( x  <_  N ,  ( G `  (
 f `  x )
 ) ,  ( G `
  M ) ) )   =>    |-  ( ph  ->  ( [_ T  /  f ]_ P `  A )  =  ( G `  ( T `  A ) ) )
 
30-Aug-2022fveqeq2d 5504 Equality deduction for function value. (Contributed by BJ, 30-Aug-2022.)
 |-  ( ph  ->  A  =  B )   =>    |-  ( ph  ->  (
 ( F `  A )  =  C  <->  ( F `  B )  =  C ) )
 
29-Aug-2022seq3f1olemqsumkj 10454 Lemma for seq3f1o 10460. 
Q gives the same sum as 
J in the range  ( K ... ( `' J `  K ) ). (Contributed by Jim Kingdon, 29-Aug-2022.)
 |-  ( ( 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  ->  F : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M ) )  ->  ( G `  x )  e.  S )   &    |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J :
 ( M ... N )
 -1-1-onto-> ( M ... N ) )   &    |-  ( ph  ->  A. x  e.  ( M..^ K ) ( J `
  x )  =  x )   &    |-  ( ph  ->  K  =/=  ( `' J `  K ) )   &    |-  Q  =  ( u  e.  ( M ... N )  |->  if ( u  e.  ( K ... ( `' J `  K ) ) ,  if ( u  =  K ,  K ,  ( J `  ( u  -  1 ) ) ) ,  ( J `
  u ) ) )   &    |-  P  =  ( x  e.  ( ZZ>= `  M )  |->  if ( x  <_  N ,  ( G `  ( f `  x ) ) ,  ( G `  M ) ) )   =>    |-  ( ph  ->  ( 
 seq K (  .+  , 
 [_ J  /  f ]_ P ) `  ( `' J `  K ) )  =  (  seq K (  .+  ,  [_ Q  /  f ]_ P ) `  ( `' J `  K ) ) )
 
29-Aug-2022iseqf1olemqpcl 10452 Lemma for seq3f1o 10460. A closure lemma involving  Q and  P. (Contributed by Jim Kingdon, 29-Aug-2022.)
 |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  Q  =  ( u  e.  ( M
 ... N )  |->  if ( u  e.  ( K ... ( `' J `  K ) ) ,  if ( u  =  K ,  K ,  ( J `  ( u  -  1 ) ) ) ,  ( J `
  u ) ) )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M ) )  ->  ( G `  x )  e.  S )   &    |-  P  =  ( x  e.  ( ZZ>=
 `  M )  |->  if ( x  <_  N ,  ( G `  (
 f `  x )
 ) ,  ( G `
  M ) ) )   =>    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M )
 )  ->  ( [_ Q  /  f ]_ P `  x )  e.  S )
 
29-Aug-2022iseqf1olemjpcl 10451 Lemma for seq3f1o 10460. A closure lemma involving  J and  P. (Contributed by Jim Kingdon, 29-Aug-2022.)
 |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  Q  =  ( u  e.  ( M
 ... N )  |->  if ( u  e.  ( K ... ( `' J `  K ) ) ,  if ( u  =  K ,  K ,  ( J `  ( u  -  1 ) ) ) ,  ( J `
  u ) ) )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M ) )  ->  ( G `  x )  e.  S )   &    |-  P  =  ( x  e.  ( ZZ>=
 `  M )  |->  if ( x  <_  N ,  ( G `  (
 f `  x )
 ) ,  ( G `
  M ) ) )   =>    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M )
 )  ->  ( [_ J  /  f ]_ P `  x )  e.  S )
 
28-Aug-2022iseqf1olemqval 10443 Lemma for seq3f1o 10460. Value of the function  Q. (Contributed by Jim Kingdon, 28-Aug-2022.)
 |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  ( ph  ->  A  e.  ( M ... N ) )   &    |-  Q  =  ( u  e.  ( M
 ... N )  |->  if ( u  e.  ( K ... ( `' J `  K ) ) ,  if ( u  =  K ,  K ,  ( J `  ( u  -  1 ) ) ) ,  ( J `
  u ) ) )   =>    |-  ( ph  ->  ( Q `  A )  =  if ( A  e.  ( K ... ( `' J `  K ) ) ,  if ( A  =  K ,  K ,  ( J `  ( A  -  1
 ) ) ) ,  ( J `  A ) ) )
 
27-Aug-2022iseqf1olemmo 10448 Lemma for seq3f1o 10460. Showing that  Q is one-to-one. (Contributed by Jim Kingdon, 27-Aug-2022.)
 |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  Q  =  ( u  e.  ( M
 ... N )  |->  if ( u  e.  ( K ... ( `' J `  K ) ) ,  if ( u  =  K ,  K ,  ( J `  ( u  -  1 ) ) ) ,  ( J `
  u ) ) )   &    |-  ( ph  ->  A  e.  ( M ... N ) )   &    |-  ( ph  ->  B  e.  ( M ... N ) )   &    |-  ( ph  ->  ( Q `  A )  =  ( Q `  B ) )   =>    |-  ( ph  ->  A  =  B )
 
27-Aug-2022iseqf1olemnanb 10446 Lemma for seq3f1o 10460. (Contributed by Jim Kingdon, 27-Aug-2022.)
 |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  ( ph  ->  A  e.  ( M ... N ) )   &    |-  ( ph  ->  B  e.  ( M ... N ) )   &    |-  ( ph  ->  ( Q `  A )  =  ( Q `  B ) )   &    |-  Q  =  ( u  e.  ( M ... N )  |->  if ( u  e.  ( K ... ( `' J `  K ) ) ,  if ( u  =  K ,  K ,  ( J `  ( u  -  1 ) ) ) ,  ( J `
  u ) ) )   &    |-  ( ph  ->  -.  A  e.  ( K
 ... ( `' J `  K ) ) )   &    |-  ( ph  ->  -.  B  e.  ( K ... ( `' J `  K ) ) )   =>    |-  ( ph  ->  A  =  B )
 
27-Aug-2022iseqf1olemab 10445 Lemma for seq3f1o 10460. (Contributed by Jim Kingdon, 27-Aug-2022.)
 |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  ( ph  ->  A  e.  ( M ... N ) )   &    |-  ( ph  ->  B  e.  ( M ... N ) )   &    |-  ( ph  ->  ( Q `  A )  =  ( Q `  B ) )   &    |-  Q  =  ( u  e.  ( M ... N )  |->  if ( u  e.  ( K ... ( `' J `  K ) ) ,  if ( u  =  K ,  K ,  ( J `  ( u  -  1 ) ) ) ,  ( J `
  u ) ) )   &    |-  ( ph  ->  A  e.  ( K ... ( `' J `  K ) ) )   &    |-  ( ph  ->  B  e.  ( K ... ( `' J `  K ) ) )   =>    |-  ( ph  ->  A  =  B )
 
27-Aug-2022iseqf1olemnab 10444 Lemma for seq3f1o 10460. (Contributed by Jim Kingdon, 27-Aug-2022.)
 |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  ( ph  ->  A  e.  ( M ... N ) )   &    |-  ( ph  ->  B  e.  ( M ... N ) )   &    |-  ( ph  ->  ( Q `  A )  =  ( Q `  B ) )   &    |-  Q  =  ( u  e.  ( M ... N )  |->  if ( u  e.  ( K ... ( `' J `  K ) ) ,  if ( u  =  K ,  K ,  ( J `  ( u  -  1 ) ) ) ,  ( J `
  u ) ) )   =>    |-  ( ph  ->  -.  ( A  e.  ( K ... ( `' J `  K ) )  /\  -.  B  e.  ( K
 ... ( `' J `  K ) ) ) )
 
27-Aug-2022iseqf1olemqcl 10442 Lemma for seq3f1o 10460. (Contributed by Jim Kingdon, 27-Aug-2022.)
 |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  ( ph  ->  A  e.  ( M ... N ) )   =>    |-  ( ph  ->  if ( A  e.  ( K ... ( `' J `  K ) ) ,  if ( A  =  K ,  K ,  ( J `  ( A  -  1 ) ) ) ,  ( J `
  A ) )  e.  ( M ... N ) )
 
26-Aug-2022iseqf1olemqf 10447 Lemma for seq3f1o 10460. Domain and codomain of  Q. (Contributed by Jim Kingdon, 26-Aug-2022.)
 |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  Q  =  ( u  e.  ( M
 ... N )  |->  if ( u  e.  ( K ... ( `' J `  K ) ) ,  if ( u  =  K ,  K ,  ( J `  ( u  -  1 ) ) ) ,  ( J `
  u ) ) )   =>    |-  ( ph  ->  Q : ( M ... N ) --> ( M ... N ) )
 
25-Aug-2022fzodcel 10108 Decidability of membership in a half-open integer interval. (Contributed by Jim Kingdon, 25-Aug-2022.)
 |-  ( ( K  e.  ZZ  /\  M  e.  ZZ  /\  N  e.  ZZ )  -> DECID  K  e.  ( M..^ N ) )
 
24-Aug-2022rspceaimv 2842 Restricted existential specialization of a universally quantified implication. (Contributed by BJ, 24-Aug-2022.)
 |-  ( x  =  A  ->  ( ph  <->  ps ) )   =>    |-  ( ( A  e.  B  /\  A. y  e.  C  ( ps  ->  ch ) )  ->  E. x  e.  B  A. y  e.  C  (
 ph  ->  ch ) )
 
22-Aug-2022seq3f1olemqsumk 10455 Lemma for seq3f1o 10460. 
Q gives the same sum as 
J in the range  ( K ... N ). (Contributed by Jim Kingdon, 22-Aug-2022.)
 |-  ( ( 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  ->  F : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M ) )  ->  ( G `  x )  e.  S )   &    |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J :
 ( M ... N )
 -1-1-onto-> ( M ... N ) )   &    |-  ( ph  ->  A. x  e.  ( M..^ K ) ( J `
  x )  =  x )   &    |-  ( ph  ->  K  =/=  ( `' J `  K ) )   &    |-  Q  =  ( u  e.  ( M ... N )  |->  if ( u  e.  ( K ... ( `' J `  K ) ) ,  if ( u  =  K ,  K ,  ( J `  ( u  -  1 ) ) ) ,  ( J `
  u ) ) )   &    |-  P  =  ( x  e.  ( ZZ>= `  M )  |->  if ( x  <_  N ,  ( G `  ( f `  x ) ) ,  ( G `  M ) ) )   =>    |-  ( ph  ->  ( 
 seq K (  .+  , 
 [_ J  /  f ]_ P ) `  N )  =  (  seq K (  .+  ,  [_ Q  /  f ]_ P ) `  N ) )
 
21-Aug-2022seq3f1olemqsum 10456 Lemma for seq3f1o 10460. 
Q gives the same sum as 
J. (Contributed by Jim Kingdon, 21-Aug-2022.)
 |-  ( ( 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  ->  F : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M ) )  ->  ( G `  x )  e.  S )   &    |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J :
 ( M ... N )
 -1-1-onto-> ( M ... N ) )   &    |-  ( ph  ->  A. x  e.  ( M..^ K ) ( J `
  x )  =  x )   &    |-  ( ph  ->  K  =/=  ( `' J `  K ) )   &    |-  Q  =  ( u  e.  ( M ... N )  |->  if ( u  e.  ( K ... ( `' J `  K ) ) ,  if ( u  =  K ,  K ,  ( J `  ( u  -  1 ) ) ) ,  ( J `
  u ) ) )   &    |-  P  =  ( x  e.  ( ZZ>= `  M )  |->  if ( x  <_  N ,  ( G `  ( f `  x ) ) ,  ( G `  M ) ) )   =>    |-  ( ph  ->  ( 
 seq M (  .+  , 
 [_ J  /  f ]_ P ) `  N )  =  (  seq M (  .+  ,  [_ Q  /  f ]_ P ) `  N ) )
 
21-Aug-2022iseqf1olemqk 10450 Lemma for seq3f1o 10460. 
Q is constant for one more position than  J is. (Contributed by Jim Kingdon, 21-Aug-2022.)
 |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  Q  =  ( u  e.  ( M
 ... N )  |->  if ( u  e.  ( K ... ( `' J `  K ) ) ,  if ( u  =  K ,  K ,  ( J `  ( u  -  1 ) ) ) ,  ( J `
  u ) ) )   &    |-  ( ph  ->  A. x  e.  ( M..^ K ) ( J `
  x )  =  x )   =>    |-  ( ph  ->  A. x  e.  ( M ... K ) ( Q `  x )  =  x )
 
21-Aug-2022iseqf1olemqf1o 10449 Lemma for seq3f1o 10460. 
Q is a permutation of  ( M ... N
).  Q is formed from the constant portion of  J, followed by the single element  K (at position  K), followed by the rest of J (with the  K deleted and the elements before  K moved one position later to fill the gap). (Contributed by Jim Kingdon, 21-Aug-2022.)
 |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  Q  =  ( u  e.  ( M
 ... N )  |->  if ( u  e.  ( K ... ( `' J `  K ) ) ,  if ( u  =  K ,  K ,  ( J `  ( u  -  1 ) ) ) ,  ( J `
  u ) ) )   =>    |-  ( ph  ->  Q : ( M ... N ) -1-1-onto-> ( M ... N ) )
 
21-Aug-2022iseqf1olemklt 10441 Lemma for seq3f1o 10460. (Contributed by Jim Kingdon, 21-Aug-2022.)
 |-  ( ph  ->  N  e.  ( ZZ>= `  M )
 )   &    |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  ( ph  ->  A. x  e.  ( M..^ K ) ( J `
  x )  =  x )   &    |-  ( ph  ->  K  =/=  ( `' J `  K ) )   =>    |-  ( ph  ->  K  <  ( `' J `  K ) )
 
21-Aug-2022iseqf1olemkle 10440 Lemma for seq3f1o 10460. (Contributed by Jim Kingdon, 21-Aug-2022.)
 |-  ( ph  ->  N  e.  ( ZZ>= `  M )
 )   &    |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  ( ph  ->  A. x  e.  ( M..^ K ) ( J `
  x )  =  x )   =>    |-  ( ph  ->  K  <_  ( `' J `  K ) )
 
21-Aug-2022fssdm 5362 Expressing that a class is a subclass of the domain of a function expressed in maps-to notation, semi-deduction form. (Contributed by AV, 21-Aug-2022.)
 |-  D  C_  dom  F   &    |-  ( ph  ->  F : A --> B )   =>    |-  ( ph  ->  D  C_  A )
 
21-Aug-2022fssdmd 5361 Expressing that a class is a subclass of the domain of a function expressed in maps-to notation, deduction form. (Contributed by AV, 21-Aug-2022.)
 |-  ( ph  ->  F : A --> B )   &    |-  ( ph  ->  D  C_  dom  F )   =>    |-  ( ph  ->  D  C_  A )
 
21-Aug-2022eqelssd 3166 Equality deduction from subclass relationship and membership. (Contributed by AV, 21-Aug-2022.)
 |-  ( ph  ->  A  C_  B )   &    |-  ( ( ph  /\  x  e.  B ) 
 ->  x  e.  A )   =>    |-  ( ph  ->  A  =  B )
 
21-Aug-2022reximssdv 2574 Derivation of a restricted existential quantification over a subset (the second hypothesis implies  A  C_  B), deduction form. (Contributed by AV, 21-Aug-2022.)
 |-  ( ph  ->  E. x  e.  B  ps )   &    |-  (
 ( ph  /\  ( x  e.  B  /\  ps ) )  ->  x  e.  A )   &    |-  ( ( ph  /\  ( x  e.  B  /\  ps ) )  ->  ch )   =>    |-  ( ph  ->  E. x  e.  A  ch )
 
21-Aug-2022animpimp2impd 554 Deduction deriving nested implications from conjunctions. (Contributed by AV, 21-Aug-2022.)
 |-  ( ( ps  /\  ph )  ->  ( ch  ->  ( th  ->  et )
 ) )   &    |-  ( ( ps 
 /\  ( ph  /\  th ) )  ->  ( et 
 ->  ta ) )   =>    |-  ( ph  ->  ( ( ps  ->  ch )  ->  ( ps  ->  ( th  ->  ta ) ) ) )
 
20-Aug-2022brimralrspcev 4048 Restricted existential specialization with a restricted universal quantifier over an implication with a relation in the antecedent, closed form. (Contributed by AV, 20-Aug-2022.)
 |-  ( ( B  e.  X  /\  A. y  e.  Y  ( ( ph  /\  A R B ) 
 ->  ps ) )  ->  E. x  e.  X  A. y  e.  Y  ( ( ph  /\  A R x )  ->  ps )
 )
 
20-Aug-2022brralrspcev 4047 Restricted existential specialization with a restricted universal quantifier over a relation, closed form. (Contributed by AV, 20-Aug-2022.)
 |-  ( ( B  e.  X  /\  A. y  e.  Y  A R B )  ->  E. x  e.  X  A. y  e.  Y  A R x )
 
19-Aug-2022seq3f1olemstep 10457 Lemma for seq3f1o 10460. Given a permutation which is constant up to a point, supply a new one which is constant for one more position. (Contributed by Jim Kingdon, 19-Aug-2022.)
 |-  ( ( 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  ->  F : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M ) )  ->  ( G `  x )  e.  S )   &    |-  ( ph  ->  K  e.  ( M ... N ) )   &    |-  ( ph  ->  J :
 ( M ... N )
 -1-1-onto-> ( M ... N ) )   &    |-  ( ph  ->  A. x  e.  ( M..^ K ) ( J `
  x )  =  x )   &    |-  ( ph  ->  ( 
 seq M (  .+  , 
 [_ J  /  f ]_ P ) `  N )  =  (  seq M (  .+  ,  L ) `  N ) )   &    |-  P  =  ( x  e.  ( ZZ>= `  M )  |->  if ( x  <_  N ,  ( G `  ( f `  x ) ) ,  ( G `  M ) ) )   =>    |-  ( ph  ->  E. f
 ( f : ( M ... N ) -1-1-onto-> ( M ... N ) 
 /\  A. x  e.  ( M ... K ) ( f `  x )  =  x  /\  (  seq M (  .+  ,  P ) `  N )  =  (  seq M (  .+  ,  L ) `  N ) ) )
 
18-Aug-2022seq3f1olemp 10458 Lemma for seq3f1o 10460. Existence of a constant permutation of  ( M ... N ) which leads to the same sum as the permutation  F itself. (Contributed by Jim Kingdon, 18-Aug-2022.)
 |-  ( ( 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  ->  F : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M ) )  ->  ( G `  x )  e.  S )   &    |-  L  =  ( x  e.  ( ZZ>=
 `  M )  |->  if ( x  <_  N ,  ( G `  ( F `  x ) ) ,  ( G `  M ) ) )   &    |-  P  =  ( x  e.  ( ZZ>= `  M )  |->  if ( x  <_  N ,  ( G `  ( f `  x ) ) ,  ( G `  M ) ) )   =>    |-  ( ph  ->  E. f
 ( f : ( M ... N ) -1-1-onto-> ( M ... N ) 
 /\  A. x  e.  ( M ... N ) ( f `  x )  =  x  /\  (  seq M (  .+  ,  P ) `  N )  =  (  seq M (  .+  ,  L ) `  N ) ) )
 
17-Aug-2022seq3f1oleml 10459 Lemma for seq3f1o 10460. This is more or less the result, but stated in terms of  F and  G without  H.  L and  H may differ in terms of what happens to terms after  N. The terms after  N don't matter for the value at  N but we need some definition given the way our theorems concerning  seq work. (Contributed by Jim Kingdon, 17-Aug-2022.)
 |-  ( ( 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  ->  F : ( M ... N ) -1-1-onto-> ( M ... N ) )   &    |-  ( ( ph  /\  x  e.  ( ZZ>= `  M ) )  ->  ( G `  x )  e.  S )   &    |-  L  =  ( x  e.  ( ZZ>=
 `  M )  |->  if ( x  <_  N ,  ( G `  ( F `  x ) ) ,  ( G `  M ) ) )   =>    |-  ( ph  ->  (  seq M (  .+  ,  L ) `  N )  =  (  seq M ( 
 .+  ,  G ) `  N ) )
 
17-Aug-2022imbrov2fvoveq 5878 Equality theorem for nested function and operation value in an implication for a binary relation. Technical theorem to be used to reduce the size of a significant number of proofs. (Contributed by AV, 17-Aug-2022.)
 |-  ( X  =  Y  ->  ( ph  <->  ps ) )   =>    |-  ( X  =  Y  ->  ( ( ph  ->  ( F `  (
 ( G `  X )  .x.  O ) ) R A )  <->  ( ps  ->  ( F `  ( ( G `  Y ) 
 .x.  O ) ) R A ) ) )
 
16-Aug-2022fmpttd 5651 Version of fmptd 5650 with inlined definition. Domain and codomain of the mapping operation; deduction form. (Contributed by Glauco Siliprandi, 23-Oct-2021.) (Proof shortened by BJ, 16-Aug-2022.)
 |-  ( ( ph  /\  x  e.  A )  ->  B  e.  C )   =>    |-  ( ph  ->  ( x  e.  A  |->  B ) : A --> C )
 
15-Aug-2022nnf1o 11339 Lemma for sum and product theorems. (Contributed by Jim Kingdon, 15-Aug-2022.)
 |-  ( ph  ->  ( M  e.  NN  /\  N  e.  NN ) )   &    |-  ( ph  ->  F : ( 1 ... M ) -1-1-onto-> A )   &    |-  ( ph  ->  G : ( 1 ...
 N ) -1-1-onto-> A )   =>    |-  ( ph  ->  N  =  M )
 
14-Aug-20222fveq3 5501 Equality theorem for nested function values. (Contributed by AV, 14-Aug-2022.)
 |-  ( A  =  B  ->  ( F `  ( G `  A ) )  =  ( F `  ( G `  B ) ) )
 
13-Aug-2022exmidsbth 14056 The Schroeder-Bernstein Theorem is equivalent to excluded middle. This is Metamath 100 proof #25. The forward direction (isbth 6944) is the proof of the Schroeder-Bernstein Theorem from the Metamath Proof Explorer database (in which excluded middle holds), but adapted to use EXMID as an antecedent rather than being unconditionally true, as in the non-intuitionistic proof at https://us.metamath.org/mpeuni/sbth.html 6944.

The reverse direction (exmidsbthr 14055) is the one which establishes that Schroeder-Bernstein implies excluded middle. This resolves the question of whether we will be able to prove Schroeder-Bernstein from our axioms in the negative. (Contributed by Jim Kingdon, 13-Aug-2022.)

 |-  (EXMID  <->  A. x A. y
 ( ( x  ~<_  y 
 /\  y  ~<_  x ) 
 ->  x  ~~  y ) )
 
13-Aug-2022fv0p1e1 8993 Function value at  N  +  1 with  N replaced by  0. Technical theorem to be used to reduce the size of a significant number of proofs. (Contributed by AV, 13-Aug-2022.)
 |-  ( N  =  0 
 ->  ( F `  ( N  +  1 )
 )  =  ( F `
  1 ) )
 
13-Aug-2022ovanraleqv 5877 Equality theorem for a conjunction with an operation values within a restricted universal quantification. Technical theorem to be used to reduce the size of a significant number of proofs. (Contributed by AV, 13-Aug-2022.)
 |-  ( B  =  X  ->  ( ph  <->  ps ) )   =>    |-  ( B  =  X  ->  ( A. x  e.  V  ( ph  /\  ( A  .x.  B )  =  C )  <->  A. x  e.  V  ( ps  /\  ( A 
 .x.  X )  =  C ) ) )
 
12-Aug-2022stbid 827 The equivalent of a stable proposition is stable. (Contributed by Jim Kingdon, 12-Aug-2022.)
 |-  ( ph  ->  ( ps 
 <->  ch ) )   =>    |-  ( ph  ->  (STAB  ps  <-> STAB  ch )
 )
 
11-Aug-2022exmidsbthr 14055 The Schroeder-Bernstein Theorem implies excluded middle. Theorem 1 of [PradicBrown2022], p. 1. (Contributed by Jim Kingdon, 11-Aug-2022.)
 |-  ( A. x A. y ( ( x  ~<_  y  /\  y 
 ~<_  x )  ->  x  ~~  y )  -> EXMID )
 
11-Aug-2022exmidsbthrlem 14054 Lemma for exmidsbthr 14055. (Contributed by Jim Kingdon, 11-Aug-2022.)
 |-  S  =  ( p  e. 
 |->  ( i  e.  om  |->  if ( i  =  (/) ,  1o ,  ( p `
  U. i ) ) ) )   =>    |-  ( A. x A. y ( ( x  ~<_  y  /\  y  ~<_  x )  ->  x  ~~  y )  -> EXMID )
 
10-Aug-2022nninfomni 14052 is omniscient. Corollary 3.7 of [PradicBrown2022], p. 5. (Contributed by Jim Kingdon, 10-Aug-2022.)
 |-  e. Omni
 
10-Aug-2022nninfomnilem 14051 Lemma for nninfomni 14052. (Contributed by Jim Kingdon, 10-Aug-2022.)
 |-  E  =  ( q  e.  ( 2o  ^m )  |->  ( n  e. 
 om  |->  if ( A. k  e.  suc  n ( q `
  ( i  e. 
 om  |->  if ( i  e.  k ,  1o ,  (/) ) ) )  =  1o ,  1o ,  (/) ) ) )   =>    |-  e. Omni
 
10-Aug-2022nninfex 7098 is a set. (Contributed by Jim Kingdon, 10-Aug-2022.)
 |-  e.  _V
 
10-Aug-2022vpwex 4165 Power set axiom: the powerclass of a set is a set. Axiom 4 of [TakeutiZaring] p. 17. (Contributed by NM, 30-Oct-2003.) (Proof shortened by Andrew Salmon, 25-Jul-2011.) Revised to prove pwexg 4166 from vpwex 4165. (Revised by BJ, 10-Aug-2022.)
 |- 
 ~P x  e.  _V
 
9-Aug-2022nninfsel 14050  E is a selection function for ℕ. Theorem 3.6 of [PradicBrown2022], p. 5. (Contributed by Jim Kingdon, 9-Aug-2022.)
 |-  E  =  ( q  e.  ( 2o  ^m )  |->  ( n  e. 
 om  |->  if ( A. k  e.  suc  n ( q `
  ( i  e. 
 om  |->  if ( i  e.  k ,  1o ,  (/) ) ) )  =  1o ,  1o ,  (/) ) ) )   &    |-  ( ph  ->  Q  e.  ( 2o  ^m ) )   &    |-  ( ph  ->  ( Q `  ( E `
  Q ) )  =  1o )   =>    |-  ( ph  ->  A. p  e.  ( Q `  p )  =  1o )
 
9-Aug-2022nninfsellemeqinf 14049 Lemma for nninfsel 14050. (Contributed by Jim Kingdon, 9-Aug-2022.)
 |-  E  =  ( q  e.  ( 2o  ^m )  |->  ( n  e. 
 om  |->  if ( A. k  e.  suc  n ( q `
  ( i  e. 
 om  |->  if ( i  e.  k ,  1o ,  (/) ) ) )  =  1o ,  1o ,  (/) ) ) )   &    |-  ( ph  ->  Q  e.  ( 2o  ^m ) )   &    |-  ( ph  ->  ( Q `  ( E `
  Q ) )  =  1o )   =>    |-  ( ph  ->  ( E `  Q )  =  ( i  e. 
 om  |->  1o ) )
 
9-Aug-2022nninfsellemqall 14048 Lemma for nninfsel 14050. (Contributed by Jim Kingdon, 9-Aug-2022.)
 |-  E  =  ( q  e.  ( 2o  ^m )  |->  ( n  e. 
 om  |->  if ( A. k  e.  suc  n ( q `
  ( i  e. 
 om  |->  if ( i  e.  k ,  1o ,  (/) ) ) )  =  1o ,  1o ,  (/) ) ) )   &    |-  ( ph  ->  Q  e.  ( 2o  ^m ) )   &    |-  ( ph  ->  ( Q `  ( E `
  Q ) )  =  1o )   &    |-  ( ph  ->  N  e.  om )   =>    |-  ( ph  ->  ( Q `  ( i  e. 
 om  |->  if ( i  e.  N ,  1o ,  (/) ) ) )  =  1o )
 
9-Aug-2022nninfsellemeq 14047 Lemma for nninfsel 14050. (Contributed by Jim Kingdon, 9-Aug-2022.)
 |-  E  =  ( q  e.  ( 2o  ^m )  |->  ( n  e. 
 om  |->  if ( A. k  e.  suc  n ( q `
  ( i  e. 
 om  |->  if ( i  e.  k ,  1o ,  (/) ) ) )  =  1o ,  1o ,  (/) ) ) )   &    |-  ( ph  ->  Q  e.  ( 2o  ^m ) )   &    |-  ( ph  ->  ( Q `  ( E `
  Q ) )  =  1o )   &    |-  ( ph  ->  N  e.  om )   &    |-  ( ph  ->  A. k  e.  N  ( Q `  ( i  e.  om  |->  if ( i  e.  k ,  1o ,  (/) ) ) )  =  1o )   &    |-  ( ph  ->  ( Q `  ( i  e.  om  |->  if ( i  e.  N ,  1o ,  (/) ) ) )  =  (/) )   =>    |-  ( ph  ->  ( E `  Q )  =  ( i  e. 
 om  |->  if ( i  e.  N ,  1o ,  (/) ) ) )
 
8-Aug-2022nninfsellemcl 14044 Lemma for nninfself 14046. (Contributed by Jim Kingdon, 8-Aug-2022.)
 |-  (
 ( Q  e.  ( 2o  ^m )  /\  N  e.  om )  ->  if ( A. k  e.  suc  N ( Q `  ( i  e.  om  |->  if (
 i  e.  k ,  1o ,  (/) ) ) )  =  1o ,  1o ,  (/) )  e.  2o )
 
8-Aug-2022nninfsellemdc 14043 Lemma for nninfself 14046. Showing that the selection function is well defined. (Contributed by Jim Kingdon, 8-Aug-2022.)
 |-  (
 ( Q  e.  ( 2o  ^m )  /\  N  e.  om )  -> DECID  A. k  e.  suc  N ( Q `  (
 i  e.  om  |->  if ( i  e.  k ,  1o ,  (/) ) ) )  =  1o )
 
8-Aug-2022ss1oel2o 14026 Any subset of ordinal one being an element of ordinal two is equivalent to excluded middle. A variation of exmid01 4184 which more directly illustrates the contrast with el2oss1o 6422. (Contributed by Jim Kingdon, 8-Aug-2022.)
 |-  (EXMID  <->  A. x ( x 
 C_  1o  ->  x  e. 
 2o ) )
 
8-Aug-2022el2oss1o 6422 Being an element of ordinal two implies being a subset of ordinal one. The converse is equivalent to excluded middle by ss1oel2o 14026. (Contributed by Jim Kingdon, 8-Aug-2022.)
 |-  ( A  e.  2o  ->  A  C_  1o )
 
7-Aug-2022nnti 14027 Ordering on a natural number generates a tight apartness. (Contributed by Jim Kingdon, 7-Aug-2022.)
 |-  ( ph  ->  A  e.  om )   =>    |-  ( ( ph  /\  ( u  e.  A  /\  v  e.  A )
 )  ->  ( u  =  v  <->  ( -.  u  _E  v  /\  -.  v  _E  u ) ) )
 
6-Aug-2022nninfself 14046 Domain and range of the selection function for ℕ. (Contributed by Jim Kingdon, 6-Aug-2022.)
 |-  E  =  ( q  e.  ( 2o  ^m )  |->  ( n  e. 
 om  |->  if ( A. k  e.  suc  n ( q `
  ( i  e. 
 om  |->  if ( i  e.  k ,  1o ,  (/) ) ) )  =  1o ,  1o ,  (/) ) ) )   =>    |-  E : ( 2o  ^m ) -->
 
6-Aug-2022nninfsellemsuc 14045 Lemma for nninfself 14046. (Contributed by Jim Kingdon, 6-Aug-2022.)
 |-  (
 ( Q  e.  ( 2o  ^m )  /\  J  e.  om )  ->  if ( A. k  e.  suc  suc  J ( Q `  ( i  e.  om  |->  if (
 i  e.  k ,  1o ,  (/) ) ) )  =  1o ,  1o ,  (/) )  C_  if ( A. k  e.  suc  J ( Q `  (
 i  e.  om  |->  if ( i  e.  k ,  1o ,  (/) ) ) )  =  1o ,  1o ,  (/) ) )
 
4-Aug-2022nnnninfeq2 7105 Mapping of a natural number to an element of ℕ. Similar to nnnninfeq 7104 but if we have information about a single  1o digit, that gives information about all previous digits. (Contributed by Jim Kingdon, 4-Aug-2022.)
 |-  ( ph  ->  P  e. )   &    |-  ( ph  ->  N  e.  om )   &    |-  ( ph  ->  ( P `  U. N )  =  1o )   &    |-  ( ph  ->  ( P `  N )  =  (/) )   =>    |-  ( ph  ->  P  =  ( i  e. 
 om  |->  if ( i  e.  N ,  1o ,  (/) ) ) )
 
4-Aug-2022nnnninfeq 7104 Mapping of a natural number to an element of ℕ. (Contributed by Jim Kingdon, 4-Aug-2022.)
 |-  ( ph  ->  P  e. )   &    |-  ( ph  ->  N  e.  om )   &    |-  ( ph  ->  A. x  e.  N  ( P `  x )  =  1o )   &    |-  ( ph  ->  ( P `  N )  =  (/) )   =>    |-  ( ph  ->  P  =  ( i  e. 
 om  |->  if ( i  e.  N ,  1o ,  (/) ) ) )
 
4-Aug-2022nninff 7099 An element of ℕ is a sequence of zeroes and ones. (Contributed by Jim Kingdon, 4-Aug-2022.)
 |-  ( A  e.  ->  A : om --> 2o )
 
1-Aug-2022nninfall 14042 Given a decidable predicate on ℕ, showing it holds for natural numbers and the point at infinity suffices to show it holds everywhere. The sense in which  Q is a decidable predicate is that it assigns a value of either  (/) or  1o (which can be thought of as false and true) to every element of ℕ. Lemma 3.5 of [PradicBrown2022], p. 5. (Contributed by Jim Kingdon, 1-Aug-2022.)
 |-  ( ph  ->  Q  e.  ( 2o  ^m ) )   &    |-  ( ph  ->  ( Q `  ( x  e.  om  |->  1o )
 )  =  1o )   &    |-  ( ph  ->  A. n  e.  om  ( Q `  ( i  e.  om  |->  if (
 i  e.  n ,  1o ,  (/) ) ) )  =  1o )   =>    |-  ( ph  ->  A. p  e.  ( Q `  p )  =  1o )
 
1-Aug-2022nninfalllem1 14041 Lemma for nninfall 14042. (Contributed by Jim Kingdon, 1-Aug-2022.)
 |-  ( ph  ->  Q  e.  ( 2o  ^m ) )   &    |-  ( ph  ->  ( Q `  ( x  e.  om  |->  1o )
 )  =  1o )   &    |-  ( ph  ->  A. n  e.  om  ( Q `  ( i  e.  om  |->  if (
 i  e.  n ,  1o ,  (/) ) ) )  =  1o )   &    |-  ( ph  ->  P  e. )   &    |-  ( ph  ->  ( Q `  P )  =  (/) )   =>    |-  ( ph  ->  A. n  e.  om  ( P `  n )  =  1o )
 
1-Aug-2022peano3nninf 14040 The successor function on ℕ is never zero. Half of Lemma 3.4 of [PradicBrown2022], p. 5. (Contributed by Jim Kingdon, 1-Aug-2022.)
 |-  S  =  ( p  e. 
 |->  ( i  e.  om  |->  if ( i  =  (/) ,  1o ,  ( p `
  U. i ) ) ) )   =>    |-  ( A  e.  ->  ( S `  A )  =/=  ( x  e.  om  |->  (/) ) )
 
31-Jul-2022peano4nninf 14039 The successor function on ℕ is one to one. Half of Lemma 3.4 of [PradicBrown2022], p. 5. (Contributed by Jim Kingdon, 31-Jul-2022.)
 |-  S  =  ( p  e. 
 |->  ( i  e.  om  |->  if ( i  =  (/) ,  1o ,  ( p `
  U. i ) ) ) )   =>    |-  S : -1-1->
 
31-Jul-20221lt2o 6421 Ordinal one is less than ordinal two. (Contributed by Jim Kingdon, 31-Jul-2022.)
 |- 
 1o  e.  2o
 
31-Jul-20220lt2o 6420 Ordinal zero is less than ordinal two. (Contributed by Jim Kingdon, 31-Jul-2022.)
 |-  (/)  e.  2o
 
31-Jul-2022nnpredcl 4607 The predecessor of a natural number is a natural number. This theorem is most interesting when the natural number is a successor (as seen in theorems like onsucuni2 4548) but also holds when it is  (/) by uni0 3823. (Contributed by Jim Kingdon, 31-Jul-2022.)
 |-  ( A  e.  om  ->  U. A  e.  om )
 
31-Jul-2022nnsucpred 4601 The successor of the precedessor of a nonzero natural number. (Contributed by Jim Kingdon, 31-Jul-2022.)
 |-  ( ( A  e.  om 
 /\  A  =/=  (/) )  ->  suc  U. A  =  A )
 
30-Jul-2022nnsf 14038 Domain and range of  S. Part of Definition 3.3 of [PradicBrown2022], p. 5. (Contributed by Jim Kingdon, 30-Jul-2022.)
 |-  S  =  ( p  e. 
 |->  ( i  e.  om  |->  if ( i  =  (/) ,  1o ,  ( p `
  U. i ) ) ) )   =>    |-  S : -->
 
29-Jul-2022fodjuomnilemres 7124 Lemma for fodjuomni 7125. The final result with  P expressed as a local definition. (Contributed by Jim Kingdon, 29-Jul-2022.)
 |-  ( ph  ->  O  e. Omni )   &    |-  ( ph  ->  F : O -onto-> ( A B ) )   &    |-  P  =  ( y  e.  O  |->  if ( E. z  e.  A  ( F `  y )  =  (inl `  z ) ,  (/) ,  1o ) )   =>    |-  ( ph  ->  ( E. x  x  e.  A  \/  A  =  (/) ) )
 
28-Jul-2022eqifdc 3560 Expansion of an equality with a conditional operator. (Contributed by Jim Kingdon, 28-Jul-2022.)
 |-  (DECID 
 ph  ->  ( A  =  if ( ph ,  B ,  C )  <->  ( ( ph  /\  A  =  B )  \/  ( -.  ph  /\  A  =  C ) ) ) )
 
27-Jul-2022fodjuomni 7125 A condition which ensures  A is either inhabited or empty. Lemma 3.2 of [PradicBrown2022], p. 4. (Contributed by Jim Kingdon, 27-Jul-2022.)
 |-  ( ph  ->  O  e. Omni )   &    |-  ( ph  ->  F : O -onto-> ( A B ) )   =>    |-  ( ph  ->  ( E. x  x  e.  A  \/  A  =  (/) ) )
 
27-Jul-2022fodjuomnilemdc 7120 Lemma for fodjuomni 7125. Decidability of a condition we use in various lemmas. (Contributed by Jim Kingdon, 27-Jul-2022.)
 |-  ( ph  ->  F : O -onto-> ( A B ) )   =>    |-  ( ( ph  /\  X  e.  O )  -> DECID  E. z  e.  A  ( F `  X )  =  (inl `  z
 ) )
 
25-Jul-2022djudom 7070 Dominance law for disjoint union. (Contributed by Jim Kingdon, 25-Jul-2022.)
 |-  ( ( A  ~<_  B  /\  C 
 ~<_  D )  ->  ( A C )  ~<_  ( B D ) )
 
23-Jul-2022fvoveq1 5876 Equality theorem for nested function and operation value. Closed form of fvoveq1d 5875. (Contributed by AV, 23-Jul-2022.)
 |-  ( A  =  B  ->  ( F `  ( A O C ) )  =  ( F `  ( B O C ) ) )
 
23-Jul-2022fvoveq1d 5875 Equality deduction for nested function and operation value. (Contributed by AV, 23-Jul-2022.)
 |-  ( ph  ->  A  =  B )   =>    |-  ( ph  ->  ( F `  ( A O C ) )  =  ( F `  ( B O C ) ) )
 
17-Jul-2022inftonninf 10397 The mapping of +oo into ℕ is the sequence of all ones. (Contributed by Jim Kingdon, 17-Jul-2022.)
 |-  G  = frec ( ( x  e.  ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  F  =  ( n  e.  om  |->  ( i  e. 
 om  |->  if ( i  e.  n ,  1o ,  (/) ) ) )   &    |-  I  =  ( ( F  o.  `' G )  u.  { <. +oo ,  ( om  X. 
 { 1o } ) >. } )   =>    |-  ( I ` +oo )  =  ( x  e.  om  |->  1o )
 
17-Jul-20221tonninf 10396 The mapping of one into ℕ is a sequence which is a one followed by zeroes. (Contributed by Jim Kingdon, 17-Jul-2022.)
 |-  G  = frec ( ( x  e.  ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  F  =  ( n  e.  om  |->  ( i  e. 
 om  |->  if ( i  e.  n ,  1o ,  (/) ) ) )   &    |-  I  =  ( ( F  o.  `' G )  u.  { <. +oo ,  ( om  X. 
 { 1o } ) >. } )   =>    |-  ( I `  1
 )  =  ( x  e.  om  |->  if ( x  =  (/) ,  1o ,  (/) ) )
 
17-Jul-20220tonninf 10395 The mapping of zero into ℕ is the sequence of all zeroes. (Contributed by Jim Kingdon, 17-Jul-2022.)
 |-  G  = frec ( ( x  e.  ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  F  =  ( n  e.  om  |->  ( i  e. 
 om  |->  if ( i  e.  n ,  1o ,  (/) ) ) )   &    |-  I  =  ( ( F  o.  `' G )  u.  { <. +oo ,  ( om  X. 
 { 1o } ) >. } )   =>    |-  ( I `  0
 )  =  ( x  e.  om  |->  (/) )
 
16-Jul-2022fxnn0nninf 10394 A function from NN0* into ℕ. (Contributed by Jim Kingdon, 16-Jul-2022.) TODO: use infnninf 7100 instead of infnninfOLD 7101. More generally, this theorem and most theorems in this section could use an extended  G defined by  G  =  (frec ( ( x  e.  ZZ  |->  ( x  + 
1 ) ) ,  0 )  u.  <. om , +oo >. ) and  F  =  ( n  e.  suc  om  |->  ( i  e.  om  |->  if ( i  e.  n ,  1o ,  (/) ) ) ) as in nnnninf2 7103.
 |-  G  = frec ( ( x  e.  ZZ  |->  ( x  +  1 ) ) ,  0 )   &    |-  F  =  ( n  e.  om  |->  ( i  e. 
 om  |->  if ( i  e.  n ,  1o ,  (/) ) ) )   &    |-  I  =  ( ( F  o.  `' G )  u.  { <. +oo ,  ( om  X. 
 { 1o } ) >. } )   =>    |-  I :NN0* -->

  Copyright terms: Public domain W3C HTML validation [external]