src/HOL/Nominal/nominal_inductive.ML
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);