lean2/tests/lean/shadow.lean

open nat

variable a : nat

-- The variable 'a' in the following definition is not the variable 'a' above
definition tadd : nat → nat → nat
| tadd zero     b := b
| tadd (succ a) b := succ (tadd a b)
fix(library/definitional/equations): add more equation validation to avoid obscure error message 2015-01-10 02:52:21 +00:00			`open nat`

			`variable a : nat`

			`-- The variable 'a' in the following definition is not the variable 'a' above`
feat(frontends/lean): ML-like notation for match and recursive equations 2015-02-26 00:20:44 +00:00			`definition tadd : nat → nat → nat`
			`\| tadd zero b := b`
			`\| tadd (succ a) b := succ (tadd a b)`