Skip to content

Commit

Permalink
Simplify implementation of TokenQuantity.add.
Browse files Browse the repository at this point in the history
  • Loading branch information
jonathanknowles committed Jan 30, 2023
1 parent 7fb9544 commit a5c8d31
Showing 1 changed file with 1 addition and 1 deletion.
Original file line number Diff line number Diff line change
Expand Up @@ -117,7 +117,7 @@ zero = TokenQuantity 0
--------------------------------------------------------------------------------

add :: TokenQuantity -> TokenQuantity -> TokenQuantity
add (TokenQuantity x) (TokenQuantity y) = TokenQuantity $ x + y
add = (<>)

-- | Subtracts the second token quantity from the first.
--
Expand Down

0 comments on commit a5c8d31

Please sign in to comment.