Week5 lab.hs