-- Find the last but on element of a list
-- myButLast [1,2,3,4] -> 3
-- myButLast ['x', 'y', 'z'] -> 'y'

myButLast :: [a] -> a
myButLast (x:[_]) = x
myButLast :: [a] -> a
myButLast (x:[_]) = x
myButLast (x:[_]) = x