MathGroup Archive 1997

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

Search the Archive

Re: How can I handle Operator Algebra ?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg6505] Re: [mg6482] How can I handle Operator Algebra ?
  • From: penny at suu.edu (Des Penny)
  • Date: Thu, 27 Mar 1997 02:42:54 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

Hi:

The following is not very elegant but will work:

Needs["Calculus`VectorAnalysis`"];
dv={D[#,x]&,D[#,y]&,D[#,z]&};
r={x,y,z};
l=CrossProduct[r,dv];

The next few lines will convert l to a usable operator:

s=Map[ToString,l];
s=StringReplace[s,"&"->""];
s=Map[("("<>#<>")&")&,s];
opl=ToExpression[s];


opl will now perform as expected

rl=Sqrt[ DotProduct[r,r] ];
rl//opl[[1]]
opl[[3]][x^2]

Output: 0
        -2xy


Hope this helps.

Cheers,

Des Penny


-------------------------------
Des Penny
Physical Science Dept.
Southern Utah University
Cedar City, UT 84720

VOICE: (Office): (801) 586-7708
       (Home)  : (801) 586-2286
FAX:    (801) 865-8051
e-mail: penny at suu.edu
-------------------------------




  • Prev by Date: Sending Graphics to Other N.B.
  • Next by Date: About mathematica Kernel
  • Previous by thread: How can I handle Operator Algebra ?
  • Next by thread: How can I handle Operator Algebra ?