Nuprl Theory exponent

(only non hidden objects are presented)

THMnat_addn,m:. n + m
THMnat_muln,m:. n * m
THMzero_length_imp_nilT:. l:T List. ||l|| = 0 l = []
THMrem_quo_uniquen:. r1,r2:n. q1,q2:. r1 + q1 * n = r2 + q2 * n r1 = r2 q1 = q2
THMdiv_lt_lbounda:. n:. k:. a < n * k a n < k
DISPen_dfen(<l:l:*>;<n:n:*>)== en(<l>) en(<l:l:*>)== en(<l>)
MLen_mlen(l)==r if null(l) then 0 else hd(l) + en(tl(l)) * n fi
THMen_wfn:. l:n List. en(l)
THMen_injn:. m:. l1,l2:n List. ||l1|| = m ||l2|| = m en(l1) = en(l2) l1 = l2
DISPexp_df(<base:base:*><power:power:*>)== (<base><power>)
MLexp_ml(basepower) ==r if (power = 0) then 1 else base * (basepower - 1) fi
THMexp_wfn,k:. (nk)
THMexp_functionalityn1,n2,k1,k2:. n1 = n2 k1 = k2 (n1k1) = (n2k2)
THMcomb_for_exp_wf(n,k,z.(nk)) n: k: True
THMexp_wf2n,k:. (nk)
THMcomb_for_exp_wf2(n,k,z.(nk)) n: k: True
THMexp_zerom:. (0m) = 0
THMexp_non_zerom:. n:. 0 < (mn)
THMexp_basen:. (n0) = 1
THMexp_stepn,k:. 0 < k (nk) = n * (nk - 1)
THMfun_enumern,m:. f:(m n) (nm). Bij(m n;(nm);f)
THMfun_preserves_finS,T:. Fin(S) Fin(T) Fin(S T)
THMen_uboundn:. l:n List. en(l) < (n||l||)
THMen_boundn:. l:n List. en(l) (n||l||)
THMen_surjn:. m:. k:(nm). l:n List. ||l|| = m en(l) = k
DISPgeom_series_df(<q:q:*><n:n:*>)== (<q><n>)
MLgeom_series_ml(qn)==r if (n = 0) then 0 else (qn - 1) + (qn - 1) fi
THMgeom_series_wfq,n:. (qn)
THMgeom_series_stepq,n:. (qn + 1) = (qn) + (qn)
THMcomb_for_geom_series_wf(q,n,z.(qn)) q: n: True
THMgeom_ndecreaseq,n,i:. (qn) (qn + i)
THMgeom_speed_lboundq,n:. i:. (qn) + (qn) (qn + i)
THMgeom_n_uniqueq:. n:. i:. r1:(qn). r2:(qn + i). (qn) + r1 = (qn + i) + r2 False
THMgeom_uniqueq:. n1,n2:. r1:(qn1). r2:(qn2). (qn1) + r1 = (qn2) + r2 n1 = n2 r1 = r2
THMgeom_series_limitq:. a:. n:. (qn) a < (qn + 1)
DISPenum_dfenum(<l:l:*>;<q:q:*>)== enum(<l>) enum(<l:l:*>)== enum(<l>)
ABSenumenum(l) == (q||l||) + en(l)
THMenum_wfq:. l:q List. enum(l)
THMenum_injq:. l1,l2:q List. enum(l1) = enum(l2) l1 = l2
THMenum_surjq:. a:. l:q List. enum(l) = a
THMlist_1_1_natq:. 1-1-Corresp(q List;)

the other theories