CartesianProduct.cs

using System.Collections.Generic;
using Waher.Script.Abstraction.Elements;
using Waher.Script.Exceptions;
using Waher.Script.Model;
 
namespace Waher.Script.Operators.Vectors
{
    public class CartesianProduct : BinaryVectorOperator
    {
        public CartesianProduct(ScriptNode Left, ScriptNode Right, int Start, int Length, Expression Expression)
            : base(Left, Right, Start, Length, Expression)
        {
        }
 
        public override IElement EvaluateVector(IVector Left, IVector Right, Variables Variables)
        {
            if (Left.Dimension != Right.Dimension)
                throw new ScriptRuntimeException("Vectors of different dimensions.", this);
 
            LinkedList<IElement> Elements = new LinkedList<IElement>();
            IEnumerator<IElement> e1 = Left.VectorElements.GetEnumerator();
            IEnumerator<IElement> e2 = Right.VectorElements.GetEnumerator();
            IElement v1;
 
            while (e1.MoveNext())
            {
                v1 = e1.Current;
                while (e2.MoveNext())
                    Elements.AddLast(VectorDefinition.Encapsulate(new IElement[] { v1, e2.Current }, false, this));
 
                e2.Reset();
            }
 
            return VectorDefinition.Encapsulate(Elements, false, this);
        }
    }
}