Rekursion

[Hans.Dolhaine@XXXXXXX.com]

Liebe Liste,

Lösungen von Integralgleichungen lassen sich näherungsweise rekursiv
berechnen. Das in Frage stehende Prozedere lautet hier

y[0,t]= (Exp[ -t]+Exp[-3 t])/2

y[k,t] = Integrate[ Exp[ -t -z] y[k-1,z] ,{z,0,t}] + (Exp[ -t]+Exp[-3 t])/2
.

Wenn ich die Funktionen genau so angebe und aufrufe erhalte ich falsche
Ergebnisse. Berechne ich sukzessive erst y[1,t], y[2,t], etc. und setze die
Resultate per Hand in die Rekursionsformel ein, wird's richtig . Siehe
anhängendes notebook.

Auch ein Versuch, alle Variablen über Module strikt lokal zu machen bringt
nix. Was mache ich falsch?

Grüsse

Hans Dolhaine

(See attached file: demug.nb)


_________________________________

VTR-TS
Phone:      +49-211-797-4809
Fax:        +49-211-798-1853
Mobile:     0171 97 17 049
E-Mail:     Hans.Dolhaine@XXXXXXX.com

demug.nb
Description: Mathematica Notebook document