removed a reference to the ML structure List.thy
authorpaulson
Thu, 19 Feb 2004 10:41:01 +0100
changeset 14396 011a2a49d303
parent 14395 cc96cc06abf9
child 14397 b3b15305a1c9
removed a reference to the ML structure List.thy
src/HOL/TLA/Buffer/Buffer.ML
--- a/src/HOL/TLA/Buffer/Buffer.ML	Thu Feb 19 10:40:28 2004 +0100
+++ b/src/HOL/TLA/Buffer/Buffer.ML	Thu Feb 19 10:41:01 2004 +0100
@@ -8,8 +8,8 @@
 
 (* ---------------------------- Data lemmas ---------------------------- *)
 
-context List.thy;
-goal List.thy "xs ~= [] --> tl xs ~= xs";
+(*FIXME: move to List.thy? Maybe as (tl xs = xs) = (xs = [])"?*)
+Goal "xs ~= [] --> tl xs ~= xs";
 by (auto_tac (claset(), simpset() addsimps [neq_Nil_conv]));
 qed_spec_mp "tl_not_self";
 context Buffer.thy;