Nuprl - Some Definitions

biject	`Def Bij(A; B; f) == Inj(A; B; f) & Surj(A; B; f)` `Thm* A,B:Type, f:(AB). Bij(A; B; f) Prop`
int_seg	`Def {i..j} == {k:\| i k < j }` `Thm* m,n:. {m..n} Type`
listify	`Def listify(f; m; n) == if nm nil else f(m).listify(f; m+1; n) fi (recursive)` `Thm* T:Type, m,n:, f:({m..n}T). listify(f; m; n) T*`
mem_f	`Def mem_f(T;a;bs) == Case of bs; nil False ; b.bs' b = a T mem_f(T;a;bs') (recursive)` `Thm* T:Type, a:T, bs:T*. mem_f(T;a;bs) Prop`
nat	`Def == {i:\| 0i }` `Thm* Type`
surject	`Def Surj(A; B; f) == b:B. a:A. f(a) = b` `Thm* A,B:Type, f:(AB). Surj(A; B; f) Prop`
inject	`Def Inj(A; B; f) == a1,a2:A. f(a1) = f(a2) B a1 = a2` `Thm* A,B:Type, f:(AB). Inj(A; B; f) Prop`
lelt	`Def i j < k == ij & j < k`
le_int	`Def ij == j < i` `Thm* i,j:. ij`
le	`Def AB == B < A` `Thm* i,j:. ij Prop`
lt_int	`Def i < j == if i < j true ; false fi` `Thm* i,j:. i < j`
bnot	`Def b == if b false else true fi` `Thm* b:. b`
not	`Def A == A False` `Thm* A:Prop. (A) Prop`

About: