Added more stuff in Lab1.hs