diff options
author | Brett Snyder <bsnyder@digitalocean.com> | 2019-10-02 10:49:43 -0500 |
---|---|---|
committer | Louis Pilfold <louis@lpil.uk> | 2019-10-03 11:38:43 +0100 |
commit | cf7831f278423bab72f5d9433771e5a16ce44cac (patch) | |
tree | 1dbbb96cd4f040c85a343dc7244365dcf87f1c30 /src | |
parent | 7677e9e96d38dffcf230891b7c74991aa7f16df5 (diff) | |
download | gleam_stdlib-cf7831f278423bab72f5d9433771e5a16ce44cac.tar.gz gleam_stdlib-cf7831f278423bab72f5d9433771e5a16ce44cac.zip |
add pair:map_first and pair:map_second
Diffstat (limited to 'src')
-rw-r--r-- | src/gleam/pair.gleam | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/src/gleam/pair.gleam b/src/gleam/pair.gleam index 9074330..32fc6d1 100644 --- a/src/gleam/pair.gleam +++ b/src/gleam/pair.gleam @@ -17,3 +17,13 @@ pub fn swap(tup) { let Pair(a, b) = tup Pair(b, a) } + +pub fn map_first(tup, f) { + let Pair(a, b) = tup + Pair(f(a), b) +} + +pub fn map_second(tup, f) { + let Pair(a, b) = tup + Pair(a, f(b)) +} |