Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -- this builds fine:
- instance semiMonoid :: Semigroup Multiply where
- append (Multiply a) (Multiply b) = Multiply (a * b)
- -- But this fails with the error **Unexpected token '(<>)' **
- instance semiMonoid :: Semigroup Multiply where
- (<>) (Multiply a) (Multiply b) = Multiply (a * b)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement