gistfile1.erl

1> Pins = [23, 24, 25].
[23,24,25]
2> [pie:gpio_init(Pin, input) || Pin <- Pins].
[ok,ok,ok]
3> io:format("~p~n", [{[[pie:gpio_read(Pin) || Pin <- Pins] || _ <- lists:seq(1, 100)]}]).
{[[0,0,0],
  [0,0,0],
...
ok
4> io:format("~p~n", [{[[pie:gpio_read(Pin) || Pin <- Pins] || _ <- lists:seq(1, 100)]}]).
{[[0,0,0],
  [0,0,0],
...
ok
5> io:format("~p~n", [{[[pie:gpio_read(Pin) || Pin <- Pins] || _ <- lists:seq(1, 100)]}]).
{[[0,0,0],
  [0,0,0],
  [0,0,0],
  [0,0,0],
  [0,0,0],

...
  [0,0,value],
  [value,value,value],
  [value,value,value],
...
  [value,value,24],
  [24,24,24],
  [24,24,24],
  [24,24,24],
  [24,24,24],
...
  [24,24,24],
  [pie,pie,pie],
  [pie,pie,pie],
  [pie,pie,pie],
  [pie,pie,pie],
  [pie,pie,pie]}
ok
7>