Transpose.cs

using System;
using Waher.Script.Abstraction.Elements;
using Waher.Script.Model;
 
namespace Waher.Script.Operators.Matrices
{
    public class Transpose : UnaryOperator
    {
        public Transpose(ScriptNode Operand, int Start, int Length, Expression Expression)
            : base(Operand, Start, Length, Expression)
        {
        }
 
        public override IElement Evaluate(IElement Operand, Variables Variables)
        {
            if (Operand is IMatrix Matrix)
                return Matrix.Transpose();
 
            if (Operand is IVector Vector)
                return MatrixDefinition.Encapsulate(Vector.VectorElements, Vector.Dimension, 1, this);
 
            return Operand;
        }
    }
}