lean2/tests/lean/run/eq8.lean

import data.examples.vector
open vector

definition map {A B C : Type} (f : A → B → C) : Π {n}, vector A n → vector B n → vector C n
| map nil nil             := nil
| map (a :: va) (b :: vb) := f a b :: map va vb
refactor(library/data): move vector as indexed family to examples folder 2015-08-12 22:05:14 +00:00			`import data.examples.vector`
test(tests/lean/run): define vector map using recursive equations 2015-01-05 03:56:50 +00:00			`open vector`

feat(frontends/lean): ML-like notation for match and recursive equations 2015-02-26 00:20:44 +00:00			`definition map {A B C : Type} (f : A → B → C) : Π {n}, vector A n → vector B n → vector C n`
			`\| map nil nil := nil`
			`\| map (a :: va) (b :: vb) := f a b :: map va vb`