1.1 --- a/src/HOL/Library/Dlist.thy Tue Jul 17 23:07:51 2012 +0200
1.2 +++ b/src/HOL/Library/Dlist.thy Tue Jul 17 23:11:24 2012 +0200
1.3 @@ -180,10 +180,12 @@
1.4 enriched_type map: map
1.5 by (simp_all add: List.map.id remdups_map_remdups fun_eq_iff dlist_eq_iff)
1.6
1.7 +
1.8 subsection {* Quickcheck generators *}
1.9
1.10 quickcheck_generator dlist predicate: distinct constructors: empty, insert
1.11
1.12 +
1.13 hide_const (open) member fold foldr empty insert remove map filter null member length fold
1.14
1.15 end