[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: gen-permutation
- To: Janusz Podrazik <jpod@mrac.demon.co.uk>, info-mcl@digitool.com
- Subject: Re: gen-permutation
- From: e@flavors.com (Doug Currie, Flavors Technology, Inc.)
- Date: Fri, 27 Jan 1995 14:59:25 -0500
- Sender: owner-info-mcl@digitool.com
>
>(gen-permutation '(a a b b))
>
>I'm looking for:
>
>-> ((a a b b) (a b a b) (a b b a) (b a a b) (b a b a) (b b a a))
>
>permute-uniqe?
(DELETE-DUPLICATES (permute '(a a b b) :test #'equal)
e