Skip to content

Instantly share code, notes, and snippets.

@isaacabraham

isaacabraham/monopoly2.fs

Last active December 17, 2015 07:09
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save isaacabraham/5571090 to your computer and use it in GitHub Desktop.
Save isaacabraham/5571090 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
monopoly2.fs
let printName position =
match position with
| Property(propertyName) -> sprintf "Property '%s'" propertyName // prints "Property 'Old Kent Road'"
| Tax(amount) -> sprintf "Tax of £%d" amount // prints "Tax of £100"
| CommunityChest -> sprintf "Community Chest"
// etc..
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment