1
0
This repository has been archived on 2025-03-06. You can view files and clone it, but cannot push or open issues or pull requests.
Jip J. Dekker 1d9faf38de Squashed 'software/gecode/' content from commit 313e8764
git-subtree-dir: software/gecode
git-subtree-split: 313e87646da4fc2752a70e83df16d993121a8e40
2021-06-16 14:02:33 +10:00

744 lines
18 KiB
C++
Executable File

/* -*- mode: C++; c-basic-offset: 2; indent-tabs-mode: nil -*- */
/*
* Main authors:
* Guido Tack <tack@gecode.org>
*
* Copyright:
* Guido Tack, 2004
*
* This file is part of Gecode, the generic constraint
* development environment:
* http://www.gecode.org
*
* Permission is hereby granted, free of charge, to any person obtaining
* a copy of this software and associated documentation files (the
* "Software"), to deal in the Software without restriction, including
* without limitation the rights to use, copy, modify, merge, publish,
* distribute, sublicense, and/or sell copies of the Software, and to
* permit persons to whom the Software is furnished to do so, subject to
* the following conditions:
*
* The above copyright notice and this permission notice shall be
* included in all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
* NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
* LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
* OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
* WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
*
*/
namespace Gecode { namespace Set {
/**
* \brief %Range iterator for a two-dimensional array
* \ingroup TaskActorSetView
*/
class ArrayRanges {
private:
int *_ranges;
int _size;
int _pos;
public:
/// \name Constructors and initialization
//@{
/// Default constructor
ArrayRanges(void) : _ranges(nullptr), _size(0), _pos(0) {}
/// Initialize with ranges for array \a ranges which is of size \a size
ArrayRanges(int *ranges, int size)
: _ranges(ranges), _size(size), _pos(0) {}
/// Initialize with ranges for array \a ranges which is of size \a size
void init(int* ranges, int size) {
_ranges = ranges; _size = size; _pos = 0;
}
//@}
/// \name Iteration control
//@{
/// Test whether iterator is still at a range or done
bool operator ()(void) const { return _pos<_size; }
/// Move iterator to next range (if possible)
void operator ++(void) { _pos++; }
//@}
/// \name Range access
//@{
/// Return smallest value of range
int min(void) const { return _ranges[_pos*2]; }
/// Return largest value of range
int max(void) const { return _ranges[_pos*2+1]; }
/// Return width of range (distance between minimum and maximum)
unsigned int width(void) const {
return static_cast<unsigned int>(_ranges[_pos*2+1]-_ranges[_pos*2]+1);
}
//@}
};
forceinline
ConstSetView::ConstSetView(void) : ranges(nullptr), size(0), domSize(0) {}
forceinline
ConstSetView::ConstSetView(Space& home, const IntSet& dom) {
size = dom.ranges();
domSize = 0;
if (size > 0) {
ranges = home.alloc<int>(2*size);
IntSetRanges dr(dom);
for (int i=0; dr(); ++dr, i+=2) {
int min = dr.min(); int max = dr.max();
ranges[i] = min;
ranges[i+1] = max;
domSize += static_cast<unsigned int>(max-min+1);
}
} else {
ranges = nullptr;
}
}
forceinline unsigned int
ConstSetView::glbSize(void) const { return domSize; }
forceinline unsigned int
ConstSetView::lubSize(void) const { return domSize; }
forceinline unsigned int
ConstSetView::unknownSize(void) const { return 0; }
forceinline bool
ConstSetView::contains(int i) const {
for (int j=size; j--; ) {
if (ranges[2*j+1] < i)
return false;
if (ranges[2*j] >= i)
return true;
}
return false;
}
forceinline bool
ConstSetView::notContains(int i) const {
return !contains(i);
}
forceinline unsigned int
ConstSetView::cardMin(void) const { return domSize; }
forceinline unsigned int
ConstSetView::cardMax(void) const { return domSize; }
forceinline int
ConstSetView::lubMin(void) const {
return size==0 ? BndSet::MIN_OF_EMPTY : ranges[0];
}
forceinline int
ConstSetView::lubMax(void) const {
return size==0 ? BndSet::MAX_OF_EMPTY : ranges[size*2-1];
}
forceinline int
ConstSetView::glbMin(void) const { return lubMin(); }
forceinline int
ConstSetView::glbMax(void) const { return lubMax(); }
forceinline ModEvent
ConstSetView::cardMin(Space&,unsigned int c) {
return c<=domSize ? ME_SET_NONE : ME_SET_FAILED;
}
forceinline ModEvent
ConstSetView::cardMax(Space&,unsigned int c) {
return c>=domSize ? ME_SET_NONE : ME_SET_FAILED;
}
forceinline ModEvent
ConstSetView::include(Space&,int c) {
return contains(c) ? ME_SET_NONE : ME_SET_FAILED;
}
forceinline ModEvent
ConstSetView::exclude(Space&,int c) {
return contains(c) ? ME_SET_FAILED : ME_SET_NONE;
}
forceinline ModEvent
ConstSetView::intersect(Space&,int c) {
return (size==0 ||
(size==1 &&
ranges[0]==ranges[1] && ranges[0]==c)) ?
ME_SET_NONE : ME_SET_FAILED;
}
forceinline ModEvent
ConstSetView::intersect(Space&,int i,int j) {
return (glbMin()>=i && glbMax()<=j) ?
ME_SET_NONE : ME_SET_FAILED;
}
forceinline ModEvent
ConstSetView::include(Space&,int i,int j) {
Iter::Ranges::Singleton single(i,j);
ArrayRanges ar(ranges, size);
return (single() && Iter::Ranges::subset(single, ar)) ?
ME_SET_NONE : ME_SET_FAILED;
}
forceinline ModEvent
ConstSetView::exclude(Space&,int i,int j) {
Iter::Ranges::Singleton single(i,j);
ArrayRanges ar(ranges, size);
return (single() && Iter::Ranges::subset(single, ar)) ?
ME_SET_FAILED : ME_SET_NONE;
}
template<class I> ModEvent
ConstSetView::excludeI(Space&,I& i) {
ArrayRanges ar(ranges, size);
return (i() && Iter::Ranges::subset(i, ar)) ? ME_SET_FAILED : ME_SET_NONE;
}
template<class I> ModEvent
ConstSetView::includeI(Space&,I& i) {
ArrayRanges ar(ranges, size);
return Iter::Ranges::subset(i, ar) ? ME_SET_NONE : ME_SET_FAILED;
}
template<class I> ModEvent
ConstSetView::intersectI(Space&,I& i) {
ArrayRanges ar(ranges, size);
return Iter::Ranges::subset(ar, i) ? ME_SET_NONE : ME_SET_FAILED;
}
forceinline void
ConstSetView::update(Space& home, ConstSetView& p) {
ConstView<SetView>::update(home,p);
// dispose old ranges
if (size > 0)
home.free<int>(ranges, 2);
domSize = p.domSize;
size = p.size;
if (size == 0) {
ranges = nullptr;
} else {
// copy ranges from p
ranges = home.alloc<int>(2*size);
for (int i=size; i--; ) {
ranges[2*i] = p.ranges[2*i];
ranges[2*i+1] = p.ranges[2*i+1];
}
}
}
/*
* Delta information for advisors
*
*/
forceinline int
ConstSetView::glbMin(const Delta&) const {
GECODE_NEVER;
return 0;
}
forceinline int
ConstSetView::glbMax(const Delta&) const {
GECODE_NEVER;
return 0;
}
forceinline bool
ConstSetView::glbAny(const Delta&) const {
GECODE_NEVER;
return false;
}
forceinline int
ConstSetView::lubMin(const Delta&) const {
GECODE_NEVER;
return 0;
}
forceinline int
ConstSetView::lubMax(const Delta&) const {
GECODE_NEVER;
return 0;
}
forceinline bool
ConstSetView::lubAny(const Delta&) const {
GECODE_NEVER;
return false;
}
forceinline
EmptyView::EmptyView(void) {}
forceinline unsigned int
EmptyView::glbSize(void) const { return 0; }
forceinline unsigned int
EmptyView::lubSize(void) const { return 0; }
forceinline unsigned int
EmptyView::unknownSize(void) const { return 0; }
forceinline bool
EmptyView::contains(int) const { return false; }
forceinline bool
EmptyView::notContains(int) const { return true; }
forceinline unsigned int
EmptyView::cardMin(void) const { return 0; }
forceinline unsigned int
EmptyView::cardMax(void) const { return 0; }
forceinline int
EmptyView::lubMin(void) const { return 0; }
forceinline int
EmptyView::lubMax(void) const { return 0; }
forceinline int
EmptyView::glbMin(void) const { return 0; }
forceinline int
EmptyView::glbMax(void) const { return 0; }
forceinline ModEvent
EmptyView::cardMin(Space&,unsigned int c) {
return c==0 ? ME_SET_NONE : ME_SET_FAILED;
}
forceinline ModEvent
EmptyView::cardMax(Space&,unsigned int) {
return ME_SET_NONE;
}
forceinline ModEvent
EmptyView::include(Space&,int) {
return ME_SET_FAILED;
}
forceinline ModEvent
EmptyView::exclude(Space&,int) { return ME_SET_NONE; }
forceinline ModEvent
EmptyView::intersect(Space&,int) { return ME_SET_NONE; }
forceinline ModEvent
EmptyView::intersect(Space&,int,int) { return ME_SET_NONE; }
forceinline ModEvent
EmptyView::include(Space&,int,int) {
return ME_SET_FAILED; }
forceinline ModEvent
EmptyView::exclude(Space&,int,int) { return ME_SET_NONE; }
template<class I> ModEvent
EmptyView::excludeI(Space&,I&) {
return ME_SET_NONE;
}
template<class I> ModEvent
EmptyView::includeI(Space&,I& i) {
return i() ? ME_SET_FAILED : ME_SET_NONE;
}
template<class I> ModEvent
EmptyView::intersectI(Space&,I&) {
return ME_SET_NONE;
}
/*
* Delta information for advisors
*
*/
forceinline int
EmptyView::glbMin(const Delta&) const {
GECODE_NEVER;
return 0;
}
forceinline int
EmptyView::glbMax(const Delta&) const {
GECODE_NEVER;
return 0;
}
forceinline bool
EmptyView::glbAny(const Delta&) const {
GECODE_NEVER;
return false;
}
forceinline int
EmptyView::lubMin(const Delta&) const {
GECODE_NEVER;
return 0;
}
forceinline int
EmptyView::lubMax(const Delta&) const {
GECODE_NEVER;
return 0;
}
forceinline bool
EmptyView::lubAny(const Delta&) const {
GECODE_NEVER;
return false;
}
// Constant universe variable
forceinline
UniverseView::UniverseView(void) {}
forceinline unsigned int
UniverseView::glbSize(void) const { return Set::Limits::card; }
forceinline unsigned int
UniverseView::lubSize(void) const { return Set::Limits::card; }
forceinline unsigned int
UniverseView::unknownSize(void) const { return 0; }
forceinline bool
UniverseView::contains(int) const { return true; }
forceinline bool
UniverseView::notContains(int) const { return false; }
forceinline unsigned int
UniverseView::cardMin(void) const { return Set::Limits::card; }
forceinline unsigned int
UniverseView::cardMax(void) const { return Limits::card; }
forceinline int
UniverseView::lubMin(void) const { return Limits::card; }
forceinline int
UniverseView::lubMax(void) const { return Limits::card; }
forceinline int
UniverseView::glbMin(void) const { return Limits::card; }
forceinline int
UniverseView::glbMax(void) const { return Limits::card; }
forceinline ModEvent
UniverseView::cardMin(Space&,unsigned int c) {
return c>Limits::card ? ME_SET_FAILED : ME_SET_NONE;
}
forceinline ModEvent
UniverseView::cardMax(Space&,unsigned int c) {
return c>=Limits::card ? ME_SET_NONE : ME_SET_FAILED;
}
forceinline ModEvent
UniverseView::include(Space&,int) {
return ME_SET_NONE;
}
forceinline ModEvent
UniverseView::exclude(Space&,int) { return ME_SET_FAILED; }
forceinline ModEvent
UniverseView::intersect(Space&,int) { return ME_SET_FAILED; }
forceinline ModEvent
UniverseView::include(Space&,int,int) { return ME_SET_NONE; }
forceinline ModEvent
UniverseView::exclude(Space&,int,int) { return ME_SET_FAILED; }
template<class I> ModEvent
UniverseView::excludeI(Space&,I& i) {
return i() ? ME_SET_FAILED : ME_SET_NONE;
}
template<class I> forceinline ModEvent
UniverseView::includeI(Space&,I&) {
return ME_SET_NONE;
}
forceinline ModEvent
UniverseView::intersect(Space&,int i,int j) {
return (i>Limits::min ||
j<Limits::max) ? ME_SET_FAILED : ME_SET_NONE;
}
template<class I> forceinline ModEvent
UniverseView::intersectI(Space&,I& i) {
return (i() &&
(i.min()>Limits::min ||
i.max()<Limits::max) ) ?
ME_SET_FAILED : ME_SET_NONE;
}
/*
* Delta information for advisors
*
*/
forceinline int
UniverseView::glbMin(const Delta&) const {
GECODE_NEVER;
return 0;
}
forceinline int
UniverseView::glbMax(const Delta&) const {
GECODE_NEVER;
return 0;
}
forceinline bool
UniverseView::glbAny(const Delta&) const {
GECODE_NEVER;
return false;
}
forceinline int
UniverseView::lubMin(const Delta&) const {
GECODE_NEVER;
return 0;
}
forceinline int
UniverseView::lubMax(const Delta&) const {
GECODE_NEVER;
return 0;
}
forceinline bool
UniverseView::lubAny(const Delta&) const {
GECODE_NEVER;
return false;
}
/*
* Iterators
*
*/
/**
* \brief %Range iterator for least upper bound of constantly empty set view
* \ingroup TaskActorSetView
*/
template<>
class LubRanges<EmptyView> : public Iter::Ranges::Empty {
public:
/// \name Constructors and initialization
//@{
/// Default constructor
LubRanges(void) {}
/// Initialize with ranges for view \a x
LubRanges(const EmptyView& x) { (void)x; }
/// Initialize with ranges for view \a x
void init(const EmptyView& x) { (void)x; }
//@}
};
/**
* \brief %Range iterator for greatest lower bound of constantly empty set view
* \ingroup TaskActorSetView
*/
template<>
class GlbRanges<EmptyView> : public Iter::Ranges::Empty {
public:
/// \name Constructors and initialization
//@{
/// Default constructor
GlbRanges(void) {}
/// Initialize with ranges for view \a x
GlbRanges(const EmptyView& x) { (void)x; }
/// Initialize with ranges for view \a x
void init(const EmptyView& x) { (void)x; }
//@}
};
/**
* \brief %Range iterator for least upper bound of constant universe set view
* \ingroup TaskActorSetView
*/
template<>
class LubRanges<UniverseView> : public Iter::Ranges::Singleton {
public:
/// \name Constructors and initialization
//@{
/// Default constructor
LubRanges(void)
: Iter::Ranges::Singleton(Limits::min,
Limits::max) {}
/// Initialize with ranges for view \a x
LubRanges(const UniverseView& x)
: Iter::Ranges::Singleton(Limits::min,
Limits::max) {
(void)x;
}
/// Initialize with ranges for view \a x
void init(const UniverseView& x) { (void)x; }
//@}
};
/**
* \brief %Range iterator for greatest lower bound of constant universe set view
* \ingroup TaskActorSetView
*/
template<>
class GlbRanges<UniverseView> : public Iter::Ranges::Singleton {
public:
/// \name Constructors and initialization
//@{
/// Default constructor
GlbRanges(void)
: Iter::Ranges::Singleton(Limits::min,
Limits::max) {}
/// Initialize with ranges for view \a x
GlbRanges(const UniverseView& x)
: Iter::Ranges::Singleton(Limits::min,
Limits::max) {
(void)x;
}
/// Initialize with ranges for view \a x
void init(const UniverseView& x) { (void)x; }
//@}
};
/**
* \brief %Range iterator for least upper bound of constant set view
* \ingroup TaskActorSetView
*/
template<>
class LubRanges<ConstSetView> {
private:
ArrayRanges ar;
public:
/// \name Constructors and initialization
//@{
/// Default constructor
LubRanges(void) {}
/// Initialize with ranges for view \a x
LubRanges(const ConstSetView& x) : ar(x.ranges,x.size) {}
/// Initialize with ranges for view \a x
void init(const ConstSetView& x) {
ar.init(x.ranges,x.size);
}
//@}
/// \name Iteration control
//@{
/// Test whether iterator is still at a value or done
bool operator ()(void) const { return ar(); }
/// Move iterator to next value (if possible)
void operator ++(void) { ++ar; }
//@}
/// \name Range access
//@{
/// Return smallest value of range
int min(void) const { return ar.min(); }
/// Return largest value of range
int max(void) const { return ar.max(); }
/// Return width of range (distance between minimum and maximum)
unsigned int width(void) const { return ar.width(); }
//@}
};
/**
* \brief %Range iterator for greatest lower bound of constant set view
* \ingroup TaskActorSetView
*/
template<>
class GlbRanges<ConstSetView> : public LubRanges<ConstSetView> {
public:
/// \name Constructors and initialization
//@{
/// Default constructor
GlbRanges(void) {}
/// Initialize with ranges for view \a x
GlbRanges(const ConstSetView& x) : LubRanges<ConstSetView>(x) {}
/// Initialize with ranges for view \a x
void init(const ConstSetView& x) {
LubRanges<ConstSetView>::init(x);
}
//@}
};
forceinline bool
ConstSetView::operator <(const ConstSetView& y) const {
if (size < y.size)
return true;
if (size > y.size)
return false;
if (domSize < y.domSize)
return true;
if (domSize > y.domSize)
return false;
for (int i=size; i--; ) {
if (ranges[2*i] < y.ranges[2*i])
return true;
if (ranges[2*i] > y.ranges[2*i])
return false;
if (ranges[2*i+1] < y.ranges[2*i+1])
return true;
if (ranges[2*i+1] > y.ranges[2*i+1])
return false;
}
return false;
}
/*
* Testing
*
*/
forceinline bool
operator ==(const ConstSetView& x, const ConstSetView& y) {
if ((x.size != y.size) || (x.domSize != y.domSize))
return false;
for (int i=x.size; i--; )
if ((x.ranges[2*i] != y.ranges[2*i]) ||
(x.ranges[2*i+1] != y.ranges[2*i+1]))
return false;
return true;
}
forceinline bool
operator !=(const ConstSetView& x, const ConstSetView& y) {
return !(x == y);
}
forceinline bool
operator ==(const EmptyView&, const EmptyView&) {
return true;
}
forceinline bool
operator !=(const EmptyView&, const EmptyView&) {
return false;
}
forceinline bool
operator ==(const UniverseView&, const UniverseView&) {
return true;
}
forceinline bool
operator !=(const UniverseView&, const UniverseView&) {
return false;
}
}}
// STATISTICS: set-var