MathGroup Archive 2007

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

Search the Archive

Coordinate conversion with Grad


I am using Mathematica 5.2.
I wish to do coordinate transformations for differential geometry.
For
example transform a Grad from a cylindrical system to a Cartesian
system:
For example:
In[1]:= << Calculus`VectorAnalysis`;
SetCoordinates[Cylindrical]

Out[2]:=Cylindrical[Rr, Ttheta, Zz]

In[3]:= Grad[Cos[Ttheta], Cylindrical[Rr, Ttheta, Zz]]

Out[4]:={0,-Sin[Ttheta]/Rr,0}

The above Grad vector refers to the cylindrical system.  How can I get
Mathematica to convert it into the corresponding gradient in the
Cartesian
system, which would become:
{sin^2(Ttheta)/Sqrt[x^2+y^2], sin(Ttheta)Cos(Ttheta)/Sqrt[x^2+y^2],0}

Thanks!
Sachin



  • Prev by Date: Re: Making sense of Directive[ ]
  • Next by Date: Simulating the behaviour of Plus and Times.
  • Previous by thread: Re: graphics
  • Next by thread: Re: Coordinate conversion with Grad