Seleton HW06.hs