Update main0054.hs