module Prelude where showString :: String -> ShowS showString = (++)