Mercurial Mercurial > repos > isabelle / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/HOL/Tools/Function/function_lib.ML
changeset 35402 115a5a95710a
parent 34232 36a2a3029fd3
child 36945 9bec62c10714 
--- a/src/HOL/Tools/Function/function_lib.ML	Sat Feb 27 20:56:03 2010 +0100
+++ b/src/HOL/Tools/Function/function_lib.ML	Sat Feb 27 20:57:08 2010 +0100
@@ -168,7 +168,7 @@
 
 (* instance for unions *)
 val regroup_union_conv =
-  regroup_conv @{const_name Set.empty} @{const_name Lattices.sup}
+  regroup_conv @{const_abbrev Set.empty} @{const_name Lattices.sup}
     (map (fn t => t RS eq_reflection)
       (@{thms Un_ac} @ @{thms Un_empty_right} @ @{thms Un_empty_left}))
isabelle