Ich versuche folgendes Integral zu berechnen (Mathematica 3.0.0)
<<Algebra`ReIm`
x /: Im[x]=0
w /: Im[w]=0
Positive[w] ^= True
pwt = -((m*(w*Sin[\[Phi]] + 2*k*x*Sin[\[Phi] - \[Psi]]))/(E^((2*x^2)/w^2)*w))
i1=Integrate[pwt,{x,-Infinity,0}]
Alle Variablen sind reell, und w ist immer positiv. Trotzdem erhalte ich
folgendes Ergebnis:
1) Fehlermeldung (Integral ... does not converge)
2) Das Ergebnis faengt mit "If[ w^2 > 0, ..., ...]" an.
Aber ich habe doch extra gesagt, dass w>0 sein soll!
Ist vielleicht das Package "ReIm" nicht mehr kompatibel zur Version 3?
Oder wie kann ich sonst dieses "If" loswerden?
Gerhard Heinzel
=====================================================================
Gerhard Heinzel E-mail: ghh@XXXXXXX.de
Max-Planck-Institut fuer Quantenoptik Phone: +49(89)32905-268/252
Hans-Kopfermann-Str. 1 Phone (30m Lab): +49(89)3299-3282
D-85748 Garching Fax: +49(89)32905-200
Germany http://www.geo600.uni-hannover.de
=====================================================================
|