added 4.hs