Ошибка "log: domain error"

void __fastcall TForm1::ComboBox1Change(TObject *Sender)
{
    _index = ComboBox1->ItemIndex;
 
    _s1 = 125 + _index*25;
    Label4->Caption = "0 - " + IntToStr(_s1) + " Гц";
    _s2 = _s1*2;
    Label5->Caption = "0 - " + IntToStr(_s2) + " Гц";
}
 
 
....
 
void _fastcall TForm1::DoPanel3()
{
    Series1->Clear();
    Series2->Clear();
    Series3->Clear();
    Series4->Clear();
        {
 
...
 
        double X, Y, R1, F1, D11, T1, DL, LIN;
        AnsiString Label = "";
        TColor Color;
        for(int X = 0; X <= LIN; X++)
                {
                        F1 = 2000;
                        D11 = 2*M_PI*_s1;
                        T1 = 1/F1;
                        DL = 10*10;
                        LIN = DL*2;
                        Y = (X-0.5-DL)/5;
                        R1 = 80*sin(D11*Y*T1)/(M_PI*Y);
                        Color = TColor(random(1600));
                        Label = X;
                        Series3->AddXY(X, R1, Label, Color);
                }
        }
        {
        double X, Y, R1, F1, D11, T1, DL, LIN;
        AnsiString Label = "";
        TColor Color;
        for(int X = 0; X <= LIN; X++)
                {
                        F1 = 2000;
                        D11 = 2*M_PI*_s2;
                        T1 = 1/F1;
                        DL = 10*10;
                        LIN = DL*2;
                        Y = (X-0.5-DL)/5;
                        R1 = 80*sin(D11*Y*T1)/(M_PI*Y);
                        Color = TColor(random(1600));
                        Label = X;
                        Series4->AddXY(X, R1, Label, Color);
                }
        }
}