gecoder 0.8.3 → 0.9.0

data/specs/constraints/bool_enum_relation.rb

@@ -1,160 +0,0 @@
-require File.dirname(__FILE__) + '/../spec_helper'
-require File.dirname(__FILE__) + '/constraint_helper'
-
-class BoolEnumSampleProblem < Gecode::Model
-  attr :bools
-  attr :b1
-  attr :b2
-  
-  def initialize
-    @bools = bool_var_array(4)
-    @b1 = bool_var
-    @b2 = bool_var
-    branch_on @bools
-    branch_on wrap_enum([@b1, @b2])
-  end
-end
-
-# Expects @stub, which contains the started constraint and @compute_result 
-# which computes whether the left hand side is true or not.
-describe 'bool enum relation constraint', :shared => true do
-  it 'should handle being constrained to be true' do
-    @stub.must_be.true
-    @model.solve!
-    @compute_result.call.should be_true
-  end
-  
-  it 'should handle being constrained to be negated true' do
-    @stub.must_not_be.true
-    @model.solve!
-    @compute_result.call.should_not be_true
-  end
-  
-  it 'should handle being constrained to be false' do
-    @stub.must_be.false
-    @model.solve!
-    @compute_result.call.should_not be_true
-  end
-  
-  it 'should handle being constrained to be negated false' do
-    @stub.must_not_be.false
-    @model.solve!
-    @compute_result.call.should be_true
-  end
-  
-  it 'should handle being constrained to be equal to a variable' do
-    @stub.must_be == @b1
-    @model.solve!
-    @compute_result.call.should == @b1.value
-  end
-  
-  it 'should handle being constrained to not be equal to a variable' do
-    @stub.must_not_be == @b1
-    @model.solve!
-    @compute_result.call.should_not == @b1.value
-  end
-  
-  it 'should handle being constrained to be equal to be a nested expression' do
-    @stub.must_be == (@b1 | @b2) & @b1
-    @model.solve!
-    @compute_result.call.should == (@b1.value | @b2.value) & @b1.value
-  end
-  
-  it 'should handle being constrained to not be equal to be a nested expression' do
-    @stub.must_not_be == (@b1 | @b2) & @b1
-    @model.solve!
-    @compute_result.call.should_not == (@b1.value | @b2.value) & @b1.value
-  end
-end
-
-describe Gecode::Constraints::BoolEnum::Relation, ' (conjunction)' do
-  before do
-    @model = BoolEnumSampleProblem.new
-    @bools = @model.bools
-    @b1 = @model.b1
-    @b2 = @model.b2
-    
-    # For constraint option spec.
-    @invoke_options = lambda do |hash| 
-      @bools.conjunction.must.equal(@b1, hash) 
-      @model.solve!
-    end
-    @expect_options = option_expectation do |strength, kind, reif_var|
-      @model.allow_space_access do
-        if reif_var.nil?
-          Gecode::Raw.should_receive(:rel).once.with(
-            an_instance_of(Gecode::Raw::Space),
-            Gecode::Raw::BOT_AND, 
-            an_instance_of(Gecode::Raw::BoolVarArray),
-            an_instance_of(Gecode::Raw::BoolVar), 
-            strength, kind)
-        else
-          Gecode::Raw.should_receive(:rel).once.with(
-            an_instance_of(Gecode::Raw::Space), 
-            an_instance_of(Gecode::Raw::BoolVar),
-            anything,
-            an_instance_of(Gecode::Raw::BoolVar),
-            anything, anything)
-          Gecode::Raw.should_receive(:rel).once.with(
-            an_instance_of(Gecode::Raw::Space), 
-            Gecode::Raw::BOT_AND, 
-            an_instance_of(Gecode::Raw::BoolVarArray),
-            reif_var, strength, kind)
-        end
-      end
-    end
-    
-    # For bool enum spec.
-    @stub = @bools.conjunction
-    @compute_result = lambda{ @bools.all?{ |b| b.value } }
-  end
-  
-  it_should_behave_like 'bool enum relation constraint'
-  it_should_behave_like 'reifiable constraint'
-end
-
-describe Gecode::Constraints::BoolEnum::Relation, ' (disjunction)' do
-  before do
-    @model = BoolEnumSampleProblem.new
-    @bools = @model.bools
-    @b1 = @model.b1
-    @b2 = @model.b2
-    
-    # For constraint option spec.
-    @invoke_options = lambda do |hash| 
-      @bools.disjunction.must.equal(@b1, hash) 
-      @model.solve!
-    end
-    @expect_options = option_expectation do |strength, kind, reif_var|
-      @model.allow_space_access do
-        if reif_var.nil?
-          Gecode::Raw.should_receive(:rel).once.with(
-            an_instance_of(Gecode::Raw::Space), 
-            Gecode::Raw::BOT_OR, 
-            an_instance_of(Gecode::Raw::BoolVarArray),
-            an_instance_of(Gecode::Raw::BoolVar), 
-            strength, kind)
-        else
-          Gecode::Raw.should_receive(:rel).once.with(
-            an_instance_of(Gecode::Raw::Space), 
-            an_instance_of(Gecode::Raw::BoolVar),
-            anything,
-            an_instance_of(Gecode::Raw::BoolVar),
-            anything, anything)          
-          Gecode::Raw.should_receive(:rel).once.with(
-            an_instance_of(Gecode::Raw::Space), 
-            Gecode::Raw::BOT_OR, 
-            an_instance_of(Gecode::Raw::BoolVarArray),
-            reif_var, strength, kind)
-        end
-      end
-    end
-    
-    # For bool enum spec.
-    @stub = @bools.disjunction
-    @compute_result = lambda{ @bools.any?{ |b| b.value } }
-  end
-  
-  it_should_behave_like 'bool enum relation constraint'
-  it_should_behave_like 'reifiable constraint'
-end

