kmn-programming-0.9.1: SplitProblem.hs

import Control.Monad
import System.Environment

main = do
    (s: ss) <- getArgs
    let i = read s
    forM_ [1..2^i] $ \j -> do
        putStrLn $ unwords $ "kmn-programming": ss ++ ["--partial", show j ++ "/2^" ++ show i]