Changeset 14677 for branches/OptimizationNetworks/HeuristicLab.Problems.VehicleRouting/3.4/ProblemInstances/SingleDepotVRP/CVRP/CVRPTW/CVRPTWEvaluator.cs

Timestamp:

02/16/17 15:16:55 (7 years ago)

Author:

abeham

Message:

#2205: added results tab to solution view to analyze vrp solution in more detail

• reorganized insertion infos and adapted some evaluators and instances

File:

• branches/OptimizationNetworks/HeuristicLab.Problems.VehicleRouting/3.4/ProblemInstances/SingleDepotVRP/CVRP/CVRPTW/CVRPTWEvaluator.cs (modified) (10 diffs)

branches/OptimizationNetworks/HeuristicLab.Problems.VehicleRouting/3.4/ProblemInstances/SingleDepotVRP/CVRP/CVRPTW/CVRPTWEvaluator.cs

@@ -46 +46 @@
 
     protected override void EvaluateTour(VRPEvaluation eval, IVRPProblemInstance instance, Tour tour, IVRPEncoding solution) {
-      TourInsertionInfo tourInfo = new TourInsertionInfo(solution.GetVehicleAssignment(solution.GetTourIndex(tour)));
-      eval.InsertionInfo.AddTourInsertionInfo(tourInfo);
+      var cvrpInstance = (IHomogenousCapacitatedProblemInstance)instance;
+
       double originalQuality = eval.Quality;
 
-      IHomogenousCapacitatedProblemInstance cvrpInstance = instance as IHomogenousCapacitatedProblemInstance;
       DoubleArray demand = instance.Demand;
 
-      ITimeWindowedProblemInstance vrptw = instance as ITimeWindowedProblemInstance;
+      var vrptw = (ITimeWindowedProblemInstance)instance;
       DoubleArray dueTime = vrptw.DueTime;
       DoubleArray readyTime = vrptw.ReadyTime;
@@ -67 +66 @@
 
       double capacity = cvrpInstance.Capacity.Value;
-      for (int i = 0; i <= tour.Stops.Count; i++) {
-        int end = 0;
-        if (i < tour.Stops.Count)
-          end = tour.Stops[i];
-
-        delivered += demand[end];
-      }
-
-      double spareCapacity = capacity - delivered;
-
+      
       double tourStartTime = readyTime[0];
       time = tourStartTime;
+
+      var tourInfo = new CVRPTWTourInsertionInfo(solution.GetVehicleAssignment(solution.GetTourIndex(tour)), cvrpInstance.Capacity.Value, tourStartTime);
+      eval.InsertionInfo.AddTourInsertionInfo(tourInfo);
 
       //simulate a tour, start and end at depot
@@ -90 +83 @@
 
         //drive there
-        double currentDistace = vrptw.GetDistance(start, end, solution);
-        time += currentDistace;
-        distance += currentDistace;
+        double currentDistance = vrptw.GetDistance(start, end, solution);
+        time += currentDistance;
+        distance += currentDistance;
+        delivered += demand[end];
 
         double arrivalTime = time;
@@ -117 +111 @@
         time += currentServiceTime;
 
-        CVRPTWInsertionInfo stopInfo = new CVRPTWInsertionInfo(start, end, spareCapacity, tourStartTime, arrivalTime, time, spareTime, waitTime);
+        var stopInfo = new CVRPTWStopInsertionInfo(start, end, currentDistance, capacity - delivered, arrivalTime, time, spareTime, waitTime);
         tourInfo.AddStopInsertionInfo(stopInfo);
       }
@@ -130 +124 @@
       }
 
-      (eval as CVRPEvaluation).Overload += overweight;
+      ((CVRPEvaluation)eval).Overload += overweight;
       double tourPenalty = 0;
       double penalty = overweight * cvrpInstance.OverloadPenalty.Value;
@@ -151 +145 @@
     protected override double GetTourInsertionCosts(IVRPProblemInstance instance, IVRPEncoding solution, TourInsertionInfo tourInsertionInfo, int index, int customer,
       out bool feasible) {
-      CVRPTWInsertionInfo insertionInfo = tourInsertionInfo.GetStopInsertionInfo(index) as CVRPTWInsertionInfo;
+      var tourInfo = (CVRPTWTourInsertionInfo)tourInsertionInfo;
+      var insertionInfo = (CVRPTWStopInsertionInfo)tourInsertionInfo.GetStopInsertionInfo(index);
 
       double costs = 0;
       feasible = tourInsertionInfo.Penalty < double.Epsilon;
 
-      ICapacitatedProblemInstance cvrp = instance as ICapacitatedProblemInstance;
+      var cvrp = (ICapacitatedProblemInstance)instance;
       double overloadPenalty = cvrp.OverloadPenalty.Value;
 
-      ITimeWindowedProblemInstance vrptw = instance as ITimeWindowedProblemInstance;
+      var vrptw = (ITimeWindowedProblemInstance)instance;
       DoubleArray dueTime = vrptw.DueTime;
       DoubleArray readyTime = vrptw.ReadyTime;
@@ -172 +167 @@
 
       double demand = instance.Demand[customer];
-      if (demand > insertionInfo.SpareCapacity) {
+      if (demand > tourInfo.SpareCapacity) {
         feasible = false;
-        if (insertionInfo.SpareCapacity >= 0)
-          costs += (demand - insertionInfo.SpareCapacity) * overloadPenalty;
+        if (tourInfo.SpareCapacity >= 0)
+          costs += (demand - tourInfo.SpareCapacity) * overloadPenalty;
         else
           costs += demand * overloadPenalty;
@@ -184 +179 @@
 
       if (index > 0)
-        time = (tourInsertionInfo.GetStopInsertionInfo(index - 1) as CVRPTWInsertionInfo).LeaveTime;
+        time = ((CVRPTWStopInsertionInfo)tourInsertionInfo.GetStopInsertionInfo(index - 1)).LeaveTime;
       else
-        time = insertionInfo.TourStartTime;
+        time = tourInfo.TourStartTime;
 
       time += instance.GetDistance(insertionInfo.Start, customer, solution);
@@ -197 +192 @@
       time += instance.GetDistance(customer, insertionInfo.End, solution);
 
-      double additionalTime = time - (tourInsertionInfo.GetStopInsertionInfo(index) as CVRPTWInsertionInfo).ArrivalTime;
+      double additionalTime = time - ((CVRPTWStopInsertionInfo)tourInsertionInfo.GetStopInsertionInfo(index)).ArrivalTime;
       for (int i = index; i < tourInsertionInfo.GetStopCount(); i++) {
-        CVRPTWInsertionInfo nextStop = tourInsertionInfo.GetStopInsertionInfo(i) as CVRPTWInsertionInfo;
+        var nextStop = (CVRPTWStopInsertionInfo)tourInsertionInfo.GetStopInsertionInfo(i);
 
         if (additionalTime < 0) {
@@ -254 +249 @@
       base.SetResultParameters(tourEvaluation);
 
-      TardinessParameter.ActualValue.Value = (tourEvaluation as CVRPTWEvaluation).Tardiness;
-      TravelTimeParameter.ActualValue.Value = (tourEvaluation as CVRPTWEvaluation).TravelTime;
+      TardinessParameter.ActualValue.Value = ((CVRPTWEvaluation)tourEvaluation).Tardiness;
+      TravelTimeParameter.ActualValue.Value = ((CVRPTWEvaluation)tourEvaluation).TravelTime;
     }