PolarMap produces error-message
- To: mathgroup at smc.vnet.net
- Subject: [mg27358] PolarMap produces error-message
- From: "Ulrich lists Schneider" <lists at ulrichschneider.de>
- Date: Thu, 22 Feb 2001 02:25:04 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Hello everybody,
(see the german version below)
I tried to compute a function, which is defined by a complex integral. This
function is included in a small programm and is called IntegralTest (see
below). Everything works fine, with this function.
Now I want to map the unit disc under this function. I`ve done this with the
function PolarMap. PolarMap is a standard-function of Mathematica, included
in the package Graphics`ComplexMap`. Now I get the error message
"NIntegrate::"inum": "Integrand is not numerical at {t} =
({3.14159265358979311`} " "
It doesn`t matter if I replace the integrand with a simple function like
t*z. The same error occures. Has anybody an idea, how to get rid of this
error?
Here`s the programm:
<< Graphics`ComplexMap`
IntegralPrint:=Block[{},
IntegralTest[z_]:=
NIntegrate[(1+Exp[-I*t]z) / (1-Exp[-I*t]z) , {t,0,2*Pi}];
PolarMap[IntegralTest, {0,1},{0,2Pi}];
]
The error message of IntegralPrint:
NIntegrate::"inum":
"Integrand is not numerical at
{t} = ({3.14159265358979311`} "
----------------------------------------------
German Version
----------------------------------------------
Hallo,
ich versuche mich gerade etwas in Mathematika, und habe folgendes Problem.
Ich habe ein Programm geschrieben, welches ein komplexes Integral berechnet.
Dieses Programm importiert erstmal ein Packet, welches Komplexe Funktionen
darstellen kann. Dann wird das Integral von 0 bis 2Pi berechnet, mit dem
komplexen Integranden, der unten steht.
Ich bekomme dann immer eine Fehlermeldung, daß das Integral für t=Pi nicht
numerisch ist (keinen numerischen Wert annimmt) Dabei ist es egal, ob ich
diesen Integranden, der unten steht, oder einen anderen, einfacher, z.B. z*t
nehme.
Hier das Programm:
<< Graphics`ComplexMap`
IntegralPrint:=Block[{},
IntegralTest[z_]:=
NIntegrate[(1+Exp[-I*t]z) / (1-Exp[-I*t]z) , {t,0,2*Pi}];
PolarMap[IntegralTest, {0,1},{0,2Pi}];
]
(Bei PolarMap setzt man zwei Radien und zwei Argumente fest, hier wurde
{0,1},{0,2Pi} angegeben, d.h. man will das Bild der Funktion IntegralTest
haben, wenn man als Urbild den Einheitskreis nimmt)
IntegralPrint liefert dann:
NIntegrate::"inum":
"Integrand is not numerical at
{t} = ({3.14159265358979311`} "
Warum tritt diese Fehlermeldung auf?
Email: ulrich_schneider at uni.de
ulrich at ulrichschneider.de