Matrix4x4.cs

using System;
using Waher.Script.Abstraction.Elements;
using Waher.Script.Model;
using Waher.Script.Objects;
 
namespace Waher.Script.Graphs3D.Functions.Matrices
{
    public class Matrix4x4 : FunctionMultiVariate
    {
        protected static readonly ArgumentType[] argumentTypes16Scalar = new ArgumentType[] 
        { 
            ArgumentType.Scalar, ArgumentType.Scalar, ArgumentType.Scalar, ArgumentType.Scalar,
            ArgumentType.Scalar, ArgumentType.Scalar, ArgumentType.Scalar, ArgumentType.Scalar,
            ArgumentType.Scalar, ArgumentType.Scalar, ArgumentType.Scalar, ArgumentType.Scalar,
            ArgumentType.Scalar, ArgumentType.Scalar, ArgumentType.Scalar, ArgumentType.Scalar
        };
 
        public Matrix4x4(ScriptNode M11, ScriptNode M12, ScriptNode M13, ScriptNode M14,
            ScriptNode M21, ScriptNode M22, ScriptNode M23, ScriptNode M24,
            ScriptNode M31, ScriptNode M32, ScriptNode M33, ScriptNode M34,
            ScriptNode M41, ScriptNode M42, ScriptNode M43, ScriptNode M44, 
            int Start, int Length, Expression Expression)
            : base(new ScriptNode[] { M11, M12, M13, M14, M21, M22, M23, M24, M31, M32, M33, M34, M41, M42, M43, M44 },
                  argumentTypes16Scalar, Start, Length, Expression)
        {
        }
 
        public override string FunctionName => nameof(Matrix4x4);
 
        public override string[] DefaultArgumentNames => new string[] 
        { 
            "m11", "m12", "m13", "m14", 
            "m21", "m22", "m23", "m24", 
            "m31", "m32", "m33", "m34", 
            "m41", "m42", "m43", "m44" 
        };
 
        public override IElement Evaluate(IElement[] Arguments, Variables Variables)
        {
            return new ObjectValue(new System.Numerics.Matrix4x4(
                (float)Expression.ToDouble(Arguments[0].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[1].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[2].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[3].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[4].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[5].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[6].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[7].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[8].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[9].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[10].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[11].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[12].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[13].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[14].AssociatedObjectValue),
                (float)Expression.ToDouble(Arguments[15].AssociatedObjectValue)));
        }
    }
}