Re: Ordering of output question

*To*: mathgroup at smc.vnet.net*Subject*: [mg28252] Re: Ordering of output question*From*: johntodd at fake.com (John Todd)*Date*: Fri, 6 Apr 2001 01:52:59 -0400 (EDT)*References*: <9ah6ap$ptf@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

On 5 Apr 2001 03:19:53 -0400, johntodd at fake.com (John Todd) wrote: >Hello, > I'm trying to get the output of the following to be in >standard complex number form, i.e. a + ib: Actually, I made a mistake in the code I originally posted and didn't catch it because I hadn't restarted the kernel. It should read as follows: Clear[u, v, x, y, z, gRefCZ, gImfCZ, gEqRefCZ, gEqImfCZ, gDomToRangeRe, gDomToRangeIm]; Clear[f, fCZ, fCXY]; x /: Im[x] = 0; x /: Re[x] = x; y /: Im[y] = 0; y /: Re[y] = y; fCZ[z_] := \[ImaginaryI] z + \[ImaginaryI]; fCXY = ComplexExpand[fCZ[x + \[ImaginaryI] y]]; gRefCZ = Re[fCXY]; gImfCZ = Im[fCXY]; gEqRefCZ = u == gRefCZ; gEqImfCZ = v == gImfCZ; gDomToRangeRe = Solve[gEqRefCZ, y]; gDomToRangeIm = Solve[gEqImfCZ, x]; Print["Given:\nf(z) = ", fCZ[z]]; Print["Let z = x + \[ImaginaryI]y"]; (* The following line is where my question pertains*) Print["f(x + \[ImaginaryI]y) = ", fCZ[x + \[ImaginaryI] y], " = ", fCXY, " = ", gRefCZ, " + \[ImaginaryI](", gImfCZ, ")."]; Print["The real part of f(z) = ", fCZ[z], " is ", gRefCZ, " and the imaginary part is ", gImfCZ, "."]; > If you evaluate the above, you'll find that the line directly >below the commented line has its final outpu as -y + i(x + 1) which is >what I want. However, my means of getting it to look that way seem a >bit inelegant,, and I feel certain there is a better way. I do >realize that looking at the expression with TreeForm[], I can extract >whatever I want out of an expression, but that also seems inelegant. >What I feel must be possible is to set up some sort of a pattern or >transformation rule which will say in effect, "Place the output in >this form, i.e. a + ib, regardless of what a and b are". I ask this >question not only for the specific example given but also in a broader >sense because I will and have wanted to display expressions in a >certain format, but have always had to resort to the kinds of >contrivances already mentioned. > Before submitting my question I perused the sections on Patterns >and the section on Transformation Rules in Wolfram's 4th edition Mathematica >book. If I missed a glaring answer to my question, I apologize. > >Thanks again, > >JT Sorry about that, JT