- Timestamp:
- 06/27/12 11:33:49 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/sources/HeuristicLab.Problems.LawnMower/3.3/Interpreter.cs
r8059 r8131 21 21 22 22 using System; 23 using System.Collections.Generic; 24 using System.Linq; 23 25 using HeuristicLab.Encodings.SymbolicExpressionTreeEncoding; 24 26 … … 51 53 mowerState.Energy = length * width * 2; 52 54 lawn[mowerState.Position.Item1, mowerState.Position.Item2] = true; 53 EvaluateLawnMowerProgram(tree.Root, ref mowerState, lawn );55 EvaluateLawnMowerProgram(tree.Root, ref mowerState, lawn, tree.Root.Subtrees.Skip(1).ToArray()); 54 56 55 57 return lawn; … … 57 59 58 60 59 private static Tuple<int, int> EvaluateLawnMowerProgram(ISymbolicExpressionTreeNode node, ref MowerState mowerState, bool[,] lawn ) {61 private static Tuple<int, int> EvaluateLawnMowerProgram(ISymbolicExpressionTreeNode node, ref MowerState mowerState, bool[,] lawn, IEnumerable<ISymbolicExpressionTreeNode> adfs) { 60 62 if (mowerState.Energy <= 0) return new Tuple<int, int>(0, 0); 61 63 62 64 if (node.Symbol is ProgramRootSymbol) { 63 return EvaluateLawnMowerProgram(node.GetSubtree(0), ref mowerState, lawn );65 return EvaluateLawnMowerProgram(node.GetSubtree(0), ref mowerState, lawn, adfs); 64 66 } else if (node.Symbol is StartSymbol) { 65 return EvaluateLawnMowerProgram(node.GetSubtree(0), ref mowerState, lawn );67 return EvaluateLawnMowerProgram(node.GetSubtree(0), ref mowerState, lawn, adfs); 66 68 } else if (node.Symbol is Left) { 67 69 switch (mowerState.Heading) { … … 104 106 return constNode.Value; 105 107 } else if (node.Symbol is Sum) { 106 var p = EvaluateLawnMowerProgram(node.GetSubtree(0), ref mowerState, lawn );107 var q = EvaluateLawnMowerProgram(node.GetSubtree(1), ref mowerState, lawn );108 var p = EvaluateLawnMowerProgram(node.GetSubtree(0), ref mowerState, lawn, adfs); 109 var q = EvaluateLawnMowerProgram(node.GetSubtree(1), ref mowerState, lawn, adfs); 108 110 return new Tuple<int, int>(p.Item1 + q.Item1, 109 111 p.Item2 + q.Item2); 110 112 } else if (node.Symbol is Prog) { 111 EvaluateLawnMowerProgram(node.GetSubtree(0), ref mowerState, lawn );112 return EvaluateLawnMowerProgram(node.GetSubtree(1), ref mowerState, lawn );113 EvaluateLawnMowerProgram(node.GetSubtree(0), ref mowerState, lawn, adfs); 114 return EvaluateLawnMowerProgram(node.GetSubtree(1), ref mowerState, lawn, adfs); 113 115 } else if (node.Symbol is Frog) { 114 var p = EvaluateLawnMowerProgram(node.GetSubtree(0), ref mowerState, lawn );116 var p = EvaluateLawnMowerProgram(node.GetSubtree(0), ref mowerState, lawn, adfs); 115 117 116 118 uint newRow = (uint)((mowerState.Position.Item1 + lawn.GetLength(0) + p.Item1 % lawn.GetLength(0)) % lawn.GetLength(0)); … … 120 122 lawn[newRow, newCol] = true; 121 123 return new Tuple<int, int>(0, 0); 124 } else if (node.Symbol is InvokeFunction) { 125 var invokeNode = node as InvokeFunctionTreeNode; 126 127 // find the function definition for the invoke call 128 var functionDefinition = (from adf in adfs.Cast<DefunTreeNode>() 129 where adf.FunctionName == invokeNode.Symbol.FunctionName 130 select adf).Single(); 131 // clone the function definition because we are replacing the argument nodes 132 functionDefinition = (DefunTreeNode) functionDefinition.Clone(); 133 // find the argument tree nodes and their parents in the original function definition 134 // toList is necessary to prevent that newly inserted branches are iterated 135 var argumentCutPoints = (from parent in functionDefinition.IterateNodesPrefix() 136 from subtree in parent.Subtrees 137 where subtree is ArgumentTreeNode 138 select new { Parent = parent, Argument = subtree.Symbol as Argument, ChildIndex = parent.IndexOfSubtree(subtree) }) 139 .ToList(); 140 // replace all argument tree ndoes with the matching argument of the invoke node 141 foreach (var cutPoint in argumentCutPoints) { 142 cutPoint.Parent.RemoveSubtree(cutPoint.ChildIndex); 143 cutPoint.Parent.InsertSubtree(cutPoint.ChildIndex, (SymbolicExpressionTreeNode)invokeNode.GetSubtree(cutPoint.Argument.ArgumentIndex).Clone()); 144 } 145 return EvaluateLawnMowerProgram(functionDefinition.GetSubtree(0), ref mowerState, lawn, adfs); 122 146 } else { 123 147 throw new ArgumentException("Invalid symbol in the lawn mower program."); 124 148 } 125 149 } 126 127 150 } 128 151 }
Note: See TracChangeset
for help on using the changeset viewer.