changeset 21404 | eb85850d3eb7 |
parent 20503 | 503ac4c5ef91 |
child 22271 | 51a80e238b29 |
--- 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: