Skip to content

Instantly share code, notes, and snippets.

@antonva

antonva/geometry.erl

Created March 18, 2015 01:37
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 antonva/32d6345bcc3f5b0fc679 to your computer and use it in GitHub Desktop.
Save antonva/32d6345bcc3f5b0fc679 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
geometry.erl
-module(geometry).
-export([area/1]).
area({rectangle, Width, Height}) -> Width * Height;
area({circle, R}) -> 3.14159 * R * R;
area({square, Side}) -> Side * Side.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment