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.
avoid reference to thm PairE
authorhaftmann
Fri, 28 May 2010 13:37:29 +0200
changeset 37167 161cf39694df
parent 37166 e8400e31528a
child 37168 5610d9097cae
avoid reference to thm PairE
src/HOL/Tools/split_rule.ML file | annotate | diff | comparison | revisions 
--- a/src/HOL/Tools/split_rule.ML	Fri May 28 13:37:28 2010 +0200
+++ b/src/HOL/Tools/split_rule.ML	Fri May 28 13:37:29 2010 +0200
@@ -108,7 +108,7 @@
 
 
 fun pair_tac ctxt s =
-  res_inst_tac ctxt [(("p", 0), s)] @{thm PairE}
+  res_inst_tac ctxt [(("y", 0), s)] @{thm prod.exhaust}
   THEN' hyp_subst_tac
   THEN' K prune_params_tac;
isabelle