data/specs/constraints/cardinality.rb

@@ -1,157 +0,0 @@
-require File.dirname(__FILE__) + '/../spec_helper'
-require File.dirname(__FILE__) + '/constraint_helper'
-
-describe Gecode::Constraints::Set::Cardinality, ' (range)' do
-  before do
-    @model = Gecode::Model.new
-    @set = @model.set_var([], 0..10)
-    @model.branch_on @model.wrap_enum([@set])
-    @range = 1..2
-    @three_dot_range = 1...2
-    
-    @invoke_options = lambda do |hash| 
-      @set.size.must_be.in(@range, hash) 
-    end
-    
-    @invoke = lambda do |rhs| 
-      @set.size.must_be.in(rhs) 
-      @model.solve!
-    end
-    @expect = lambda do |rhs|
-      @model.allow_space_access do
-        Gecode::Raw.should_receive(:cardinality).once.with(
-          an_instance_of(Gecode::Raw::Space), 
-          an_instance_of(Gecode::Raw::SetVar), rhs.first, rhs.last)
-      end
-    end
-  end
-  
-  it 'should translate cardinality constraints with ranges' do
-    @expect.call(@range)
-    @invoke.call(@range)
-  end
-
-  it 'should translate cardinality constraints with three dot range domains' do
-    @expect.call(@three_dot_range)
-    @invoke.call(@three_dot_range)
-  end
-  
-  it 'should constrain the cardinality of a set' do
-    @set.size.must_be.in @range
-    @model.solve!
-    @range.should include(@set.value.size)
-  end
-  
-  it 'should raise error if the right hand side is not a range' do
-    lambda{ @set.size.must_be.in 'hello' }.should raise_error(TypeError)
-  end
-  
-  it 'should not shadow the integer variable domain constrain' do
-    Gecode::Raw.should_receive(:dom).with(
-      an_instance_of(Gecode::Raw::Space), 
-      an_instance_of(Gecode::Raw::IntVar), 0, 11, Gecode::Raw::ICL_DEF, 
-      Gecode::Raw::PK_DEF)
-    Gecode::Raw.should_receive(:dom).with(
-      an_instance_of(Gecode::Raw::Space), 
-      an_instance_of(Gecode::Raw::IntVar), an_instance_of(Gecode::Raw::IntSet), 
-      an_instance_of(Gecode::Raw::BoolVar), Gecode::Raw::ICL_DEF, 
-      Gecode::Raw::PK_DEF)
-    @set.size.must_not_be.in [1,3]
-    @model.solve!
-  end
-  
-  it_should_behave_like 'non-reifiable set constraint'
-end
-
-describe Gecode::Constraints::Set::Cardinality, ' (composite)' do
-  before do
-    @model = Gecode::Model.new
-    @set = @model.set_var([], 0..10)
-    @target = @var = @model.int_var(0..11)
-    @model.branch_on @model.wrap_enum([@set])
-    @model.branch_on @model.wrap_enum([@var])
-    
-    @invoke = lambda do |rhs| 
-      @set.size.must == rhs 
-      @model.solve!
-    end
-    @expect = lambda do |relation, rhs, strength, kind, reif_var, negated|
-      @model.allow_space_access do
-        rhs = an_instance_of(Gecode::Raw::IntVar) if rhs.respond_to? :bind
-        if reif_var.nil?
-          if !negated and relation == Gecode::Raw::IRT_EQ and 
-              !rhs.kind_of? Fixnum
-            Gecode::Raw.should_receive(:cardinality).once.with( 
-              an_instance_of(Gecode::Raw::Space), 
-              an_instance_of(Gecode::Raw::SetVar), rhs)
-            Gecode::Raw.should_receive(:rel).exactly(0).times
-          else
-            Gecode::Raw.should_receive(:cardinality).once.with(
-              an_instance_of(Gecode::Raw::Space), 
-              an_instance_of(Gecode::Raw::SetVar), 
-              an_instance_of(Gecode::Raw::IntVar))
-            Gecode::Raw.should_receive(:rel).once.with(
-              an_instance_of(Gecode::Raw::Space), 
-              an_instance_of(Gecode::Raw::IntVar), relation, rhs, 
-              strength, kind)
-          end
-        else
-          Gecode::Raw.should_receive(:cardinality).once.with(
-            an_instance_of(Gecode::Raw::Space), 
-            an_instance_of(Gecode::Raw::SetVar), 
-            an_instance_of(Gecode::Raw::IntVar))
-          Gecode::Raw.should_receive(:rel).once.with(
-            an_instance_of(Gecode::Raw::Space), 
-            an_instance_of(Gecode::Raw::IntVar), relation, rhs,
-            an_instance_of(Gecode::Raw::BoolVar),
-            strength, kind)
-        end
-      end
-    end
-    
-    # For composite spec.
-    @invoke_relation = lambda do |relation, target, negated|
-      if negated
-        @set.size.must_not.send(relation, target)
-      else
-        @set.size.must.send(relation, target)
-      end
-      @model.solve!
-    end
-    @expect_relation = lambda do |relation, target, negated|
-      @expect.call(relation, target, Gecode::Raw::ICL_DEF,  Gecode::Raw::PK_DEF,
-        nil, negated)
-    end
-    
-    # For options spec.
-    @invoke_options = lambda do |hash|
-      @set.size.must_be.less_than_or_equal_to(17, hash)
-      @model.solve!
-    end
-    @expect_options = option_expectation do |strength, kind, reif_var|
-      @expect.call(Gecode::Raw::IRT_LQ, 17, strength, kind, reif_var, false)
-    end
-  end
-  
-  it 'should constrain the cardinality of a set' do
-    @set.size.must == @var
-    @model.solve!
-    @set.value.size.should == @var.value
-  end
-  
-  it 'should constrain the cardinality of a set (2)' do
-    @set.size.must == 2
-    @model.solve!.should_not be_nil
-    @set.value.size.should == 2
-  end
-
-  it 'should constrain the cardinality of a set (3)' do
-    @set.size.must == @var
-    @var.must == 2
-    @model.solve!
-    @set.value.size.should == 2
-  end
-  
-  it_should_behave_like 'reifiable constraint'
-  it_should_behave_like 'composite constraint'
-end

