packages feed

smuggler2-0.3.2.1: test/tests/Operator.hs

module Operator where

infixl 5 $+$

($+$) :: [a] -> [a] -> [a]
[] $+$ d = d
d $+$ [] = d
d $+$ d' = d ++ d'