Geometrie/Evolventa

Popis:

Nechť je dána křivka $p$ v prostoru $E_3$. Křivka $s$, která protíná kolmo všechny tečné vektory křivky $p$, se nazývá Evolventa křivky $p$ (je jich nekonečně mnoho).

Soubor:Evolv sinusoida.jpg - obrázek 1. Zobrazení Evolventy na sinusoidě:

Soubor:Involute3.jpg - obrázek 2. Zobrazení Evolventy na kružnici:

Algoritmizace:

Funkce pro výpočet evolventy.

private void SetInvolute()
{
  double s = 0;
  involute.Clear();
  c2DPoint LastPoint = Fxy(ParametrTypeCommonMin);
  
  for (double i = ParametrTypeCommonMin; i < ParametrTypeCommonMax; i += segment)
  {
    c2DPoint D0Point = Fxy(i);
    c2DPoint D1Point = Fxydxy(i);
    s += D0Point.Distance(LastPoint)
               
    double fraction = s / Math.Sqrt(Math.Pow(D1Point.X,2)+Math.Pow(D1Point.Y,2));
    involute.Add(new c2DPoint(D0Point.X - D1Point.X*fraction, D0Point.Y - D1Point.Y*fraction));
    LastPoint = D0Point;
   }
}