src/HOL/Tools/inductive_package.ML
changeset 12311 ce5f9e61c037
parent 12259 3949e7aba298
child 12338 de0f4a63baa5
     1.1 --- a/src/HOL/Tools/inductive_package.ML	Wed Nov 28 00:44:37 2001 +0100
     1.2 +++ b/src/HOL/Tools/inductive_package.ML	Wed Nov 28 00:46:26 2001 +0100
     1.3 @@ -97,7 +97,6 @@
     1.4  
     1.5    val empty = (Symtab.empty, []);
     1.6    val copy = I;
     1.7 -  val finish = I;
     1.8    val prep_ext = I;
     1.9    fun merge ((tab1, monos1), (tab2, monos2)) =
    1.10      (Symtab.merge (K true) (tab1, tab2), Drule.merge_rules (monos1, monos2));