-- Creating our own version of head
head' :: [a] -> a
head' [] = error "CAN'T GET HEAD OF NOTHING!"
head' :: [a] -> a
head' [] = error "CAN'T GET HEAD OF NOTHING!"
head' [] = error "CAN'T GET HEAD OF NOTHING!"