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.
TFL/post.ML
changeset 11771 b7b100a2de1d
parent 11632 6fc8de600f58
child 12341 08afd1003151 
--- a/TFL/post.ML	Sun Oct 14 22:08:29 2001 +0200
+++ b/TFL/post.ML	Sun Oct 14 22:15:07 2001 +0200
@@ -171,8 +171,8 @@
                {f = f, R = R, rules = rules,
                 full_pats_TCs = full_pats_TCs,
                 TCs = TCs}
-       val rules' = map (standard o Rulify.rulify_no_asm) (R.CONJUNCTS rules)
-   in  {induct = meta_outer (Rulify.rulify_no_asm (induction RS spec')),
+       val rules' = map (standard o ObjectLogic.rulify_no_asm) (R.CONJUNCTS rules)
+   in  {induct = meta_outer (ObjectLogic.rulify_no_asm (induction RS spec')),
         rules = ListPair.zip(rules', rows),
         tcs = (termination_goals rules') @ tcs}
    end
isabelle