
 Alph*
Alph*
 Prop
Prop

 x:Alph*. R(x,x)
x:Alph*. R(x,x) x,y:Alph*. R(x,y)
x,y:Alph*. R(x,y) 
 R(y,x)
 R(y,x) x,y,z:Alph*. R(x,y)  &  R(y,z)
x,y,z:Alph*. R(x,y)  &  R(y,z) 
 R(x,z)
 R(x,z) x,y,z:Alph*. R(x,y)
x,y,z:Alph*. R(x,y) 
 R((z @ x),z @ y)
 R((z @ x),z @ y) n
n
 Alph*
Alph* l:Alph*.
l:Alph*.  i:
i: n. R(l,w(i))
n. R(l,w(i)) n
n n
n

 n
n x:Alph*. R(x,w(f(x)))
x:Alph*. R(x,w(f(x))) n
n
 n
n

 (n
(n n)
n) a1,a2:(
a1,a2:( n
n
 n). f1(a1) = f1(a2)
n). f1(a1) = f1(a2) 
 a1 = a2
 a1 = a2 n
n
 n;
n;  (n
(n n); f1)
n); f1) (n
(n n+1)
n+1) (n
(n n+1)
n+1) ]) @ b),f((a[||a||-i..||a||
]) @ b),f((a[||a||-i..||a|| ]) @ c) > )
=
f1( < f((a[||a||-j..||a||
]) @ c) > )
=
f1( < f((a[||a||-j..||a|| ]) @ b),f((a[||a||-j..||a||
]) @ b),f((a[||a||-j..||a|| ]) @ c) > )
]) @ c) > ) R((a @ b),((a[0..||a||-j
 R((a @ b),((a[0..||a||-j ]) @ (a[||a||-i..||a||
]) @ (a[||a||-i..||a|| ])) @ b)
 &  R((a @ c),((a[0..||a||-j
])) @ b)
 &  R((a @ c),((a[0..||a||-j ]) @ (a[||a||-i..||a||
]) @ (a[||a||-i..||a|| ])) @ c)
])) @ c) ]) @ b),f((a[||a||-i..||a||
]) @ b),f((a[||a||-i..||a|| ]) @ c) >
]) @ c) > 
 ]) @ b),f((a[||a||-j..||a||
]) @ b),f((a[||a||-j..||a|| ]) @ c) >
]) @ c) > 
| 1 | 17. Surj(  n   n;  (n  n); f1) 18. i:  (n  n+1) 19. j:  (n  n+1) 20. i < j 21. f1( < f((a[||a||-i..||a||  ]) @ b),f((a[||a||-i..||a||  ]) @ c) > )
=
f1( < f((a[||a||-j..||a||  ]) @ b),f((a[||a||-j..||a||  ]) @ c) > ) 22. < f((a[||a||-i..||a||  ]) @ b),f((a[||a||-i..||a||  ]) @ c) > 
=
 < f((a[||a||-j..||a||  ]) @ b),f((a[||a||-j..||a||  ]) @ c) >  R((a @ b),((a[0..||a||-j  ]) @ (a[||a||-i..||a||  ])) @ b)
 &  R((a @ c),((a[0..||a||-j  ]) @ (a[||a||-i..||a||  ])) @ c) | 
About:
|  |  |  |  |  |  | 
|  |  |  |  |  |  | 
|  |  |  |  |  |