Origin Definitions Sections HOLlib Doc
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
hol_arithmetic_4
Nuprl Section: hol_arithmetic_4

Selected Objects
THMsub_0 m:. nnsub(0;m) = 0 & nnsub(m;0) = m
THMless_trans m,n,x:m<n & n<x  m<x
THMadd1 m:m+1 = m+1  
THMless_antisym m,n:(m<n & n<m)
THMless_less_suc m,n:(m<n & n<m+1)
THMfun_eq_lemma 'a:S, f:('a), x1,x2:'af(x1) & f(x2 x1 = x2
THMless_or m,n:m<n  m+1n
THMor_less m,n:m+1n  m<n
THMless_eq m,n:m<n  m+1n
THMless_suc_eq_cor m,n:m<n & m+1 = n    m+1<n
THMless_not_suc m,n:m<n & n = m+1    m+1<n
THMless_0_cases m:. 0 = m    0<m
THMless_cases_imp m,n:m<n & m = n  n<m
THMless_cases m,n:m<n  nm
THMadd_inv_0 m,n:m+n = m    n = 0  
THMless_eq_add m,n:mm+n
THMless_eq_suc_refl m:mm+1
THMless_add_nonzero m,n:n = 0    m<m+n
THMless_eq_antisym m,n:(m<n & nm)
THMnot_less m,n:m<n  nm
THMsub_eq_0 m,n:. nnsub(m;n) = 0  mn
THMadd_assoc m,n,x:m+(n+x) = (m+n)+x  
THMmult_0 m:m0 = 0  
THMmult_suc m,n:m(n+1) = m+mn  
THMmult_right_1 m:m1 = m  
THMmult_clauses m,n:.
0m = 0  
m0 = 0  
& 1m = m  
m1 = m  
& (m+1)n = mn+n  
m(n+1) = m+mn  
THMmult_sym m,n:mn = nm  
THMright_add_distrib m,n,x:. (m+n)x = mx+nx  
THMleft_add_distrib m,n,x:x(m+n) = xm+xn  
THMmult_assoc m,n,x:m(nx) = (mn)x  
THMsub_add m,n:nm  nnsub(m;n)+n = m  
THMpre_sub m,n:. pre(nnsub(m;n)) = nnsub(pre(m);n)
THMadd_eq_0 m,n:m+n = 0    m = 0   & n = 0  
THMadd_inv_0_eq m,n:m+n = m    n = 0  
THMpre_suc_eq m,n:. 0<n  (m = pre(n m+1 = n  )
THMinv_pre_eq m,n:. 0<m & 0<n  (pre(m) = pre(n m = n)
THMless_suc_not m,n:m<n  n<m+1
THMadd_eq_sub m,n,x:nx  (m+n = x    m = nnsub(x;n))
THMless_mono_add m,n,x:m<n  m+x<n+x
THMless_mono_add_inv m,n,x:m+x<n+x  m<n
THMless_mono_add_eq m,n,x:m+x<n+x  m<n
THMeq_mono_add_eq m,n,x:m+x = n+x    m = n
THMless_eq_mono_add_eq m,n,x:m+xn+x  mn
THMless_eq_trans m,n,x:mn & nx  mx
THMless_eq_less_eq_mono m,n,x,q:mx & nq  m+nx+q
THMless_eq_refl m:mm
THMless_imp_less_or_eq m,n:m<n  mn
THMless_mono_mult m,n,x:mn  mxnx
THMright_sub_distrib m,n,x:. nnsub(m;n)x = nnsub(mx;nx)
THMleft_sub_distrib m,n,x:xnnsub(m;n) = nnsub(xm;xn)
THMless_add_1 m,n:n<m  (x:m = n+x+1  )
THMexp_add x,q,n:. exp(n;x+q) = exp(n;x)exp(n;q)
THMnot_odd_eq_even n,m:n+n+1 = m+m  
THMmult_suc_eq x,m,n:n(x+1) = m(x+1)    n = m
THMmult_exp_mono x,q,n,m:nexp(q+1;x) = mexp(q+1;x   n = m
THMless_equal_antisym n,m:nm & mn  n = m
THMless_add_suc m,n:m<m+n+1
THMzero_less_eq n:. 0n
THMless_eq_mono n,m:n+1m+1  nm
THMless_or_eq_add n,m:n<m  (x:n = x+m  )
THMwop P:(). (n:P(n))  (n:P(n) & (m:m<n  P(m)))
THMgen_induction P:(). P(0) & (n:. (m:m<n  P(m))  P(n))  (n:P(n))
THMda k,n:. 0<n  (r,q:k = qn+r   & r<n)
THMmod_one k:. nmod(k;0+1) = 0
THMdiv_less_eq n:. 0<n  (k:. ndiv(k;n)k)
THMndiv_unique n,k,q:. (r:k = qn+r   & r<n ndiv(k;n) = q
THMmod_unique n,k,r:. (q:k = qn+r   & r<n nmod(k;n) = r
THMdiv_mult n,r:r<n  (q:. ndiv(qn+r;n) = q)
THMless_mod n,k:k<n  nmod(k;n) = k
THMmod_eq_0 n:. 0<n  (k:. nmod(kn;n) = 0)
THMzero_mod n:. 0<n  nmod(0;n) = 0
THMzero_div n:. 0<n  ndiv(0;n) = 0
THMmod_mult n,r:r<n  (q:. nmod(qn+r;n) = r)
THMmod_times n:. 0<n  (q,r:. nmod(qn+r;n) = nmod(r;n))
THMmod_plus n:. 0<n  (j,k:. nmod(nmod(j;n)+nmod(k;n);n) = nmod(j+k;n))
THMmod_mod n:. 0<n  (k:. nmod(nmod(k;n);n) = nmod(k;n))
THMsub_mono_eq n,m:. nnsub(n+1;m+1) = nnsub(n;m)
THMsub_plus a,b,c:. nnsub(a;b+c) = nnsub(nnsub(a;b);c)
THMinv_pre_less m:. 0<m  (n:. pre(m)<pre(n m<n)
THMinv_pre_less_eq n:. 0<n  (m:. pre(m)pre(n mn)
THMsub_less_eq n,m:. nnsub(n;m)n
THMsub_eq_eq_0 m,n:. nnsub(m;n) = m  m = 0    n = 0  
THMsub_less_0 n,m:m<n  0<nnsub(n;m)
THMsub_less_or m,n:n<m  nnnsub(m;1)
THMless_sub_add_less n,m,i:i<nnsub(n;m i+m<n
THMtimes2 n:. 2n = n+n  
THMless_mult_mono m,i,n:. (n+1)m<(n+1)i  m<i
THMmult_mono_eq m,i,n:. (n+1)m = (n+1)i    m = i
THMadd_sub a,c:. nnsub(a+c;c) = a
THMless_eq_add_sub c,b:cb  (a:. nnsub(a+b;c) = a+nnsub(b;c))
THMsub_equal_0 c:. nnsub(c;c) = 0
THMless_eq_sub_less a,b:ba  (c:. nnsub(a;b)<c  a<b+c)
THMnot_suc_less_eq n,m:n+1m  mn
THMsub_sub b,c:cb  (a:. nnsub(a;nnsub(b;c)) = nnsub(a+c;b))
THMless_imp_less_add n,m:n<m  (x:n<m+x)
THMless_eq_imp_less_suc n,m:nm  n<m+1
THMsub_less_eq_add m,x:mx  (n:. nnsub(x;m)n  xm+n)
THMsub_cancel x,n,m:nx & mx  (nnsub(x;n) = nnsub(x;m n = m)
THMcancel_sub x,n,m:xn & xm  (nnsub(n;x) = nnsub(m;x n = m)
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html

Origin Definitions Sections HOLlib Doc