Disturbingly Concise

import Control.Monad

powerset :: [a] -> [[a]]
powerset = filterM (const [True, False])

I saw this over on a rather good introduction to dynamic programming. It does exactly what you’d expect it to do. (i.e., powerset [1,2] = [[1,2],[1],[2],[]].)

Outstanding.

This entry was posted on Sunday, May 6th, 2007 at 12:25 am and is filed under Programming. You can follow any responses to this entry through the RSS 2.0 feed. You can leave a response, or trackback from your own site.

Leave a Reply

This is a free Wordpress template provided by Mathew Browne | Web Design | SEO