chore: remove OptionM
This commit is contained in:
parent
eaea5c4773
commit
5aaccc8ebb
1 changed files with 0 additions and 5 deletions
|
|
@ -69,11 +69,6 @@ instance (ε : Type u) [Monad m] [MonadExceptOf ε m] : MonadExceptOf ε (Option
|
|||
|
||||
end OptionT
|
||||
|
||||
abbrev OptionM (α : Type u) := OptionT Id α
|
||||
|
||||
abbrev OptionM.run (x : OptionM α) : Option α :=
|
||||
x
|
||||
|
||||
instance [Monad m] : MonadControl m (OptionT m) where
|
||||
stM := Option
|
||||
liftWith f := liftM <| f fun x => x.run
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue