Free cookie consent management tool by TermsFeed Policy Generator

source: trunk/sources/HeuristicLab.Problems.VehicleRouting/3.3/VehicleRoutingProblem.cs @ 4352

Last change on this file since 4352 was 4352, checked in by svonolfe, 14 years ago

Merged r4351 of the VRP feature branch into trunk (#1039)
File size: 25.4 KB
Line 
1#region License Information
2/* HeuristicLab
3 * Copyright (C) 2002-2010 Heuristic and Evolutionary Algorithms Laboratory (HEAL)
4 *
5 * This file is part of HeuristicLab.
6 *
7 * HeuristicLab is free software: you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation, either version 3 of the License, or
10 * (at your option) any later version.
11 *
12 * HeuristicLab is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with HeuristicLab. If not, see <http://www.gnu.org/licenses/>.
19 */
20#endregion
21
22using System;
23using System.Collections.Generic;
24using System.Drawing;
25using System.Linq;
26using HeuristicLab.Common;
27using HeuristicLab.Core;
28using HeuristicLab.Data;
29using HeuristicLab.Encodings.PermutationEncoding;
30using HeuristicLab.Optimization;
31using HeuristicLab.Parameters;
32using HeuristicLab.Persistence.Default.CompositeSerializers.Storable;
33using HeuristicLab.PluginInfrastructure;
34using HeuristicLab.Problems.VehicleRouting.Encodings.Alba;
35using HeuristicLab.Problems.VehicleRouting.Encodings.General;
36using HeuristicLab.Problems.VehicleRouting.Encodings.Prins;
37
38namespace HeuristicLab.Problems.VehicleRouting {
39  [Item("Vehicle Routing Problem", "Represents a Vehicle Routing Problem.")]
40  [Creatable("Problems")]
41  [StorableClass]
42  public sealed class VehicleRoutingProblem : ParameterizedNamedItem, ISingleObjectiveProblem {
43    public override Image ItemImage {
44      get { return HeuristicLab.Common.Resources.VS2008ImageLibrary.Type; }
45    }
46
47    #region Parameter Properties
48    public ValueParameter<BoolValue> MaximizationParameter {
49      get { return (ValueParameter<BoolValue>)Parameters["Maximization"]; }
50    }
51    IParameter ISingleObjectiveProblem.MaximizationParameter {
52      get { return MaximizationParameter; }
53    }
54    public ValueParameter<DoubleMatrix> CoordinatesParameter {
55      get { return (ValueParameter<DoubleMatrix>)Parameters["Coordinates"]; }
56    }
57    public OptionalValueParameter<DoubleMatrix> DistanceMatrixParameter {
58      get { return (OptionalValueParameter<DoubleMatrix>)Parameters["DistanceMatrix"]; }
59    }
60    public ValueParameter<BoolValue> UseDistanceMatrixParameter {
61      get { return (ValueParameter<BoolValue>)Parameters["UseDistanceMatrix"]; }
62    }
63    public ValueParameter<IntValue> VehiclesParameter {
64      get { return (ValueParameter<IntValue>)Parameters["Vehicles"]; }
65    }
66    public ValueParameter<DoubleValue> CapacityParameter {
67      get { return (ValueParameter<DoubleValue>)Parameters["Capacity"]; }
68    }
69    public ValueParameter<DoubleArray> DemandParameter {
70      get { return (ValueParameter<DoubleArray>)Parameters["Demand"]; }
71    }
72    public ValueParameter<DoubleArray> ReadyTimeParameter {
73      get { return (ValueParameter<DoubleArray>)Parameters["ReadyTime"]; }
74    }
75    public ValueParameter<DoubleArray> DueTimeParameter {
76      get { return (ValueParameter<DoubleArray>)Parameters["DueTime"]; }
77    }
78    public ValueParameter<DoubleArray> ServiceTimeParameter {
79      get { return (ValueParameter<DoubleArray>)Parameters["ServiceTime"]; }
80    }
81    ValueParameter<IVRPCreator> SolutionCreatorParameter {
82      get { return (ValueParameter<IVRPCreator>)Parameters["SolutionCreator"]; }
83    }
84    IParameter IProblem.SolutionCreatorParameter {
85      get { return SolutionCreatorParameter; }
86    }
87    ValueParameter<IVRPEvaluator> EvaluatorParameter {
88      get { return (ValueParameter<IVRPEvaluator>)Parameters["Evaluator"]; }
89    }
90    IParameter IProblem.EvaluatorParameter {
91      get { return EvaluatorParameter; }
92    }
93    public IValueParameter<DoubleValue> FleetUsageFactor {
94      get { return (IValueParameter<DoubleValue>)Parameters["EvalFleetUsageFactor"]; }
95    }
96    public IValueParameter<DoubleValue> TimeFactor {
97      get { return (IValueParameter<DoubleValue>)Parameters["EvalTimeFactor"]; }
98    }
99    public IValueParameter<DoubleValue> DistanceFactor {
100      get { return (IValueParameter<DoubleValue>)Parameters["EvalDistanceFactor"]; }
101    }
102    public IValueParameter<DoubleValue> OverloadPenalty {
103      get { return (IValueParameter<DoubleValue>)Parameters["EvalOverloadPenalty"]; }
104    }
105    public IValueParameter<DoubleValue> TardinessPenalty {
106      get { return (IValueParameter<DoubleValue>)Parameters["EvalTardinessPenalty"]; }
107    }
108    public OptionalValueParameter<DoubleValue> BestKnownQualityParameter {
109      get { return (OptionalValueParameter<DoubleValue>)Parameters["BestKnownQuality"]; }
110    }
111    IParameter ISingleObjectiveProblem.BestKnownQualityParameter {
112      get { return BestKnownQualityParameter; }
113    }
114    #endregion
115
116    #region Properties
117    public DoubleMatrix Coordinates {
118      get { return CoordinatesParameter.Value; }
119      set { CoordinatesParameter.Value = value; }
120    }
121    public DoubleMatrix DistanceMatrix {
122      get { return DistanceMatrixParameter.Value; }
123      set { DistanceMatrixParameter.Value = value; }
124    }
125    public BoolValue UseDistanceMatrix {
126      get { return UseDistanceMatrixParameter.Value; }
127      set { UseDistanceMatrixParameter.Value = value; }
128    }
129    public IntValue Vehicles {
130      get { return VehiclesParameter.Value; }
131      set { VehiclesParameter.Value = value; }
132    }
133    public DoubleValue Capacity {
134      get { return CapacityParameter.Value; }
135      set { CapacityParameter.Value = value; }
136    }
137    public DoubleArray Demand {
138      get { return DemandParameter.Value; }
139      set { DemandParameter.Value = value; }
140    }
141    public DoubleArray ReadyTime {
142      get { return ReadyTimeParameter.Value; }
143      set { ReadyTimeParameter.Value = value; }
144    }
145    public DoubleArray DueTime {
146      get { return DueTimeParameter.Value; }
147      set { DueTimeParameter.Value = value; }
148    }
149    public DoubleArray ServiceTime {
150      get { return ServiceTimeParameter.Value; }
151      set { ServiceTimeParameter.Value = value; }
152    }
153    public DoubleValue BestKnownQuality {
154      get { return BestKnownQualityParameter.Value; }
155      set { BestKnownQualityParameter.Value = value; }
156    }
157    IVRPCreator SolutionCreator {
158      get { return SolutionCreatorParameter.Value; }
159      set { SolutionCreatorParameter.Value = value; }
160    }
161    ISolutionCreator IProblem.SolutionCreator {
162      get { return SolutionCreatorParameter.Value; }
163    }
164    IVRPEvaluator Evaluator {
165      get { return EvaluatorParameter.Value; }
166      set { EvaluatorParameter.Value = value; }
167    }
168    ISingleObjectiveEvaluator ISingleObjectiveProblem.Evaluator {
169      get { return EvaluatorParameter.Value; }
170    }
171    IEvaluator IProblem.Evaluator {
172      get { return EvaluatorParameter.Value; }
173    }
174    public IEnumerable<IOperator> Operators {
175      get { return operators; }
176    }
177    private BestVRPSolutionAnalyzer BestVRPSolutionAnalyzer {
178      get { return operators.OfType<BestVRPSolutionAnalyzer>().FirstOrDefault(); }
179    }
180    private BestAverageWorstVRPToursAnalyzer BestAverageWorstVRPToursAnalyzer {
181      get { return operators.OfType<BestAverageWorstVRPToursAnalyzer>().FirstOrDefault(); }
182    }
183    #endregion
184
185    [Storable]
186    private List<IOperator> operators;
187
188    [StorableConstructor]
189    private VehicleRoutingProblem(bool deserializing) : base(deserializing) { }
190    public VehicleRoutingProblem()
191      : base() {
192      IVRPCreator creator = new RandomCreator();
193      IVRPEvaluator evaluator = new VRPEvaluator();
194
195      Parameters.Add(new ValueParameter<BoolValue>("Maximization", "Set to false as the Vehicle Routing Problem is a minimization problem.", new BoolValue(false)));
196      Parameters.Add(new ValueParameter<DoubleMatrix>("Coordinates", "The x- and y-Coordinates of the cities.", new DoubleMatrix()));
197      Parameters.Add(new OptionalValueParameter<DoubleMatrix>("DistanceMatrix", "The matrix which contains the distances between the cities."));
198      Parameters.Add(new ValueParameter<BoolValue>("UseDistanceMatrix", "True if a distance matrix should be calculated and used for evaluation, otherwise false.", new BoolValue(true)));
199      Parameters.Add(new ValueParameter<IntValue>("Vehicles", "The number of vehicles.", new IntValue(0)));
200      Parameters.Add(new ValueParameter<DoubleValue>("Capacity", "The capacity of each vehicle.", new DoubleValue(0)));
201      Parameters.Add(new ValueParameter<DoubleArray>("Demand", "The demand of each customer.", new DoubleArray()));
202      Parameters.Add(new ValueParameter<DoubleArray>("ReadyTime", "The ready time of each customer.", new DoubleArray()));
203      Parameters.Add(new ValueParameter<DoubleArray>("DueTime", "The due time of each customer.", new DoubleArray()));
204      Parameters.Add(new ValueParameter<DoubleArray>("ServiceTime", "The service time of each customer.", new DoubleArray()));
205      Parameters.Add(new OptionalValueParameter<DoubleValue>("BestKnownQuality", "The quality of the best known solution of this VRP instance."));
206      Parameters.Add(new ValueParameter<DoubleValue>("EvalFleetUsageFactor", "The fleet usage factor considered in the evaluation.", new DoubleValue(100)));
207      Parameters.Add(new ValueParameter<DoubleValue>("EvalTimeFactor", "The time factor considered in the evaluation.", new DoubleValue(0)));
208      Parameters.Add(new ValueParameter<DoubleValue>("EvalDistanceFactor", "The distance factor considered in the evaluation.", new DoubleValue(1)));
209      Parameters.Add(new ValueParameter<DoubleValue>("EvalOverloadPenalty", "The overload penalty considered in the evaluation.", new DoubleValue(100)));
210      Parameters.Add(new ValueParameter<DoubleValue>("EvalTardinessPenalty", "The tardiness penalty considered in the evaluation.", new DoubleValue(100)));
211
212      Parameters.Add(new ValueParameter<IVRPCreator>("SolutionCreator", "The operator which should be used to create new VRP solutions.", creator));
213      Parameters.Add(new ValueParameter<IVRPEvaluator>("Evaluator", "The operator which should be used to evaluate VRP solutions.", evaluator));
214
215      creator.VRPToursParameter.ActualName = "VRPTours";
216      evaluator.QualityParameter.ActualName = "VRPQuality";
217
218      InitializeRandomVRPInstance();
219
220      ParameterizeSolutionCreator();
221      ParameterizeEvaluator();
222
223      InitializeOperators();
224      AttachEventHandlers();
225    }
226
227    public override IDeepCloneable Clone(Cloner cloner) {
228      VehicleRoutingProblem clone = (VehicleRoutingProblem)base.Clone(cloner);
229      clone.operators = operators.Select(x => (IOperator)cloner.Clone(x)).ToList();
230      clone.DistanceMatrixParameter.Value = DistanceMatrixParameter.Value;
231      clone.AttachEventHandlers();
232      return clone;
233    }
234
235    #region Events
236    public event EventHandler SolutionCreatorChanged;
237    private void OnSolutionCreatorChanged() {
238      EventHandler handler = SolutionCreatorChanged;
239      if (handler != null) handler(this, EventArgs.Empty);
240    }
241    public event EventHandler EvaluatorChanged;
242    private void OnEvaluatorChanged() {
243      EventHandler handler = EvaluatorChanged;
244      if (handler != null) handler(this, EventArgs.Empty);
245    }
246    public event EventHandler OperatorsChanged;
247    private void OnOperatorsChanged() {
248      EventHandler handler = OperatorsChanged;
249      if (handler != null) handler(this, EventArgs.Empty);
250    }
251    public event EventHandler Reset;
252    private void OnReset() {
253      EventHandler handler = Reset;
254      if (handler != null) handler(this, EventArgs.Empty);
255    }
256    void VehiclesValue_ValueChanged(object sender, EventArgs e) {
257      ParameterizeSolutionCreator();
258    }
259    private void CoordinatesParameter_ValueChanged(object sender, EventArgs e) {
260      Coordinates.ItemChanged += new EventHandler<EventArgs<int, int>>(Coordinates_ItemChanged);
261      Coordinates.Reset += new EventHandler(Coordinates_Reset);
262      ParameterizeSolutionCreator();
263      ClearDistanceMatrix();
264    }
265    private void Coordinates_ItemChanged(object sender, EventArgs<int, int> e) {
266      ClearDistanceMatrix();
267    }
268    private void Coordinates_Reset(object sender, EventArgs e) {
269      ParameterizeSolutionCreator();
270      ClearDistanceMatrix();
271    }
272    private void SolutionCreatorParameter_ValueChanged(object sender, EventArgs e) {
273      ParameterizeSolutionCreator();
274      ParameterizeEvaluator();
275      ParameterizeAnalyzer();
276      ParameterizeOperators();
277      OnSolutionCreatorChanged();
278    }
279    private void SolutionCreator_PermutationParameter_ActualNameChanged(object sender, EventArgs e) {
280      ParameterizeEvaluator();
281      ParameterizeAnalyzer();
282      ParameterizeOperators();
283    }
284    private void EvaluatorParameter_ValueChanged(object sender, EventArgs e) {
285      Evaluator.QualityParameter.ActualNameChanged += new EventHandler(Evaluator_QualityParameter_ActualNameChanged);
286      ParameterizeEvaluator();
287      UpdateMoveEvaluators();
288      ParameterizeAnalyzer();
289      OnEvaluatorChanged();
290    }
291    private void Evaluator_QualityParameter_ActualNameChanged(object sender, EventArgs e) {
292      ParameterizeAnalyzer();
293    }
294    private void TranslocationMoveParameter_ActualNameChanged(object sender, EventArgs e) {
295      string name = ((ILookupParameter<TranslocationMove>)sender).ActualName;
296      foreach (IPermutationTranslocationMoveOperator op in Operators.OfType<IPermutationTranslocationMoveOperator>()) {
297        op.TranslocationMoveParameter.ActualName = name;
298      }
299    }
300    #endregion
301
302    #region Helpers
303    [StorableHook(HookType.AfterDeserialization)]
304    private void AfterDeserializationHook() {
305      AttachEventHandlers();
306    }
307
308    private void AttachEventHandlers() {
309      CoordinatesParameter.ValueChanged += new EventHandler(CoordinatesParameter_ValueChanged);
310      Vehicles.ValueChanged += new EventHandler(VehiclesValue_ValueChanged);
311      Coordinates.ItemChanged += new EventHandler<EventArgs<int, int>>(Coordinates_ItemChanged);
312      Coordinates.Reset += new EventHandler(Coordinates_Reset);
313      SolutionCreatorParameter.ValueChanged += new EventHandler(SolutionCreatorParameter_ValueChanged);
314      EvaluatorParameter.ValueChanged += new EventHandler(EvaluatorParameter_ValueChanged);
315      Evaluator.QualityParameter.ActualNameChanged += new EventHandler(Evaluator_QualityParameter_ActualNameChanged);
316    }
317    private void InitializeOperators() {
318      operators = new List<IOperator>();
319      operators.Add(new BestVRPSolutionAnalyzer());
320      operators.Add(new BestAverageWorstVRPToursAnalyzer());
321      ParameterizeAnalyzer();
322      operators.AddRange(ApplicationManager.Manager.GetInstances<IVRPOperator>().Cast<IOperator>().OrderBy(op => op.Name));
323      ParameterizeOperators();
324      UpdateMoveEvaluators();
325      InitializeMoveGenerators();
326    }
327    private void InitializeMoveGenerators() {
328      foreach (IAlbaTranslocationMoveOperator op in Operators.OfType<IAlbaTranslocationMoveOperator>()) {
329        if (op is IMoveGenerator) {
330          op.TranslocationMoveParameter.ActualNameChanged += new EventHandler(TranslocationMoveParameter_ActualNameChanged);
331        }
332      }
333
334    }
335    private void UpdateMoveEvaluators() {
336      ParameterizeOperators();
337      OnOperatorsChanged();
338    }
339    private void ParameterizeSolutionCreator() {
340      SolutionCreator.VehiclesParameter.ActualName = VehiclesParameter.Name;
341      SolutionCreator.CoordinatesParameter.ActualName = CoordinatesParameter.Name;
342      Evaluator.DistanceMatrixParameter.ActualName = DistanceMatrixParameter.Name;
343      Evaluator.UseDistanceMatrixParameter.ActualName = UseDistanceMatrixParameter.Name;
344      SolutionCreator.CapacityParameter.ActualName = CapacityParameter.Name;
345      SolutionCreator.DemandParameter.ActualName = DemandParameter.Name;
346      SolutionCreator.ReadyTimeParameter.ActualName = ReadyTimeParameter.Name;
347      SolutionCreator.DueTimeParameter.ActualName = DueTimeParameter.Name;
348      SolutionCreator.ServiceTimeParameter.ActualName = ServiceTimeParameter.Name;
349    }
350    private void ParameterizeEvaluator() {
351      Evaluator.VRPToursParameter.ActualName = SolutionCreator.VRPToursParameter.ActualName;
352      Evaluator.CoordinatesParameter.ActualName = CoordinatesParameter.Name;
353      Evaluator.DistanceMatrixParameter.ActualName = DistanceMatrixParameter.Name;
354      Evaluator.UseDistanceMatrixParameter.ActualName = UseDistanceMatrixParameter.Name;
355      Evaluator.VehiclesParameter.ActualName = VehiclesParameter.Name;
356      Evaluator.CapacityParameter.ActualName = CapacityParameter.Name;
357      Evaluator.DemandParameter.ActualName = DemandParameter.Name;
358      Evaluator.ReadyTimeParameter.ActualName = ReadyTimeParameter.Name;
359      Evaluator.DueTimeParameter.ActualName = DueTimeParameter.Name;
360      Evaluator.ServiceTimeParameter.ActualName = ServiceTimeParameter.Name;
361      Evaluator.FleetUsageFactor.ActualName = FleetUsageFactor.Name;
362      Evaluator.TimeFactor.ActualName = TimeFactor.Name;
363      Evaluator.DistanceFactor.ActualName = DistanceFactor.Name;
364      Evaluator.OverloadPenalty.ActualName = OverloadPenalty.Name;
365      Evaluator.TardinessPenalty.ActualName = TardinessPenalty.Name;
366    }
367    private void ParameterizeAnalyzer() {
368      BestVRPSolutionAnalyzer.CoordinatesParameter.ActualName = CoordinatesParameter.Name;
369      BestVRPSolutionAnalyzer.QualityParameter.ActualName = Evaluator.QualityParameter.ActualName;
370      BestVRPSolutionAnalyzer.DistanceParameter.ActualName = Evaluator.DistanceParameter.ActualName;
371      BestVRPSolutionAnalyzer.OverloadParameter.ActualName = Evaluator.OverloadParameter.ActualName;
372      BestVRPSolutionAnalyzer.TardinessParameter.ActualName = Evaluator.TardinessParameter.ActualName;
373      BestVRPSolutionAnalyzer.TravelTimeParameter.ActualName = Evaluator.TravelTimeParameter.ActualName;
374      BestVRPSolutionAnalyzer.VehiclesUtilizedParameter.ActualName = Evaluator.VehcilesUtilizedParameter.ActualName;
375      BestVRPSolutionAnalyzer.VRPToursParameter.ActualName = SolutionCreator.VRPToursParameter.ActualName;
376      BestVRPSolutionAnalyzer.ResultsParameter.ActualName = "Results";
377
378      BestAverageWorstVRPToursAnalyzer.DistanceParameter.ActualName = Evaluator.DistanceParameter.ActualName;
379      BestAverageWorstVRPToursAnalyzer.OverloadParameter.ActualName = Evaluator.OverloadParameter.ActualName;
380      BestAverageWorstVRPToursAnalyzer.TardinessParameter.ActualName = Evaluator.TardinessParameter.ActualName;
381      BestAverageWorstVRPToursAnalyzer.TravelTimeParameter.ActualName = Evaluator.TravelTimeParameter.ActualName;
382      BestAverageWorstVRPToursAnalyzer.VehiclesUtilizedParameter.ActualName = Evaluator.VehcilesUtilizedParameter.ActualName;
383      BestAverageWorstVRPToursAnalyzer.ResultsParameter.ActualName = "Results";
384    }
385    private void ParameterizeOperators() {
386      foreach (IVRPOperator op in Operators.OfType<IVRPOperator>()) {
387        if(op.CoordinatesParameter != null) op.CoordinatesParameter.ActualName = CoordinatesParameter.Name;
388        if(op.DistanceMatrixParameter != null) op.DistanceMatrixParameter.ActualName = DistanceMatrixParameter.Name;
389        if(op.UseDistanceMatrixParameter != null) op.UseDistanceMatrixParameter.ActualName = UseDistanceMatrixParameter.Name;
390        if(op.VehiclesParameter != null) op.VehiclesParameter.ActualName = VehiclesParameter.Name;
391        if(op.CapacityParameter != null) op.CapacityParameter.ActualName = CapacityParameter.Name;
392        if(op.DemandParameter != null) op.DemandParameter.ActualName = DemandParameter.Name;
393        if(op.ReadyTimeParameter != null) op.ReadyTimeParameter.ActualName = ReadyTimeParameter.Name;
394        if(op.DueTimeParameter != null) op.DueTimeParameter.ActualName = DueTimeParameter.Name;
395        if(op.ServiceTimeParameter != null) op.ServiceTimeParameter.ActualName = ServiceTimeParameter.Name;
396      }
397     
398      foreach (IVRPMoveOperator op in Operators.OfType<IVRPMoveOperator>()) {
399        op.VRPToursParameter.ActualName = SolutionCreator.VRPToursParameter.ActualName;
400      }
401
402      foreach (IPrinsOperator op in Operators.OfType<IPrinsOperator>()) {
403        op.FleetUsageFactor.ActualName = FleetUsageFactor.Name;
404        op.TimeFactor.ActualName = TimeFactor.Name;
405        op.DistanceFactor.ActualName = DistanceFactor.Name;
406        op.OverloadPenalty.ActualName = OverloadPenalty.Name;
407        op.TardinessPenalty.ActualName = TardinessPenalty.Name;
408      }
409
410      foreach (IVRPMoveEvaluator op in Operators.OfType<IVRPMoveEvaluator>()) {
411        op.FleetUsageFactor.ActualName = FleetUsageFactor.Name;
412        op.TimeFactor.ActualName = TimeFactor.Name;
413        op.DistanceFactor.ActualName = DistanceFactor.Name;
414        op.OverloadPenalty.ActualName = OverloadPenalty.Name;
415        op.TardinessPenalty.ActualName = TardinessPenalty.Name;
416        op.QualityParameter.ActualName = Evaluator.QualityParameter.ActualName;
417        op.VRPToursParameter.ActualName = SolutionCreator.VRPToursParameter.ActualName;
418      }
419      string translocationMove = Operators.OfType<IMoveGenerator>().OfType<IAlbaTranslocationMoveOperator>().First().TranslocationMoveParameter.ActualName;
420      foreach (IAlbaTranslocationMoveOperator op in Operators.OfType<IAlbaTranslocationMoveOperator>())
421        op.TranslocationMoveParameter.ActualName = translocationMove;
422
423      foreach (IVRPCrossover op in Operators.OfType<IVRPCrossover>()) {
424        op.ParentsParameter.ActualName = SolutionCreator.VRPToursParameter.ActualName;
425        op.ChildParameter.ActualName = SolutionCreator.VRPToursParameter.ActualName;
426      }
427
428      foreach (IVRPManipulator op in Operators.OfType<IVRPManipulator>()) {
429        op.VRPToursParameter.ActualName = SolutionCreator.VRPToursParameter.ActualName;
430      }
431    }
432    private void ClearDistanceMatrix() {
433      DistanceMatrixParameter.Value = null;
434    }
435    #endregion
436
437    public void ImportFromSolomon(string solomonFileName) {
438      SolomonParser parser = new SolomonParser(solomonFileName);
439      parser.Parse();
440
441      this.Name = parser.ProblemName;
442
443      Coordinates = new DoubleMatrix(parser.Coordinates);
444      Vehicles.Value = parser.Vehicles;
445      Capacity.Value = parser.Capacity;
446      Demand = new DoubleArray(parser.Demands);
447      ReadyTime = new DoubleArray(parser.Readytimes);
448      DueTime = new DoubleArray(parser.Duetimes);
449      ServiceTime = new DoubleArray(parser.Servicetimes);
450
451      OnReset();
452    }
453
454    public void ImportFromTSPLib(string tspFileName) {
455      TSPLIBParser parser = new TSPLIBParser(tspFileName);
456      parser.Parse();
457
458      this.Name = parser.Name;
459
460      int problemSize = parser.Demands.Length;
461
462      Coordinates = new DoubleMatrix(parser.Vertices);
463      if (parser.Vehicles != -1)
464        Vehicles.Value = parser.Vehicles;
465      else
466        Vehicles.Value = problemSize - 1;
467      Capacity.Value = parser.Capacity;
468      Demand = new DoubleArray(parser.Demands);
469      ReadyTime = new DoubleArray(problemSize);
470      DueTime = new DoubleArray(problemSize);
471      ServiceTime = new DoubleArray(problemSize);
472
473      for (int i = 0; i < problemSize; i++) {
474        ReadyTime[i] = 0;
475        DueTime[i] = int.MaxValue;
476        ServiceTime[i] = 0;
477      }
478
479      if (parser.Distance != -1) {
480        DueTime[0] = parser.Distance;
481      }
482
483      if (parser.Depot != 1)
484        throw new Exception("Invalid depot specification");
485
486      if (parser.WeightType != TSPLIBParser.TSPLIBEdgeWeightType.EUC_2D)
487        throw new Exception("Invalid weight type");
488
489      OnReset();
490    }
491
492    public void ImportFromORLib(string orFileName) {
493      ORLIBParser parser = new ORLIBParser(orFileName);
494      parser.Parse();
495
496      this.Name = parser.Name;
497      int problemSize = parser.Demands.Length;
498
499      Coordinates = new DoubleMatrix(parser.Vertices);
500      Vehicles.Value = problemSize - 1;
501      Capacity.Value = parser.Capacity;
502      Demand = new DoubleArray(parser.Demands);
503      ReadyTime = new DoubleArray(problemSize);
504      DueTime = new DoubleArray(problemSize);
505      ServiceTime = new DoubleArray(problemSize);
506
507      ReadyTime[0] = 0;
508      DueTime[0] = parser.MaxRouteTime;
509      ServiceTime[0] = 0;
510
511      for (int i = 1; i < problemSize; i++) {
512        ReadyTime[i] = 0;
513        DueTime[i] = int.MaxValue;
514        ServiceTime[i] = parser.ServiceTime;
515      }
516
517      OnReset();
518    }
519
520    private void InitializeRandomVRPInstance() {
521      System.Random rand = new System.Random();
522
523      int cities = 100;
524
525      Coordinates = new DoubleMatrix(cities + 1, 2);
526      Demand = new DoubleArray(cities + 1);
527      DueTime = new DoubleArray(cities + 1);
528      ReadyTime = new DoubleArray(cities + 1);
529      ServiceTime = new DoubleArray(cities + 1);
530
531      Vehicles.Value = 100;
532      Capacity.Value = 200;
533
534      for (int i = 0; i <= cities; i++) {
535        Coordinates[i, 0] = rand.Next(0, 100);
536        Coordinates[i, 1] = rand.Next(0, 100);
537
538        if (i == 0) {
539          Demand[i] = 0;
540          DueTime[i] = Int16.MaxValue;
541          ReadyTime[i] = 0;
542          ServiceTime[i] = 0;
543        } else {
544          Demand[i] = rand.Next(10, 50);
545          DueTime[i] = rand.Next((int)Math.Ceiling(VRPUtilities.CalculateDistance(0, i, Coordinates)), 1200);
546          ReadyTime[i] = DueTime[i] - rand.Next(0, 100);
547          ServiceTime[i] = 90;
548        }
549      }
550    }
551  }
552}
Note: See TracBrowser for help on using the repository browser.