mirror of
https://github.com/edwinb/Idris2-boot.git
synced 2024-12-26 22:32:44 +03:00
Add curry/uncurry to Prelude
This commit is contained in:
parent
519415f82f
commit
a162425384
@ -86,6 +86,14 @@ public export
|
||||
apply : (a -> b) -> a -> b
|
||||
apply f a = f a
|
||||
|
||||
public export
|
||||
curry : ((a, b) -> c) -> a -> b -> c
|
||||
curry f a b = f (a, b)
|
||||
|
||||
public export
|
||||
uncurry : (a -> b -> c) -> (a, b) -> c
|
||||
uncurry f (a, b) = f a b
|
||||
|
||||
-- $ is compiled specially to shortcut any tricky unification issues, but if
|
||||
-- it did have a type this is what it would be, and it might be useful to
|
||||
-- use directly sometimes (e.g. in higher order functions)
|
||||
|
Loading…
Reference in New Issue
Block a user