Changeset 6569 for branches/QAPAlgorithms/HeuristicLab.Problems.VehicleRouting/3.3/Encodings/Prins

Timestamp:

07/17/11 22:51:11 (13 years ago)

Author:

abeham

Message:

#1541

• updated to latest trunk version

Location:

branches/QAPAlgorithms

Files:

• . (modified) (2 props)
• HeuristicLab.Problems.VehicleRouting (modified) (1 prop)
• HeuristicLab.Problems.VehicleRouting/3.3/Encodings/Prins/Crossovers/PrinsPermutationCrossover.cs (modified) (1 diff)
• HeuristicLab.Problems.VehicleRouting/3.3/Encodings/Prins/PrinsEncoding.cs (modified) (2 diffs)

branches/QAPAlgorithms

@@ -12 +12 @@
 *.psess
 *.vsp
+*.docstates

@@ -12 +12 @@
 *.psess
 *.vsp
+*.docstates

branches/QAPAlgorithms/HeuristicLab.Problems.VehicleRouting/3.3/Encodings/Prins/Crossovers/PrinsPermutationCrossover.cs

@@ -46 +46 @@
 
     protected override PrinsEncoding Crossover(IRandom random, PrinsEncoding parent1, PrinsEncoding parent2) {
-      //note - the inner crossover is called here and the result is converted to a prins representation
+      //note - the inner crossover is called here and the solution is converted to a prins representation
       //some refactoring should be done here in the future - the crossover operation should be called directly
 
-      InnerCrossoverParameter.ActualValue.ParentsParameter.ActualName = ParentsParameter.ActualName;
-      IAtomicOperation op = this.ExecutionContext.CreateOperation(
-        InnerCrossoverParameter.ActualValue, this.ExecutionContext.Scope);
-      op.Operator.Execute((IExecutionContext)op, CancellationToken);
+      if (parent1.Length == parent2.Length) {
+        InnerCrossoverParameter.ActualValue.ParentsParameter.ActualName = ParentsParameter.ActualName;
+        IAtomicOperation op = this.ExecutionContext.CreateOperation(
+          InnerCrossoverParameter.ActualValue, this.ExecutionContext.Scope);
+        op.Operator.Execute((IExecutionContext)op, CancellationToken);
 
-      string childName = InnerCrossoverParameter.ActualValue.ChildParameter.ActualName;
-      if (ExecutionContext.Scope.Variables.ContainsKey(childName)) {
-        Permutation permutation = ExecutionContext.Scope.Variables[childName].Value as Permutation;
-        ExecutionContext.Scope.Variables.Remove(childName);
+        string childName = InnerCrossoverParameter.ActualValue.ChildParameter.ActualName;
+        if (ExecutionContext.Scope.Variables.ContainsKey(childName)) {
+          Permutation permutation = ExecutionContext.Scope.Variables[childName].Value as Permutation;
+          ExecutionContext.Scope.Variables.Remove(childName);
 
-        return new PrinsEncoding(permutation, Cities,
-          DueTimeParameter.ActualValue,
-            ServiceTimeParameter.ActualValue,
-            ReadyTimeParameter.ActualValue,
-            DemandParameter.ActualValue,
-            CapacityParameter.ActualValue,
-            FleetUsageFactor.ActualValue,
-            TimeFactor.ActualValue,
-            DistanceFactor.ActualValue,
-            OverloadPenalty.ActualValue,
-            TardinessPenalty.ActualValue,
-            CoordinatesParameter.ActualValue,
-            UseDistanceMatrixParameter.ActualValue);
-      } else
-        return null;
+          return new PrinsEncoding(permutation, Cities,
+            DueTimeParameter.ActualValue,
+              ServiceTimeParameter.ActualValue,
+              ReadyTimeParameter.ActualValue,
+              DemandParameter.ActualValue,
+              CapacityParameter.ActualValue,
+              FleetUsageFactor.ActualValue,
+              TimeFactor.ActualValue,
+              DistanceFactor.ActualValue,
+              OverloadPenalty.ActualValue,
+              TardinessPenalty.ActualValue,
+              CoordinatesParameter.ActualValue,
+              UseDistanceMatrixParameter.ActualValue);
+        } else
+          return null;
+      } else {
+        return parent1.Clone() as PrinsEncoding;
+      }
     }
   }

branches/QAPAlgorithms/HeuristicLab.Problems.VehicleRouting/3.3/Encodings/Prins/PrinsEncoding.cs

@@ -75 +75 @@
     public override List<Tour> GetTours(ILookupParameter<DoubleMatrix> distanceMatrix, int maxVehicles = int.MaxValue) {
       List<Tour> result = new List<Tour>();
+
+      DistanceMatrix distMatrix = VRPUtilities.GetDistanceMatrix(coordinates, distanceMatrix, useDistanceMatrix);
 
       //Split permutation into vector P
@@ -106 +108 @@
             overloadPenalty,
             tardinessPenalty,
-            coordinates,
-            distanceMatrix,
-            useDistanceMatrix);
+            distMatrix);
 
           double cost = eval.Quality;

@@ -12 +12 @@
 *.psess
 *.vsp
+*.docstates