lean2/tests/lean/extra/eqn_macro1.lean

11 lines
125 B
Text
Raw Normal View History

open nat
notation `foo` a :=
match a with
(c, d) := c + d
end
eval foo (2, 3)
notation `bla` a `with` H := a ↓ H