4f2e0c6d7f
The new command provides a uniform way to set declaration attributes. It replaces the commands: class, instance, coercion, multiple_instances, reducible, irreducible
20 lines
327 B
Text
20 lines
327 B
Text
import logic data.prod
|
||
open prod
|
||
|
||
inductive t1 : Type :=
|
||
mk1 : t1
|
||
|
||
inductive t2 : Type :=
|
||
mk2 : t2
|
||
|
||
theorem inhabited_t1 : inhabited t1
|
||
:= inhabited.mk t1.mk1
|
||
|
||
theorem inhabited_t2 : inhabited t2
|
||
:= inhabited.mk t2.mk2
|
||
|
||
attribute inhabited_t1 [instance]
|
||
attribute inhabited_t2 [instance]
|
||
|
||
theorem T : inhabited (t1 × t2)
|
||
:= _
|