diff options
Diffstat (limited to 'gen/src/gleam@generic.erl')
| -rw-r--r-- | gen/src/gleam@generic.erl | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/gen/src/gleam@generic.erl b/gen/src/gleam@generic.erl new file mode 100644 index 0000000..a25a59f --- /dev/null +++ b/gen/src/gleam@generic.erl @@ -0,0 +1,16 @@ +-module(gleam@generic). +-compile(no_auto_import). + +-export([identity/1, always/2, flip/1, compose/2]). + +identity(A) -> + A. + +always(_, B) -> + B. + +flip(Fun) -> + fun(B, A) -> Fun(A, B) end. + +compose(Fun1, Fun2) -> + fun(A) -> Fun2(Fun1(A)) end. |