Remove list_eq notation.
authorCezary Kaliszyk <kaliszyk@in.tum.de>
Sat, 27 Mar 2010 14:38:22 +0100
changeset 1682 ae54ce4cde54
parent 1681 b8a07a3c1692
child 1683 f78c820f67c3
Remove list_eq notation.
Nominal/FSet.thy
Nominal/Nominal2_FSet.thy
--- a/Nominal/FSet.thy	Sat Mar 27 13:50:59 2010 +0100
+++ b/Nominal/FSet.thy	Sat Mar 27 14:38:22 2010 +0100
@@ -424,4 +424,7 @@
   | dest_fsetT T = raise TYPE ("dest_fsetT: fset type expected", [T], []);
 *}
 
+no_notation
+  list_eq (infix "\<approx>" 50)
+
 end
--- a/Nominal/Nominal2_FSet.thy	Sat Mar 27 13:50:59 2010 +0100
+++ b/Nominal/Nominal2_FSet.thy	Sat Mar 27 14:38:22 2010 +0100
@@ -3,7 +3,7 @@
 begin
 
 lemma permute_rsp_fset[quot_respect]:
-  "(op = ===> op \<approx> ===> op \<approx>) permute permute"
+  "(op = ===> list_eq ===> list_eq) permute permute"
   apply (simp add: eqvts[symmetric])
   apply clarify
   apply (subst permute_minus_cancel(1)[symmetric, of "xb"])