diff options
Diffstat (limited to 'gen/src/gleam@pair.erl')
| -rw-r--r-- | gen/src/gleam@pair.erl | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/gen/src/gleam@pair.erl b/gen/src/gleam@pair.erl index 0f8e8be..3c07918 100644 --- a/gen/src/gleam@pair.erl +++ b/gen/src/gleam@pair.erl @@ -3,22 +3,22 @@ -export([first/1, second/1, swap/1, map_first/2, map_second/2]). -first(Tup) -> - {A, _} = Tup, +first(Pair) -> + {A, _} = Pair, A. -second(Tup) -> - {_, A} = Tup, +second(Pair) -> + {_, A} = Pair, A. -swap(Tup) -> - {A, B} = Tup, +swap(Pair) -> + {A, B} = Pair, {B, A}. -map_first(Tup, Fun) -> - {A, B} = Tup, +map_first(Pair, Fun) -> + {A, B} = Pair, {Fun(A), B}. -map_second(Tup, Fun) -> - {A, B} = Tup, +map_second(Pair, Fun) -> + {A, B} = Pair, {A, Fun(B)}. |