R: Re:complex conjugation by star
- To: mathgroup at smc.vnet.net
- Subject: [mg132623] R: Re:complex conjugation by star
- From: "Brambilla Roberto Luigi (RSE)" <Roberto.Brambilla at rse-web.it>
- Date: Wed, 23 Apr 2014 04:52:28 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: l-mathgroup@wolfram.com
- Delivered-to: mathgroup-outx@smc.vnet.net
- Delivered-to: mathgroup-newsendx@smc.vnet.net
- References: <20140418054638.0964A6A15@smc.vnet.net>
Hi Dave, very good! It is what I wanted! By your trick is possible to define reals: realList = {A, B, G, x, y}; RealQ[f_] := MemberQ[realList, f] So that, correctly, if P=AZ +BY +Gy+xU; P* gives Gy+xU*+BY*+AZ* But Conjugate[P] don't works since it simply echoes Conjugate[Ux+Gy+BY+AZ]. So better the star suffix! Fine! Many thanks! Roberto -----Messaggio originale----- Da: Dave Snead [mailto:dsnead6 at charter.net] Inviato: domenica 20 aprile 2014 10:47 A: mathgroup at smc.vnet.net Oggetto: Re:complex conjugation by star Rob -- This will do it. x,y are real, any others are complex. RealQ[f_]:=MemberQ[{x,y},f} SuperStar[f_?RealQ]:=f SuperStar[f_?NumberQ]:=Conjugate[f] SuperStar[f:_[___]]:=SuperStar/@f Cheers, Dave Snead -----Original Message----- From: Brambilla Roberto Luigi (RSE) Sent: Friday, April 18, 2014 2:10 AM To: 'Dave Snead' ; mathgroup at smc.vnet.net<mailto:mathgroup at smc.vnet.net> Subject: [mg132623] R: complex conjugation by star Dear Dave, many thanks again. Now I have the problem to tell Mathematica that same variables are reals and= have not to be 'starred' so that (x+Iy+z)* is not x*+Iy*+z* but x-Iy+z* (if x and y are reals and z unknown). Command like Element[x, Reals] does not work. Sincerely yours Roberto -----Messaggio originale----- Da: Dave Snead [mailto:dsnead6 at charter.net]<mailto:[mailto:dsnead6 at charter.n= et]> Inviato: venerd=EC 18 aprile 2014 09:30 A: Brambilla Roberto Luigi (RSE); mathgroup at smc.vnet.net<mailto:mathgroup@sm= c.vnet.net> Oggetto: Re: complex conjugation by star Rob -- This will give you what you want: SuperStar[f_?NumberQ]:=Conjugate[f] SuperStar[f:_[___]]:=SuperStar/@f Cheers, Dave Snead -----Original Message----- From: Brambilla Roberto Luigi (RSE) Sent: Thursday, April 17, 2014 10:46 PM To: mathgroup at smc.vnet.net<mailto:mathgroup at smc.vnet.net> Subject: [mg132623] complex conjugation by star I have defined the following useful star complex-conjugation (common star ex= ponent notation) f_*:=f/.Complex[u_,v_]->Complex[u,-v] and it works fine. For example BesselJ[2,x+I y]* gives BesselJ[2,x-I y] etc.= ..(x,y defined/undefined). Also it is listable on number lists {1+i2, 5+i6}* gives {1-i2, 5-i6} . Unfortunately it does not work on symbols, i.e. A* gives A even if I have defined A as a complex number by means of Element[= A, Complexes]. Similarly if I define Element[{A,B,G}, Complexes] {A,B,G}* gives {A,B,G} and (A+B+G)* gives A+B+G. I'd like to obtain {A*,B*,G*} and A*+B*+G* ( ! ) Is it possible to fix this deficiency, unpleasant in manipulating general ex= pressions where is not known if symbols represent real or complex variables= ? Many thanks! Rob RSE SpA ha adottato il Modello Organizzativo ai sensi del D.Lgs.231/2001, in= forza del quale l'assunzione di obbligazioni da parte della Societ=E0 avvi= ene con firma di un procuratore, munito di idonei poteri. RSE adopts a Compliance Programme under the Italian Law (D.Lgs.231/2001). According to this RSE Compliance Programme, any commitment of RSE is taken b= y the signature of one Representative granted by a proper Power of Attorney.= Le informazioni contenute in questo messaggio di posta elettronica sono ris= ervate e confidenziali e ne e' vietata la diffusione in qualsiasi modo o for= ma. Qualora Lei non fosse la persona destinataria del presente messaggio, La= invitiamo a non diffonderlo e ad eliminarlo, dandone gentilmente comunicazio= ne al mittente. The information included in this e-mail and any attachments= are confidential and may also be privileged. If you are not the correct rec= ipient, you are kindly requested to notify the sender immediately, to cancel= it and not to disclose the contents to any other person.
- References:
- complex conjugation by star
- From: "Brambilla Roberto Luigi (RSE)" <Roberto.Brambilla@rse-web.it>
- complex conjugation by star