Sehr geehrter Herr Dolhaine,
meiner Ansicht nach ist es ein Bug.
Aus Gewohnheit mache ich bei solchen unklaren Punkten immer eine numerische Überprüfung.
<<NumericalMath`NLimit`
NLimit[Im[Log[-3.+x \[ImaginaryI]]],x->0,Direction->1]
Out[317]=-3.14159
NLimit[Im[Log[-3.+x \[ImaginaryI]]],x->0,Direction->-1]
Out[318]=3.14159
Dies bestätigt ja auch das Ergebnis von Plot.
Bei Ihrem Beispiel läßt es sich auch noch per Hand überprüfen, bei normalen industriellen Anwendung ist dies aber
leider nicht mehr möglich.
Mit freundlichen Grüßen,
Stefan Braun
SmartCAE Stefan Braun
Marthastr. 9a
D-81825 München
Tel: 089/43738805
Fax: 089/43738061
Mobil: 0179/5173483
e-mail stefan.braun@XXXXXXX.de
internet: www.smartcae.de
DMUG-Archiv, http://www.mathematica.ch/archiv.html