| Some definitions of interest. |
|
delete_fenum_value | Def Replace value k by f(m) in f == Replace values x s.t. x= k by f(m) in f |
| | Thm* Inj({k: | P(k) }; {k: | Q(k) }; f)
Thm* 
Thm* ( m:{u: | P(u) }, k:{v: | Q(v) }.
Thm* ((Replace value k by f(m) in f)
Thm* ( {u: | P(u) & u = m } {v: | Q(v) & v = k }) |
| | Thm* Inj( (m+1); (k+1); f)  (Replace value k by f(m) in f) m  k |
|
inject | Def Inj(A; B; f) == a1,a2:A. f(a1) = f(a2) B  a1 = a2 |
| | Thm* A,B:Type, f:(A B). Inj(A; B; f) Prop |
|
not | Def A == A  False |
| | Thm* A:Prop. ( A) Prop |