| 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: , |
|
