Ja dann hast du irgendwo sonst ein Problem in deinem Code. Denn b
Delphi-Quellcode:
c := 0.0001;
d := -ln(c);
b := (ln(Sqrt(r * r + i * i) + c ) + d ) * q1;
ist ja genau so gebaut, dass b=0 für ¦Spektrum¦=sqrt(r*r+i*i)=0.
¦Spektrum¦=0 in b eingesetzt:
b = (ln(0+c) - ln(c))*q1 = 0*q1 = 0