Mercurial Mercurial > repos > isabelle / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | gz | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
adapted proof of flat_codom
authoroheimb
Fri, 31 May 1996 20:14:42 +0200
changeset 1780 e6656a445a33
parent 1779 1155c06fa956
child 1781 cc5f55a0fbd7
adapted proof of flat_codom
src/HOLCF/Fix.ML file | annotate | diff | comparison | revisions 
--- a/src/HOLCF/Fix.ML	Fri May 31 19:55:19 1996 +0200
+++ b/src/HOLCF/Fix.ML	Fri May 31 20:14:42 1996 +0200
@@ -726,14 +726,14 @@
         (res_inst_tac [("a","f`(UU::'a)")] (refl RS box_equals) 1),
         (etac allE 1),(etac allE 1),
         (dtac mp 1),
-        (res_inst_tac [("fo5","f")] (minimal RS monofun_cfun_arg) 1),
+        (res_inst_tac [("fo","f")] (minimal RS monofun_cfun_arg) 1),
         (etac disjE 1),
         (contr_tac 1),
         (atac 1),
         (etac allE 1),
         (etac allE 1),
         (dtac mp 1),
-        (res_inst_tac [("fo5","f")] (minimal RS monofun_cfun_arg) 1),
+        (res_inst_tac [("fo","f")] (minimal RS monofun_cfun_arg) 1),
         (etac disjE 1),
         (contr_tac 1),
         (atac 1)
isabelle