3b38f71f11
We had to change subtype to use Sort since the axiom strong_indefinite_description uses it. see #1341
9 lines
221 B
Text
9 lines
221 B
Text
attribute [reducible] definition mk_arrow (A : Sort*) (B : Sort*) :=
|
|
A → A → B
|
|
|
|
inductive confuse (A : Type)
|
|
| leaf1 : confuse
|
|
| leaf2 : num → confuse
|
|
| node : mk_arrow A confuse → confuse
|
|
|
|
check confuse.cases_on
|