source: stable/HeuristicLab.Problems.Programmable/3.3/SingleObjectiveProgrammableProblem.cs @ 14172

Last change on this file since 14172 was 14172, checked in by abeham, 4 years ago

#2579: merged to stable

File size: 4.5 KB
Line 
1#region License Information
2/* HeuristicLab
3 * Copyright (C) 2002-2015 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.Collections.Generic;
23using System.Drawing;
24using HeuristicLab.Analysis;
25using HeuristicLab.Common;
26using HeuristicLab.Common.Resources;
27using HeuristicLab.Core;
28using HeuristicLab.Data;
29using HeuristicLab.Optimization;
30using HeuristicLab.Parameters;
31using HeuristicLab.Persistence.Default.CompositeSerializers.Storable;
32
33namespace HeuristicLab.Problems.Programmable {
34  [Item("Programmable Problem (single-objective)", "Represents a single-objective problem that can be programmed with a script.")]
35  [Creatable(CreatableAttribute.Categories.Problems, Priority = 100)]
36  [StorableClass]
37  public sealed class SingleObjectiveProgrammableProblem : SingleObjectiveBasicProblem<IEncoding>, IProgrammableItem {
38    public static new Image StaticItemImage {
39      get { return VSImageLibrary.Script; }
40    }
41
42    private FixedValueParameter<SingleObjectiveProblemDefinitionScript> SingleObjectiveProblemScriptParameter {
43      get { return (FixedValueParameter<SingleObjectiveProblemDefinitionScript>)Parameters["ProblemScript"]; }
44    }
45
46    public SingleObjectiveProblemDefinitionScript ProblemScript {
47      get { return SingleObjectiveProblemScriptParameter.Value; }
48    }
49
50    public ISingleObjectiveProblemDefinition ProblemDefinition {
51      get { return SingleObjectiveProblemScriptParameter.Value; }
52    }
53
54    private SingleObjectiveProgrammableProblem(SingleObjectiveProgrammableProblem original, Cloner cloner)
55      : base(original, cloner) {
56      RegisterEvents();
57    }
58    public override IDeepCloneable Clone(Cloner cloner) { return new SingleObjectiveProgrammableProblem(this, cloner); }
59
60    [StorableConstructor]
61    private SingleObjectiveProgrammableProblem(bool deserializing) : base(deserializing) { }
62    public SingleObjectiveProgrammableProblem()
63      : base() {
64      Parameters.Add(new FixedValueParameter<SingleObjectiveProblemDefinitionScript>("ProblemScript", "Defines the problem.", new SingleObjectiveProblemDefinitionScript() { Name = Name }));
65      Operators.Add(new BestScopeSolutionAnalyzer());
66      RegisterEvents();
67    }
68
69    [StorableHook(HookType.AfterDeserialization)]
70    private void AfterDeserialization() {
71      RegisterEvents();
72    }
73
74    private void RegisterEvents() {
75      ProblemScript.ProblemDefinitionChanged += (o, e) => OnProblemDefinitionChanged();
76      ProblemScript.NameChanged += (o, e) => OnProblemScriptNameChanged();
77    }
78
79    private void OnProblemDefinitionChanged() {
80      Parameters.Remove("Maximization");
81      Parameters.Add(new FixedValueParameter<BoolValue>("Maximization", "Set to false if the problem should be minimized.", (BoolValue)new BoolValue(Maximization).AsReadOnly()) { Hidden = true });
82
83      Encoding = ProblemDefinition.Encoding;
84      OnOperatorsChanged();
85      OnReset();
86    }
87    protected override void OnNameChanged() {
88      base.OnNameChanged();
89      ProblemScript.Name = Name;
90    }
91    private void OnProblemScriptNameChanged() {
92      Name = ProblemScript.Name;
93    }
94
95    public override bool Maximization {
96      get { return Parameters.ContainsKey("ProblemScript") ? ProblemDefinition.Maximization : false; }
97    }
98
99    public override double Evaluate(Individual individual, IRandom random) {
100      return ProblemDefinition.Evaluate(individual, random);
101    }
102
103    public override void Analyze(Individual[] individuals, double[] qualities, ResultCollection results, IRandom random) {
104      ProblemDefinition.Analyze(individuals, qualities, results, random);
105    }
106    public override IEnumerable<Individual> GetNeighbors(Individual individual, IRandom random) {
107      return ProblemDefinition.GetNeighbors(individual, random);
108    }
109  }
110}
Note: See TracBrowser for help on using the repository browser.