Tests working well

Tests correctly detect special sets.
Need to determine if set found is optimum.

Currently S(6) does not return optimum set.
lists via list monad doesn't overflow stack