[Haskell-cafe] 2-CNF Sat algorithm/haskell code