ex8.hs created