2014-11-30 21:16:01 -08:00
|
|
|
prelude
|
2014-09-17 14:39:05 -07:00
|
|
|
definition Prop : Type.{1} := Type.{0}
|
2014-06-18 13:55:48 -07:00
|
|
|
|
2014-07-22 09:43:18 -07:00
|
|
|
inductive or (A B : Prop) : Prop :=
|
2014-09-04 16:36:06 -07:00
|
|
|
intro_left : A → or A B,
|
|
|
|
intro_right : B → or A B
|
2014-06-18 13:55:48 -07:00
|
|
|
|
|
|
|
check or
|
2014-09-04 16:36:06 -07:00
|
|
|
check or.intro_left
|
2014-09-04 15:03:59 -07:00
|
|
|
check or.rec
|