Stuttgart, den 27. Oktober 1998
An die Mathematica-Kundigen !
Eine natuerliche Schreibweise fuer den komplexen Widerstand Z eines
elektrischen Serien-Resonanzkreises ist
Z = R + I omega L + 1 / ( I omega Cc )
dabei sei
"I" die imaginaere Einheit ,
"omega" die Kreisfrequenz " 2 Pi f " .
Leider kann man Z nicht einfach wie folgt in den Real- und Imaginaer-Teil
trennen :
realZ = Coefficient[ ComplexExpand[ Z ], I, 0 ]
imagZ = Coefficient[ ComplexExpand[ Z ], I, 1 ] .
Mathematica bemerkt dazu :
General::ivar : I is not a valid variable ,
was wohl bedeutet,
dass die imaginaere Einheit " I " von Coefficient[] nicht wie eine sonstige
Variable behandelt wird.
Auch Re[ Z ] und Im[ Z ] liefern nicht das naiv erwartete Ergebnis.
Wie loest man dieses Problem moeglichst einfach und sauber ?
Anders gesagt,
gibt es einen einfachen Weg,
die Variablen R , L und Cc als Real_Variable zu deklarieren ?
Vielen Dank fuer eine kurze Antwort !
Mit freundlichen Gruessen
Gunter Woysch
-----
Dr. Gunter Woysch
Reisstr. 15
D 70435 Stuttgart
eMail Gunter_Woysch@XXXXXXX.com
-----
|