module Draw where import Control.Concurrent.MVar -- internal imports import Types draw :: MVar State -> Word -> IO () draw state ident = do return ()