Finished ruler.hs problem