Changeset 5814 for branches/QAP/HeuristicLab.Problems.QuadraticAssignment/3.3/Tests/QAPLIBInstancesTest.cs

Timestamp:

03/23/11 12:03:24 (13 years ago)

Author:

abeham

Message:

#1330

• Added a test if the reported quality of the solution instances is similar to the evaluated qualities of these solutions
• Adapted parsing of the solution file and added another parameter whether the permutation should be treated as facility->location (HeuristicLab default) or location->facility.
• Adapted QuadraticAssignmentProblem to use that method that corresponds with the reported quality since there is no consistent encoding over all files
• Improved API documentation of the parsing methods

File:

• branches/QAP/HeuristicLab.Problems.QuadraticAssignment/3.3/Tests/QAPLIBInstancesTest.cs (modified) (2 diffs)

branches/QAP/HeuristicLab.Problems.QuadraticAssignment/3.3/Tests/QAPLIBInstancesTest.cs

@@ -1 +1 @@
 using System;
 using System.Text;
+using HeuristicLab.Common;
 using HeuristicLab.Problems.QuadraticAssignment;
 using Microsoft.VisualStudio.TestTools.UnitTesting;
@@ -20 +21 @@
       Assert.IsTrue(failedInstances.Length == 0, "Following instances failed to load: " + Environment.NewLine + failedInstances.ToString());
     }
+
+    [TestMethod]
+    public void TestReportedSolutionQuality() {
+      StringBuilder failedInstances = new StringBuilder();
+      QuadraticAssignmentProblem qap = new QuadraticAssignmentProblem();
+      foreach (string instance in qap.EmbeddedInstances) {
+        try {
+          qap.LoadEmbeddedInstance(instance);
+        } catch {
+          Assert.Fail("Not all instances load correctly");
+        }
+        if (qap.BestKnownSolution != null) {
+          double quality = double.NaN;
+          try {
+            quality = QAPEvaluator.Apply(qap.BestKnownSolution, qap.Weights, qap.DistanceMatrix);
+          } catch (Exception ex) {
+            failedInstances.AppendLine("An unknown problem occurred evaluating solution of instance " + instance + ": " + ex.Message);
+          }
+          if (!quality.IsAlmost(qap.BestKnownQuality.Value)) {
+            failedInstances.AppendLine(instance + ": Reported quality: " + qap.BestKnownQuality.Value.ToString() + ", evaluated fitness: " + quality.ToString() + ".");
+          }
+        }
+
+      }
+      Assert.IsTrue(failedInstances.Length == 0, "Following instances report divergent fitness values: " + Environment.NewLine + failedInstances.ToString());
+    }
   }
 }