diff options
Diffstat (limited to 'problem29.erl')
| -rwxr-xr-x | problem29.erl | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/problem29.erl b/problem29.erl new file mode 100755 index 0000000..ca83f50 --- /dev/null +++ b/problem29.erl @@ -0,0 +1,9 @@ +-module(problem29). +-export([solve/0]). + +solve() -> + length(sets:to_list(sets:from_list(genlist(100)))). + +genlist(N) -> + L = lists:seq(2,N), + [math:pow(X,Y) || X <- L, Y <- L]. |