lean2/tests/lean/coe.lean

import logic

set_option pp.notation false

inductive Functor :=
mk : (Π (A B : Type), A → B) → Functor

definition Functor.to_fun [coercion] (f : Functor) {A B : Type} : A → B :=
Functor.rec (λ f, f) f A B

constant f : Functor
check f 0 = 0
fix(frontends/lean/pp): when formatting a coercion to function-class that contains implicit arguments 2014-09-20 16:56:46 +00:00			`import logic`

			`set_option pp.notation false`

			`inductive Functor :=`
			`mk : (Π (A B : Type), A → B) → Functor`

			`definition Functor.to_fun [coercion] (f : Functor) {A B : Type} : A → B :=`
			`Functor.rec (λ f, f) f A B`

refactor(frontends/lean): constant/axiom are top-level commands, parameter/variable/hypothesis/conjecture are section/context-level commands Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-10-02 23:20:52 +00:00			`constant f : Functor`
fix(frontends/lean/pp): when formatting a coercion to function-class that contains implicit arguments 2014-09-20 16:56:46 +00:00			`check f 0 = 0`