cryptol/tests/parser/infix-1.cry
2020-05-15 09:33:32 -07:00

10 lines
117 B
Plaintext

infixl 4 ++
infixl 5 **
(++) : [8] -> [8] -> [8]
x ++ y = x + y
(**) : {a} (Ring a) => a -> a -> a
x ** y = x * y