Skip to content

Instantly share code, notes, and snippets.

@evanmiller67

evanmiller67/evan_sets.erl

Created November 13, 2014 19:59
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save evanmiller67/d6d0ebce9d53b3c9e677 to your computer and use it in GitHub Desktop.
Save evanmiller67/d6d0ebce9d53b3c9e677 to your computer and use it in GitHub Desktop.
Download ZIP
Sample CRUD operations for sets.
Raw
evan_sets.erl
-module(evan_sets).
-compile(export_all).
create(Set, Element) ->
sets:add_element(Element, Set).
read(Set, Element) ->
case sets:is_element(Element, Set) of
true ->
Element;
false ->
fail
end.
update(Set, Element, NewElement) ->
Set2 = sets:new(),
Set3 = sets:subtract(Set, evan_sets:create(Set2, Element)),
sets:add_element(NewElement, Set3).
delete(Set, Element) ->
sets:del_element(Element, Set).
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment