Create foldl.hs