19 lines
462 B
Text
19 lines
462 B
Text
/-
|
|
Copyright (c) 2016 Microsoft Corporation. All rights reserved.
|
|
Released under Apache 2.0 license as described in the file LICENSE.
|
|
Author: Leonardo de Moura
|
|
-/
|
|
prelude
|
|
import init.data.list.basic
|
|
import init.control.alternative init.control.monad
|
|
open List
|
|
|
|
universes u v
|
|
|
|
instance : Monad List :=
|
|
{ pure := @List.pure, map := @List.map, bind := @List.bind }
|
|
|
|
instance : Alternative List :=
|
|
{ failure := @List.nil,
|
|
orelse := @List.append,
|
|
..List.Monad }
|