Skip to content

Instantly share code, notes, and snippets.

@deque-blog

deque-blog/positionalMatching.hs

Created February 14, 2018 14:26
Show Gist options
  • Save deque-blog/1284641991a057566905aad444d5905f to your computer and use it in GitHub Desktop.
Save deque-blog/1284641991a057566905aad444d5905f to your computer and use it in GitHub Desktop.
Download ZIP
Raw
positionalMatching.hs
summary :: Payment -> String
summary (Payment amount_ from_ to_) =
join " " ["Transfered", show (value amount_), currency amount_, "from", from_, "to", to_]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment