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/Mutabelle/mutabelle_extra.ML
changeset 56243 2e10a36b8d46
parent 56241 029246729dc0
child 56245 84fc7dfa3cd4 
--- a/src/HOL/Mutabelle/mutabelle_extra.ML	Fri Mar 21 12:14:33 2014 +0100
+++ b/src/HOL/Mutabelle/mutabelle_extra.ML	Fri Mar 21 12:34:50 2014 +0100
@@ -234,7 +234,7 @@
   "nibble"]
 
 val forbidden_consts =
- [@{const_name "TYPE"}, @{const_name Datatype.dsum}, @{const_name Datatype.usum}]
+ [@{const_name Pure.type}, @{const_name Datatype.dsum}, @{const_name Datatype.usum}]
 
 fun is_forbidden_theorem (s, th) =
   let val consts = Term.add_const_names (prop_of th) [] in
isabelle