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