module Main ( main ) where main :: IO () main = putStrLn "Test suite not implemented."