fork download
copy 
  1. -module(prog).
  2. -export([main/0]).
  3.  
  4. main() ->
  5.   return_positions([a, b, c]).
  6.  
  7. return_positions(X) ->
  8.   return_positions(X, [], 1).
  9. return_positions([], Out, _I) ->
  10.   lists:reverse(Out);
  11. return_positions([Head | Tail], Out, I) ->
  12.   return_positions(Tail, [{Head, I}] ++ Out, I + 1).
Success #stdin #stdout 0.21s 8448KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Standard output is empty
https://ideone.com/S0Rr9
language:
Erlang (erl 21.3.8)
created:
14 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!