src/HOL/Library/Dlist.thy
changeset 39915 ecf97cf3d248
parent 39727 5dab9549c80d
child 40122 1d8ad2ff3e01
     1.1 --- a/src/HOL/Library/Dlist.thy	Sat Oct 02 12:32:31 2010 +0200
     1.2 +++ b/src/HOL/Library/Dlist.thy	Mon Oct 04 12:22:58 2010 +0200
     1.3 @@ -140,7 +140,7 @@
     1.4    case (Abs_dlist xs)
     1.5    then have "distinct xs" and dxs: "dxs = Dlist xs" by (simp_all add: Dlist_def distinct_remdups_id)
     1.6    from `distinct xs` have "P (Dlist xs)"
     1.7 -  proof (induct xs rule: distinct_induct)
     1.8 +  proof (induct xs)
     1.9      case Nil from empty show ?case by (simp add: empty_def)
    1.10    next
    1.11      case (insert x xs)