Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
let getShapeHeight shape =
match shape with
| Rectangle(width = h) -> h
| Circle(radius = r) -> 2. * r
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment