starman :: String -> Int -> IO ()
-- top-level function. Usage: starman "WORD" NUM_TURNS
starman word n = turn word ['-' | x <- word] n
starman :: String -> Int -> IO ()
starman word n = turn word ['-' | x <- word] n
starman word n = turn word ['-' | x <- word] n