diff -r dd58f13a8eb4 -r eb85850d3eb7 src/HOL/Lambda/ListBeta.thy --- a/src/HOL/Lambda/ListBeta.thy Fri Nov 17 02:19:55 2006 +0100 +++ b/src/HOL/Lambda/ListBeta.thy Fri Nov 17 02:20:03 2006 +0100 @@ -13,7 +13,7 @@ *} abbreviation - list_beta :: "dB list => dB list => bool" (infixl "=>" 50) + list_beta :: "dB list => dB list => bool" (infixl "=>" 50) where "rs => ss == (rs, ss) : step1 beta" lemma head_Var_reduction: