Skip to content

Instantly share code, notes, and snippets.

@cemerick
Created February 14, 2019 17:46
Show Gist options
  • Save cemerick/b416d984e61864d41edcf2aacafb5b17 to your computer and use it in GitHub Desktop.
Save cemerick/b416d984e61864d41edcf2aacafb5b17 to your computer and use it in GitHub Desktop.
let rec sweep responsibility t =
let neighbors = of_list t.members
|> filter (G.bounds %> extentEligible)
|> filter (distinct seenMembers G.bounds) in
|> persistent
if not @@ is_empty neighbors
then neighbors
else do_something_else
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment