pairs 0.1.0 → 0.2.0

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: 15663f641b3dd19d88544bcb8f2a76c5ba71a954
-  data.tar.gz: 06245a8493128bc129b55163dbbfcd7014d43f4a
+  metadata.gz: 1c45b4690d8e587e6f573da694da1e9c2de38765
+  data.tar.gz: 8fb165db6f151c56d7f46cb02db8f7cfef578a74
 SHA512:
-  metadata.gz: 7349ecdb60cb5518f634bf525c781fdbd7a968f4526e99ad3917c722055fdb0fb77bf33dda9f866703d8204e82be074a9ee5fdb2370827e5147385b4bb152e21
-  data.tar.gz: e91e1664c55340d8e3cabcc92b8cfce40b987dc34945b3d3f63e8da1749df7cec7b3bb4ba08c44f83bd2e7e764e8b275d090d0db1b7779a57636dcaed0da8a48
+  metadata.gz: fe982314f97243308c4c5f5084e709c7a840ba66742a2a0450a3eca596e5599522f6954171edd4c591fdac8136c6a17a9292bee13203c489264ef276d4856659
+  data.tar.gz: e9b9181531de3bc6b8960b9f962a97eb093f224621fc9394c2e37de679f5fb7e366fbd583fe5f7d7a7b54e9b1803542c385cb84aceade2ad00551ecd9330e112

data/CHANGELOG.md

@@ -1,5 +1,12 @@
 # Changelog
 
+## 0.2.0
+
+* Add helper constraints `together`, `separate`, `alone`, and `accompanied`
+* Change max_attempts to 10,000
+* Raise an error if unsolvable
+* Create predicate methods for use in constraints
+
 ## 0.1.0
 
 * Initial release, basic constraints

data/lib/pairs.rb

@@ -1,7 +1,11 @@
 class Pairs
+  class NoSolutionError < StandardError; end
+
   attr_reader :max_attempts, :block
 
-  def initialize(max_attempts: 1000, &block)
+  MAX_ATTEMPTS = 10_000
+
+  def initialize(max_attempts: MAX_ATTEMPTS, &block)
     @max_attempts = max_attempts
     @block = block
   end
@@ -16,10 +20,6 @@ class Pairs
       until all.empty?
         these = all.sample(2)
 
-        next unless clean_room.__constraints__.all? { |constraint|
-          constraint.call(these)
-        }
-
         result << these
 
         these.each do |item|
@@ -27,8 +27,14 @@ class Pairs
         end
       end
 
-      return result
+      return result if clean_room.__constraints__.all? { |constraint|
+        result.all? { |pair|
+          constraint.call(pair)
+        }
+      }
     end
+
+    raise NoSolutionError
   end
 
   def solution
@@ -54,9 +60,32 @@ class Pairs
       __constraints__ << block
     end
 
+    def together(a, b)
+      constraint { |both| both.include?(a) ? both.include?(b) : true }
+    end
+
+    def separate(a, b)
+      constraint { |both| both.include?(a) ? !both.include?(b) : true }
+    end
+
+    def alone(a)
+      constraint { |both| both.include?(a) ? both == [a] : true }
+    end
+
+    def accompanied(a)
+      constraint { |both| both.include?(a) ? both.count == 2 : true }
+    end
+
     def method_missing(method_name, *args, &block)
       return super unless args.count == 1
 
+      predicate_method_name = "#{method_name}?".intern
+      unless methods.include?(predicate_method_name)
+        define_singleton_method(predicate_method_name) do |item|
+          __items__[method_name].include?(item)
+        end
+      end
+
       __items__[method_name] ||= []
       __items__[method_name] << args.first
     end

data/pairs.gemspec

@@ -4,12 +4,12 @@ $LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
 
 Gem::Specification.new do |spec|
   spec.name          = "pairs"
-  spec.version       = "0.1.0"
+  spec.version       = "0.2.0"
   spec.authors       = ["Justin Campbell"]
   spec.email         = ["justin@justincampbell.me"]
   spec.summary       = "Constraint solver for pairs"
   spec.description   = "Constraint solver for pairs"
-  spec.homepage      = ""
+  spec.homepage      = "https://github.com/justincampbell/pairs"
   spec.license       = "MIT"
 
   spec.files         = `git ls-files -z`.split("\x0")

data/spec/lib/pairs_spec.rb

@@ -1,7 +1,8 @@
 require 'spec_helper'
 
 describe Pairs do
-  let(:pairs) { Pairs.new(&block) }
+  let(:pairs) { Pairs.new(max_attempts: max_attempts, &block) }
+  let(:max_attempts) { Pairs::MAX_ATTEMPTS }
   let(:block) { -> { } }
   let(:solution) { pairs.solution }
 
@@ -60,4 +61,97 @@ describe Pairs do
       end
     end
   end
+
+  context "with an unsolvable constraint" do
+    let(:block) {
+      -> {
+        n 1; n 2; n 3
+        constraint { |both| both.reduce(:+) == 100 }
+      }
+    }
+    let(:max_attempts) { 1 }
+
+    generative do
+      it "raises a NoSolutionError" do
+        expect { solution }.to raise_error(Pairs::NoSolutionError)
+      end
+    end
+  end
+
+  context "with predicate constraints" do
+    let(:block) {
+      -> {
+        good "a"; good "b"; bad "c"; bad "d"
+        constraint { |a, b| !(bad?(a) && bad?(b)) }
+      }
+    }
+
+    generative do
+      it "returns a solution" do
+        expect(solution.size).to eq(2)
+      end
+    end
+  end
+
+  describe "#together" do
+    let(:block) {
+      -> {
+        item "a"; item "b"; item "c"; item "d"
+        together "a", "b"
+      }
+    }
+
+    generative do
+      it "keeps those 2 items together" do
+        expect(solution.any? { |both| both.sort == %w[a b] }).to eq(true)
+      end
+    end
+  end
+
+  describe "#separate" do
+    let(:block) {
+      -> {
+        item "a"; item "b"; item "c"; item "d"
+        separate "a", "b"
+      }
+    }
+
+    generative do
+      it "keeps those 2 items separate" do
+        expect(solution.any? { |both| both.sort == %w[a b] }).to_not eq(true)
+      end
+    end
+  end
+
+  describe "#alone" do
+    context "with an odd number" do
+      let(:block) {
+        -> {
+          item "a"; item "b"; item "c"
+          alone "c"
+        }
+      }
+
+      generative do
+        it "keeps that item alone" do
+          expect(solution.last).to eq(["c"])
+        end
+      end
+    end
+  end
+
+  describe "#accompanied" do
+    let(:block) {
+      -> {
+        item "a"; item "b"; item "c"
+        accompanied "c"
+      }
+    }
+
+    generative do
+      it "ensures that item is accompanied" do
+        expect(solution.first).to include("c")
+      end
+    end
+  end
 end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: pairs
 version: !ruby/object:Gem::Version
-  version: 0.1.0
+  version: 0.2.0
 platform: ruby
 authors:
 - Justin Campbell
@@ -84,7 +84,7 @@ files:
 - pairs.gemspec
 - spec/lib/pairs_spec.rb
 - spec/spec_helper.rb
-homepage: ''
+homepage: https://github.com/justincampbell/pairs
 licenses:
 - MIT
 metadata: {}