pr
elements
c(1,2)
eqs
list(list(c(1,2)),
list(c(2), c()),
list(c(1)))
coalitionLookup
function(coalition)
elementLookup
function(element)