Ideone.com | Online Erlang Compiler & Debugging Tool

Computer geeks!

Recent public codes are listed below. You can filter them by the following programming languages:

codes: 7114 page: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40

71 days 17 hours ago view (lines: 7, size: 101, inputs: 1) Erlang Internal error

1
2
3
4
5
6
7
-module(prog).
-export([main/0]).
 
main() ->
        loop().
loop() ->
        io:format("hello\n").

71 days 17 hours ago view (lines: 19, size: 527, inputs: 1) Erlang Success

1
2
3
4
5
6
7
8
9
-module(prog).
-export([main/0]).
 
main() ->
        loop().
loop() ->
        case io:fread( "","~d" ) of
                eof ->
                        true;
 ...

71 days 17 hours ago view (lines: 8, size: 96, inputs: 1) Erlang Success

1
2
3
4
5
6
7
8
-module(prog).
-export([main/0]).
 
main() ->
  loop().
loop() ->
  X = 1,
  io:fwrite("~B\n",X).

71 days 17 hours ago view (lines: 9, size: 103, inputs: 1) Erlang Compilation error

1
2
3
4
5
6
7
8
9
-module(prog).
-export([main/0]).
 
main() ->
  loop().
loop() ->
  X = 1,
  io:fwrite("~B\n",X),
  end.

71 days 17 hours ago view (lines: 8, size: 111, inputs: 1) Erlang Compilation error

1
2
3
4
5
6
7
8
-module(prog).
-export([main/0]).
 
main() ->
        loop().
loop() ->
        io:fwrite("hello"),
        end.

71 days 17 hours ago view (lines: 5, size: 115, inputs: 1) Erlang Compilation error

1
2
3
4
5
-module(prog).
-export([main/0]).
 
main() ->
        io:fwrite("~w~n", [lists:map(fun((A) -> A + 3), lists:seq(1, 100))]).

71 days 17 hours ago view (lines: 8, size: 410, inputs: 1) Erlang Success

1
2
3
4
5
6
7
8
-module(prog).
-export([main/0, p_triplets/1]).
 
main() ->
    io:fwrite("Pythagorean triplets where the sum is 1000: ~w~n", [p_triplets(500)]).
 
p_triplets(MaxValue) when MaxValue >= 1 ->
    [{{A, B, (1000 - A - B)}, A + B + (1000 - A - B), A * B * (1000 - A - B)} || A <- lists:seq(1, MaxValue), B <- lists:seq(1, MaxValue), A * A + B * B == (1000 - A - B) * (1000 - A - B), A + B + (1000 - A - B) == 1000].

71 days 18 hours ago view (lines: 6, size: 67, inputs: 1) Erlang Success

1
2
3
4
5
-module(prog).
-export([main/0]).
 
main() ->
  io:fwrite("hello").

71 days 18 hours ago view (lines: 7, size: 114, inputs: 1) Erlang Internal error

1
2
3
4
5
6
7
-module(prog).
-export([main/0]).
 
main() ->
  io:fwrite("hello").
 
double(L) -> list:map(fun(E) -> E * 2 end, L).

71 days 18 hours ago view (lines: 8, size: 160, inputs: 1) Erlang Success

1
2
3
4
5
6
7
8
-module(prog).
-export([main/0]).
 
main() ->
  Result = double([1, 2, 3, 4, 5, 6]),
  io:fwrite("~p", [Result]).
 
double(L) -> list:map(fun(E) -> E * 2 end, L).

71 days 18 hours ago view (lines: 8, size: 160, inputs: 1) Erlang Success

1
2
3
4
5
6
7
8
-module(prog).
-export([main/0]).
 
main() ->
  Result = double([1, 2, 3, 4, 5, 6]),
  io:format("~p", [Result]).
 
double(L) -> list:map(fun(E) -> E * 2 end, L).

71 days 18 hours ago view (lines: 8, size: 161, inputs: 1) Erlang Compilation error

1
2
3
4
5
6
7
8
-module(prog).
-export([main/0]).
 
main(_) ->
  Result = double([1, 2, 3, 4, 5, 6]),
  io:format("~p", [Result]).
 
double(L) -> list:map(fun(E) -> E * 2 end, L).

71 days 18 hours ago view (lines: 5, size: 126, inputs: 1) Erlang Compilation error

1
2
3
4
5
main(_) ->
  Result = double([1, 2, 3, 4, 5, 6]),
  io:format("~p", [Result]).
 
double(L) -> list:map(fun(E) -> E * 2 end, L).

71 days 19 hours ago view (lines: 16, size: 201, inputs: 1) Erlang Success

1
2
3
4
5
6
7
8
9
-module(prog).
-export([main/0]).
 
main() ->
        case io:fread("", "~d") of
                eof ->
                        true;
                {ok, X} ->
                        if
 ...

71 days 21 hours ago view (lines: 18, size: 233, inputs: 1) Erlang Compilation error

1
2
3
4
5
6
7
8
9
-module(prog).
-export([main/0]).
 
main() -> mainloop().
 
mainloop() ->
        case io:fread("", "~d") of
                eof ->
                        true;
 ...

71 days 21 hours ago view (lines: 19, size: 526, inputs: 1) Erlang Success

1
2
3
4
5
6
7
8
9
-module(prog).
-export([main/0]).
 
main() ->
        loop().
loop() ->
        case io:fread( "","~d" ) of
                eof ->
                        true;
 ...

71 days 21 hours ago view (lines: 18, size: 232, inputs: 1) Erlang Success

