9 lines
126 B
Text
9 lines
126 B
Text
inductive T: Type
|
|
| mk: Nat -> T
|
|
|
|
theorem T.zero_bad: T -> T
|
|
:= by {
|
|
intro H;
|
|
induction H with
|
|
| mk _ => exact T.mk 0
|
|
}
|