Новое в системе Wolfram
Mathematica
9
◄
предыдущая
|
следующая
►
Новое в системе Wolfram
Mathematica
9
›
Встроенная поддержка символьных тензоров
Лапласиан в трехмерном пространстве
Система
Mathematica
9 обладает встроенной информацией о многих координатных системах. Далее создаётся интерактивная таблица, показывающая вид оператора Лапласа в различных координатных системах, заданных их названиями.
In[1]:=
X
systems = {{"BipolarCylindrical", {a}}, {"Bispherical", {a}}, "Cartesian", "CircularParabolic", {"Conical", {b, c}}, "Cylindrical", {"EllipticCylindrical", {a}}, {"OblateSpheroidal", \ {a}}, "ParabolicCylindrical", {"ProlateSpheroidal", {a}}, "Spherical", {"Toroidal", {a}}};
In[2]:=
X
Manipulate[ Block[{f, vars = ToExpression /@ CoordinateChartData[{Coordinates, 3}, "StandardCoordinateNames"]}, Simplify[Laplacian[f @@ vars, vars, {Coordinates}]]], {{Coordinates, "Cartesian"}, systems}, FrameLabel -> "Famous 3D Laplacians"]
Out[2]=