public
Last active

  • Download Gist
index.erl
Erlang
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
-module(index).
 
-compile(export_all).
 
invert({Ks, Image}) ->
[{K, Image} || K <- Ks].
 
update_index(KIs, Index0) ->
lists:foldl(fun({K, I}, Acc) ->
dict:append(K, I, Acc)
end,
Index0, KIs).
build_index(Docs) ->
Index = dict:new(),
lists:foldl(fun (Doc, Acc) -> update_index(invert(Doc), Acc) end,
Index, Docs).

Please sign in to comment on this gist.

Something went wrong with that request. Please try again.