-get_tuples_avant(Table, Id, N) ->
- get_tuples_avant(Table, Id, N, []).
-get_tuples_avant(_, '$end_of_table', _, Tuples) -> Tuples;
-get_tuples_avant(_, _, 0, Tuples) ->
- Tuples;
-get_tuples_avant(Table, Id, N, Tuples) ->
- [T] = mnesia:read({Table, Id}),
- get_tuples_avant(Table, mnesia:prev(Table, Id), N - 1, [T | Tuples]).