99-haskell-problems/Problems 1-10/problem_2.hs

myButLast :: [a] -> a
myButLast [] = error "List length less than 2"
myButLast [a, _] = a
myButLast (hd : tl) = myButLast tl