Files
ortools-clone/examples/contrib/broken_weights.cs
2020-11-03 10:15:53 +01:00

166 lines
5.1 KiB
C#

//
// Copyright 2012 Hakan Kjellerstrand
//
// Licensed under the Apache License, Version 2.0 (the "License");
// you may not use this file except in compliance with the License.
// You may obtain a copy of the License at
//
// http://www.apache.org/licenses/LICENSE-2.0
//
// Unless required by applicable law or agreed to in writing, software
// distributed under the License is distributed on an "AS IS" BASIS,
// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
// See the License for the specific language governing permissions and
// limitations under the License.
using System;
using System.Linq;
using Google.OrTools.ConstraintSolver;
public class BrokenWeights
{
/**
*
* Broken weights problem.
*
* From http://www.mathlesstraveled.com/?p=701
* """
* Here's a fantastic problem I recently heard. Apparently it was first
* posed by Claude Gaspard Bachet de Meziriac in a book of arithmetic problems
* published in 1612, and can also be found in Heinrich Dorrie's 100
* Great Problems of Elementary Mathematics.
*
* A merchant had a forty pound measuring weight that broke
* into four pieces as the result of a fall. When the pieces were
* subsequently weighed, it was found that the weight of each piece
* was a whole number of pounds and that the four pieces could be
* used to weigh every integral weight between 1 and 40 pounds. What
* were the weights of the pieces?
*
* Note that since this was a 17th-century merchant, he of course used a
* balance scale to weigh things. So, for example, he could use a 1-pound
* weight and a 4-pound weight to weigh a 3-pound object, by placing the
* 3-pound object and 1-pound weight on one side of the scale, and
* the 4-pound weight on the other side.
* """
*
* Also see http://www.hakank.org/or-tools/broken_weights.py
*
*/
private static void Solve(int m = 40, int n = 4)
{
Solver solver = new Solver("BrokenWeights");
Console.WriteLine("Total weight (m): {0}", m);
Console.WriteLine("Number of pieces (n): {0}", n);
Console.WriteLine();
//
// Decision variables
//
IntVar[] weights = solver.MakeIntVarArray(n, 1, m, "weights");
IntVar[,] x = new IntVar[m, n];
// Note: in x_flat we insert the weights array before x
IntVar[] x_flat = new IntVar[m * n + n];
for (int j = 0; j < n; j++)
{
x_flat[j] = weights[j];
}
for (int i = 0; i < m; i++)
{
for (int j = 0; j < n; j++)
{
x[i, j] = solver.MakeIntVar(-1, 1, "x[" + i + "," + j + "]");
x_flat[n + i * n + j] = x[i, j];
}
}
//
// Constraints
//
// symmetry breaking
for (int j = 1; j < n; j++)
{
solver.Add(weights[j - 1] < weights[j]);
}
solver.Add(weights.Sum() == m);
// Check that all weights from 1 to n (default 40) can be made.
//
// Since all weights can be on either side
// of the side of the scale we allow either
// -1, 0, or 1 of the weights, assuming that
// -1 is the weights on the left and 1 is on the right.
//
for (int i = 0; i < m; i++)
{
solver.Add((from j in Enumerable.Range(0, n) select weights[j] * x[i, j]).ToArray().Sum() == i + 1);
}
//
// The objective is to minimize the last weight.
//
OptimizeVar obj = weights[n - 1].Minimize(1);
//
// Search
//
DecisionBuilder db = solver.MakePhase(x_flat, Solver.CHOOSE_FIRST_UNBOUND, Solver.ASSIGN_MIN_VALUE);
solver.NewSearch(db, obj);
while (solver.NextSolution())
{
Console.Write("weights: ");
for (int i = 0; i < n; i++)
{
Console.Write("{0,3} ", weights[i].Value());
}
Console.WriteLine();
for (int i = 0; i < 10 + n * 4; i++)
{
Console.Write("-");
}
Console.WriteLine();
for (int i = 0; i < m; i++)
{
Console.Write("weight {0,2}:", i + 1);
for (int j = 0; j < n; j++)
{
Console.Write("{0,3} ", x[i, j].Value());
}
Console.WriteLine();
}
Console.WriteLine();
}
Console.WriteLine("\nSolutions: {0}", solver.Solutions());
Console.WriteLine("WallTime: {0}ms", solver.WallTime());
Console.WriteLine("Failures: {0}", solver.Failures());
Console.WriteLine("Branches: {0} ", solver.Branches());
solver.EndSearch();
}
public static void Main(String[] args)
{
int m = 40;
int n = 4;
if (args.Length > 0)
{
m = Convert.ToInt32(args[0]);
}
if (args.Length > 1)
{
n = Convert.ToInt32(args[1]);
}
Solve(m, n);
}
}