QuanTAlib/lib/numerics/poissondist/Poissondist.Quantower.Tests.cs

using Xunit;
using TradingPlatform.BusinessLayer;

namespace QuanTAlib.Tests;

public class PoissondistIndicatorTests
{
    [Fact]
    public void PoissondistIndicator_Constructor_SetsDefaults()
    {
        var indicator = new PoissondistIndicator();

        Assert.Equal(SourceType.Close, indicator.Source);
        Assert.Equal(14, indicator.Period);
        Assert.Equal(1.0, indicator.Lambda);
        Assert.Equal(5, indicator.Threshold);
        Assert.True(indicator.ShowColdValues);
        Assert.Equal("POISSONDIST - Poisson Distribution CDF", indicator.Name);
        Assert.True(indicator.SeparateWindow);
        Assert.True(indicator.OnBackGround);
    }

    [Fact]
    public void PoissondistIndicator_MinHistoryDepths_EqualsPeriod()
    {
        var indicator = new PoissondistIndicator { Period = 30 };
        Assert.Equal(30, indicator.MinHistoryDepths);
    }

    [Fact]
    public void PoissondistIndicator_ShortName_IsCorrect()
    {
        var indicator = new PoissondistIndicator { Period = 20, Lambda = 5.0, Threshold = 10 };
        Assert.Equal("POISSONDIST(20,5.00,10)", indicator.ShortName);
    }

    [Fact]
    public void PoissondistIndicator_Initialize_CreatesTwoLineSeries()
    {
        var indicator = new PoissondistIndicator();
        indicator.Initialize();

        Assert.Equal(2, indicator.LinesSeries.Count);
        Assert.Equal("PoissonDist", indicator.LinesSeries[0].Name);
        Assert.Equal("Mid", indicator.LinesSeries[1].Name);
    }

    [Fact]
    public void PoissondistIndicator_ProcessUpdate_HistoricalBar_ComputesValue()
    {
        var indicator = new PoissondistIndicator { Period = 5, Lambda = 5.0, Threshold = 5 };
        indicator.Initialize();

        var now = DateTime.UtcNow;
        for (int i = 0; i < 5; i++)
        {
            indicator.HistoricalData.AddBar(now.AddMinutes(i), 0, 105 + i, 95 - i, 100 + i);
            var args = new UpdateArgs(UpdateReason.HistoricalBar);
            indicator.ProcessUpdate(args);
        }

        double val = indicator.LinesSeries[0].GetValue(0);
        Assert.True(double.IsFinite(val), "Output must be finite after warmup");
        Assert.True(val >= 0.0 && val <= 1.0, $"Output {val} must be in [0,1]");
    }

    [Fact]
    public void PoissondistIndicator_ProcessUpdate_NewBar_AddsNewValue()
    {
        var indicator = new PoissondistIndicator { Period = 3, Lambda = 5.0, Threshold = 5 };
        indicator.Initialize();

        var now = DateTime.UtcNow;
        for (int i = 0; i < 3; i++)
        {
            indicator.HistoricalData.AddBar(now.AddMinutes(i), 0, 105, 95, 100 + i);
            indicator.ProcessUpdate(new UpdateArgs(UpdateReason.HistoricalBar));
        }

        indicator.HistoricalData.AddBar(now.AddMinutes(3), 0, 106, 96, 103);
        indicator.ProcessUpdate(new UpdateArgs(UpdateReason.NewBar));

        Assert.Equal(4, indicator.LinesSeries[0].Count);
    }

    [Fact]
    public void PoissondistIndicator_ProcessUpdate_NewTick_ProcessesWithoutError()
    {
        var indicator = new PoissondistIndicator { Period = 3, Lambda = 5.0, Threshold = 5 };
        indicator.Initialize();

        var now = DateTime.UtcNow;
        indicator.HistoricalData.AddBar(now, 0, 105, 95, 100);
        indicator.ProcessUpdate(new UpdateArgs(UpdateReason.HistoricalBar));
        indicator.ProcessUpdate(new UpdateArgs(UpdateReason.NewTick));

        Assert.Equal(2, indicator.LinesSeries[0].Count);
    }

    [Fact]
    public void PoissondistIndicator_MidLine_IsAlwaysHalf()
    {
        var indicator = new PoissondistIndicator { Period = 3, Lambda = 5.0, Threshold = 5 };
        indicator.Initialize();

        var now = DateTime.UtcNow;
        for (int i = 0; i < 5; i++)
        {
            indicator.HistoricalData.AddBar(now.AddMinutes(i), 0, 105, 95, 100 + i);
            indicator.ProcessUpdate(new UpdateArgs(UpdateReason.HistoricalBar));
        }

        for (int i = 0; i < indicator.LinesSeries[1].Count; i++)
        {
            double mid = indicator.LinesSeries[1].GetValue(i);
            Assert.Equal(0.5, mid, 1e-10);
        }
    }

    [Fact]
    public void PoissondistIndicator_DifferentSourceType_Works()
    {
        var indicator = new PoissondistIndicator { Period = 3, Lambda = 5.0, Threshold = 5, Source = SourceType.High };
        indicator.Initialize();

        var now = DateTime.UtcNow;
        for (int i = 0; i < 3; i++)
        {
            indicator.HistoricalData.AddBar(now.AddMinutes(i), 0, 110 + i, 90, 100);
            indicator.ProcessUpdate(new UpdateArgs(UpdateReason.HistoricalBar));
        }

        double val = indicator.LinesSeries[0].GetValue(0);
        Assert.True(double.IsFinite(val));
    }

    [Fact]
    public void PoissondistIndicator_OutputInRange_AfterManyBars()
    {
        var indicator = new PoissondistIndicator { Period = 20, Lambda = 5.0, Threshold = 5 };
        indicator.Initialize();

        var now = DateTime.UtcNow;
        var gbm = new GBM(startPrice: 100, mu: 0.05, sigma: 0.2, seed: 73001);
        var bars = gbm.Fetch(50, now.Ticks, TimeSpan.FromMinutes(1));

        for (int i = 0; i < bars.Close.Count; i++)
        {
            double price = bars.Close[i].Value;
            indicator.HistoricalData.AddBar(
                new DateTime(bars.Close[i].Time, DateTimeKind.Utc),
                0, price * 1.01, price * 0.99, price);
            indicator.ProcessUpdate(new UpdateArgs(UpdateReason.HistoricalBar));
        }

        for (int i = 0; i < indicator.LinesSeries[0].Count; i++)
        {
            double val = indicator.LinesSeries[0].GetValue(i);
            Assert.True(val >= 0.0 && val <= 1.0, $"Value {val} at index {i} out of range");
        }
    }

    [Fact]
    public void PoissondistIndicator_ParameterChange_ReflectsInShortName()
    {
        var indicator = new PoissondistIndicator();
        indicator.Period = 10;
        indicator.Lambda = 3.5;
        indicator.Threshold = 4;
        Assert.Equal("POISSONDIST(10,3.50,4)", indicator.ShortName);
    }
}