diff -r 0ce025c02ef3 -r bb012513fb39 Quot/quotient_term.ML --- a/Quot/quotient_term.ML Wed Jan 13 09:30:59 2010 +0100 +++ b/Quot/quotient_term.ML Wed Jan 13 09:41:57 2010 +0100 @@ -175,7 +175,7 @@ ('a * 'a) list / 'a bar - The test is necessary in order to eliminate superflous + The test is necessary in order to eliminate superfluous identity maps. *) @@ -358,7 +358,6 @@ for more complicated types of A and B *) - val mk_babs = Const (@{const_name Babs}, dummyT) val mk_ball = Const (@{const_name Ball}, dummyT) val mk_bex = Const (@{const_name Bex}, dummyT)