Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: 'Calculating Divergence' topicStudent Support Forum > General > "Calculating Divergence"

< Previous CommentHelp | Reply To Comment | Reply To Topic
Author Comment/Response
Adam Getchell
09/17/04 6:11pm

Adding list brackets doesn't help.

Notebook[{
Cell[BoxData[
\(<< Calculus`VectorAnalysis`\)], "Input"],

Cell[CellGroupData[{

Cell[BoxData[
\(SetCoordinates[Cylindrical]\)], "Input"],

Cell[BoxData[
\(TraditionalForm\`Cylindrical(Rr, Ttheta, Zz)\)], "Output"]
}, Open ]],

Cell[CellGroupData[{

Cell[BoxData[
\(Div[{\(Q*d*2*Cos[Ttheta]\)\/\(4*\[Pi]*\[Epsilon]*\((Rr)\)\^3\), \
\(Q*d\ *Sin[Ttheta]\)\/\(4*\[Pi]*\[Epsilon]*\((Rr)\)\^3\),
0}]\)], "Input"],

Cell[BoxData[
\(TraditionalForm\`Div({\(d\ Q\ \(cos(Ttheta)\)\)\/\(2\ \[Pi]\ Rr\
\^3\ \[Epsilon]\), \(d\ Q\ \(sin(Ttheta)\)\)\/\(4\ \[Pi]\ Rr\^3\ \
\[Epsilon]\), 0})\)], "Output"]
}, Open ]]
},
FrontEndVersion->"5.0 for Microsoft Windows",
ScreenRectangle->{{0, 1600}, {0, 1117}},
WindowSize->{495, 740},
WindowMargins->{{0, Automatic}, {Automatic, 0}}
]




Attachment: Div1.nb, URL: ,

Subject (listing for 'Calculating Divergence')
Author Date Posted
Calculating Divergence Adam Getchell 09/12/04 6:13pm
Re: Calculating Divergence Forum Modera... 09/15/04 10:53am
Re: Calculating Divergence Adam Getchell 09/17/04 6:11pm
< Previous CommentHelp | Reply To Comment | Reply To Topic