org.chocosolver.solver.constraints.extension.nary.PropTableStr2 Maven / Gradle / Ivy
Go to download
Show more of this group Show more artifacts with this name
Show all versions of choco-solver Show documentation
Show all versions of choco-solver Show documentation
Open-source constraint solver.
/*
* This file is part of choco-solver, http://choco-solver.org/
*
* Copyright (c) 2019, IMT Atlantique. All rights reserved.
*
* Licensed under the BSD 4-clause license.
*
* See LICENSE file in the project root for full license information.
*/
package org.chocosolver.solver.constraints.extension.nary;
import org.chocosolver.memory.IEnvironment;
import org.chocosolver.memory.IStateInt;
import org.chocosolver.solver.ICause;
import org.chocosolver.solver.constraints.Propagator;
import org.chocosolver.solver.constraints.PropagatorPriority;
import org.chocosolver.solver.constraints.extension.Tuples;
import org.chocosolver.solver.exception.ContradictionException;
import org.chocosolver.solver.variables.IntVar;
import org.chocosolver.util.ESat;
import org.chocosolver.util.iterators.DisposableValueIterator;
import org.chocosolver.util.objects.setDataStructures.ISet;
import org.chocosolver.util.objects.setDataStructures.SetFactory;
import org.chocosolver.util.objects.setDataStructures.SetType;
import java.util.ArrayList;
import java.util.BitSet;
import java.util.Map.Entry;
import java.util.TreeMap;
/**
* STR2 Propagator for table constraints (only positive tuples)
*
* @author Guillaume Perez, Jean-Guillaume Fages (minor)
* @since 26/07/2014
*/
public class PropTableStr2 extends Propagator {
//***********************************************************************************
// VARIABLES
//***********************************************************************************
private int[][] table;
private str2_var str2vars[];
private ISet tuples;
private ArrayList Ssup;
private ArrayList Sval;
private boolean firstProp = true;
private Tuples tuplesObject;
//***********************************************************************************
// CONSTRUCTOR
//***********************************************************************************
public PropTableStr2(IntVar[] vars_, Tuples tuplesObject) {
super(vars_, PropagatorPriority.LINEAR, false);
this.table = tuplesObject.toMatrix();
this.tuplesObject = tuplesObject;
int size = 0;
if (table.length > 0) {
size = table[0].length;
}
str2vars = new str2_var[size];
for (int i = 0; i < size; i++) {
str2vars[i] = new str2_var(model.getEnvironment(), vars_[i], i, table);
}
tuples = SetFactory.makeStoredSet(SetType.BIPARTITESET,0,model);
Ssup = new ArrayList<>();
Sval = new ArrayList<>();
}
//***********************************************************************************
// PROP METHODS
//***********************************************************************************
@Override
public void propagate(int evtmask) throws ContradictionException {
if (firstProp) {
firstProp = false;
model.getEnvironment().save(() -> firstProp = true);
initialPropagate();
}
Filter();
}
@Override
public ESat isEntailed() {
if(firstProp){ // data structure not ready
return tuplesObject.check(vars);
}else {
boolean hasSupport = false;
for (int tuple : tuples) {
if (is_tuple_supported(tuple)) {
hasSupport = true;
}
}
if (hasSupport) {
if (isCompletelyInstantiated()) {
return ESat.TRUE;
} else {
return ESat.UNDEFINED;
}
} else {
return ESat.FALSE;
}
}
}
@Override
public String toString() {
return "STR2 table constraint with " + table[0].length + "vars and " + table.length + "tuples";
}
//***********************************************************************************
// DEDICATED METHODS
//***********************************************************************************
private boolean is_tuple_supported(int tuple_index) {
for (str2_var v : Sval) {
if (!v.var.contains(table[tuple_index][v.indice])) {
return false;
}
}
return true;
}
private void initialPropagate() throws ContradictionException {
for (str2_var vst : str2vars) {
DisposableValueIterator vit = vst.var.getValueIterator(true);
while (vit.hasNext()) {
int value = vit.next();
if (!vst.index_map.containsKey(value)) {
vst.var.removeValue(value, this);
}
}
vit.dispose();
}
for (int t = 0; t < table.length; t++) {
tuples.add(t);
}
if(tuples.isEmpty()){
this.fails();
}
}
private void Filter() throws ContradictionException {
Ssup.clear();
Sval.clear();
for (str2_var tmp : str2vars) {
tmp.GAC_clear();
Ssup.add(tmp);
if (tmp.last_size.get() != tmp.var.getDomainSize()) {
Sval.add(tmp);
tmp.last_size.set(tmp.var.getDomainSize());
}
}
for (int tuple : tuples) {
if (is_tuple_supported(tuple)) {
for (int var = 0; var < Ssup.size(); var++) {
str2_var v = Ssup.get(var);
if (!v.isConsistant(table[tuple][v.indice])) {
v.makeConsistant(table[tuple][v.indice]);
if (v.nb_consistant == v.var.getDomainSize()) {
Ssup.set(var, Ssup.get(Ssup.size() - 1));
Ssup.remove(Ssup.size() - 1);
var--;
}
}
}
} else {
tuples.remove(tuple);
}
}
for (str2_var v : Ssup) {
v.remove_unsupported_value(this);
}
}
/**
* var class which will save local var information
*/
private class str2_var {
private IntVar var;
/**
* original var
*/
private int indice;
/**
* index in the table
*/
private IStateInt last_size;
/**
* Numerical reversible of the last size
*/
private BitSet GAC_Val;
/**
* at each step, it will say if the value is GAC
*/
private int nb_consistant;
/**
* count the number of consistant value
*/
private TreeMap index_map;
/**
* contains all the value of the variable
*/
private str2_var(IEnvironment env, IntVar var_, int indice_, int[][] table) {
var = var_;
last_size = env.makeInt(0);
indice = indice_;
nb_consistant = 0;
index_map = new TreeMap<>();
int key = 0;
for (int[] t : table) {
if (!index_map.containsKey(t[indice])) {
index_map.put(t[indice], key++);
}
}
GAC_Val = new BitSet(index_map.size());
}
private void GAC_clear() {
GAC_Val.clear();
nb_consistant = 0;
}
private boolean isConsistant(int value) {
return GAC_Val.get(index_map.get(value));
}
private void makeConsistant(int value) {
GAC_Val.set(index_map.get(value));
nb_consistant++;
}
private void remove_unsupported_value(ICause cause) throws ContradictionException {
for (Entry e : index_map.entrySet()) {
if (var.contains(e.getKey()) && !GAC_Val.get(e.getValue())) {
var.removeValue(e.getKey(), cause);
}
}
}
}
}