update
This commit is contained in:
@@ -0,0 +1,81 @@
|
||||
(* Content-type: application/vnd.wolfram.mathematica *)
|
||||
|
||||
(*** Wolfram Notebook File ***)
|
||||
(* http://www.wolfram.com/nb *)
|
||||
|
||||
(* CreatedBy='Mathematica 12.0' *)
|
||||
|
||||
(*CacheID: 234*)
|
||||
(* Internal cache information:
|
||||
NotebookFileLineBreakTest
|
||||
NotebookFileLineBreakTest
|
||||
NotebookDataPosition[ 158, 7]
|
||||
NotebookDataLength[ 2039, 71]
|
||||
NotebookOptionsPosition[ 1730, 57]
|
||||
NotebookOutlinePosition[ 2086, 73]
|
||||
CellTagsIndexPosition[ 2043, 70]
|
||||
WindowFrame->Normal*)
|
||||
|
||||
(* Beginning of Notebook Content *)
|
||||
Notebook[{
|
||||
Cell[BoxData[{
|
||||
RowBox[{"Clear", "[", "\"\<`*\>\"", "]"}], "\n",
|
||||
RowBox[{
|
||||
RowBox[{"H", "=",
|
||||
RowBox[{
|
||||
RowBox[{"(",
|
||||
RowBox[{"{",
|
||||
RowBox[{
|
||||
RowBox[{"{",
|
||||
RowBox[{"a0", ",", "0"}], "}"}], ",",
|
||||
RowBox[{"{",
|
||||
RowBox[{"0", ",", "a0"}], "}"}]}], "}"}], ")"}], "+",
|
||||
RowBox[{"(",
|
||||
RowBox[{"{",
|
||||
RowBox[{
|
||||
RowBox[{"{",
|
||||
RowBox[{"a3", ",",
|
||||
RowBox[{"a1", "-",
|
||||
RowBox[{"I", "*", "a2"}]}]}], "}"}], ",",
|
||||
RowBox[{"{",
|
||||
RowBox[{
|
||||
RowBox[{"a1", "+",
|
||||
RowBox[{"I", "*", "a2"}]}], ",",
|
||||
RowBox[{"-", "a3"}]}], "}"}]}], "}"}], ")"}]}]}], ";"}], "\n",
|
||||
RowBox[{"MatrixForm", "[", "H", "]"}], "\n",
|
||||
RowBox[{"eigenvalue", "=",
|
||||
RowBox[{"MatrixForm", "[",
|
||||
RowBox[{"Simplify", "[",
|
||||
RowBox[{"Eigenvalues", "[", "H", "]"}], "]"}], "]"}]}], "\n",
|
||||
RowBox[{"eigenvector", "=",
|
||||
RowBox[{"MatrixForm", "[",
|
||||
RowBox[{"Simplify", "[",
|
||||
RowBox[{"Eigenvectors", "[", "H", "]"}], "]"}], "]"}]}]}], "Input",
|
||||
CellChangeTimes->{{3.830338636045154*^9,
|
||||
3.830338636046383*^9}},ExpressionUUID->"6b5e0acb-1938-4b1e-bd73-\
|
||||
d3f6bb8905fc"]
|
||||
},
|
||||
WindowSize->{759, 670},
|
||||
WindowMargins->{{Automatic, 572}, {64, Automatic}},
|
||||
FrontEndVersion->"12.0 for Microsoft Windows (64-bit) (2019\:5e744\:67088\
|
||||
\:65e5)",
|
||||
StyleDefinitions->"Default.nb"
|
||||
]
|
||||
(* End of Notebook Content *)
|
||||
|
||||
(* Internal cache information *)
|
||||
(*CellTagsOutline
|
||||
CellTagsIndex->{}
|
||||
*)
|
||||
(*CellTagsIndex
|
||||
CellTagsIndex->{}
|
||||
*)
|
||||
(*NotebookFileOutline
|
||||
Notebook[{
|
||||
Cell[558, 20, 1168, 35, 193, "Input",ExpressionUUID->"6b5e0acb-1938-4b1e-bd73-d3f6bb8905fc"]
|
||||
}
|
||||
]
|
||||
*)
|
||||
|
||||
(* End of internal cache information *)
|
||||
|
Reference in New Issue
Block a user