Mercurial Mercurial > hg > nominal2 / 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.
Nominal/Nominal2_Abs.thy
changeset 2574 50da1be9a7e5
parent 2568 8193bbaa07fe
child 2584 1eac050a36f4 
--- a/Nominal/Nominal2_Abs.thy	Sun Nov 21 02:17:19 2010 +0000
+++ b/Nominal/Nominal2_Abs.thy	Mon Nov 22 16:14:47 2010 +0900
@@ -553,7 +553,7 @@
 lemma [quot_preserve]:
   assumes q1: "Quotient R1 abs1 rep1"
   and     q2: "Quotient R2 abs2 rep2"
-  shows "((abs1 ---> id) ---> (abs2 ---> id) ---> prod_fun rep1 rep2 ---> id) prod_fv = prod_fv"
+  shows "((abs1 ---> id) ---> (abs2 ---> id) ---> map_pair rep1 rep2 ---> id) prod_fv = prod_fv"
   by (simp add: fun_eq_iff Quotient_abs_rep[OF q1] Quotient_abs_rep[OF q2])
 
 lemma [mono]:
nominal2