>>> isJust (Just 3) True
>>> isJust (Just ()) True
>>> isJust Nothing False
>>> isJust (Just Nothing) True
>>> isJust (sNothing :: SMaybe Integer) False >>> isJust (sJust (literal "yep")) True >>> prove $ \x -> isJust (sJust (x :: SInteger)) Q.E.D.