Idris2/tests/base/control_monad_instances/SearchReader.idr

8 lines
157 B
Idris
Raw Normal View History

module SearchReader
import Control.Monad.Identity
import Control.Monad.Reader
monadReaderInstance : MonadReader a (Reader a)
monadReaderInstance = %search