forketyfork/MonoidProduct.hs

Created May 11, 2021 06:57

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/forketyfork/7b4acd7d7e2cb0ce6ec859c522ab1625.js"></script>
Save forketyfork/7b4acd7d7e2cb0ce6ec859c522ab1625 to your computer and use it in GitHub Desktop.

Download ZIP

Code to article "Why You Should Learn Functional Programming: Type Classes vs. Interfaces"

Raw

MonoidProduct.hs

	instance Num a => Monoid (Product a) where
	mempty = Product 1
	Product x `mappend` Product y = Product (x * y)

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment