commented Lists.hs