diff -r 0321e89e66a3 -r e163fd99de44 Nominal-General/nominal_library.ML --- a/Nominal-General/nominal_library.ML Mon Jul 19 14:20:23 2010 +0100 +++ b/Nominal-General/nominal_library.ML Mon Jul 19 16:59:43 2010 +0100 @@ -61,7 +61,7 @@ fun last2 [] = raise Empty | last2 [_] = raise Empty - | last2 [x, y] = (x,y) + | last2 [x, y] = (x, y) | last2 (_ :: xs) = last2 xs fun dest_listT (Type (@{type_name list}, [T])) = T