Coordinate conversion with Grad
- To: mathgroup at smc.vnet.net
- Subject: [mg75872] Coordinate conversion with Grad
- From: laxmipt at gmail.com
- Date: Sat, 12 May 2007 03:10:45 -0400 (EDT)
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
- Follow-Ups:
- Re: Coordinate conversion with Grad
- From: "Adriano Pascoletti" <adriano.pascoletti@dimi.uniud.it>
- Re: Coordinate conversion with Grad