1
2
3
4
5
6
7
8
9
-module(prog).
-export([main/0]).
 
main() -> mainloop().
 
mainloop() ->
        case io:fread("", "~d") of
                eof ->
                        true;
 ...

71 days 21 hours ago view (lines: 18, size: 233, inputs: 1) Erlang Compilation error

1
2
3
4
5
6
7
8
9
-module(hello).
-export([main/0]).
 
main() -> mainloop().
 
mainloop() ->
        case io:fread("", "~d") of
                eof ->
                        true;
 ...

71 days 21 hours ago view (lines: 18, size: 231, inputs: 1) Erlang Compilation error

1
2
3
4
5
6
7
8
9
-module(hello).
-export(main/0).
 
main() -> mainloop().
 
mainloop() ->
        case io:fread("", "~d") of
                eof ->
                        true;
 ...

71 days 21 hours ago view (lines: 18, size: 227, inputs: 1) Erlang Compilation error

1
2
3
4
5
6
7
8
9
-module(hello).
-export(main/0).
 
main() -> mainloop().
 
mainloop() ->
        case io:fread("", "~d") of
                eof ->
                        true;
 ...

71 days 22 hours ago view (lines: 18, size: 360, inputs: 1) Erlang Success

1
2
3
4
5
6
7
8
9
-module(prog).
-export([run/0, counter/1]).
   
run() ->
    S = spawn(counter, counter, [0]),
    send_msgs(S, 100000),
    S.
 
counter(Sum) ->
 ...

71 days 22 hours ago view (lines: 18, size: 363, inputs: 1) Erlang Compilation error

1
2
3
4
5
6
7
8
9
-module(counter).
-export([run/0, counter/1]).
   
run() ->
    S = spawn(counter, counter, [0]),
    send_msgs(S, 100000),
    S.
 
counter(Sum) ->
 ...

71 days 22 hours ago view (lines: 8, size: 144, inputs: 1) Erlang Success stateofmind

1
2
3
4
5
6
7
-module(prog).
-export([main/0]).
 
main() ->
        Nums = [1, 313, 1900, 31, 4],
        SNums = lists:sort(Nums),
        io:format("~w", [SNums]).

71 days 23 hours ago view (lines: 5, size: 58, inputs: 1) Erlang Success

1
2
3
4
5
-module(prog).
-export([main/0]).
 
main() ->
        true.

71 days 23 hours ago view (lines: 5, size: 58, inputs: 1) Erlang Success

1
2
3
4
5
-module(prog).
-export([main/0]).
 
main() ->
        true.

72 days 13 hours ago view (lines: 42, size: 935, inputs: 9) Erlang Success

1
2
3
4
5
6
7
8
9
-module(prog).
-compile(export_all).
-define(R, 503).
 
%% main -program start point
main() -> 
        io:format("Main at: ~p~n",[self()]),
        case io:fread("","~d") of
                eof -> false;
 ...

72 days 19 hours ago view (lines: 42, size: 935, inputs: 9) Erlang Success

1
2
3
4
5
6
7
8
9
-module(prog).
-compile(export_all).
-define(R, 503).
 
%% main -program start point
main() -> 
        io:format("Main at: ~p~n",[self()]),
        case io:fread("","~d") of
                eof -> false;
 ...

72 days 19 hours ago view (lines: 42, size: 935, inputs: 9) Erlang Internal error

1
2
3
4
5
6
7
8
9
-module(prog).
-compile(export_all).
-define(R, 503).
 
%% main -program start point
main() -> 
        io:format("Main at: ~p~n",[self()]),
        case io:fread("","~d") of
                eof -> false;
 ...

72 days 19 hours ago view (lines: 42, size: 935, inputs: 9) Erlang Success

1
2
3
4
5
6
7
8
9
-module(prog).
-compile(export_all).
-define(R, 503).
 
%% main -program start point
main() -> 
        io:format("Main at: ~p~n",[self()]),
        case io:fread("","~d") of
                eof -> false;
 ...

72 days 19 hours ago view (lines: 42, size: 935, inputs: 9) Erlang Success

1
2
3
4
5
6
7
8
9
-module(prog).
-compile(export_all).
-define(R, 503).
 
%% main -program start point
main() -> 
        io:format("Main at: ~p~n",[self()]),
        case io:fread("","~d") of
                eof -> false;
 ...

page: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40

1 2 3 4 5 6 7 8 9	-module(prog). -export([main/0]). main() -> loop(). loop() -> case io:fread( "","~d" ) of eof -> true;
...

1 2 3 4 5 6 7 8 9	-module(hello). -export([main/0]). main() -> mainloop(). mainloop() -> case io:fread("", "~d") of eof -> true;
...

1 2 3 4 5 6 7 8 9	-module(hello). -export(main/0). main() -> mainloop(). mainloop() -> case io:fread("", "~d") of eof -> true;
...

1 2 3 4 5 6 7 8 9	-module(prog). -export([run/0, counter/1]). run() -> S = spawn(counter, counter, [0]), send_msgs(S, 100000), S. counter(Sum) ->
...

1 2 3 4 5 6 7 8 9	-module(counter). -export([run/0, counter/1]). run() -> S = spawn(counter, counter, [0]), send_msgs(S, 100000), S. counter(Sum) ->
...

1 2 3 4 5 6 7 8 9	-module(prog). -compile(export_all). -define(R, 503). %% main -program start point main() -> io:format("Main at: ~p~n",[self()]), case io:fread("","~d") of eof -> false;
...

UsernamePassword

Username
Password