changeset 1401 | 0c439768f45c |
parent 1155 | 928a16e02f9f |
child 1478 | 2b8c2a7547ab |
--- a/src/ZF/Finite.thy Fri Dec 08 19:48:15 1995 +0100 +++ b/src/ZF/Finite.thy Sat Dec 09 13:36:11 1995 +0100 @@ -8,8 +8,8 @@ Finite = Arith + Inductive + consts - Fin :: "i=>i" - FiniteFun :: "[i,i]=>i" ("(_ -||>/ _)" [61, 60] 60) + Fin :: i=>i + FiniteFun :: [i,i]=>i ("(_ -||>/ _)" [61, 60] 60) inductive domains "Fin(A)" <= "Pow(A)"