Vector4.cs

using System;
using Waher.Script.Abstraction.Elements;
using Waher.Script.Model;
using Waher.Script.Objects;
 
namespace Waher.Script.Graphs3D.Functions.Vectors
{
    public class Vector4 : FunctionMultiVariate
    {
        public Vector4(ScriptNode X, ScriptNode Y, ScriptNode Z, ScriptNode W,
            int Start, int Length, Expression Expression)
            : base(new ScriptNode[] { X, Y, Z, W },
                  argumentTypes4Scalar, Start, Length, Expression)
        {
        }
 
        public override string FunctionName => nameof(Vector4);
 
        public override string[] DefaultArgumentNames => new string[] { "x", "y", "z", "w" };
 
        public override IElement Evaluate(IElement[] Arguments, Variables Variables)
        {
            return new ObjectValue(new System.Numerics.Vector4(
                (float)Expression.ToDouble(Arguments[0].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[1].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[2].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[3].AssociatedObjectValue)));
        }
    }
}