321ef5b956
The elaboration function `Lean.Meta.coerceMonadLift?` inserts these coercion helper functions into a term and tries to unfolded them with `expandCoe`, but because that function only unfolds up to reducible-and-instance transparency, these functions were not being unfolded. The fix here is to give them the `@[reducible]` attribute.
6 lines
106 B
Text
6 lines
106 B
Text
do
|
|
let a ← liftM m
|
|
pure a.val : ReaderT Int IO Nat
|
|
do
|
|
let a ← m
|
|
pure a.val : EIO IO.Error Nat
|