# HG changeset patch
# User huffman
# Date 1231880536 28800
# Node ID 68e88293708f1cfe25f3a457eb4bd901c5fa100e
# Parent  c06d1b0a970f946c896140a6bceac54a74f085c7
more [code del] declarations

diff -r c06d1b0a970f -r 68e88293708f src/HOL/Fundamental_Theorem_Algebra.thy
--- a/src/HOL/Fundamental_Theorem_Algebra.thy	Tue Jan 13 10:18:23 2009 -0800
+++ b/src/HOL/Fundamental_Theorem_Algebra.thy	Tue Jan 13 13:02:16 2009 -0800
@@ -134,7 +134,7 @@
 apply (simp add: offset_poly_eq_0_iff)
 done
 
-definition
+definition [code del]:
   "plength p = (if p = 0 then 0 else Suc (degree p))"
 
 lemma plength_eq_0_iff [simp]: "plength p = 0 \<longleftrightarrow> p = 0"