Idris2-boot/sample/Id.yaff

24 lines
693 B
Plaintext
Raw Normal View History

2019-04-07 00:40:15 +03:00
id : {0 a : Type} -> a -> a
id = \ x : _ => x
2019-04-07 00:40:15 +03:00
idid : {0 a : Type} -> a -> a
idid = id id id id id id id id
id id id id id id id id id id
id id id id id id id id id id
id id id id id id id id id id
id id id id id id id id id id
id id id id id id id id id id
id id id id id id id id id id
id id id id id id id id id id
id id id id id id id id id id
id id id id id id id id id id
id id id id id id id id id id
id id id id id id id id id id
id id id id id id id id id id
id id id id id id id id id id
id id id id id id id id id id
2019-04-07 00:40:15 +03:00
id id id id id id id id id id
idTy : Type
idTy = idid Type