mirror of
https://git8.cs.fau.de/theses/bsc-leon-vatthauer.git
synced 2024-05-31 07:28:34 +02:00
6 lines
103 B
Haskell
6 lines
103 B
Haskell
hd :: [a] -> a
|
|
hd [] = error "empty list"
|
|
hd (x : _) = x
|
|
|
|
main :: IO ()
|
|
main = print (hd []::[String])
|