Как эффективно перечислить все частичные порядки на конечном множестве?
Я хочу проверить, существует ли частичный заказ с указанными свойствами. Чтобы проверить это, я переберу грубой силой все возможные частичные порядки на малых конечных множествах.
Prelude Data.List> concatMap permutations . subsequences $ ["x","y","z"]
, который будет перечислять:[[],["x"],["y"],["x","y"],["y","x"],["z"],["x","z"],["z","x"],["y","z"],["z","y"],["x","y","z"],["y","x","z"],["z","y","x"],["y","z","x"],["z","x","y"],["x","z","y"]]
- person גלעד ברקן   schedule 23.04.2013