lab3.hs