2015-02-11 02:28:48 +00: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-11-21 01:03:17 +00:00
|
|
|
abbreviation id2 [parsing_only] {A : Type} (a : A) := a
|
2015-02-11 02:28:48 +00:00
|
|
|
|
2015-11-21 01:03:17 +00:00
|
|
|
definition tst1 :nat := id2 10
|
2015-02-11 02:28:48 +00:00
|
|
|
|
|
|
|
|
print definition tst1
|
