Init

Posted on August 23, 2015

Hello world.

head :: [a] -> a
head x:xs = x
head []   = error "fatal error"