diff options
Diffstat (limited to 'lib/ur/option.ur')
| -rw-r--r-- | lib/ur/option.ur | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/ur/option.ur b/lib/ur/option.ur index cb2a6b57..5ec093c0 100644 --- a/lib/ur/option.ur +++ b/lib/ur/option.ur @@ -4,3 +4,8 @@ fun isSome [a] x = case x of None => False | Some _ => True + +fun mp [a] [b] f x = + case x of + None => None + | Some y => Some (f y) |