< 99 questions | Solutions
Revision as of 07:32, 15 November 2014 by Bitemyapp (Don't tell new people to write partial functions, come on.)
(*) Find the last but one element of a list.
myButLast :: [a] -> a myButLast = last . init myButLast' x = reverse x !! 1 myButLast'' [x,_] = x myButLast'' (_:xs) = myButLast'' xs myButLast''' (x:(_:)) = x myButLast''' (_:xs) = myButLast''' xs myButLast'''' = head . tail . reverse