Frac.cs

using System;
using System.Numerics;
using Waher.Script.Abstraction.Elements;
using Waher.Script.Model;
using Waher.Script.Objects;
 
namespace Waher.Script.Functions.Scalar
{
    public class Frac : FunctionOneScalarVariable
    {
        public Frac(ScriptNode Argument, int Start, int Length, Expression Expression)
            : base(Argument, Start, Length, Expression)
        {
        }
 
        public override string FunctionName => nameof(Frac);
 
        public override IElement EvaluateScalar(double Argument, Variables Variables)
        {
            return new DoubleNumber(Argument - Math.Floor(Argument));
        }
 
        public override IElement EvaluateScalar(Complex Argument, Variables Variables)
        {
            return new ComplexNumber(new Complex(Argument.Real - Math.Floor(Argument.Real), 
                Argument.Imaginary - Math.Floor(Argument.Imaginary)));
        }
    }
}