--- a/Quot/Nominal/Terms.thy	Wed Feb 10 11:31:53 2010 +0100
+++ b/Quot/Nominal/Terms.thy	Wed Feb 10 11:39:22 2010 +0100
@@ -944,7 +944,7 @@
 where
   "rfv_trm6 (rVr6 n) = {atom n}"
 | "rfv_trm6 (rLm6 n t) = (rfv_trm6 t) - {atom n}"
-| "rfv_trm6 (rLt6 l r) = (rfv_trm6 r - rbv6 l) \<union> rfv_trm6 r"
+| "rfv_trm6 (rLt6 l r) = (rfv_trm6 r - rbv6 l) \<union> rfv_trm6 l"
 
 instantiation
   rtrm6 :: pt