Je me souviens avoir fait ça (pour m'amuser, il y a une dizaine d'années) :D

avec un résultat comme ça:


(bs-solve '((3 . 0) (5 . 0) (8 . 8)) 4 "Buckets")
=>
(0 0 8) [3 -> 2] (0 5 3)
(0 5...