2014-07-22 09:43:18 -07:00
|
|
|
definition Prop [inline] : 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-08-22 15:46:10 -07:00
|
|
|
or_intro_left : A → or A B,
|
|
|
|
|
or_intro_right : B → or A B
|
2014-06-18 13:55:48 -07:00
|
|
|
|
|
|
|
|
check or
|
|
|
|
|
check or_intro_left
|
|
|
|
|
check or_rec
|
