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