Free cookie consent management tool by TermsFeed Policy Generator

source: branches/2901_StaticSelectionMethods/HeuristicLab.Problems.TravelingSalesman/3.3/MoveEvaluators/ThreeOpt/TSPTranslocationMoveGeoPathEvaluator.cs @ 17116

Last change on this file since 17116 was 15583, checked in by swagner, 7 years ago

#2640: Updated year of copyrights in license headers

File size: 3.2 KB
Line 
1#region License Information
2/* HeuristicLab
3 * Copyright (C) 2002-2018 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 HeuristicLab.Common;
24using HeuristicLab.Core;
25using HeuristicLab.Persistence.Default.CompositeSerializers.Storable;
26
27namespace HeuristicLab.Problems.TravelingSalesman {
28  /// <summary>
29  /// An operator to evaluate translocation or insertion moves (3-opt).
30  /// </summary>
31  [Item("TSPTranslocationMoveGeoPathEvaluator", "Operator for evaluating a translocation or insertion move (3-opt) based on geo (world) distances.")]
32  [StorableClass]
33  public class TSPTranslocationMoveGeoPathEvaluator : TSPTranslocationMovePathEvaluator {
34    public override Type EvaluatorType {
35      get { return typeof(TSPGeoPathEvaluator); }
36    }
37
38    private const double PI = 3.141592;
39    private const double RADIUS = 6378.388;
40
41    [StorableConstructor]
42    protected TSPTranslocationMoveGeoPathEvaluator(bool deserializing) : base(deserializing) { }
43    protected TSPTranslocationMoveGeoPathEvaluator(TSPTranslocationMoveGeoPathEvaluator original, Cloner cloner) : base(original, cloner) { }
44    public TSPTranslocationMoveGeoPathEvaluator() : base() { }
45
46    public override IDeepCloneable Clone(Cloner cloner) {
47      return new TSPTranslocationMoveGeoPathEvaluator(this, cloner);
48    }
49   
50
51    /// <summary>
52    /// Calculates the distance between two points using the GEO distance metric (globe coordinates).
53    /// </summary>
54    /// <param name="x1">The x-coordinate of point 1.</param>
55    /// <param name="y1">The y-coordinate of point 1.</param>
56    /// <param name="x2">The x-coordinate of point 2.</param>
57    /// <param name="y2">The y-coordinate of point 2.</param>
58    /// <returns>The calculated distance.</returns>
59    protected override double CalculateDistance(double x1, double y1, double x2, double y2) {
60      double latitude1, longitude1, latitude2, longitude2;
61      double q1, q2, q3;
62      double length;
63
64      latitude1 = ConvertToRadian(x1);
65      longitude1 = ConvertToRadian(y1);
66      latitude2 = ConvertToRadian(x2);
67      longitude2 = ConvertToRadian(y2);
68
69      q1 = Math.Cos(longitude1 - longitude2);
70      q2 = Math.Cos(latitude1 - latitude2);
71      q3 = Math.Cos(latitude1 + latitude2);
72
73      length = (int)(RADIUS * Math.Acos(0.5 * ((1.0 + q1) * q2 - (1.0 - q1) * q3)) + 1.0);
74      return (length);
75    }
76
77    private double ConvertToRadian(double x) {
78      return PI * (Math.Truncate(x) + 5.0 * (x - Math.Truncate(x)) / 3.0) / 180.0;
79    }
80  }
81}
Note: See TracBrowser for help on using the repository browser.