From 84e471e64566698a5489810836b6ec80824d3e46 Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Sat, 12 Dec 2009 11:02:20 -0500 Subject: Checked-ness of radio options; Option.get --- lib/ur/option.urs | 2 ++ 1 file changed, 2 insertions(+) (limited to 'lib/ur/option.urs') diff --git a/lib/ur/option.urs b/lib/ur/option.urs index 60ca6db9..62687963 100644 --- a/lib/ur/option.urs +++ b/lib/ur/option.urs @@ -8,3 +8,5 @@ val isSome : a ::: Type -> t a -> bool val mp : a ::: Type -> b ::: Type -> (a -> b) -> t a -> t b val bind : a ::: Type -> b ::: Type -> (a -> option b) -> t a -> t b + +val get : a ::: Type -> a -> option a -> a -- cgit v1.2.3