Delphi numerisches differenzieren

Thema durchsuchen

Ansicht

Themen-Optionen

numerisches differenzieren

Ein Thema von Dmo11 · begonnen am 13. Dez 2007 · letzter Beitrag vom 13. Dez 2007

Vorheriger Beitrag

Nächster Beitrag

Dmo11

Registriert seit: 27. Nov 2007
10 Beiträge

numerisches differenzieren

13. Dez 2007, 09:30

Hallo Leute....

Hab diesen Quellcode zum numerischen differenzieren hier im Forum gefunden.

markieren

Delphi-Quellcode:

			function foo_(x: Double; degree: integer): Double;

begin

if degree = 0

  then Result := foo(x)

  else Result := (foo_(x + PRECISION, degree - 1) - foo_(x - PRECISION, degree - 1)) / (2*PRECISION);

end;

Kann mir bitte jemand erklären wie ich diese funktion für

u:=u1*sin(2*pi/m*s1*i) anwenden kann.
Ich bräuchte davon nur lediglich die 1.Ableitung.

mfg dmo