# HG changeset patch # User Cezary Kaliszyk # Date 1265798362 -3600 # Node ID 44cabac6ad3d72993f5367d9a47a0ad461be15c5 # Parent 3e405c2fbe908d18ac7797c1f114d8c889cac524 Another mistake found with OTT. diff -r 3e405c2fbe90 -r 44cabac6ad3d Quot/Nominal/Terms.thy --- 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) \ rfv_trm6 r" +| "rfv_trm6 (rLt6 l r) = (rfv_trm6 r - rbv6 l) \ rfv_trm6 l" instantiation rtrm6 :: pt