data/specs/constraints/channel.rb

@@ -1,454 +0,0 @@
-require File.dirname(__FILE__) + '/../spec_helper'
-require File.dirname(__FILE__) + '/constraint_helper'
-
-class ChannelSampleProblem < Gecode::Model
-  attr :elements
-  attr :positions
-  attr :sets
-  
-  def initialize
-    @elements = int_var_array(4, 0..3)
-    @elements.must_be.distinct
-    @positions = int_var_array(4, 0..3)
-    @positions.must_be.distinct
-    @sets = set_var_array(4, [], 0..3)
-    branch_on @positions
-  end
-end
-
-class BoolChannelSampleProblem < Gecode::Model
-  attr :bool_enum
-  attr :bool
-  attr :int
-  
-  def initialize
-    @bool_enum = bool_var_array(4)
-    @int = int_var(0..3)
-    @bool = bool_var
-    
-    branch_on @int
-  end
-end
-
-class SetChannelSampleProblem < Gecode::Model
-  attr :bool_enum
-  attr :set
-  
-  def initialize
-    @bool_enum = bool_var_array(4)
-    @set = set_var([], 0..3)
-    
-    branch_on @bool_enum
-  end
-end
-
-
-describe Gecode::Constraints::IntEnum::Channel, ' (two int enums)' do
-  before do
-    @model = ChannelSampleProblem.new
-    @positions = @model.positions
-    @elements = @model.elements
-    @invoke_options = lambda do |hash| 
-      @positions.must.channel @elements, hash
-      @model.solve!
-    end
-    @expect_options = option_expectation do |strength, kind, reif_var|
-      Gecode::Raw.should_receive(:channel).once.with(
-        an_instance_of(Gecode::Raw::Space), 
-        an_instance_of(Gecode::Raw::IntVarArray), 
-        an_instance_of(Gecode::Raw::IntVarArray), strength, kind)
-    end
-  end
-
-  it 'should translate into a channel constraint' do
-    Gecode::Raw.should_receive(:channel).once.with(
-      an_instance_of(Gecode::Raw::Space), 
-      anything, anything, Gecode::Raw::ICL_DEF, Gecode::Raw::PK_DEF)
-    @invoke_options.call({})
-  end
-
-  it 'should constrain variables to be channelled' do
-    @elements.must.channel @positions
-    @model.solve!
-    elements = @model.elements.values
-    positions = @model.elements.values
-    elements.each_with_index do |element, i|
-      element.should equal(positions.index(i))
-    end
-  end
-
-  it 'should not allow negation' do
-    lambda{ @elements.must_not.channel @positions }.should raise_error(
-      Gecode::MissingConstraintError) 
-  end
-  
-  it 'should raise error for unsupported right hand sides' do
-    lambda{ @elements.must.channel 'hello' }.should raise_error(TypeError) 
-  end
-  
-  it_should_behave_like 'non-reifiable constraint'
-end
-
-describe Gecode::Constraints::SetEnum::Channel::IntChannelConstraint, ' (channel with set as right hand side)' do
-  before do
-    @model = ChannelSampleProblem.new
-    @positions = @model.positions
-    @sets = @model.sets
-    
-    @invoke_options = lambda do |hash| 
-      @positions.must.channel @sets, hash
-      @model.solve!
-    end
-    @expect_options = option_expectation do |strength, kind, reif_var|
-      Gecode::Raw.should_receive(:channel).once.with(
-        an_instance_of(Gecode::Raw::Space), 
-        an_instance_of(Gecode::Raw::IntVarArray), 
-        an_instance_of(Gecode::Raw::SetVarArray))
-    end
-  end
-
-  it 'should translate into a channel constraint' do
-    @expect_options.call({})
-    @positions.must.channel @sets
-    @model.solve!
-  end
-  
-  it 'should constrain variables to be channelled' do
-    @positions.must.channel @sets
-    @model.solve!
-    sets = @model.sets
-    positions = @model.positions.values
-    positions.each_with_index do |position, i|
-      sets[position].value.should include(i)
-    end
-  end
-  
-  it_should_behave_like 'non-reifiable set constraint'
-end
-
-describe Gecode::Constraints::SetEnum::Channel::IntChannelConstraint, ' (channel with set as left hand side)' do
-  before do
-    @model = ChannelSampleProblem.new
-    @positions = @model.positions
-    @sets = @model.sets
-    
-    @invoke_options = lambda do |hash| 
-      @sets.must.channel @positions, hash
-      @model.solve!
-    end
-    @expect_options = option_expectation do |strength, kind, reif_var|
-      Gecode::Raw.should_receive(:channel).once.with(
-        an_instance_of(Gecode::Raw::Space), 
-        an_instance_of(Gecode::Raw::IntVarArray), 
-        an_instance_of(Gecode::Raw::SetVarArray))
-    end
-  end
-
-  it 'should translate into a channel constraint' do
-    @expect_options.call({})
-    @sets.must.channel @positions
-    @model.solve!
-  end
-
-  it 'should not allow negation' do
-    lambda{ @sets.must_not.channel @positions }.should raise_error(
-      Gecode::MissingConstraintError) 
-  end
-  
-  it 'should raise error for unsupported right hand sides' do
-    lambda{ @sets.must.channel 'hello' }.should raise_error(TypeError) 
-  end
-  
-  it_should_behave_like 'non-reifiable set constraint'
-end
-
-# Requires @model, @bool and @int. Also requires @place_constraint which is a 
-# method that takes five variables: a boolean variable, an integer variable, 
-# the name of the equality method to use, whether or not the constraint should 
-# be negated and a hash of options, and places the channel constraint on them.
-describe 'channel constraint between one int and one bool variable', :shared => true do 
-  before do
-    @invoke_options = lambda do |hash| 
-      @place_constraint.call(@bool, @int, :==, false, hash)
-      @model.solve!
-    end
-    @expect_options = option_expectation do |strength, kind, reif_var|
-      Gecode::Raw.should_receive(:channel).once.with(
-        an_instance_of(Gecode::Raw::Space), 
-        an_instance_of(Gecode::Raw::IntVar), 
-        an_instance_of(Gecode::Raw::BoolVar), 
-        strength, kind)
-    end
-  end
-  
-  ([:==] + Gecode::Constraints::Util::COMPARISON_ALIASES[:==]).each do |ali|
-    it "should translate #{ali} into a channel constraint" do
-      @expect_options.call({})
-      @place_constraint.call(@bool, @int, ali, false, {})
-      @model.solve!
-    end
-  end
-  
-  it 'should constrain the int variable to be 1 when the boolean variable is true' do
-    @bool.must_be.true
-    @place_constraint.call(@bool, @int, :==, false, {})
-    @model.solve!
-    @int.value.should == 1
-  end
-  
-  it 'should constrain the int variable to be 0 when the boolean variable is false' do
-    @bool.must_be.false
-    @place_constraint.call(@bool, @int, :==, false, {})
-    @model.solve!
-    @int.value.should == 0
-  end
-  
-  it 'should not allow negation' do
-    lambda do
-      @place_constraint.call(@bool, @int, :==, true, {})
-    end.should raise_error(Gecode::MissingConstraintError) 
-  end
-  
-  it_should_behave_like 'non-reifiable constraint'
-end
-
-describe Gecode::Constraints::Int::Channel, ' (one int and one bool variable)' do
-  before do
-    @model = BoolChannelSampleProblem.new
-    @bool = @model.bool_var
-    @int = @model.int_var
-
-    @place_constraint = lambda do |bool, int, equals_method_name, negate, options|
-      if negate
-        int.must_not.method(equals_method_name).call(bool, options)
-      else
-        int.must.method(equals_method_name).call(bool, options)
-      end
-    end
-  end
-
-  it 'should not shadow linear boolean constraints' do
-    lambda do
-      (@bool + @bool).must == @bool
-      @model.solve!
-    end.should_not raise_error 
-  end
-  
-  it 'should raise error for unsupported right hand sides' do
-    lambda{ @int.must == 'hello' }.should raise_error(TypeError) 
-  end
-  
-  it_should_behave_like 'channel constraint between one int and one bool variable'
-end
-
-describe Gecode::Constraints::Int::Channel, ' (one bool and one int variable)' do
-  before do
-    @model = BoolChannelSampleProblem.new
-    @bool = @model.bool_var
-    @int = @model.int_var
-    
-    @place_constraint = lambda do |bool, int, equals_method_name, negate, options|
-      if negate
-        bool.must_not.method(equals_method_name).call(int, options)
-      else
-        bool.must.method(equals_method_name).call(int, options)
-      end
-    end
-  end
-  
-  it 'should not shadow linear boolean constraints' do
-    lambda do
-      @bool.must == @bool + @bool
-      @model.solve!
-    end.should_not raise_error 
-  end
-  
-  it 'should raise error for unsupported right hand sides' do
-    lambda{ @bool.must == 'hello' }.should raise_error(TypeError) 
-  end
-  
-  it_should_behave_like 'channel constraint between one int and one bool variable'
-end
-
-# Requires @model, @bool_enum and @int. Also requires @place_constraint which 
-# is a method that takes four variables: a boolean enum, an integer variable,
-# whether or not the constraint should be negated and a hash of options, and 
-# places the channel constraint on them.
-describe 'channel constraint between bool enum and int variable', :shared => true do
-  before do
-    @invoke_options = lambda do |hash| 
-      @place_constraint.call(@bools, @int, false, hash)
-      @model.solve!
-    end
-    @expect_options = option_expectation do |strength, kind, reif_var|
-      Gecode::Raw.should_receive(:channel).once.with(
-        an_instance_of(Gecode::Raw::Space), 
-        an_instance_of(Gecode::Raw::BoolVarArray),
-        an_instance_of(Gecode::Raw::IntVar), 0,
-        strength, kind)
-    end
-  end
-  
-  it 'should channel the bool enum with the integer variable' do
-    @int.must > 2
-    @place_constraint.call(@bools, @int, false, {})
-    @model.solve!.should_not be_nil
-    int_val = @int.value
-    @bools.values.each_with_index do |bool, index|
-      bool.should == (index == int_val)
-    end
-  end
-  
-  it 'should take the offset into account when channeling' do
-    @int.must > 2
-    offset = 1
-    @place_constraint.call(@bools, @int, false, :offset => offset)
-    @model.solve!.should_not be_nil
-    int_val = @int.value
-    @bools.values.each_with_index do |bool, index|
-      bool.should == (index + offset == int_val)
-    end
-  end
-
-  it 'should not allow negation' do
-    lambda do
-      @place_constraint.call(@bools, @int, true, {})
-    end.should raise_error(Gecode::MissingConstraintError) 
-  end
-  
-  it_should_behave_like 'non-reifiable constraint'
-end
-
-describe Gecode::Constraints::BoolEnum::Channel, ' (bool enum as lhs with int variable)' do
-  before do
-    @model = BoolChannelSampleProblem.new
-    @bools = @model.bool_enum
-    @int = @model.int
-    
-    @place_constraint = lambda do |bools, int, negate, options|
-      unless negate
-        bools.must.channel(int, options)
-      else
-        bools.must_not.channel(int, options)
-      end
-    end
-  end
-
-  it 'should raise error if an integer variable is not given as right hand side' do
-    lambda do
-      @bools.must.channel 'hello'
-    end.should raise_error(TypeError) 
-  end
-  
-  it_should_behave_like 'channel constraint between bool enum and int variable'
-end
-
-
-describe Gecode::Constraints::BoolEnum::Channel, ' (int variable as lhs with bool enum)' do
-  before do
-    @model = BoolChannelSampleProblem.new
-    @bools = @model.bool_enum
-    @int = @model.int
-    
-    @place_constraint = lambda do |bools, int, negate, options|
-      unless negate
-        int.must.channel(bools, options)
-      else
-        int.must_not.channel(bools, options)
-      end
-    end
-  end
-
-  it 'should raise error if a boolean enum is not given as right hand side' do
-    lambda do
-      @int.must.channel 'hello'
-    end.should raise_error(TypeError) 
-  end
-  
-  it_should_behave_like 'channel constraint between bool enum and int variable'
-end
-
-# Requires @model, @bool_enum and @set. Also requires @place_constraint which 
-# is a method that takes four variables: a boolean enum, a set variable,
-# whether or not the constraint should be negated and a hash of options, and 
-# places the channel constraint on them.
-describe 'channel constraint between set variable and bool enum', :shared => true do
-  before do
-    @invoke_options = lambda do |hash| 
-      @place_constraint.call(@bools, @set, false, hash)
-      @model.solve!
-    end
-    @expect_options = option_expectation do |strength, kind, reif_var|
-      Gecode::Raw.should_receive(:channel).once.with(
-        an_instance_of(Gecode::Raw::Space), 
-        an_instance_of(Gecode::Raw::BoolVarArray),
-        an_instance_of(Gecode::Raw::SetVar))
-    end
-  end
-  
-  it 'should channel the bool enum with the set variable' do
-    @set.must_be.superset_of [0, 2]
-    @place_constraint.call(@bools, @set, false, {})
-    @model.solve!.should_not be_nil
-    set_values = @set.value
-    @bools.values.each_with_index do |bool, index|
-      bool.should == set_values.include?(index)
-    end
-  end
-  
-  it 'should not allow negation' do
-    lambda do
-      @place_constraint.call(@bools, @set, true, {})
-    end.should raise_error(Gecode::MissingConstraintError) 
-  end
-  
-  it_should_behave_like 'non-reifiable set constraint'
-end
-
-describe Gecode::Constraints::Set::Channel, ' (set variable as lhs with bool enum)' do
-  before do
-    @model = SetChannelSampleProblem.new
-    @bools = @model.bool_enum
-    @set = @model.set
-    
-    @place_constraint = lambda do |bools, set, negate, options|
-      unless negate
-        set.must.channel(bools, options)
-      else
-        set.must_not.channel(bools, options)
-      end
-    end
-  end
-
-  it 'should raise error if a boolean enum is not given as right hand side' do
-    lambda do
-      @set.must.channel 'hello'
-    end.should raise_error(TypeError) 
-  end
-  
-  it_should_behave_like 'channel constraint between set variable and bool enum'
-end
-
-describe Gecode::Constraints::Set::Channel, ' (bool enum as lhs with set variable)' do
-  before do
-    @model = SetChannelSampleProblem.new
-    @bools = @model.bool_enum
-    @set = @model.set
-    
-    @place_constraint = lambda do |bools, set, negate, options|
-      unless negate
-        bools.must.channel(set, options)
-      else
-        bools.must_not.channel(set, options)
-      end
-    end
-  end
-
-  it 'should raise error if an integer variable is not given as right hand side' do
-    lambda do
-      @bools.must.channel 'hello'
-    end.should raise_error(TypeError) 
-  end
-  
-  it_should_behave_like 'channel constraint between set variable and bool enum'
-end