Quot/Examples/SigmaEx.thy
changeset 918 7be9b054f672
parent 914 b8e43414c5aa
child 938 0ff855a6ffb7
--- a/Quot/Examples/SigmaEx.thy	Sat Jan 23 17:25:18 2010 +0100
+++ b/Quot/Examples/SigmaEx.thy	Sun Jan 24 23:41:27 2010 +0100
@@ -113,7 +113,8 @@
 translations
   "\<exists>\<exists> x. P"   == "Ex (%x. P)"
 
-lemma split_rsp[quot_respect]: "((R1 ===> R2 ===> op =) ===> (prod_rel R1 R2) ===> op =) split split"
+lemma split_rsp[quot_respect]: 
+  "((R1 ===> R2 ===> op =) ===> (prod_rel R1 R2) ===> op =) split split"
 by auto
 
 lemma rvar_rsp[quot_respect]: "(op = ===> alpha_obj) rVar rVar"
@@ -130,6 +131,8 @@
 lemma operm_rsp[quot_respect]: "(op = ===> alpha_obj ===> alpha_obj) op \<bullet> op \<bullet>"
 sorry
 
+  
+
 lemma liftd: "
 \<exists>\<exists>(hom_o, (hom_d, (hom_e, hom_m))).
 (