Changeset 15275 for branches/PushGP/HeuristicLab.PushGP/HeuristicLab.Problems.ProgramSynthesis/Push/Encoding/PlushVector.cs

Timestamp:

07/20/17 11:39:53 (7 years ago)

Author:

pkimmesw

Message:

#2665 Added PlushEncoding, ZeroErrorDistributionAnalzer

File:

• branches/PushGP/HeuristicLab.PushGP/HeuristicLab.Problems.ProgramSynthesis/Push/Encoding/PlushVector.cs (modified) (2 diffs)

branches/PushGP/HeuristicLab.PushGP/HeuristicLab.Problems.ProgramSynthesis/Push/Encoding/PlushVector.cs

@@ -5 +5 @@
   using HeuristicLab.Core;
   using HeuristicLab.Persistence.Default.CompositeSerializers.Storable;
+  using HeuristicLab.Problems.ProgramSynthesis.Push.Attributes;
+  using HeuristicLab.Problems.ProgramSynthesis.Push.Expressions;
 
   [StorableClass]
   public class PlushVector : Item {
 
-    private List<PlushEntry> entries;
+    [Storable]
+    private readonly List<PlushEntry> entries;
+    public IReadOnlyList<PlushEntry> Entries { get { return entries; } }
 
-    public PlushVector() : this(0) {
-
-    }
+    public PlushVector() : this(0) { }
 
     public PlushVector(int length) {
@@ -29 +31 @@
       return new PlushVector(this, cloner);
     }
+
+    private PushProgram pushProgram;
+
+    public PushProgram PushProgram
+    {
+      get
+      {
+        if (pushProgram == null) CreatePushProgram();
+        return pushProgram;
+      }
+    }
+
+    private void CreatePushProgram() {
+      var close = 0;
+      var currentIndex = 0;
+
+      pushProgram = FromPlush(ref currentIndex, ref close, 0);
+    }
+
+    private PushProgram FromPlush(
+     ref int currentIndex,
+     ref int close,
+     int depth) {
+
+      if (currentIndex >= entries.Count)
+        return PushProgram.Empty;
+
+      var instructions = new List<Expression>();
+
+      for (var i = currentIndex; i < entries.Count; i++) {
+        var entry = entries[i];
+        var instructionType = entry.Instruction.GetType();
+
+        close += entry.Close;
+
+        PushExpressionAttribute attribute;
+        if (ExpressionTable.TypeToAttributeTable.TryGetValue(instructionType, out attribute)) {
+          for (var blockIdx = 0u; blockIdx < attribute.ExecIn && currentIndex < entries.Count; blockIdx++) {
+            if (close != 0) {
+              close--;
+              instructions.Add(PushProgram.Empty);
+            } else {
+              currentIndex++;
+              var subProgram = FromPlush(ref currentIndex, ref close, depth + 1);
+              var subExpression = subProgram.Count == 1 ? subProgram.Expressions[0] : subProgram;
+
+              instructions.Add(subExpression);
+            }
+          }
+        }
+
+        instructions.Add(entry.Instruction);
+
+        if (close > 0 && depth > 0) {
+          close--;
+          break;
+        }
+
+        if (depth == 0) {
+          close = 0;
+        }
+      }
+
+      return new PushProgram(instructions);
+    }
+
+    public void UpdatePushProgram() {
+      pushProgram = null;
+    }
+
+    public void Add(PlushEntry entry) {
+      entries.Add(entry);
+    }
+
+    public PlushEntry this[int key]
+    {
+      get
+      {
+        return entries[key];
+      }
+    }
   }
 }