1  #region License Information


2  /* HeuristicLab


3  * Copyright (C) 20022010 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 


22  using HeuristicLab.Core;


23  using HeuristicLab.Persistence.Default.CompositeSerializers.Storable;


24  using HeuristicLab.Encodings.PermutationEncoding;


25  using HeuristicLab.Common;


26  using HeuristicLab.Problems.VehicleRouting.Encodings.General;


27  using HeuristicLab.Data;


28 


29  namespace HeuristicLab.Problems.VehicleRouting.Encodings.Alba {


30  [Item("InversionMove", "Item that describes an intra route inversion move on a VRP representation.")]


31  [StorableClass]


32  public class IntraRouteInversionMove : TwoIndexMove, IVRPMove {


33  public IVRPEncoding Individual { get { return Permutation as AlbaEncoding; } }


34 


35  public IntraRouteInversionMove()


36  : base() {


37  }


38 


39  public IntraRouteInversionMove(int index1, int index2)


40  : base(index1, index2, null) {


41  }


42 


43  public IntraRouteInversionMove(int index1, int index2, AlbaEncoding permutation)


44  : base(index1, index2, permutation) {


45  this.Permutation = permutation.Clone() as AlbaEncoding;


46  }


47 


48  public override IDeepCloneable Clone(HeuristicLab.Common.Cloner cloner) {


49  IntraRouteInversionMove clone = new IntraRouteInversionMove(


50  Index1, Index2);


51 


52  if (Permutation != null)


53  clone.Permutation = (AlbaEncoding)cloner.Clone(Permutation);


54 


55  cloner.RegisterClonedObject(this, clone);


56  return clone;


57  }


58 


59  #region IVRPMove Members


60 


61  public TourEvaluation GetMoveQuality(


62  IntValue vehicles,


63  DoubleArray dueTimeArray, DoubleArray serviceTimeArray, DoubleArray readyTimeArray,


64  DoubleArray demandArray, DoubleValue capacity, DoubleMatrix coordinates,


65  DoubleValue fleetUsageFactor, DoubleValue timeFactor, DoubleValue distanceFactor,


66  DoubleValue overloadPenalty, DoubleValue tardinessPenalty,


67  ILookupParameter<DoubleMatrix> distanceMatrix, Data.BoolValue useDistanceMatrix) {


68  return IntraRouteInversionMoveEvaluator.GetMoveQuality(Permutation as AlbaEncoding, this, vehicles,


69  dueTimeArray, serviceTimeArray, readyTimeArray, demandArray, capacity,


70  coordinates, fleetUsageFactor, timeFactor, distanceFactor,


71  overloadPenalty, tardinessPenalty, distanceMatrix, useDistanceMatrix);


72  }


73 


74  public IVRPEncoding MakeMove(IRandom random) {


75  IntraRouteInversionMoveMaker.Apply(Individual as AlbaEncoding, this);


76 


77  return Individual;


78  }


79 


80  #endregion


81  }


82  }

