changeset 44396 | 66b9b3fcd608 |
parent 44394 | 20bd9f90accc |
child 44397 | 06375952f1fa |
--- a/src/HOL/Tools/Metis/metis_translate.ML Mon Aug 22 15:02:45 2011 +0200 +++ b/src/HOL/Tools/Metis/metis_translate.ML Mon Aug 22 15:02:45 2011 +0200 @@ -141,7 +141,7 @@ |> Metis_Thm.axiom, isa) in if ident = type_tag_idempotence_helper_name orelse - String.isPrefix lightweight_tags_sym_formula_prefix ident then + String.isPrefix tags_sym_formula_prefix ident then Isa_Reflexive_or_Trivial |> some else if String.isPrefix conjecture_prefix ident then NONE