mios:用Haskell编写的SAT解算器