source: branches/HeuristicLab.MetaOptimization/HeuristicLab.Problems.MetaOptimization/3.3/Operators/Manipulators/IntValue/NormalIntValueManipulator.cs @ 6017

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using HeuristicLab.Operators;
using HeuristicLab.Optimization;
using HeuristicLab.Persistence.Default.CompositeSerializers.Storable;
using HeuristicLab.Core;
using HeuristicLab.Parameters;
using HeuristicLab.Common;
using HeuristicLab.Encodings.IntegerVectorEncoding;
using HeuristicLab.Data;
using HeuristicLab.Encodings.RealVectorEncoding;

namespace HeuristicLab.Problems.MetaOptimization {
  [StorableClass]
  public class NormalIntValueManipulator : SingleSuccessorOperator, IIntValueManipulator, IStochasticOperator {

    public ILookupParameter<IRandom> RandomParameter {
      get { return (LookupParameter<IRandom>)Parameters["Random"]; }
    }

    public NormalIntValueManipulator() { }
    [StorableConstructor]
    protected NormalIntValueManipulator(bool deserializing) : base(deserializing) { }
    protected NormalIntValueManipulator(NormalIntValueManipulator original, Cloner cloner)
      : base(original, cloner) {
    }
    public override IDeepCloneable Clone(Cloner cloner) {
      return new NormalIntValueManipulator(this, cloner);
    }

    // todo: override apply
    
    public void Apply(IRandom random, IntValue value, IntValueRange range) {
      ApplyStatic(random, value, range);
    }

    public static void ApplyStatic(IRandom random, IntValue value, IntValueRange range) {
      bool ok = false;
      var strategy = new RealVector(new double[] { (range.UpperBound.Value - range.LowerBound.Value) / 10 }); // todo: add strategy parameter
      var vector = new RealVector(new double[] { value.Value });
      int val = value.Value;

      while (!ok) {
        vector[0] = val;
        NormalAllPositionsManipulator.Apply(random, vector, strategy);
        value.Value = (int)vector[0];
        value.Value = range.ApplyStepSize(value.Value);
        ok = range.IsInRange(value.Value);
      }
    }
  }
}