2015-02-10 18:28:48 -08:00
|
|
|
open nat
|
|
|
|
|
|
|
|
|
|
abbreviation foo : Π (A : Type), nat := λ a, 2 + 3
|
|
|
|
|
|
|
|
|
|
definition tst := foo nat
|
|
|
|
|
|
|
|
|
|
set_option pp.abbreviations false
|
|
|
|
|
|
|
|
|
|
print definition tst
|
|
|
|
|
|
|
|
|
|
set_option pp.abbreviations true
|
|
|
|
|
|
|
|
|
|
print definition tst
|
|
|
|
|
|
2015-10-13 16:28:11 -07:00
|
|
|
abbreviation id [parsing_only] {A : Type} (a : A) := a
|
2015-02-10 18:28:48 -08:00
|
|
|
|
2015-10-13 16:28:11 -07:00
|
|
|
definition tst1 :nat := id 10
|
2015-02-10 18:28:48 -08:00
|
|
|
|
|
|
|
|
print definition tst1
|
