initialDS :: DrawState
initialDS = DrawState initialAffineTransformation Nothing
initialDS :: DrawState
initialDS = DrawState initialAffineTransformation Nothing
initialDS = DrawState initialAffineTransformation Nothing