Skip to content

Instantly share code, notes, and snippets.

@andruby

andruby/my_lib.erl

Created November 23, 2009 23:53
Show Gist options
  • Star 1 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save andruby/241489 to your computer and use it in GitHub Desktop.
Save andruby/241489 to your computer and use it in GitHub Desktop.
Download ZIP
[Erlang] lists:seq for floats
Raw
gistfile1.hrl
%% This lets you do stuff like
1> my_lib:seq_float(10.01,10.13,0.02).
[10.01,10.03,10.05,10.07,10.09,10.11,10.13]
Raw
my_lib.erl
-module (my_lib).
-export ([seq_float/3]).
seq_float(Min, Max, Inc, Counter, Acc) when (Counter*Inc + Min) >= Max ->
lists:reverse([Max|Acc]);
seq_float(Min, Max, Inc, Counter, Acc) ->
seq_float(Min, Max, Inc, Counter+1, [Inc * Counter + Min|Acc]).
seq_float(Min, Max, Inc) ->
seq_float(Min, Max, Inc, 0, []).
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment