Re: Equation-Handling in Mathematica

[mathemas ordinate <info@XXXXXXX.de>]

Sehr geehrter Herr Woysch,

Da z.B. equation1 die Fullform

Equal[Plus[Times[b,x],Times[a,Power[x,2]]],c]

Hat m, kann man gut mit Map und pure Function die Operation auf beide Seiten
der Gleichung anwenden:

 equation2 = Map[c + # &, equation1]

Gruss Carsten Herrmann

Am 31.08.10 11:57 schrieb "WOYSCH, Gunter" unter
<Gunter.Woysch@XXXXXXX.com>:

> Stuttgart, den 31. August 2010
> 
> Equation-Handling in Mathematica
> 
> An alle Mathematica-Kundigen !
> 
> Hier kommt eine Frage, die ich schon immer einmal stellen wollte ..
> 
> Wenn Sie mit mathematischen Gleichungen mit Bleistift auf Papier arbeiten,
> dann kommt es ja immer wieder vor, dass Sie einen Term von einer Seite auf die
> andere Seite umsetzen, dass Sie mit einem Faktor multiplizieren oder
> dividieren - oder dass Sie etwas ähnliches tun.
> 
> Wenn ich "naiv" über Mathematica nachdenke, dann würde ich das in Mma wie
> folgt machen wollen :
> 
>   - Beispiel 1
> 
>     equation1 =  a*x^2 + b*x == c
> 
>     equation2 = equation1 - c
> 
>   - Beispiel 2
> 
>     equation3 =  a*x^2 + 0.5*b*x == c
> 
>     equation4 =  equation3 * 2
> 
>   - Beispiel 3
> 
>     equation5 =  a*x^2 + b*x == c / y
> 
>     equation6 =  1/equation5
> 
> Eigentlich erwarte ich, dass bei allen diesen Beispielen Mma die angegebenen
> Operationen jeweils auf beide Seiten einer Gleichung anwendet und die
> Gleichung dann in der überarbeiteten Form ausgibt.
> 
> Wenn man es ausprobiert, funktioniert es leider nicht so.
> 
> Wie führt man diese Operationen mit Mathematica jetzt aus ?
> 
> Wie könnte man die Operationen, wie oben angegeben, durch eine
> Mathematica-Funktion realisieren ?
> 
> Danke für jede Antwort !
> 
> Mit freundlichen Grüssen,
> 
> Gunter Woysch
>   
> 
> 
> 

--  
mathemas ordinate, Dipl. Math. Carsten Herrmann, M.Sc.
GbR seit 13 Jahren !  Ums.St.ID DE135574376
__*__ Koenigsbergerstr. 97 in 24161 Altenholz
===== WWW: http://www.ordinate.de  Email info@XXXXXXX.de
|| || Tel:0431 237-4500, Mobil: 0177 312 8557
|| || Fax:0431 237-4501 oder alt. 0431 32888-12
Distribution+Training+Support: Mathematica ExtendSim MathType Kaleida...
Mathematica Tage   http://www.ordinate.de/mathematicaTag.htm
> ****************************************************************
> Die  in  dieser  E-Mail  enthaltenen  Informationen  sind  vertraulich.
> Diese  E-Mail  ist   ausschliesslich  fuer  den  Adressaten  bestimmt
> und  jeglicher  Zugriff  durch andere  Personen  ist  nicht  zulaessig.
> Falls  Sie  nicht  einer   der  genannten  Empfaenger  sind,  ist  jede
> Veroeffentlichung,  Vervielfaeltigung,  Verteilung  oder  sonstige  in
> diesem  Zusammenhang  stehende  Handlung  untersagt  und  unter
> Umstaenden  ungesetzlich.  Sollte  diese Nachricht  nicht   fuer  Sie
> bestimmt sein, so  bitten  wir  Sie,  den  Absender  unverzueglich zu
> informieren und die E-Mail zu loeschen.
> ****************************************************************
> The information in this e-mail is  confidential. It is intended  solely
> for the addressee  and  access  to  the  e-mail  by  anyone  else  is
> unauthorised.
> If you are not a named recipient, any disclosure,copying, distribution
> or any  action  taken  or omitted to  be taken  in  reliance  on  it,  is
> prohibited and  may  be unlawful.  If  the  notice is  not  intended for
> you, please  notify  the sender immediately and delete the e-mail.
> ****************************************************************