Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2005
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2005

[Date Index] [Thread Index] [Author Index]

Search the Archive

Questions about Abs[_]

  • To: mathgroup at smc.vnet.net
  • Subject: [mg55511] Questions about Abs[_]
  • From: "Steeve Brechmann \(schumi\)" <steevebrechmann at yahoo.ca>
  • Date: Sun, 27 Mar 2005 02:42:44 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,
 
I define,
 
G0[r_List, r0_List]:=(Exp[I k Norm[r-r0]/(4*Pi*Norm[r-r0]))*((1+(I/(k*Norm[r-r0]))-(1/(k^2*Norm[r-r0]^2)))*IdentityMatrix[3]-(1/Norm[r-r0]^2)*(1+((3*I)/(k*Norm[r-r0]))-(3/(k^2*Norm[r-r0]^2)))*Outer[Times,r-r0,r-r0])
 
where
 
r = {x,y,z}
r0={x0,y0,z0}
ri={x0,y0,-z0}
rsn=r0+{0,0,2*n*d}
rim=ri+{0,0,2*m*d}
 
When i want to compute
 
G0r0rim=G0[r0,rim]
 
I find something odd...
 
1) Why Abs[2*z0-2*d*m] doesn't give 2*Abs[z0-m*d] ?
 
2) Why Abs[2*z0-2*d*m] doesn't simplify with (2*z0-2*d*m)^2 ?
 
Note : all the variables are positive, i.e. : z0>0, d>0 and -Infinity < m_Integer < Infinity.
 
Steeve Brechmann
Physics Department, Laval University
steevebrechmann at yahoo.ca



  • Prev by Date: Re: numerical solutions to two non algebraic equations.
  • Next by Date: Re: point in convex hull
  • Previous by thread: NMinimize Strange Results
  • Next by thread: Re: Questions about Abs[_]