Skip to content

Instantly share code, notes, and snippets.

@thraxil

thraxil/agner.erl

Last active December 27, 2015 06:29
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 thraxil/7282081 to your computer and use it in GitHub Desktop.
Save thraxil/7282081 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
agner.erl
-module(agner).
-export([erlangA/2, erlangB/2, erlangC/2]).
erlangA(Lambda, H) ->
Lambda * H.
erlangB(_, 0) ->
1;
erlangB(E, M) ->
N = E * erlangB(E, M - 1),
N / (N + M).
erlangC(X, N) ->
(N * erlangB(N, X)) / (N - (X * (1 - erlangB(N, X)))).
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment