| changeset 27153 | 56b6cdce22f1 | 
| parent 26939 | 1035c89b4c02 | 
| child 27228 | 4f7976a6ffc3 | 
--- a/src/HOL/Nominal/nominal_inductive.ML Wed Jun 11 18:01:36 2008 +0200 +++ b/src/HOL/Nominal/nominal_inductive.ML Wed Jun 11 18:02:00 2008 +0200 @@ -48,7 +48,7 @@ then SOME perm_bool else NONE | _ => NONE); -val allE_Nil = read_instantiate_sg (the_context()) [("x", "[]")] allE; +val allE_Nil = Drule.read_instantiate_sg (the_context()) [("x", "[]")] allE; fun transp ([] :: _) = [] | transp xs = map hd xs :: transp (map tl xs);