chore: add abbreviations for monadLift
This commit is contained in:
parent
fb87a0715b
commit
da73cbbdec
1 changed files with 2 additions and 0 deletions
|
|
@ -29,6 +29,8 @@ class HasMonadLiftT (m : Type u → Type v) (n : Type u → Type w) :=
|
|||
|
||||
export HasMonadLiftT (monadLift)
|
||||
|
||||
abbrev liftM := @monadLift
|
||||
|
||||
/-- A coercion that may reduce the need for explicit lifting.
|
||||
Because of [limitations of the current coercion resolution](https://github.com/leanprover/Lean/issues/1402), this definition is not marked as a global instance and should be marked locally instead. -/
|
||||
@[reducible] def hasMonadLiftToHasCoe {m n} [HasMonadLiftT m n] {α} : HasCoe (m α) (n α) :=
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue