Update task-04.hs