Origin Definitions Sections MarkB generic Doc
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
mb_nat
Nuprl Section: mb_nat - Material pertaining to natural numbers as opposed to integers generally.

Selected Objects
THMid_increasing k:. increasing(i.i;k)
THMincreasing_implies k:f:(k). increasing(f;k (x,y:kx<y  f(x)<f(y))
THMcompose_increasing k,m:f:(km), g:(m).
increasing(f;k increasing(g;m increasing(g o f;k)
THMincreasing_inj k,m:f:(km). increasing(f;k Inj(kmf)
THMincreasing_le k,m:. (f:(km). increasing(f;k))  km
THMincreasing_is_id k:f:(kk). increasing(f;k (i:kf(i) = i)
THMincreasing_lower_bound k:f:(k), x:k. increasing(f;k f(0)+xf(x)
THMinjection_le k,m:. (f:(km). Inj(kmf))  km
THMdisjoint_increasing_onto m,n,k:f:(nm), g:(km).
increasing(f;n)

increasing(g;k)

(i:m. (j:ni = f(j))  (j:ki = g(j)))

(j1:nj2:kf(j1) = g(j2))  m = n+k  
THMbijection_restriction k:f:(kk).
0<k

Bij(kkf f(k-1) = k-1  f  (k-1)(k-1) & Bij((k-1); (k-1); f)
defprimrec primrec(n;b;c) == if n=0 b else c(n-1,primrec(n-1;b;c)) fi  (recursive)
THMprimrec_add n,m:b:Tc:((n+m)TT).
primrec(n+m;b;c) = primrec(n;primrec(m;b;c);i,tc(i+m,t))
defnondecreasing nondecreasing(f;k) == i:(k-1). f(i)f(i+1)
THMconst_nondecreasing k:x:. nondecreasing(i.x;k)
deffadd fadd(f;g)(i) == f(i)+g(i)
THMfadd_increasing n:f,g:(n).
increasing(f;n nondecreasing(g;n increasing(fadd(f;g);n)
deffappend f[n:=x](i) == if i=n x else f(i) fi
THMincreasing_split m:P:(mProp).
(i:m. Dec(P(i)))

(n,k:f:(nm), g:(km).
(increasing(f;n)
(& increasing(g;k)
(& (i:nP(f(i)))
(& (j:kP(g(j)))
(& (i:m. (j:ni = f(j))  (j:ki = g(j))))
defsum sum(f(x) | x < k) == primrec(k;0;x,nn+f(x))
THMnon_neg_sum n:f:(n). (x:n. 0f(x))  0sum(f(x) | x < n)
THMsum_linear n:f,g:(n). sum(f(x) | x < n)+sum(g(x) | x < n) = sum(f(x)+g(x) | x < n)
THMsum_constant n:a:. sum(a | x < n) = an
THMsum_functionality n:f,g:(n). (i:nf(i) = g(i))  sum(f(x) | x < n) = sum(g(x) | x < n)
THMsum_difference n:f,g:(n), d:.
sum(f(x)-g(x) | x < n) = d  sum(f(x) | x < n) = sum(g(x) | x < n)+d
THMsum_le k:f,g:(k). (x:kf(x)g(x))  sum(f(x) | x < k)sum(g(x) | x < k)
THMsum_bound k,b:f:(k). (x:kf(x)b sum(f(x) | x < k)bk
THMsum_lower_bound k,b:f:(k). (x:kbf(x))  bksum(f(x) | x < k)
THMsum-ite k:f,g:(k), p:(k).
sum(if p(i) f(i)+g(i) else f(i) fi | i < k)
=
sum(f(i) | i < k)+sum(if p(i) g(i) else 0 fi | i < k)
THMisolate_summand n:f:(n), m:n.
sum(f(x) | x < n) = f(m)+sum(if x=m 0 else f(x) fi | x < n)
THMempty_support n:f:(n). (x:nf(x) = 0)  sum(f(x) | x < n) = 0
THMsingleton_support_sum n:f:(n), m:n. (x:nx = m  f(x) = 0)  sum(f(x) | x < n) = f(m)
THMfinite-partition n,k:c:(nk).
p:(k( List)). 
sum(||p(j)|| | j < k) = n
& (j:kx,y:||p(j)||. x<y  (p(j))[x]>(p(j))[y])
& (j:kx:||p(j)||. (p(j))[x]<n & c((p(j))[x]) = j)
THMpigeon-hole n,m:f:(nm). Inj(nmf nm
THMpair_support n:f:(n), m,k:n.
m = k  (x:nx = m  x = k  f(x) = 0)  sum(f(x) | x < n) = f(m)+f(k)
THMsum_split n:f:(n), m:(n+1).
sum(f(x) | x < n) = sum(f(x) | x < m)+sum(f(x+m) | x < n-m)
defdouble_sum sum(f(x;y) | x < ny < m) == sum(sum(f(x;y) | y < m) | x < n)
THMpair_support_double_sum n,m:f:(nm), x1,x2:ny1,y2:m.
x1 = x2  y1 = y2

(x:ny:m(x = x1 & y = y1 (x = x2 & y = y2 f(x,y) = 0)

sum(f(x,y) | x < ny < m) = f(x1,y1)+f(x2,y2)
THMdouble_sum_difference n,m:f,g:(nm), d:.
sum(f(x,y)-g(x,y) | x < ny < m) = d

sum(f(x,y) | x < ny < m) = sum(g(x,y) | x < ny < m)+d
THMdouble_sum_functionality n,m:f,g:(nm).
(x:ny:mf(x,y) = g(x,y))

sum(f(x,y) | x < ny < m) = sum(g(x,y) | x < ny < m)
defrel_exp R^n == if n=0 x,yx = y  T else x,yz:T. (x R z) & (z R^n-1 y) fi
(recursive)
THMdecidable__rel_exp k,n:R:(nnProp). (i,j:n. Dec(i R j))  (i,j:n. Dec(i R^k j))
THMrel_exp_add R:(TTProp), m,n:x,y,z:T. (x R^m y (y R^n z (x R^m+n z)
defrel_implies R1 => R2 == x,y:T. (x R1 y (x R2 y)
THMrel_exp_monotone n:T:Type, R1,R2:(TTProp). R1 => R2  R1^n => R2^n
defpreserved_by R preserves P == x,y:TP(x (x R y P(y)
THMpreserved_by_monotone P:(TProp), R1,R2:(TTProp).
(x,y:T. (x R1 y (x R2 y))  R2 preserves P  R1 preserves P
defrel_star (R^*)(x,y) == n:x R^n y
THMrel_star_monotone R1,R2:(TTProp). R1 => R2  R1^* => R2^*
THMrel_star_transitivity R:(TTProp), x,y,z:T. (x (R^*) y (y (R^*) z (x (R^*) z)
THMrel_star_monotonic R1,R2:(TTProp), x,y:TR1 => R2  (x (R1^*) y (x (R2^*) y)
THMpreserved_by_star P:(TProp), R:(TTProp). R preserves P  R^* preserves P
THMrel_star_closure R,R2:(TTProp).
Trans(T)(R2(_1,_2))

(x,y:T. (x R y (x R2 y))  (x,y:T. (x (R^*) y (x R2 y x = y)
THMrel_star_of_equiv E:(TTProp), x,y:T. EquivRel(T)(_1 E _2)  (x (E^*) y (x E y)
THMrel_rel_star R:(TTProp), x,y:T. (x R y (x (R^*) y)
THMrel_star_trans R:(TTProp), x,y,z:T. (x R y (y (R^*) z (x (R^*) z)
THMrel_star_weakening x,y:TR:(TTProp). x = y  (x (R^*) y)
defrel_inverse R^-1(x,y) == y R x
THMrel_inverse_exp R:(TTProp), n:x,y:T. (x R^n^-1 y (x R^-1^n y)
THMrel_inverse_star R:(TTProp), x,y:T. (x R^*^-1 y (x (R^-1^*) y)
THMrel_star_symmetric R:(TTProp). (Sym x,y:Tx R y (Sym x,y:Tx (R^*) y)
defrel_or (R1  R2)(x,y) == (x R1 y (x R2 y)
THMsymmetric_rel_or R1,R2:(TTProp).
(Sym x,y:Tx R1 y (Sym x,y:Tx R2 y (Sym x,y:Tx (R1  R2y)
THMpreserved_by_or P:(TProp), R1,R2:(TTProp).
R1 preserves P  R2 preserves P  R1  R2 preserves P
deffun_exp f^n == primrec(n;x.x;i,gf o g)
THMfun_exp_compose n:h,f:(TT). f^n o h = primrec(n;h;i,gf o g)
THMfun_exp_add n,m:f:(TT). f^n+m = f^n o f^m
THMfun_exp_add1 f:(TT), n:x:Tf(f^n(x)) = f^n+1(x)
THMfun_exp_add1_sub f:(TT), n:x:Tf(f^n-1(x)) = f^n(x)
THMiteration_terminates f:(TT), m:(T).
(x:Tm(f(x))m(x) & (m(f(x)) = m(x f(x) = x))

(x:Tn:f(f^n(x)) = f^n(x))
defflip (ij)(x) == if x=i j ; x=j i else x fi
THMsum_switch n:f:(n), i:(n-1). sum(f((ii+1)(x)) | x < n) = sum(f(x) | x < n)
THMflip_symmetry k:i,j:k. (ij) = (ji)
THMflip_bijection k:i,j:k. Bij(kk; (ij))
THMflip_inverse k:x,y:k. (yx) o (yx) = (x.x)
THMflip_twice k:x,y,i:k. (yx)((yx)(i)) = i
defsearch search(k;P) == primrec(k;0;i,j. if 0<j j ; P(i) i+1 else 0 fi)
THMsearch_property k:P:(k).
((i:kP(i))  0<search(k;P))
& (0<search(k;P P(search(k;P)-1) & (j:kj<search(k;P)-1  P(j)))
defprop_and (P  Q)(L) == P(L) & Q(L)
THMand_preserved_by P,Q:(TProp), R:(TTProp).
R preserves P  R preserves Q  R preserves P  Q
defpreserved_by2 (ternary) R preserves P  == x,y,z:TP(x P(y R(x,y,z P(z)
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html

Origin Definitions Sections MarkB generic Doc