diff --git a/lib/src/prelude/Maybe.gf b/lib/src/prelude/Maybe.gf index 52c9c6427..f2ea1bd00 100644 --- a/lib/src/prelude/Maybe.gf +++ b/lib/src/prelude/Maybe.gf @@ -26,6 +26,7 @@ resource Maybe = open Prelude, Predef in { -- Functions exists : (T : Type) -> Maybe T -> Bool = \_,m -> m.exists ; + isJust : (T : Type) -> Maybe T -> Bool = \_,m -> m.exists ; fromJust : (T : Type) -> Maybe T -> T = \_,m -> case m.exists of { True => m.inner ; False => Predef.error "Called fromJust with Nothing"