mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-11-11 02:01:36 +03:00
12 lines
186 B
Idris
12 lines
186 B
Idris
module Void
|
|
|
|
-- making use of 'hd' being partially defined
|
|
empty1 : Void
|
|
empty1 = hd [] where
|
|
hd : List a -> a
|
|
hd (x :: xs) = x
|
|
|
|
-- not terminating
|
|
empty2 : Void
|
|
empty2 = empty2
|