mc10.hs:14:11: warning: [GHC-40910] [-Wunused-matches (in -Wextra)]
    Defined but not used: ‘y’