lean2/tests/lean/run/class6.lean
Leonardo de Moura d30f387e72 feat(library/standard): add namespace 'pair'
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
2014-07-07 14:48:19 -07:00

20 lines
293 B
Text
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

import standard
using pair
inductive t1 : Type :=
| mk1 : t1
inductive t2 : Type :=
| mk2 : t2
theorem inhabited_t1 : inhabited t1
:= inhabited_intro mk1
theorem inhabited_t2 : inhabited t2
:= inhabited_intro mk2
instance inhabited_t1 inhabited_t2
theorem T : inhabited (t1 × t2)
:= _