RE: Funktionsdefinition

["Nowak Robert" <robert.nowak@XXXXXXX.at>]

keine ahnung ob das dem körper gerecht wird:

Sigma[s_] := Simplify[s] /. a_ + b_*Sqrt[5] -> a - b*Sqrt[5]
a1 + a2 - Sqrt[5]*(b1 + b2)

fürs beispiel funkts jedenfalls.

grüsse robert
--------------------
Robert Nowak

Tel: +43/12144894/32
Fax: +43/12144894/99

IMS Nanofabrication GmbH
Schreigasse 3
1020 Wien
Austria 



-----Original Message-----
From: Jens-Peer Kuska [mailto:kuska@XXXXXXX.de] 
Sent: Wednesday, October 04, 2006 1:20 PM
To: Andreas Rychen
Cc: demug@XXXXXXX.ch
Subject: Re: Funktionsdefinition


Hallo,

und

Clear[sigma]
sigma[a_ + b_. Sqrt[5]] := sigma[a] - b Sqrt[5]
sigma[a_] := a

geht nicht ??

Gruss
  Jens

Andreas Rychen wrote:
> Liebe Mathematica Fans
>  
> Im Zusammenhang mit Körpererweiterungen habe ich ein Problem, das
> vermutlich einfach zu lösen ist.
> Vergelichen Sie das Notebook "Funktion.nb".
>  
> Mit freundlichen Grüssen
> Andreas