main = -- a let --b x = 1 -- x y = 2 -- y in do print x print y