blob: b36b52d008e80d4b92cc79febeff4e57178cf414 [file] [edit]
/-
# Testing monad lift coercion elaborator
The functions inserted for the coercions are supposed to be inlined immediately during elaboration.
-/
variable (p : Nat → Prop) (m : IO (Subtype p))
/-!
`Lean.Internal.liftCoeM`
-/
#check (m : (ReaderT Int IO) Nat)
/-!
`Lean.Internal.coeM`
-/
#check (m : IO Nat)