(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 8.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 157, 7] NotebookDataLength[ 119982, 2844] NotebookOptionsPosition[ 119124, 2811] NotebookOutlinePosition[ 119468, 2826] CellTagsIndexPosition[ 119425, 2823] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"hadamard", "=", RowBox[{ FractionBox["1", SqrtBox["2"]], RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "1"}, {"1", RowBox[{"-", "1"}]} }], "\[NoBreak]", ")"}]}]}], ";", RowBox[{"identity", "=", RowBox[{"(", GridBox[{ {"1", "0"}, {"0", "1"} }], ")"}]}], ";", RowBox[{"IDentity", "=", RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "0", "0", "0"}, {"0", "1", "0", "0"}, {"0", "0", "1", "0"}, {"0", "0", "0", "1"} }], "\[NoBreak]", ")"}]}], ";", RowBox[{"cnot", "=", RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "0", "0", "0"}, {"0", "1", "0", "0"}, {"0", "0", "0", "1"}, {"0", "0", "1", "0"} }], "\[NoBreak]", ")"}]}], ";", RowBox[{"cnotII", "=", RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "0", "0", "0"}, {"0", "0", "0", "1"}, {"0", "0", "1", "0"}, {"0", "1", "0", "0"} }], "\[NoBreak]", ")"}]}], ";", RowBox[{"rot", "=", RowBox[{"(", GridBox[{ { RowBox[{"Cos", "[", FractionBox["\[Phi]", "2"], "]"}], RowBox[{"-", RowBox[{"Sin", "[", FractionBox["\[Phi]", "2"], "]"}]}]}, { RowBox[{"Sin", "[", FractionBox["\[Phi]", "2"], "]"}], RowBox[{"Cos", "[", FractionBox["\[Phi]", "2"], "]"}]} }], ")"}]}], ";", RowBox[{"paulix", "=", RowBox[{"(", GridBox[{ {"0", "1"}, {"1", "0"} }], ")"}]}], ";", RowBox[{"pauliy", "=", RowBox[{"(", GridBox[{ {"0", RowBox[{"-", "I"}]}, {"I", "0"} }], ")"}]}], ";", RowBox[{"pauliz", "=", RowBox[{"(", GridBox[{ {"1", "0"}, {"0", RowBox[{"-", "1"}]} }], ")"}]}], ";", RowBox[{"Clear", "[", "\[Phi]", "]"}], ";", RowBox[{"SWAP", "=", RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "0", "0", "0"}, {"0", "0", "1", "0"}, {"0", "1", "0", "0"}, {"0", "0", "0", "1"} }], "\[NoBreak]", ")"}]}], ";", RowBox[{"NEW", "=", RowBox[{"(", GridBox[{ {"0", "1"}, { RowBox[{"-", "1"}], "0"} }], ")"}]}], ";"}], "\n", RowBox[{ RowBox[{"chadamardI", "=", RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "0", "0", "0"}, {"0", "1", "0", "0"}, {"0", "0", FractionBox["1", SqrtBox["2"]], FractionBox["1", SqrtBox["2"]]}, {"0", "0", FractionBox["1", SqrtBox["2"]], RowBox[{"-", FractionBox["1", SqrtBox["2"]]}]} }], "\[NoBreak]", ")"}]}], ";", RowBox[{"chadamardII", "=", RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "0", "0", "0"}, {"0", FractionBox["1", SqrtBox["2"]], "0", FractionBox["1", SqrtBox["2"]]}, {"0", "0", "1", "0"}, {"0", FractionBox["1", SqrtBox["2"]], "0", RowBox[{"-", FractionBox["1", SqrtBox["2"]]}]} }], "\[NoBreak]", ")"}]}], ";", RowBox[{"twothirds", "=", RowBox[{"(", GridBox[{ { RowBox[{"\[Sqrt]", FractionBox["1", "3"]}], RowBox[{"\[Sqrt]", FractionBox["2", "3"]}]}, { RowBox[{"\[Sqrt]", FractionBox["2", "3"]}], RowBox[{"-", RowBox[{"\[Sqrt]", FractionBox["1", "3"]}]}]} }], ")"}]}], ";", RowBox[{"FII", "=", RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "1", "0", "0"}, {"1", "0", "0", "0"}, {"0", "0", "1", "0"}, {"0", "0", "0", "1"} }], "\[NoBreak]", ")"}]}], ";", RowBox[{"FIII", "=", RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "1", "0", "0"}, {"1", "0", "0", "0"}, {"0", "0", "0", "1"}, {"0", "0", "1", "0"} }], "\[NoBreak]", ")"}]}], ";", RowBox[{"cpauliz", "=", RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "0", "0", "0"}, {"0", "1", "0", "0"}, {"0", "0", "1", "0"}, {"0", "0", "0", RowBox[{"-", "1"}]} }], "\[NoBreak]", ")"}]}], ";", RowBox[{"V", "=", RowBox[{"KroneckerProduct", "[", RowBox[{"identity", ",", RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "0", "0", "0"}, {"0", "1", "0", "0"}, {"0", "0", RowBox[{ FractionBox["1", SqrtBox["2"]], RowBox[{"Exp", "[", FractionBox["\[ImaginaryI]\[Pi]", "4"], "]"}]}], RowBox[{ FractionBox["1", SqrtBox["2"]], RowBox[{"Exp", "[", RowBox[{"-", FractionBox["\[ImaginaryI]\[Pi]", "4"]}], "]"}]}]}, {"0", "0", RowBox[{ FractionBox["1", SqrtBox["2"]], RowBox[{"Exp", "[", RowBox[{"-", FractionBox["\[ImaginaryI]\[Pi]", "4"]}], "]"}]}], RowBox[{ FractionBox["1", SqrtBox["2"]], RowBox[{"Exp", "[", FractionBox["\[ImaginaryI]\[Pi]", "4"], "]"}]}]} }], "\[NoBreak]", ")"}]}], "]"}]}], ";", RowBox[{"VI", "=", RowBox[{"KroneckerProduct", "[", RowBox[{"identity", ",", RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "0", "0", "0"}, {"0", "1", "0", "0"}, {"0", "0", RowBox[{ FractionBox["1", SqrtBox["2"]], RowBox[{"Exp", "[", RowBox[{"-", FractionBox["\[ImaginaryI]\[Pi]", "4"]}], "]"}]}], RowBox[{ FractionBox["1", SqrtBox["2"]], RowBox[{"Exp", "[", FractionBox["\[ImaginaryI]\[Pi]", "4"], "]"}]}]}, {"0", "0", RowBox[{ FractionBox["1", SqrtBox["2"]], RowBox[{"Exp", "[", FractionBox["\[ImaginaryI]\[Pi]", "4"], "]"}]}], RowBox[{ FractionBox["1", SqrtBox["2"]], RowBox[{"Exp", "[", RowBox[{"-", FractionBox["\[ImaginaryI]\[Pi]", "4"]}], "]"}]}]} }], "\[NoBreak]", ")"}]}], "]"}]}], ";", RowBox[{"CV", "=", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "0", "0", "0", "0", "0", "0", "0"}, {"0", "1", "0", "0", "0", "0", "0", "0"}, {"0", "0", "1", "0", "0", "0", "0", "0"}, {"0", "0", "0", "1", "0", "0", "0", "0"}, {"0", "0", "0", "0", FractionBox[ SuperscriptBox["\[ExponentialE]", RowBox[{"\[ImaginaryI]\[Pi]", "/", "4"}]], SqrtBox["2"]], FractionBox[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "\[ImaginaryI]\[Pi]"}], "/", "4"}]], SqrtBox["2"]], "0", "0"}, {"0", "0", "0", "0", FractionBox[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "\[ImaginaryI]\[Pi]"}], "/", "4"}]], SqrtBox["2"]], FractionBox[ SuperscriptBox["\[ExponentialE]", RowBox[{"\[ImaginaryI]\[Pi]", "/", "4"}]], SqrtBox["2"]], "0", "0"}, {"0", "0", "0", "0", "0", "0", FractionBox[ SuperscriptBox["\[ExponentialE]", RowBox[{"\[ImaginaryI]\[Pi]", "/", "4"}]], SqrtBox["2"]], FractionBox[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "\[ImaginaryI]\[Pi]"}], "/", "4"}]], SqrtBox["2"]]}, {"0", "0", "0", "0", "0", "0", FractionBox[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "\[ImaginaryI]\[Pi]"}], "/", "4"}]], SqrtBox["2"]], FractionBox[ SuperscriptBox["\[ExponentialE]", RowBox[{"\[ImaginaryI]\[Pi]", "/", "4"}]], SqrtBox["2"]]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}], ";", RowBox[{"Vee", "=", RowBox[{"(", GridBox[{ { RowBox[{ FractionBox["1", SqrtBox["2"]], RowBox[{"Exp", "[", FractionBox["\[ImaginaryI]\[Pi]", "4"], "]"}]}], RowBox[{ FractionBox["1", SqrtBox["2"]], RowBox[{"Exp", "[", RowBox[{"-", FractionBox["\[ImaginaryI]\[Pi]", "4"]}], "]"}]}]}, { RowBox[{ FractionBox["1", SqrtBox["2"]], RowBox[{"Exp", "[", RowBox[{"-", FractionBox["\[ImaginaryI]\[Pi]", "4"]}], "]"}]}], RowBox[{ FractionBox["1", SqrtBox["2"]], RowBox[{"Exp", "[", FractionBox["\[ImaginaryI]\[Pi]", "4"], "]"}]}]} }], ")"}]}], ";", RowBox[{"FIIX", "=", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "1", "0", "0", "0", "0"}, {"0", "0", "1", "0", "0", "0", "0", "0"}, {"0", "1", "0", "0", "0", "0", "0", "0"}, {"1", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "1", "0", "0", "0"}, {"0", "0", "0", "0", "0", "1", "0", "0"}, {"0", "0", "0", "0", "0", "0", "1", "0"}, {"0", "0", "0", "0", "0", "0", "0", "1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}], ";", RowBox[{"cnotX", "=", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "0", "0", "0", "0", "0", "0", "0"}, {"0", "1", "0", "0", "0", "0", "0", "0"}, {"0", "0", "1", "0", "0", "0", "0", "0"}, {"0", "0", "0", "1", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "1"}, {"0", "0", "0", "0", "0", "0", "1", "0"}, {"0", "0", "0", "0", "0", "1", "0", "0"}, {"0", "0", "0", "0", "1", "0", "0", "0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}], ";", RowBox[{"FIIIX", "=", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "1", "0", "0", "0", "0"}, {"0", "0", "1", "0", "0", "0", "0", "0"}, {"0", "1", "0", "0", "0", "0", "0", "0"}, {"1", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "1"}, {"0", "0", "0", "0", "0", "0", "1", "0"}, {"0", "0", "0", "0", "0", "1", "0", "0"}, {"0", "0", "0", "0", "1", "0", "0", "0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"postGateI", "[", RowBox[{"f_", ",", "q_"}], "]"}], ":=", RowBox[{"f", ".", "q"}]}], "\n", RowBox[{ RowBox[{"postGateII", "[", RowBox[{"f_", ",", "q_"}], "]"}], ":=", RowBox[{"f", ".", "q"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"qubitOut", "[", RowBox[{"g_", ",", "G_", ",", "F_", ",", "f_", ",", "i_", ",", "j_"}], "]"}], ":=", RowBox[{ RowBox[{"KroneckerProduct", "[", RowBox[{"identity", ",", "f"}], "]"}], ".", "F", ".", RowBox[{"KroneckerProduct", "[", RowBox[{"g", ",", "identity"}], "]"}], ".", RowBox[{"KroneckerProduct", "[", RowBox[{"identity", ",", "G"}], "]"}], ".", RowBox[{"Flatten", "[", RowBox[{"KroneckerProduct", "[", RowBox[{"i", ",", "j"}], "]"}], "]"}]}]}], "\n", RowBox[{ RowBox[{"qubitOutI", "[", RowBox[{"g_", ",", "G_", ",", "F_", ",", "f_", ",", "i_", ",", "j_"}], "]"}], ":=", RowBox[{ RowBox[{"KroneckerProduct", "[", RowBox[{"identity", ",", "f"}], "]"}], ".", "F", ".", RowBox[{"KroneckerProduct", "[", RowBox[{"g", ",", "identity"}], "]"}], ".", RowBox[{"KroneckerProduct", "[", RowBox[{"identity", ",", "G"}], "]"}]}]}], "\[IndentingNewLine]", "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.5883373755695*^9, 3.5883373849605*^9}, { 3.5883375458035*^9, 3.5883375464635*^9}, {3.5883376274505*^9, 3.5883376987075*^9}, {3.5883377303505*^9, 3.5883378621145*^9}, { 3.5883379534885*^9, 3.5883379686475*^9}, {3.5883381427885*^9, 3.5883384221965*^9}, {3.5883385994785*^9, 3.5883387014465*^9}, { 3.5883391353304996`*^9, 3.5883391491295*^9}, {3.5883396188175*^9, 3.5883396225285*^9}, {3.5883396988465*^9, 3.5883399143345003`*^9}, { 3.5883400712314997`*^9, 3.5883400742585*^9}, {3.5883401866605*^9, 3.5883401871025*^9}, {3.5883403259674997`*^9, 3.5883404164165*^9}, { 3.5883404940785*^9, 3.5883404952375*^9}, {3.5883405701575003`*^9, 3.5883406424445*^9}, {3.5883406981225*^9, 3.5883407918295*^9}, { 3.5883408379235*^9, 3.5883408915375*^9}, {3.5883410084435*^9, 3.5883410829785*^9}, {3.5883411411745*^9, 3.5883412195015*^9}, { 3.5883412653225*^9, 3.5883412717305*^9}, {3.5883413389065*^9, 3.5883414160465*^9}, {3.5883414533925*^9, 3.5883414791295*^9}, { 3.5883416639695*^9, 3.5883416695775003`*^9}, {3.5883417960575*^9, 3.5883418071075*^9}, {3.5883418508605003`*^9, 3.5883419286155*^9}, { 3.5883420031525*^9, 3.5883421209435*^9}, {3.5883421644405003`*^9, 3.5883421890804996`*^9}, {3.5883422325515003`*^9, 3.5883423080955*^9}, { 3.5883423894885*^9, 3.5883424023335*^9}, {3.5883424457685003`*^9, 3.5883424531995*^9}, 3.5883425032675*^9, {3.5883425499425*^9, 3.5883425663145*^9}, {3.5883427030404997`*^9, 3.5883427337644997`*^9}, { 3.5883429473705*^9, 3.5883429480315*^9}, {3.5883430386615*^9, 3.5883430588205*^9}, {3.5883437126914997`*^9, 3.5883437516844997`*^9}, { 3.5883449125734997`*^9, 3.5883449286285*^9}, {3.5883450419915*^9, 3.5883450749965*^9}, {3.5883678803275003`*^9, 3.5883680025895*^9}, 3.588498721502*^9, {3.5885974538859997`*^9, 3.5885974804230003`*^9}, { 3.5888911151775*^9, 3.5888911412265*^9}, 3.5888912184025*^9, { 3.5888914757565002`*^9, 3.5888914839495*^9}, 3.588954353828*^9, { 3.589472705675*^9, 3.589472775157*^9}, {3.589473092667*^9, 3.58947319363*^9}, {3.5894741954309998`*^9, 3.589474234209*^9}, { 3.589480588258*^9, 3.5894805931730003`*^9}, {3.589480687168*^9, 3.589480698111*^9}, {3.589484226602*^9, 3.589484256657*^9}, { 3.589484302381*^9, 3.589484325125*^9}, {3.589494585106*^9, 3.5894946570880003`*^9}, {3.589495110766*^9, 3.589495217139*^9}, { 3.5894957322609997`*^9, 3.58949576955*^9}, {3.589495815587*^9, 3.589495820275*^9}, {3.5894958517539997`*^9, 3.589495861741*^9}, { 3.5894959576070004`*^9, 3.589496000509*^9}, {3.589496714656*^9, 3.5894967848529997`*^9}, {3.589498554927*^9, 3.589498559259*^9}, { 3.589534629648*^9, 3.589534666685*^9}, {3.58953491729*^9, 3.589534928817*^9}, {3.589535451403*^9, 3.589535457553*^9}, { 3.5895355399300003`*^9, 3.5895356041219997`*^9}, {3.590001177526*^9, 3.590001208009*^9}, {3.590001257229*^9, 3.590001257883*^9}, { 3.5900013506280003`*^9, 3.590001364067*^9}, {3.590001495868*^9, 3.5900014995220003`*^9}, {3.590001593718*^9, 3.590001595448*^9}, { 3.590002524855*^9, 3.590002526453*^9}, {3.590002575615*^9, 3.5900025775*^9}, {3.590073959954*^9, 3.590073964567*^9}, { 3.590074008196*^9, 3.590074013572*^9}, {3.590083512361*^9, 3.590083523414*^9}, {3.590085370105*^9, 3.590085389684*^9}, { 3.590085423476*^9, 3.590085515677*^9}, {3.5901751811514997`*^9, 3.5901752933925*^9}, {3.5901753421785*^9, 3.5901754061184998`*^9}, { 3.5901754399934998`*^9, 3.5901754796755*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{"Manipulate", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Graphics", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"EdgeForm", "[", "Black", "]"}], ",", RowBox[{"FaceForm", "[", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Rectangle", "[", RowBox[{ RowBox[{"{", RowBox[{"1.9", ",", "1.6"}], "}"}], ",", RowBox[{"{", RowBox[{"2.7", ",", "2.4"}], "}"}]}], "]"}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic", ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"2.3", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"FaceForm", "[", "Black", "]"}], ",", "\[IndentingNewLine]", RowBox[{"EdgeForm", "[", "Black", "]"}], ",", RowBox[{"FaceForm", "[", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Rectangle", "[", RowBox[{ RowBox[{"{", RowBox[{"1.9", ",", "0.1"}], "}"}], ",", RowBox[{"{", RowBox[{"2.7", ",", ".9"}], "}"}]}], "]"}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic", ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"2.3", ",", ".5"}], "}"}]}], "]"}], ",", RowBox[{"FaceForm", "[", "Black", "]"}], ",", "\[IndentingNewLine]", RowBox[{"EdgeForm", "[", "Black", "]"}], ",", RowBox[{"FaceForm", "[", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Rectangle", "[", RowBox[{ RowBox[{"{", RowBox[{"5.5", ",", "0.1"}], "}"}], ",", RowBox[{"{", RowBox[{"6.3", ",", ".9"}], "}"}]}], "]"}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic", ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"5.9", ",", ".5"}], "}"}]}], "]"}], ",", RowBox[{"FaceForm", "[", "Black", "]"}], ",", "\[IndentingNewLine]", RowBox[{"EdgeForm", "[", "Black", "]"}], ",", RowBox[{"FaceForm", "[", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Rectangle", "[", RowBox[{ RowBox[{"{", RowBox[{"3.8", ",", "0.1"}], "}"}], ",", RowBox[{"{", RowBox[{"4.6", ",", "2.4"}], "}"}]}], "]"}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic", ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"4.2", ",", "1.2"}], "}"}]}], "]"}], ",", RowBox[{"FaceForm", "[", "Black", "]"}], ",", "\[IndentingNewLine]", "Thick", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{".5", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"1.85", ",", "2"}], "}"}]}], "}"}], "]"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{".5", ",", ".5"}], "}"}], ",", RowBox[{"{", RowBox[{"1.85", ",", ".5"}], "}"}]}], "}"}], "]"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2.7", ",", ".5"}], "}"}], ",", RowBox[{"{", RowBox[{"3.78", ",", ".5"}], "}"}]}], "}"}], "]"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2.7", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"3.78", ",", "2"}], "}"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"4.605", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", "2"}], "}"}]}], "}"}], "]"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"4.605", ",", ".5"}], "}"}], ",", RowBox[{"{", RowBox[{"5.45", ",", ".5"}], "}"}]}], "}"}], "]"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"6.35", ",", ".5"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", ".5"}], "}"}]}], "}"}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{"8", ",", "2"}], "}"}], ",", "0.3", ",", RowBox[{"{", RowBox[{ RowBox[{"\[Pi]", "/", "2"}], ",", RowBox[{ RowBox[{"-", "\[Pi]"}], "/", "2"}]}], "}"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{"8", ",", "0.5"}], "}"}], ",", "0.3", ",", RowBox[{"{", RowBox[{ RowBox[{"\[Pi]", "/", "2"}], ",", RowBox[{ RowBox[{"-", "\[Pi]"}], "/", "2"}]}], "}"}]}], "]"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"8", ",", ".2"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", ".8"}], "}"}]}], "}"}], "]"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"8", ",", "1.7"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", "2.3"}], "}"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", "Black", ",", "Thin", ",", RowBox[{"Opacity", "[", "1", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", RowBox[{"\"\<|\>\"", ",", RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic"}], "]"}], ",", "\"\<\[RightAngleBracket]\>\""}], "}"}], "]"}], ",", "20"}], "]"}], ",", RowBox[{"{", RowBox[{"0", ",", "2"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", RowBox[{"\"\<|\>\"", ",", RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic"}], "]"}], ",", "\"\<\[RightAngleBracket]\>\""}], "}"}], "]"}], ",", "20"}], "]"}], ",", RowBox[{"{", RowBox[{"0", ",", ".5"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", "qubitI", "]"}], ",", " ", "12"}], "]"}], ",", " ", RowBox[{"{", RowBox[{"1", ",", "2.5"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", "qubitJ", "]"}], ",", " ", "12"}], "]"}], ",", " ", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{"postGateI", "[", RowBox[{"gateI", ",", "qubitI"}], "]"}], "]"}], ",", " ", "10"}], "]"}], ",", " ", RowBox[{"{", RowBox[{"3.4", ",", "2.8"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{"postGateI", "[", RowBox[{"gateII", ",", "qubitJ"}], "]"}], "]"}], ",", " ", "10"}], "]"}], ",", " ", RowBox[{"{", RowBox[{"3.4", ",", "1.3"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{"qubitOut", "[", RowBox[{ "gateI", ",", "gateII", ",", "gateIII", ",", "gateV", ",", "qubitI", ",", "qubitJ"}], "]"}], "]"}], ",", " ", "12"}], "]"}], ",", " ", RowBox[{"{", RowBox[{"9", ",", "1.25"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{"qubitOutI", "[", RowBox[{ "gateI", ",", "gateII", ",", "gateIII", ",", "gateV", ",", "qubitI", ",", "qubitJ"}], "]"}], "]"}], ",", " ", "12"}], "]"}], ",", " ", RowBox[{"{", RowBox[{"6", ",", "3.25"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", ".5"}], ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "5"}], "}"}]}], "}"}]}], ",", RowBox[{"ImageSize", "\[Rule]", "700"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"qubitI", ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"Style", "[", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", RowBox[{"\"\<|\>\"", ",", RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic"}], "]"}], ",", "\"\<\[RightAngleBracket]\>\""}], "}"}], "]"}], ",", "14"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], "\[Rule]", "\"\<|0\[RightAngleBracket]\>\""}], ",", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], "\[Rule]", "\"\<|1\[RightAngleBracket]\>\""}], ",", RowBox[{ RowBox[{ FractionBox["1", RowBox[{"\[Sqrt]", "2"}]], RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}]}], "\[Rule]", "\"\<|+\[RightAngleBracket]\>\""}]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"qubitJ", ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"Style", "[", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", RowBox[{"\"\<|\>\"", ",", RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic"}], "]"}], ",", "\"\<\[RightAngleBracket]\>\""}], "}"}], "]"}], ",", "14"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], "\[Rule]", "\"\<|0\[RightAngleBracket]\>\""}], ",", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], "\[Rule]", "\"\<|1\[RightAngleBracket]\>\""}]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"gateI", ",", "identity", ",", RowBox[{"Style", "[", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic"}], "]"}], "}"}], "]"}], ",", "14"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"identity", "\[Rule]", "\"\\""}], ",", RowBox[{"hadamard", "\[Rule]", "\"\\""}], ",", RowBox[{ RowBox[{"rotI", "[", "\[Phi]", "]"}], "\[Rule]", "\"\<\!\(\*SubscriptBox[\(R\), \(\[Phi]\)]\)\>\""}], ",", RowBox[{ "paulix", "\[Rule]", "\"\<\!\(\*SubscriptBox[\(\[Sigma]\), \(x\)]\)\>\""}], ",", RowBox[{ "pauliy", "\[Rule]", "\"\<\!\(\*SubscriptBox[\(\[Sigma]\), \(y\)]\)\>\""}], ",", RowBox[{ "pauliz", "\[Rule]", "\"\<\!\(\*SubscriptBox[\(\[Sigma]\), \(z\)]\)\>\""}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"gateII", ",", "identity", ",", RowBox[{"Style", "[", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic"}], "]"}], "}"}], "]"}], ",", "14"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"identity", "\[Rule]", "\"\\""}], ",", RowBox[{"hadamard", "\[Rule]", "\"\\""}], ",", RowBox[{ RowBox[{"rotI", "[", "\[Phi]", "]"}], "\[Rule]", "\"\<\!\(\*SubscriptBox[\(R\), \(\[Phi]\)]\)\>\""}], ",", RowBox[{ "paulix", "\[Rule]", "\"\<\!\(\*SubscriptBox[\(\[Sigma]\), \(x\)]\)\>\""}], ",", RowBox[{ "pauliy", "\[Rule]", "\"\<\!\(\*SubscriptBox[\(\[Sigma]\), \(y\)]\)\>\""}], ",", RowBox[{ "pauliz", "\[Rule]", "\"\<\!\(\*SubscriptBox[\(\[Sigma]\), \(z\)]\)\>\""}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"gateV", ",", "identity", ",", RowBox[{"Style", "[", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic"}], "]"}], "}"}], "]"}], ",", "14"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"identity", "\[Rule]", "\"\\""}], ",", RowBox[{"hadamard", "\[Rule]", "\"\\""}], ",", RowBox[{ RowBox[{"rotI", "[", "\[Phi]", "]"}], "\[Rule]", "\"\<\!\(\*SubscriptBox[\(R\), \(\[Phi]\)]\)\>\""}], ",", RowBox[{ "paulix", "\[Rule]", "\"\<\!\(\*SubscriptBox[\(\[Sigma]\), \(x\)]\)\>\""}], ",", RowBox[{ "pauliy", "\[Rule]", "\"\<\!\(\*SubscriptBox[\(\[Sigma]\), \(y\)]\)\>\""}], ",", RowBox[{ "pauliz", "\[Rule]", "\"\<\!\(\*SubscriptBox[\(\[Sigma]\), \(z\)]\)\>\""}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"gateIII", ",", "IDentity", ",", RowBox[{"Style", "[", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic"}], "]"}], "}"}], "]"}], ",", "14"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"IDentity", "\[Rule]", "\"\\""}], ",", RowBox[{"cnot", "\[Rule]", "\"\\""}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "0", ",", "\"\<\[Phi]\>\""}], "}"}], ",", "0", ",", RowBox[{"2", "\[Pi]"}]}], "}"}], ",", RowBox[{"ControlType", "\[Rule]", RowBox[{"{", RowBox[{ "Setter", ",", "Setter", ",", "PopupMenu", ",", "PopupMenu", ",", "PopupMenu", ",", "PopupMenu", ",", "Slider"}], "}"}]}], ",", RowBox[{"SaveDefinitions", "\[Rule]", "True"}], ",", RowBox[{"ControlPlacement", "\[Rule]", "Left"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.5883425823065*^9, 3.5883426005815*^9}, { 3.5883427528465*^9, 3.5883427762504997`*^9}, {3.5883428772675*^9, 3.5883428847485*^9}, {3.5883429193875*^9, 3.5883429346685*^9}, { 3.5883430255435*^9, 3.5883430304805*^9}, {3.5883430734885*^9, 3.5883430766415*^9}, 3.5883431147695*^9, {3.5883431692325*^9, 3.5883432130105*^9}, {3.5883432503785*^9, 3.5883432789455*^9}, { 3.5883433539995003`*^9, 3.5883434184185*^9}, {3.5883435504484997`*^9, 3.5883435765935*^9}, {3.5883436319775*^9, 3.5883436608665*^9}, { 3.5883437680505*^9, 3.5883438173035*^9}, {3.5883441703625*^9, 3.5883442287105*^9}, {3.5883444684755*^9, 3.5883445272135*^9}, { 3.5883445608894997`*^9, 3.5883446763665*^9}, {3.5883447368905*^9, 3.5883447954505*^9}, {3.5883448599315*^9, 3.5883448614975*^9}, { 3.5883448953405*^9, 3.5883449019135*^9}, {3.5883449352945004`*^9, 3.5883449964905*^9}, {3.5883450817465*^9, 3.5883451207425003`*^9}, { 3.5883708294175*^9, 3.5883708296335*^9}, {3.588587853433*^9, 3.588587976435*^9}, {3.58859292609*^9, 3.588592982771*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`gateI$$ = {{1, 0}, {0, 1}}, $CellContext`gateII$$ = {{2^Rational[-1, 2], 2^Rational[-1, 2]}, { 2^Rational[-1, 2], -2^Rational[-1, 2]}}, $CellContext`gateIII$$ = {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}}, $CellContext`gateV$$ = {{1, 0}, {0, 1}}, $CellContext`qubitI$$ = {1, 0}, $CellContext`qubitJ$$ = {1, 0}, $CellContext`\[Phi]$$ = 0., Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{ Hold[$CellContext`qubitI$$], {1, 0}, Style[ Row[{"|", Style["x", Italic], "\[RightAngleBracket]"}], 14]}, {{1, 0} -> "|0\[RightAngleBracket]", {0, 1} -> "|1\[RightAngleBracket]", {2^Rational[-1, 2], 2^Rational[-1, 2]} -> "|+\[RightAngleBracket]"}}, {{ Hold[$CellContext`qubitJ$$], {1, 0}, Style[ Row[{"|", Style["y", Italic], "\[RightAngleBracket]"}], 14]}, {{1, 0} -> "|0\[RightAngleBracket]", {0, 1} -> "|1\[RightAngleBracket]"}}, {{ Hold[$CellContext`gateI$$], {{1, 0}, {0, 1}}, Style[ Row[{ Style["Gate 1", Italic]}], 14]}, Dynamic[{$CellContext`identity -> "I", $CellContext`hadamard -> "H", $CellContext`rotI[$CellContext`\[Phi]$$] -> "\!\(\*SubscriptBox[\(R\), \(\[Phi]\)]\)", $CellContext`paulix -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(x\)]\)", $CellContext`pauliy -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(y\)]\)", $CellContext`pauliz -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(z\)]\)"}]}, {{ Hold[$CellContext`gateII$$], {{1, 0}, {0, 1}}, Style[ Row[{ Style["Gate 2", Italic]}], 14]}, Dynamic[{$CellContext`identity -> "I", $CellContext`hadamard -> "H", $CellContext`rotI[$CellContext`\[Phi]$$] -> "\!\(\*SubscriptBox[\(R\), \(\[Phi]\)]\)", $CellContext`paulix -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(x\)]\)", $CellContext`pauliy -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(y\)]\)", $CellContext`pauliz -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(z\)]\)"}]}, {{ Hold[$CellContext`gateV$$], {{1, 0}, {0, 1}}, Style[ Row[{ Style["Gate 5", Italic]}], 14]}, Dynamic[{$CellContext`identity -> "I", $CellContext`hadamard -> "H", $CellContext`rotI[$CellContext`\[Phi]$$] -> "\!\(\*SubscriptBox[\(R\), \(\[Phi]\)]\)", $CellContext`paulix -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(x\)]\)", $CellContext`pauliy -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(y\)]\)", $CellContext`pauliz -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(z\)]\)"}]}, {{ Hold[$CellContext`gateIII$$], {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}}, Style[ Row[{ Style["Gate 3", Italic]}], 14]}, {{{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}} -> "I", {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}} -> "CNOT"}}, {{ Hold[$CellContext`\[Phi]$$], 0, "\[Phi]"}, 0, 2 Pi}}, Typeset`size$$ = {700., {165., 168.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = False, $CellContext`qubitI$71853$$ = False, $CellContext`qubitJ$71854$$ = False, $CellContext`gateIII$71855$$ = False, $CellContext`\[Phi]$71856$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`gateI$$ = {{1, 0}, {0, 1}}, $CellContext`gateII$$ = {{1, 0}, {0, 1}}, $CellContext`gateIII$$ = {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}}, $CellContext`gateV$$ = {{1, 0}, {0, 1}}, $CellContext`qubitI$$ = {1, 0}, $CellContext`qubitJ$$ = {1, 0}, $CellContext`\[Phi]$$ = 0}, "ControllerVariables" :> { Hold[$CellContext`qubitI$$, $CellContext`qubitI$71853$$, False], Hold[$CellContext`qubitJ$$, $CellContext`qubitJ$71854$$, False], Hold[$CellContext`gateIII$$, $CellContext`gateIII$71855$$, False], Hold[$CellContext`\[Phi]$$, $CellContext`\[Phi]$71856$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Graphics[{ EdgeForm[Black], FaceForm[], Rectangle[{1.9, 1.6}, {2.7, 2.4}], Text[ Style["Gate 1", Italic, 16], {2.3, 2}], FaceForm[Black], EdgeForm[Black], FaceForm[], Rectangle[{1.9, 0.1}, {2.7, 0.9}], Text[ Style["Gate 2", Italic, 16], {2.3, 0.5}], FaceForm[Black], EdgeForm[Black], FaceForm[], Rectangle[{5.5, 0.1}, {6.3, 0.9}], Text[ Style["Gate 5", Italic, 16], {5.9, 0.5}], FaceForm[Black], EdgeForm[Black], FaceForm[], Rectangle[{3.8, 0.1}, {4.6, 2.4}], Text[ Style["Gate 3", Italic, 16], {4.2, 1.2}], FaceForm[Black], Thick, Line[{{0.5, 2}, {1.85, 2}}], Line[{{0.5, 0.5}, {1.85, 0.5}}], Line[{{2.7, 0.5}, {3.78, 0.5}}], Line[{{2.7, 2}, {3.78, 2}}], Line[{{4.605, 2}, {8, 2}}], Line[{{4.605, 0.5}, {5.45, 0.5}}], Line[{{6.35, 0.5}, {8, 0.5}}], Circle[{8, 2}, 0.3, {Pi/2, (-Pi)/2}], Circle[{8, 0.5}, 0.3, {Pi/2, (-Pi)/2}], Line[{{8, 0.2}, {8, 0.8}}], Line[{{8, 1.7}, {8, 2.3}}], Black, Thin, Opacity[1], Text[ Style[ Row[{"|", Style["x", Italic], "\[RightAngleBracket]"}], 20], {0, 2}], Text[ Style[ Row[{"|", Style["y", Italic], "\[RightAngleBracket]"}], 20], {0, 0.5}], Text[ Style[ MatrixForm[$CellContext`qubitI$$], 12], {1, 2.5}], Text[ Style[ MatrixForm[$CellContext`qubitJ$$], 12], {1, 1}], Text[ Style[ MatrixForm[ $CellContext`postGateI[$CellContext`gateI$$, \ $CellContext`qubitI$$]], 10], {3.4, 2.8}], Text[ Style[ MatrixForm[ $CellContext`postGateI[$CellContext`gateII$$, \ $CellContext`qubitJ$$]], 10], {3.4, 1.3}], Text[ Style[ MatrixForm[ $CellContext`qubitOut[$CellContext`gateI$$, \ $CellContext`gateII$$, $CellContext`gateIII$$, $CellContext`gateV$$, \ $CellContext`qubitI$$, $CellContext`qubitJ$$]], 12], {9, 1.25}], Text[ Style[ MatrixForm[ $CellContext`qubitOutI[$CellContext`gateI$$, \ $CellContext`gateII$$, $CellContext`gateIII$$, $CellContext`gateV$$, \ $CellContext`qubitI$$, $CellContext`qubitJ$$]], 12], {6, 3.25}]}, PlotRange -> {{-0.5, 10}, {0, 5}}, ImageSize -> 700], "Specifications" :> {{{$CellContext`qubitI$$, {1, 0}, Style[ Row[{"|", Style["x", Italic], "\[RightAngleBracket]"}], 14]}, {{1, 0} -> "|0\[RightAngleBracket]", {0, 1} -> "|1\[RightAngleBracket]", {2^Rational[-1, 2], 2^Rational[-1, 2]} -> "|+\[RightAngleBracket]"}}, {{$CellContext`qubitJ$$, {1, 0}, Style[ Row[{"|", Style["y", Italic], "\[RightAngleBracket]"}], 14]}, {{1, 0} -> "|0\[RightAngleBracket]", {0, 1} -> "|1\[RightAngleBracket]"}}, {{$CellContext`gateI$$, {{1, 0}, {0, 1}}, Style[ Row[{ Style["Gate 1", Italic]}], 14]}, Dynamic[{$CellContext`identity -> "I", $CellContext`hadamard -> "H", $CellContext`rotI[$CellContext`\[Phi]$$] -> "\!\(\*SubscriptBox[\(R\), \(\[Phi]\)]\)", $CellContext`paulix -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(x\)]\)", $CellContext`pauliy -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(y\)]\)", $CellContext`pauliz -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(z\)]\)"}]}, \ {{$CellContext`gateII$$, {{1, 0}, {0, 1}}, Style[ Row[{ Style["Gate 2", Italic]}], 14]}, Dynamic[{$CellContext`identity -> "I", $CellContext`hadamard -> "H", $CellContext`rotI[$CellContext`\[Phi]$$] -> "\!\(\*SubscriptBox[\(R\), \(\[Phi]\)]\)", $CellContext`paulix -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(x\)]\)", $CellContext`pauliy -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(y\)]\)", $CellContext`pauliz -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(z\)]\)"}]}, \ {{$CellContext`gateV$$, {{1, 0}, {0, 1}}, Style[ Row[{ Style["Gate 5", Italic]}], 14]}, Dynamic[{$CellContext`identity -> "I", $CellContext`hadamard -> "H", $CellContext`rotI[$CellContext`\[Phi]$$] -> "\!\(\*SubscriptBox[\(R\), \(\[Phi]\)]\)", $CellContext`paulix -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(x\)]\)", $CellContext`pauliy -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(y\)]\)", $CellContext`pauliz -> "\!\(\*SubscriptBox[\(\[Sigma]\), \(z\)]\)"}]}, \ {{$CellContext`gateIII$$, {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}}, Style[ Row[{ Style["Gate 3", Italic]}], 14]}, {{{1, 0, 0, 0}, {0, 1, 0, 0}, { 0, 0, 1, 0}, {0, 0, 0, 1}} -> "I", {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}} -> "CNOT"}}, {{$CellContext`\[Phi]$$, 0, "\[Phi]"}, 0, 2 Pi}}, "Options" :> { ControlType -> { Setter, Setter, PopupMenu, PopupMenu, PopupMenu, PopupMenu, Slider}, ControlPlacement -> Left}, "DefaultOptions" :> {}], ImageSizeCache->{1002., {195., 200.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, Initialization:>({$CellContext`postGateI[ Pattern[$CellContext`f, Blank[]], Pattern[$CellContext`q, Blank[]]] := Dot[$CellContext`f, $CellContext`q], $CellContext`f[ Pattern[$CellContext`\[Phi], Blank[]]] = (1 + Sqrt[3])^2/ 8 + ((-1 + Sqrt[3])/(2 Sqrt[2]) + (1 + Sqrt[3])/(2 Sqrt[2]))^2/ 2, $CellContext`qubitOut[ Pattern[$CellContext`i, Blank[]], Pattern[$CellContext`j, Blank[]]] := Dot[$CellContext`cnot, KroneckerProduct[$CellContext`hadamard, $CellContext`identity], Flatten[ KroneckerProduct[$CellContext`i, $CellContext`j]]], \ $CellContext`qubitOut[ Pattern[$CellContext`g, Blank[]], Pattern[$CellContext`i, Blank[]], Pattern[$CellContext`j, Blank[]]] := Dot[$CellContext`cnot, KroneckerProduct[$CellContext`g, $CellContext`identity], Flatten[ KroneckerProduct[$CellContext`i, $CellContext`j]]], \ $CellContext`qubitOut[ Pattern[$CellContext`g, Blank[]], Pattern[$CellContext`G, Blank[]], Pattern[$CellContext`i, Blank[]], Pattern[$CellContext`j, Blank[]]] := Dot[$CellContext`cnot, KroneckerProduct[$CellContext`g, $CellContext`identity], KroneckerProduct[$CellContext`identity, $CellContext`G], Flatten[ KroneckerProduct[$CellContext`i, $CellContext`j]]], \ $CellContext`qubitOut[ Pattern[$CellContext`g, Blank[]], Pattern[$CellContext`G, Blank[]], Pattern[$CellContext`f, Blank[]], Pattern[$CellContext`i, Blank[]], Pattern[$CellContext`j, Blank[]]] := Dot[ KroneckerProduct[$CellContext`identity, $CellContext`f], \ $CellContext`cnot, KroneckerProduct[$CellContext`g, $CellContext`identity], KroneckerProduct[$CellContext`identity, $CellContext`G], Flatten[ KroneckerProduct[$CellContext`i, $CellContext`j]]], \ $CellContext`qubitOut[ Pattern[$CellContext`g, Blank[]], Pattern[$CellContext`G, Blank[]], Pattern[$CellContext`F, Blank[]], Pattern[$CellContext`f, Blank[]], Pattern[$CellContext`i, Blank[]], Pattern[$CellContext`j, Blank[]]] := Dot[ KroneckerProduct[$CellContext`identity, $CellContext`f], \ $CellContext`F, KroneckerProduct[$CellContext`g, $CellContext`identity], KroneckerProduct[$CellContext`identity, $CellContext`G], Flatten[ KroneckerProduct[$CellContext`i, $CellContext`j]]], \ $CellContext`cnot = {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}}, $CellContext`hadamard = {{1/Sqrt[2], 1/Sqrt[2]}, { 1/Sqrt[2], -(1/Sqrt[2])}}, $CellContext`identity = {{1, 0}, {0, 1}}, $CellContext`qubitOutI[ Pattern[$CellContext`g, Blank[]], Pattern[$CellContext`G, Blank[]], Pattern[$CellContext`i, Blank[]], Pattern[$CellContext`j, Blank[]]] := Dot[$CellContext`cnot, KroneckerProduct[$CellContext`g, $CellContext`identity], KroneckerProduct[$CellContext`identity, $CellContext`G]], \ $CellContext`qubitOutI[ Pattern[$CellContext`g, Blank[]], Pattern[$CellContext`G, Blank[]], Pattern[$CellContext`f, Blank[]], Pattern[$CellContext`i, Blank[]], Pattern[$CellContext`j, Blank[]]] := Dot[ KroneckerProduct[$CellContext`identity, $CellContext`f], \ $CellContext`cnot, KroneckerProduct[$CellContext`g, $CellContext`identity], KroneckerProduct[$CellContext`identity, $CellContext`G]], \ $CellContext`qubitOutI[ Pattern[$CellContext`g, Blank[]], Pattern[$CellContext`G, Blank[]], Pattern[$CellContext`F, Blank[]], Pattern[$CellContext`f, Blank[]], Pattern[$CellContext`i, Blank[]], Pattern[$CellContext`j, Blank[]]] := Dot[ KroneckerProduct[$CellContext`identity, $CellContext`f], \ $CellContext`F, KroneckerProduct[$CellContext`g, $CellContext`identity], KroneckerProduct[$CellContext`identity, $CellContext`G]], Attributes[PlotRange] = {ReadProtected}, $CellContext`rotI[ Pattern[$CellContext`f, Blank[]]] = {{ Cos[$CellContext`f/2], -Sin[$CellContext`f/2]}, { Sin[$CellContext`f/2], Cos[$CellContext`f/2]}}, $CellContext`paulix = {{0, 1}, {1, 0}}, $CellContext`pauliy = {{0, -I}, {I, 0}}, $CellContext`pauliz = {{ 1, 0}, {0, -1}}}; Typeset`initDone$$ = True), SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{3.588587977105*^9, 3.5885929842390003`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Manipulate", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Graphics", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"circuit", "=", RowBox[{ RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"identity", ",", "pauliz"}], "]"}], ")"}], ".", "cpauliz", ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"paulix", ",", "paulix"}], "]"}], ")"}], ".", "cpauliz", ".", "chadamardII", ".", "cnot", ".", "cnotII", ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"paulix", ",", "identity"}], "]"}], ")"}], ".", "GateI", ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"twothirds", ",", "hadamard"}], "]"}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", "circuit", "]"}], ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}]}], "]"}]}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic", ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"1", ",", "1.85"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{"(", RowBox[{"circuit", ".", "InputI"}], ")"}], "]"}], ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"3", ",", "1"}], "}"}]}], "]"}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic", ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"3", ",", "1.85"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"tetra", "=", RowBox[{ RowBox[{"(", RowBox[{"circuit", ".", "InputI"}], ")"}], "^", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{ RowBox[{"(", RowBox[{"circuit", ".", "InputI"}], ")"}], "^", "2"}], "]"}], ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"4.5", ",", "1"}], "}"}]}], "]"}]}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic", ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"4.5", ",", "1.85"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\<|00\[RightAngleBracket]\[Rule]\>\"", ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6", ",", "1.5"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\<|01\[RightAngleBracket]\[Rule]\>\"", ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6", ",", "1.2"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\<|10\[RightAngleBracket]\[Rule]\>\"", ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6", ",", "0.9"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\<|11\[RightAngleBracket]\[Rule]\>\"", ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6", ",", "0.6"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{ RowBox[{"N", "[", RowBox[{"tetra", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "*", "100", "\"\<%\>\""}], ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6.7", ",", "1.5"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{ RowBox[{"N", "[", RowBox[{"tetra", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "*", "100", "\"\<%\>\""}], ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6.7", ",", "1.2"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{ RowBox[{"N", "[", RowBox[{"tetra", "[", RowBox[{"[", "3", "]"}], "]"}], "]"}], "*", "100", "\"\<%\>\""}], ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6.7", ",", "0.9"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", " ", RowBox[{ RowBox[{ RowBox[{"N", "[", RowBox[{"tetra", "[", RowBox[{"[", "4", "]"}], "]"}], "]"}], "*", "100", "\"\<%\>\""}], ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6.7", ",", "0.6"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "8"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2"}], "}"}]}], "}"}]}], ",", RowBox[{"ImageSize", "\[Rule]", "1000"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"InputI", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Style", "[", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", RowBox[{"\"\<|\>\"", ",", RowBox[{"Style", "[", RowBox[{"\"\<\[Psi]\>\"", ",", "Italic"}], "]"}], ",", "\"\<\[RightAngleBracket]\>\""}], "}"}], "]"}], ",", "14"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "0"}], "}"}], "\[Rule]", "\"\<|01\[RightAngleBracket]\>\""}], ",", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "1"}], "}"}], "\[Rule]", "\"\<|11\[RightAngleBracket]\>\""}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0", ",", "0"}], "}"}], "\[Rule]", "\"\<|00\[RightAngleBracket]\>\""}], ",", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "1", ",", "0"}], "}"}], "\[Rule]", "\"\<|10\[RightAngleBracket]\>\""}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"GateI", ",", "cnot", ",", RowBox[{"Style", "[", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", "\"\\"", "}"}], "]"}], ",", "14"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"cnot", "\[Rule]", "\"\\""}], ",", RowBox[{"FII", "\[Rule]", "\"\\""}], ",", RowBox[{"FIII", "\[Rule]", "\"\\""}], ",", RowBox[{"IDentity", "\[Rule]", "\"\\""}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"ControlType", "\[Rule]", RowBox[{"{", RowBox[{"PopupMenu", ",", "PopupMenu"}], "}"}]}], ",", RowBox[{"SaveDefinitions", "\[Rule]", "True"}], ",", RowBox[{"ControlPlacement", "\[Rule]", "Left"}]}], "\[IndentingNewLine]", "]"}]], "Input", CellChangeTimes->{{3.5884577620435*^9, 3.5884578461965*^9}, { 3.5884579151045*^9, 3.5884579154365*^9}, {3.5884580380945*^9, 3.5884581458475*^9}, {3.5884581867235003`*^9, 3.5884581911695004`*^9}, { 3.5884582520655003`*^9, 3.5884584814725*^9}, {3.5884585484175*^9, 3.5884585494175*^9}, {3.5884586060945*^9, 3.5884589204375*^9}, { 3.5884589532625*^9, 3.5884589631425*^9}, {3.5884590920755*^9, 3.5884590929865*^9}, {3.588497908958*^9, 3.588498029275*^9}, { 3.588498059901*^9, 3.588498097465*^9}, {3.588498165413*^9, 3.588498182561*^9}, {3.588498229189*^9, 3.588498263921*^9}, { 3.588498303296*^9, 3.5884983050690002`*^9}, {3.588498335514*^9, 3.588498372233*^9}, 3.588498435817*^9, {3.588585078796*^9, 3.588585172898*^9}, {3.5885852083929996`*^9, 3.588585261432*^9}, 3.588585309993*^9, {3.5885853529040003`*^9, 3.588585720355*^9}, { 3.5885857779519997`*^9, 3.588585919017*^9}, {3.588586012708*^9, 3.588586023183*^9}, {3.5885860545369997`*^9, 3.588586063481*^9}, { 3.588586148403*^9, 3.588586158811*^9}, {3.588586223656*^9, 3.588586223773*^9}, {3.588586284601*^9, 3.5885863868929996`*^9}, { 3.588586426238*^9, 3.588586434534*^9}, {3.588586485678*^9, 3.588586671667*^9}, {3.588586703582*^9, 3.588586866259*^9}, { 3.588596041777*^9, 3.588596049751*^9}, {3.588596115922*^9, 3.5885961163129997`*^9}, {3.588596168115*^9, 3.5885961715629997`*^9}, { 3.588596219762*^9, 3.588596220382*^9}, {3.588596458993*^9, 3.588596464067*^9}, 3.588596567424*^9, {3.588596612699*^9, 3.588596778741*^9}, {3.5885974977130003`*^9, 3.588597623731*^9}, { 3.588597688994*^9, 3.588597695388*^9}, {3.588952483717*^9, 3.5889526159519997`*^9}, 3.5889526692469997`*^9, {3.588952708479*^9, 3.5889527913780003`*^9}, {3.5889528432939997`*^9, 3.588952843459*^9}, { 3.588953229135*^9, 3.588953235091*^9}, 3.5889535718050003`*^9, { 3.588954148789*^9, 3.5889541772019997`*^9}, {3.588954219567*^9, 3.588954226467*^9}, {3.588954273007*^9, 3.5889542909189997`*^9}, { 3.588954323979*^9, 3.588954340469*^9}, 3.588954389361*^9, { 3.588954446659*^9, 3.588954461615*^9}, 3.5889545111400003`*^9, { 3.58895454779*^9, 3.5889545479630003`*^9}, 3.588954579469*^9, { 3.588954631512*^9, 3.5889546427980003`*^9}, {3.588954710505*^9, 3.5889547475220003`*^9}, {3.5889547857139997`*^9, 3.588954918868*^9}, { 3.5889549579309998`*^9, 3.588955059236*^9}, {3.588975938224*^9, 3.58897602496*^9}, {3.5889760577320004`*^9, 3.588976091559*^9}, { 3.588976134376*^9, 3.588976135429*^9}, {3.5889761789*^9, 3.588976205141*^9}, {3.58897628023*^9, 3.588976307439*^9}, { 3.588976341552*^9, 3.588976481119*^9}, {3.588976513733*^9, 3.588976540604*^9}, {3.588976596017*^9, 3.5889766250559998`*^9}, 3.58897665862*^9, {3.588976726676*^9, 3.588976772534*^9}, { 3.588976802677*^9, 3.58897682094*^9}, {3.588976876013*^9, 3.5889768807539997`*^9}, {3.588976912257*^9, 3.588976914983*^9}, { 3.588976978251*^9, 3.5889769825950003`*^9}, {3.5889770562720003`*^9, 3.58897715888*^9}, {3.588977215337*^9, 3.588977219863*^9}, { 3.58897733192*^9, 3.58897733741*^9}, {3.5889774447869997`*^9, 3.588977447289*^9}, {3.589472654192*^9, 3.589472671855*^9}, { 3.589472805408*^9, 3.589472914318*^9}, {3.58947322275*^9, 3.58947339585*^9}, {3.58947345684*^9, 3.589473471788*^9}, { 3.589473919367*^9, 3.5894739667390003`*^9}, {3.589474242545*^9, 3.589474309999*^9}, {3.589474596807*^9, 3.589474815342*^9}, { 3.5894748631619997`*^9, 3.5894749132*^9}, {3.589474943218*^9, 3.5894750442139997`*^9}, {3.589475075038*^9, 3.5894751317349997`*^9}, { 3.589475171601*^9, 3.589475224032*^9}, {3.589479361505*^9, 3.589479391281*^9}, {3.589479435847*^9, 3.589479440289*^9}, { 3.5894795015039997`*^9, 3.5894795593585*^9}, {3.589480536528*^9, 3.589480558565*^9}, {3.589480714328*^9, 3.589480782326*^9}, { 3.589480813995*^9, 3.589480814133*^9}, {3.589481196291*^9, 3.5894812048380003`*^9}, {3.589482047711*^9, 3.5894820901549997`*^9}, { 3.5894823595109997`*^9, 3.5894823731429996`*^9}, {3.5894826751429996`*^9, 3.58948276965*^9}, {3.589482813328*^9, 3.589482827824*^9}, { 3.589482862684*^9, 3.589482935499*^9}, 3.589483067203*^9, { 3.589483126744*^9, 3.589483145703*^9}, {3.589483219435*^9, 3.589483228597*^9}, {3.589483647476*^9, 3.589483716429*^9}, { 3.5894838570699997`*^9, 3.589483857832*^9}, {3.589483889358*^9, 3.589483956797*^9}, {3.589484066302*^9, 3.589484190774*^9}, { 3.589484273512*^9, 3.5894842748050003`*^9}, {3.58948439573*^9, 3.589484465097*^9}, {3.589486277535*^9, 3.589486299113*^9}, { 3.58948634258*^9, 3.5894864603599997`*^9}, {3.589486501316*^9, 3.589486571104*^9}, {3.589486605892*^9, 3.589486731028*^9}, { 3.589486828691*^9, 3.58948683279*^9}, 3.589487166185*^9, { 3.5894885873199997`*^9, 3.5894887208120003`*^9}, {3.5894888216800003`*^9, 3.5894888414639997`*^9}, {3.589488925267*^9, 3.589488935467*^9}, 3.589489029465*^9, {3.589489558476*^9, 3.5894895608640003`*^9}, { 3.589997193888*^9, 3.5899972519630003`*^9}, {3.589997343462*^9, 3.589997365021*^9}, {3.589998653443*^9, 3.589998714476*^9}, { 3.589998823054*^9, 3.589998888369*^9}, {3.5899992174700003`*^9, 3.589999230697*^9}, {3.589999552777*^9, 3.5899996124709997`*^9}, { 3.589999658158*^9, 3.5899997365*^9}, 3.5900000898640003`*^9, { 3.590000340409*^9, 3.5900003563269997`*^9}, {3.59000095684*^9, 3.59000096116*^9}, {3.590001114344*^9, 3.5900011521280003`*^9}, { 3.590001223856*^9, 3.590001303138*^9}, {3.5900013372320004`*^9, 3.590001338766*^9}, {3.590001399092*^9, 3.59000143349*^9}, { 3.5900014694440002`*^9, 3.590001512007*^9}, {3.59000154417*^9, 3.59000157417*^9}, {3.5900016647799997`*^9, 3.5900017599849997`*^9}, { 3.590002056415*^9, 3.590002057717*^9}, {3.590002243668*^9, 3.590002243898*^9}, {3.590002295697*^9, 3.5900023081219997`*^9}, { 3.590002425322*^9, 3.5900024489779997`*^9}, {3.590002506067*^9, 3.590002515362*^9}, {3.590002618948*^9, 3.59000262027*^9}, { 3.590002851668*^9, 3.590002853498*^9}, {3.590003957059*^9, 3.590004100767*^9}, {3.5900118990994997`*^9, 3.5900121149695*^9}, { 3.5900123537425003`*^9, 3.5900124737565002`*^9}, {3.5900126252535*^9, 3.5900127846555*^9}, {3.5900129096914997`*^9, 3.5900129577475*^9}, { 3.5900132403505*^9, 3.5900133531935*^9}, {3.590072530092*^9, 3.5900725340959997`*^9}, 3.590072585321*^9, {3.590073783855*^9, 3.590073803644*^9}, {3.590073871862*^9, 3.5900739230179996`*^9}, { 3.5900742024820004`*^9, 3.5900742363450003`*^9}, {3.590074406977*^9, 3.59007443077*^9}, {3.590074478651*^9, 3.590074721844*^9}, { 3.59007475306*^9, 3.590074875646*^9}, {3.590074966362*^9, 3.590075056734*^9}, {3.5900750948970003`*^9, 3.590075125851*^9}, { 3.5900751707390003`*^9, 3.59007518502*^9}, {3.590075233549*^9, 3.5900752790369997`*^9}, {3.5900753368640003`*^9, 3.5900753843050003`*^9}, {3.5900760202209997`*^9, 3.5900760624049997`*^9}, {3.590076100926*^9, 3.590076102262*^9}, { 3.590076137942*^9, 3.590076141769*^9}, {3.590076332059*^9, 3.590076408138*^9}, {3.590076705648*^9, 3.590076751083*^9}, 3.590076795311*^9, {3.590076945748*^9, 3.590076953579*^9}, { 3.5900769964110003`*^9, 3.5900770941400003`*^9}, {3.590078274748*^9, 3.590078297024*^9}, {3.590078328613*^9, 3.590078445243*^9}, { 3.590078484587*^9, 3.5900784987*^9}, {3.590083284007*^9, 3.590083322887*^9}, {3.5900834397019997`*^9, 3.590083485324*^9}, { 3.5900835585690002`*^9, 3.590083659429*^9}, {3.590083732815*^9, 3.590083733842*^9}, {3.590083788205*^9, 3.5900837893450003`*^9}, { 3.5900838224639997`*^9, 3.5900838233900003`*^9}, {3.590083937869*^9, 3.590084067773*^9}, {3.590084237303*^9, 3.590084279479*^9}, { 3.590084437891*^9, 3.590084442639*^9}, {3.590084809899*^9, 3.590084831632*^9}, {3.59008497667*^9, 3.5900849810629997`*^9}, { 3.590085198814*^9, 3.5900852142060003`*^9}, {3.590085404296*^9, 3.590085412138*^9}, {3.5900855332060003`*^9, 3.590085686606*^9}, { 3.5900865477060003`*^9, 3.590086622227*^9}, {3.590086720645*^9, 3.5900867715480003`*^9}, {3.590091165514*^9, 3.590091176483*^9}, { 3.590091212899*^9, 3.59009124912*^9}, {3.590091322791*^9, 3.590091449948*^9}, {3.590091538315*^9, 3.590091558149*^9}, { 3.590091618401*^9, 3.590091620724*^9}, {3.590091694909*^9, 3.5900917100880003`*^9}, {3.590091768604*^9, 3.5900918013459997`*^9}, { 3.5900919013380003`*^9, 3.5900920262209997`*^9}, {3.5900921694440002`*^9, 3.590092183429*^9}, {3.590092256168*^9, 3.590092273152*^9}, { 3.590092315033*^9, 3.590092371141*^9}, {3.590092492355*^9, 3.590092803116*^9}, {3.590092843264*^9, 3.590092950582*^9}, { 3.590093346517*^9, 3.590093422782*^9}, {3.59009346826*^9, 3.5900935505039997`*^9}, {3.590095154307*^9, 3.5900951625220003`*^9}, { 3.590096053001*^9, 3.590096054439*^9}, {3.590096092176*^9, 3.590096093027*^9}, {3.5901697188245*^9, 3.5901697685345*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`GateI$$ = {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}}, $CellContext`InputI$$ = {0, 1, 0, 0}, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{ Hold[$CellContext`InputI$$], {0, 1, 0, 0}, Style[ Row[{"|", Style["\[Psi]", Italic], "\[RightAngleBracket]"}], 14]}, {{0, 1, 0, 0} -> "|01\[RightAngleBracket]", {0, 0, 0, 1} -> "|11\[RightAngleBracket]", {1, 0, 0, 0} -> "|00\[RightAngleBracket]", {0, 0, 1, 0} -> "|10\[RightAngleBracket]"}}, {{ Hold[$CellContext`GateI$$], {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}}, Style[ Row[{"Function"}], 14]}, {{{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, { 0, 0, 1, 0}} -> "f1", {{0, 1, 0, 0}, {1, 0, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}} -> "f2", {{0, 1, 0, 0}, {1, 0, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}} -> "f3", {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}} -> "f4"}}}, Typeset`size$$ = {1000., {123., 127.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = False, $CellContext`InputI$141724$$ = False, $CellContext`GateI$141725$$ = False}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`GateI$$ = {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}}, $CellContext`InputI$$ = {0, 1, 0, 0}}, "ControllerVariables" :> { Hold[$CellContext`InputI$$, $CellContext`InputI$141724$$, False], Hold[$CellContext`GateI$$, $CellContext`GateI$141725$$, False]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Graphics[{$CellContext`circuit = Dot[ KroneckerProduct[$CellContext`identity, $CellContext`pauliz], \ $CellContext`cpauliz, KroneckerProduct[$CellContext`paulix, $CellContext`paulix], \ $CellContext`cpauliz, $CellContext`chadamardII, $CellContext`cnot, \ $CellContext`cnotII, KroneckerProduct[$CellContext`paulix, $CellContext`identity], \ $CellContext`GateI$$, KroneckerProduct[$CellContext`twothirds, $CellContext`hadamard]]; Text[ Style[ MatrixForm[$CellContext`circuit], 16], {1, 1}], Text[ Style["Circuit Matrix", Italic, 16], {1, 1.85}], Text[ Style[ MatrixForm[ Dot[$CellContext`circuit, $CellContext`InputI$$]], 16], {3, 1}], Text[ Style["Output State", Italic, 16], {3, 1.85}], $CellContext`tetra = Dot[$CellContext`circuit, $CellContext`InputI$$]^2; Text[ Style[ MatrixForm[Dot[$CellContext`circuit, $CellContext`InputI$$]^2], 16], {4.5, 1}], Text[ Style["Output Probs", Italic, 16], {4.5, 1.85}], Text[ Style["|00\[RightAngleBracket]\[Rule]", 14], {6, 1.5}], Text[ Style["|01\[RightAngleBracket]\[Rule]", 14], {6, 1.2}], Text[ Style["|10\[RightAngleBracket]\[Rule]", 14], {6, 0.9}], Text[ Style["|11\[RightAngleBracket]\[Rule]", 14], {6, 0.6}], Text[ Style[N[ Part[$CellContext`tetra, 1]] 100 "%", 14], {6.7, 1.5}], Text[ Style[N[ Part[$CellContext`tetra, 2]] 100 "%", 14], {6.7, 1.2}], Text[ Style[N[ Part[$CellContext`tetra, 3]] 100 "%", 14], {6.7, 0.9}], Text[ Style[N[ Part[$CellContext`tetra, 4]] 100 "%", 14], {6.7, 0.6}]}, PlotRange -> {{0, 8}, {0, 2}}, ImageSize -> 1000], "Specifications" :> {{{$CellContext`InputI$$, {0, 1, 0, 0}, Style[ Row[{"|", Style["\[Psi]", Italic], "\[RightAngleBracket]"}], 14]}, {{0, 1, 0, 0} -> "|01\[RightAngleBracket]", {0, 0, 0, 1} -> "|11\[RightAngleBracket]", {1, 0, 0, 0} -> "|00\[RightAngleBracket]", {0, 0, 1, 0} -> "|10\[RightAngleBracket]"}}, {{$CellContext`GateI$$, {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}}, Style[ Row[{"Function"}], 14]}, {{{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}} -> "f1", {{0, 1, 0, 0}, {1, 0, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}} -> "f2", {{0, 1, 0, 0}, {1, 0, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}} -> "f3", {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}} -> "f4"}}}, "Options" :> { ControlType -> {PopupMenu, PopupMenu}, ControlPlacement -> Left}, "DefaultOptions" :> {}], ImageSizeCache->{1166., {153., 158.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, Initialization:>({$CellContext`circuit = {{0, 1/Sqrt[3], 0, Sqrt[2/3]}, {1/Sqrt[3], -(1/Sqrt[3]), -(1/Sqrt[6]), 1/Sqrt[6]}, { 1/Sqrt[3], 0, Sqrt[2/3], 0}, {-(1/Sqrt[3]), -(1/Sqrt[3]), 1/Sqrt[6], 1/Sqrt[ 6]}}, $CellContext`identity = {{1, 0}, {0, 1}}, $CellContext`pauliz = {{1, 0}, { 0, -1}}, $CellContext`cpauliz = {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, -1}}, $CellContext`paulix = {{0, 1}, {1, 0}}, $CellContext`chadamardII = {{1, 0, 0, 0}, { 0, 1/Sqrt[2], 0, 1/Sqrt[2]}, {0, 0, 1, 0}, { 0, 1/Sqrt[2], 0, -(1/Sqrt[2])}}, $CellContext`cnot = {{1, 0, 0, 0}, { 0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}}, $CellContext`cnotII = {{1, 0, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}, {0, 1, 0, 0}}, $CellContext`twothirds = {{1/Sqrt[3], Sqrt[2/3]}, { Sqrt[2/3], -(1/Sqrt[3])}}, $CellContext`hadamard = {{ 1/Sqrt[2], 1/Sqrt[2]}, { 1/Sqrt[2], -(1/Sqrt[2])}}, $CellContext`tetra = {1/3, 1/3, 0, 1/3}, Attributes[PlotRange] = {ReadProtected}}; Typeset`initDone$$ = True), SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{ 3.59009341355*^9, 3.590093447105*^9, {3.590093481449*^9, 3.5900935510480003`*^9}, 3.59009516337*^9, 3.590096054781*^9, { 3.5901697270815*^9, 3.5901697691545*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Manipulate", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Graphics", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{"(", RowBox[{"V", ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"cnot", ",", "identity"}], "]"}], ")"}], ".", RowBox[{"Transpose", "[", "VI", "]"}], ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"cnot", ",", "identity"}], "]"}], ")"}], ".", "CV"}], ")"}], "]"}], ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}]}], "]"}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic", ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"2", ",", "1.85"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{"(", RowBox[{"V", ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"cnot", ",", "identity"}], "]"}], ")"}], ".", RowBox[{"Transpose", "[", "VI", "]"}], ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"cnot", ",", "identity"}], "]"}], ")"}], ".", "CV", ".", "InputI"}], ")"}], "]"}], ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"5", ",", "1"}], "}"}]}], "]"}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic", ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"5", ",", "1.85"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "6"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2"}], "}"}]}], "}"}]}], ",", RowBox[{"ImageSize", "\[Rule]", "1200"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"InputI", ",", RowBox[{"{", RowBox[{ "\[Alpha]", ",", "\[Beta]", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Style", "[", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", RowBox[{"\"\<|\>\"", ",", RowBox[{"Style", "[", RowBox[{"\"\<\[Psi]\>\"", ",", "Italic"}], "]"}], ",", "\"\<\[RightAngleBracket]\>\""}], "}"}], "]"}], ",", "14"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ "\[Alpha]", ",", "\[Beta]", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], "\[Rule]", "\"\<|00\[RightAngleBracket]|\[Psi]\[RightAngleBracket]\>\""}], ",", RowBox[{ RowBox[{"{", RowBox[{ "0", ",", "0", ",", "\[Alpha]", ",", "\[Beta]", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], "\[Rule]", "\"\<|01\[RightAngleBracket]|\[Psi]\[RightAngleBracket]\>\""}], ",", RowBox[{ RowBox[{"{", RowBox[{ "0", ",", "0", ",", "0", ",", "0", ",", "\[Alpha]", ",", "\[Beta]", ",", "0", ",", "0"}], "}"}], "\[Rule]", "\"\<|10\[RightAngleBracket]|\[Psi]\[RightAngleBracket]\>\""}], ",", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"identity", ",", RowBox[{"KroneckerProduct", "[", RowBox[{"identity", ",", RowBox[{"(", RowBox[{"Vee", ".", "Vee"}], ")"}]}], "]"}]}], "]"}], ")"}], ".", RowBox[{"{", RowBox[{ "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], "\[Rule]", "\"\<|11\[RightAngleBracket]\!\(\*SuperscriptBox[\(V\), \(2\)]\)|\ \[Psi]\[RightAngleBracket]\>\""}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"ControlType", "\[Rule]", RowBox[{"{", RowBox[{"PopupMenu", ",", "PopupMenu"}], "}"}]}], ",", RowBox[{"SaveDefinitions", "\[Rule]", "True"}], ",", RowBox[{"ControlPlacement", "\[Rule]", "Left"}]}], "]"}]], "Input", CellChangeTimes->CompressedData[" 1:eJxTTMoPSmViYGAQBmIQffOcsWv2vleO1SK/AkF00A62MBCtGbM8AkQf+voh AURf9v2VCOHnZINo5duVeSB6gdTsbhB94NTBPhB9V8VsGoie5sw+E0TPmrl0 Hog2NpZfAKHX/wbRUvonwfSKY8dFcoA0S9g9CRAt1LxABkS/+L1XAUSvkTk1 CUTr37WZDqJTrNdvywGb//kAiFZle/gDRPMw1f8C0SGPnybXAWmZKJcCEH21 QrMaRJ89swNM8+mWtYFodcOanjqwe7ZPBdEOplnTQPQ3jSd3QXTC0x33QPSz C0pfQPQRhQYwDQCdDqiA "]], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`InputI$$ = { 0, 0, 0, 0, 0, 0, (Rational[1, 2] E^(Rational[-1, 2] $CellContext`\[ImaginaryI]\[Pi]) + Rational[1, 2] E^(Rational[ 1, 2] $CellContext`\[ImaginaryI]\[Pi])) $CellContext`\[Alpha] + \ $CellContext`\[Beta], $CellContext`\[Alpha] + ( Rational[1, 2] E^(Rational[-1, 2] $CellContext`\[ImaginaryI]\[Pi]) + Rational[1, 2] E^(Rational[ 1, 2] $CellContext`\[ImaginaryI]\[Pi])) $CellContext`\[Beta]}, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{ Hold[$CellContext`InputI$$], {$CellContext`\[Alpha], $CellContext`\ \[Beta], 0, 0, 0, 0, 0, 0}, Style[ Row[{"|", Style["\[Psi]", Italic], "\[RightAngleBracket]"}], 14]}, {{$CellContext`\[Alpha], $CellContext`\[Beta], 0, 0, 0, 0, 0, 0} -> "|00\[RightAngleBracket]|\[Psi]\[RightAngleBracket]", { 0, 0, $CellContext`\[Alpha], $CellContext`\[Beta], 0, 0, 0, 0} -> "|01\[RightAngleBracket]|\[Psi]\[RightAngleBracket]", { 0, 0, 0, 0, $CellContext`\[Alpha], $CellContext`\[Beta], 0, 0} -> "|10\[RightAngleBracket]|\[Psi]\[RightAngleBracket]", { 0, 0, 0, 0, 0, 0, (Rational[1, 2] E^(Rational[-1, 2] $CellContext`\[ImaginaryI]\[Pi]) + Rational[1, 2] E^(Rational[ 1, 2] $CellContext`\[ImaginaryI]\[Pi])) $CellContext`\[Alpha] + \ $CellContext`\[Beta], $CellContext`\[Alpha] + ( Rational[1, 2] E^(Rational[-1, 2] $CellContext`\[ImaginaryI]\[Pi]) + Rational[1, 2] E^(Rational[ 1, 2] $CellContext`\[ImaginaryI]\[Pi])) $CellContext`\[Beta]} -> "|11\[RightAngleBracket]\!\(\*SuperscriptBox[\(V\), \(2\)]\)|\[Psi]\ \[RightAngleBracket]"}}}, Typeset`size$$ = {1200., {198., 202.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = False, $CellContext`InputI$28466$$ = False}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`InputI$$ = {$CellContext`\[Alpha], \ $CellContext`\[Beta], 0, 0, 0, 0, 0, 0}}, "ControllerVariables" :> { Hold[$CellContext`InputI$$, $CellContext`InputI$28466$$, False]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Graphics[{ Text[ Style[ MatrixForm[ Dot[$CellContext`V, KroneckerProduct[$CellContext`cnot, $CellContext`identity], Transpose[$CellContext`VI], KroneckerProduct[$CellContext`cnot, $CellContext`identity], \ $CellContext`CV]], 16], {2, 1}], Text[ Style["Circuit Matrix", Italic, 16], {2, 1.85}], Text[ Style[ MatrixForm[ Dot[$CellContext`V, KroneckerProduct[$CellContext`cnot, $CellContext`identity], Transpose[$CellContext`VI], KroneckerProduct[$CellContext`cnot, $CellContext`identity], \ $CellContext`CV, $CellContext`InputI$$]], 16], {5, 1}], Text[ Style["Output State", Italic, 16], {5, 1.85}]}, PlotRange -> {{0, 6}, {0, 2}}, ImageSize -> 1200], "Specifications" :> {{{$CellContext`InputI$$, {$CellContext`\[Alpha], \ $CellContext`\[Beta], 0, 0, 0, 0, 0, 0}, Style[ Row[{"|", Style["\[Psi]", Italic], "\[RightAngleBracket]"}], 14]}, {{$CellContext`\[Alpha], $CellContext`\[Beta], 0, 0, 0, 0, 0, 0} -> "|00\[RightAngleBracket]|\[Psi]\[RightAngleBracket]", { 0, 0, $CellContext`\[Alpha], $CellContext`\[Beta], 0, 0, 0, 0} -> "|01\[RightAngleBracket]|\[Psi]\[RightAngleBracket]", { 0, 0, 0, 0, $CellContext`\[Alpha], $CellContext`\[Beta], 0, 0} -> "|10\[RightAngleBracket]|\[Psi]\[RightAngleBracket]", { 0, 0, 0, 0, 0, 0, (Rational[1, 2] E^(Rational[-1, 2] $CellContext`\[ImaginaryI]\[Pi]) + Rational[1, 2] E^(Rational[ 1, 2] $CellContext`\[ImaginaryI]\[Pi])) $CellContext`\ \[Alpha] + $CellContext`\[Beta], $CellContext`\[Alpha] + ( Rational[1, 2] E^(Rational[-1, 2] $CellContext`\[ImaginaryI]\[Pi]) + Rational[1, 2] E^(Rational[ 1, 2] $CellContext`\[ImaginaryI]\[Pi])) \ $CellContext`\[Beta]} -> "|11\[RightAngleBracket]\!\(\*SuperscriptBox[\(V\), \(2\)]\)|\[Psi]\ \[RightAngleBracket]"}}}, "Options" :> { ControlType -> {PopupMenu, PopupMenu}, ControlPlacement -> Left}, "DefaultOptions" :> {}], ImageSizeCache->{1361., {228., 233.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, Initialization:>({$CellContext`V = {{1, 0, 0, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0}, { 0, 0, E^($CellContext`\[ImaginaryI]\[Pi]/4)/Sqrt[2], 1/(Sqrt[2] E^($CellContext`\[ImaginaryI]\[Pi]/4)), 0, 0, 0, 0}, { 0, 0, 1/(Sqrt[2] E^($CellContext`\[ImaginaryI]\[Pi]/4)), E^($CellContext`\[ImaginaryI]\[Pi]/4)/Sqrt[2], 0, 0, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, { 0, 0, 0, 0, 0, 0, E^($CellContext`\[ImaginaryI]\[Pi]/4)/Sqrt[2], 1/( Sqrt[2] E^($CellContext`\[ImaginaryI]\[Pi]/4))}, { 0, 0, 0, 0, 0, 0, 1/(Sqrt[2] E^($CellContext`\[ImaginaryI]\[Pi]/4)), E^($CellContext`\[ImaginaryI]\[Pi]/4)/Sqrt[ 2]}}, $CellContext`cnot = {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}}, $CellContext`identity = {{1, 0}, {0, 1}}, $CellContext`VI = {{1, 0, 0, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0}, {0, 0, 1/(Sqrt[2] E^($CellContext`\[ImaginaryI]\[Pi]/4)), E^($CellContext`\[ImaginaryI]\[Pi]/4)/Sqrt[2], 0, 0, 0, 0}, { 0, 0, E^($CellContext`\[ImaginaryI]\[Pi]/4)/Sqrt[2], 1/(Sqrt[2] E^($CellContext`\[ImaginaryI]\[Pi]/4)), 0, 0, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, { 0, 0, 0, 0, 0, 0, 1/(Sqrt[2] E^($CellContext`\[ImaginaryI]\[Pi]/4)), E^($CellContext`\[ImaginaryI]\[Pi]/4)/Sqrt[2]}, { 0, 0, 0, 0, 0, 0, E^($CellContext`\[ImaginaryI]\[Pi]/4)/Sqrt[2], 1/( Sqrt[2] E^($CellContext`\[ImaginaryI]\[Pi]/ 4))}}, $CellContext`CV = {{1, 0, 0, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 0}, { 0, 0, 0, 0, E^($CellContext`\[ImaginaryI]\[Pi]/4)/Sqrt[2], 1/( Sqrt[2] E^($CellContext`\[ImaginaryI]\[Pi]/4)), 0, 0}, { 0, 0, 0, 0, 1/(Sqrt[2] E^($CellContext`\[ImaginaryI]\[Pi]/4)), E^($CellContext`\[ImaginaryI]\[Pi]/4)/Sqrt[2], 0, 0}, { 0, 0, 0, 0, 0, 0, E^($CellContext`\[ImaginaryI]\[Pi]/4)/Sqrt[2], 1/( Sqrt[2] E^($CellContext`\[ImaginaryI]\[Pi]/4))}, { 0, 0, 0, 0, 0, 0, 1/(Sqrt[2] E^($CellContext`\[ImaginaryI]\[Pi]/4)), E^($CellContext`\[ImaginaryI]\[Pi]/4)/Sqrt[2]}}, Attributes[PlotRange] = {ReadProtected}}; Typeset`initDone$$ = True), SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{ 3.589498387539*^9, {3.589498829623*^9, 3.5894988369820004`*^9}, 3.589534497578*^9, 3.58953483038*^9, 3.589534900646*^9, 3.589535478631*^9, 3.589535614649*^9, 3.589535653433*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Manipulate", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Graphics", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"circuit", "=", RowBox[{ RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"twothirds", ",", "hadamard"}], "]"}], ")"}], ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"pauliz", ",", "identity"}], "]"}], ")"}], ".", "chadamardI", ".", "cnot"}]}], ";", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", "circuit", "]"}], ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}]}], "]"}]}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic", ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"1", ",", "1.85"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{"(", RowBox[{"circuit", ".", "InputI"}], ")"}], "]"}], ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"3", ",", "1"}], "}"}]}], "]"}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic", ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"3", ",", "1.85"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"tetra", "=", RowBox[{ RowBox[{"(", RowBox[{"circuit", ".", "InputI"}], ")"}], "^", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{ RowBox[{"(", RowBox[{"circuit", ".", "InputI"}], ")"}], "^", "2"}], "]"}], ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"4.5", ",", "1"}], "}"}]}], "]"}]}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic", ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"4.5", ",", "1.85"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\<|00\[RightAngleBracket]\[Rule]\>\"", ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6", ",", "1.5"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\<|01\[RightAngleBracket]\[Rule]\>\"", ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6", ",", "1.2"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\<|10\[RightAngleBracket]\[Rule]\>\"", ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6", ",", "0.9"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\<|11\[RightAngleBracket]\[Rule]\>\"", ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6", ",", "0.6"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{ RowBox[{"N", "[", RowBox[{"tetra", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "*", "100", "\"\<%\>\""}], ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6.7", ",", "1.5"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{ RowBox[{"N", "[", RowBox[{"tetra", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "*", "100", "\"\<%\>\""}], ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6.7", ",", "1.2"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{ RowBox[{"N", "[", RowBox[{"tetra", "[", RowBox[{"[", "3", "]"}], "]"}], "]"}], "*", "100", "\"\<%\>\""}], ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6.7", ",", "0.9"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", " ", RowBox[{ RowBox[{ RowBox[{"N", "[", RowBox[{"tetra", "[", RowBox[{"[", "4", "]"}], "]"}], "]"}], "*", "100", "\"\<%\>\""}], ",", "14"}], "]"}], ",", RowBox[{"{", RowBox[{"6.7", ",", "0.6"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "8"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2"}], "}"}]}], "}"}]}], ",", RowBox[{"ImageSize", "\[Rule]", "1000"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"InputI", ",", RowBox[{ RowBox[{"\[Sqrt]", FractionBox["1", "3"]}], RowBox[{"{", RowBox[{"1", ",", "1", ",", "0", ",", "1"}], "}"}]}], ",", RowBox[{"Style", "[", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", RowBox[{"\"\<|\>\"", ",", RowBox[{"Style", "[", RowBox[{"\"\<\[Psi]\>\"", ",", "Italic"}], "]"}], ",", "\"\<\[RightAngleBracket]\>\""}], "}"}], "]"}], ",", "14"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Sqrt]", FractionBox["1", "3"]}], RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "1"}], ",", "0", ",", "1"}], "}"}]}], "\[Rule]", "\"\\""}], ",", RowBox[{ RowBox[{ RowBox[{"\[Sqrt]", FractionBox["1", "3"]}], RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1", ",", "0", ",", "1"}], "}"}]}], "\[Rule]", "\"\\""}], ",", RowBox[{ RowBox[{ RowBox[{"\[Sqrt]", FractionBox["1", "3"]}], RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", "0", ",", "1"}], "}"}]}], "\[Rule]", "\"\\""}], ",", RowBox[{ RowBox[{ RowBox[{"\[Sqrt]", FractionBox["1", "3"]}], RowBox[{"{", RowBox[{"1", ",", "1", ",", "0", ",", "1"}], "}"}]}], "\[Rule]", "\"\\""}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"GateI", ",", "cnot", ",", RowBox[{"Style", "[", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", "\"\\"", "}"}], "]"}], ",", "14"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"cnot", "\[Rule]", "\"\\""}], ",", RowBox[{"FII", "\[Rule]", "\"\\""}], ",", RowBox[{"FIII", "\[Rule]", "\"\\""}], ",", RowBox[{"IDentity", "\[Rule]", "\"\\""}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"ControlType", "\[Rule]", RowBox[{"{", "PopupMenu", "}"}]}], ",", RowBox[{"SaveDefinitions", "\[Rule]", "True"}], ",", RowBox[{"ControlPlacement", "\[Rule]", "Left"}]}], "\[IndentingNewLine]", "]"}]], "Input", CellChangeTimes->{{3.590097526064*^9, 3.5900976246949997`*^9}, { 3.5900976570699997`*^9, 3.590097703526*^9}, {3.590097876955*^9, 3.590097927307*^9}, {3.5901704289055*^9, 3.5901704293645*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`GateI$$ = {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}}, $CellContext`InputI$$ = { 3^Rational[-1, 2], 3^Rational[-1, 2], 0, 3^Rational[-1, 2]}, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{ Hold[$CellContext`InputI$$], { 3^Rational[-1, 2], 3^Rational[-1, 2], 0, 3^Rational[-1, 2]}, Style[ Row[{"|", Style["\[Psi]", Italic], "\[RightAngleBracket]"}], 14]}, {{ 3^Rational[-1, 2], -3^Rational[-1, 2], 0, 3^Rational[-1, 2]} -> "f1", {-3^Rational[-1, 2], 3^Rational[-1, 2], 0, 3^Rational[-1, 2]} -> "f2", {-3^Rational[-1, 2], -3^Rational[-1, 2], 0, 3^Rational[-1, 2]} -> "f3", {3^Rational[-1, 2], 3^Rational[-1, 2], 0, 3^Rational[-1, 2]} -> "f4"}}, {{ Hold[$CellContext`GateI$$], {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}}, Style[ Row[{"Function"}], 14]}, {{{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, { 0, 0, 1, 0}} -> "f1", {{0, 1, 0, 0}, {1, 0, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}} -> "f2", {{0, 1, 0, 0}, {1, 0, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}} -> "f3", {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}} -> "f4"}}}, Typeset`size$$ = {1000., {123., 127.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = False, $CellContext`InputI$158844$$ = False, $CellContext`GateI$158845$$ = False}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`GateI$$ = {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}}, $CellContext`InputI$$ = { 3^Rational[-1, 2], 3^Rational[-1, 2], 0, 3^Rational[-1, 2]}}, "ControllerVariables" :> { Hold[$CellContext`InputI$$, $CellContext`InputI$158844$$, False], Hold[$CellContext`GateI$$, $CellContext`GateI$158845$$, False]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Graphics[{$CellContext`circuit = Dot[ KroneckerProduct[$CellContext`twothirds, $CellContext`hadamard], KroneckerProduct[$CellContext`pauliz, $CellContext`identity], \ $CellContext`chadamardI, $CellContext`cnot]; Text[ Style[ MatrixForm[$CellContext`circuit], 16], {1, 1}], Text[ Style["Circuit Matrix", Italic, 16], {1, 1.85}], Text[ Style[ MatrixForm[ Dot[$CellContext`circuit, $CellContext`InputI$$]], 16], {3, 1}], Text[ Style["Output State", Italic, 16], {3, 1.85}], $CellContext`tetra = Dot[$CellContext`circuit, $CellContext`InputI$$]^2; Text[ Style[ MatrixForm[Dot[$CellContext`circuit, $CellContext`InputI$$]^2], 16], {4.5, 1}], Text[ Style["Output Probs", Italic, 16], {4.5, 1.85}], Text[ Style["|00\[RightAngleBracket]\[Rule]", 14], {6, 1.5}], Text[ Style["|01\[RightAngleBracket]\[Rule]", 14], {6, 1.2}], Text[ Style["|10\[RightAngleBracket]\[Rule]", 14], {6, 0.9}], Text[ Style["|11\[RightAngleBracket]\[Rule]", 14], {6, 0.6}], Text[ Style[N[ Part[$CellContext`tetra, 1]] 100 "%", 14], {6.7, 1.5}], Text[ Style[N[ Part[$CellContext`tetra, 2]] 100 "%", 14], {6.7, 1.2}], Text[ Style[N[ Part[$CellContext`tetra, 3]] 100 "%", 14], {6.7, 0.9}], Text[ Style[N[ Part[$CellContext`tetra, 4]] 100 "%", 14], {6.7, 0.6}]}, PlotRange -> {{0, 8}, {0, 2}}, ImageSize -> 1000], "Specifications" :> {{{$CellContext`InputI$$, { 3^Rational[-1, 2], 3^Rational[-1, 2], 0, 3^Rational[-1, 2]}, Style[ Row[{"|", Style["\[Psi]", Italic], "\[RightAngleBracket]"}], 14]}, {{ 3^Rational[-1, 2], -3^Rational[-1, 2], 0, 3^Rational[-1, 2]} -> "f1", {-3^Rational[-1, 2], 3^Rational[-1, 2], 0, 3^Rational[-1, 2]} -> "f2", {-3^Rational[-1, 2], -3^Rational[-1, 2], 0, 3^ Rational[-1, 2]} -> "f3", {3^Rational[-1, 2], 3^Rational[-1, 2], 0, 3^Rational[-1, 2]} -> "f4"}}, {{$CellContext`GateI$$, {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}}, Style[ Row[{"Function"}], 14]}, {{{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}} -> "f1", {{0, 1, 0, 0}, {1, 0, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}} -> "f2", {{0, 1, 0, 0}, {1, 0, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}} -> "f3", {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}} -> "f4"}}}, "Options" :> {ControlType -> {PopupMenu}, ControlPlacement -> Left}, "DefaultOptions" :> {}], ImageSizeCache->{1158., {153., 158.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, Initialization:>({$CellContext`circuit = {{ 1/Sqrt[6], 1/Sqrt[6], 0, -Sqrt[2/3]}, { 1/Sqrt[6], -(1/Sqrt[6]), -Sqrt[2/3], 0}, { 1/Sqrt[3], 1/Sqrt[3], 0, 1/Sqrt[3]}, { 1/Sqrt[3], -(1/Sqrt[3]), 1/Sqrt[3], 0}}, $CellContext`twothirds = {{ 1/Sqrt[3], Sqrt[2/3]}, { Sqrt[2/3], -(1/Sqrt[3])}}, $CellContext`hadamard = {{ 1/Sqrt[2], 1/Sqrt[2]}, { 1/Sqrt[2], -(1/Sqrt[2])}}, $CellContext`pauliz = {{1, 0}, { 0, -1}}, $CellContext`identity = {{1, 0}, {0, 1}}, $CellContext`chadamardI = {{1, 0, 0, 0}, {0, 1, 0, 0}, { 0, 0, 1/Sqrt[2], 1/Sqrt[2]}, { 0, 0, 1/Sqrt[2], -(1/Sqrt[2])}}, $CellContext`cnot = {{1, 0, 0, 0}, { 0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}}, $CellContext`tetra = {0, 0, 1, 0}, Attributes[PlotRange] = {ReadProtected}}; Typeset`initDone$$ = True), SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.590097609481*^9, 3.590097625771*^9}, {3.590097662516*^9, 3.5900977059820004`*^9}, {3.590097878171*^9, 3.590097927764*^9}, 3.5901704308905*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Manipulate", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Graphics", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"circuit", "=", RowBox[{ RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"identity", ",", "chadamardI"}], "]"}], ")"}], ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{ RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"identity", ",", "pauliz"}], "]"}], ")"}], ",", "identity"}], "]"}], ")"}], ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"cpauliz", ",", "paulix"}], "]"}], ")"}], ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"identity", ",", "chadamardI"}], "]"}], ")"}], ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{ RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"paulix", ",", "paulix"}], "]"}], ")"}], ",", "identity"}], "]"}], ")"}], ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"cpauliz", ",", "identity"}], "]"}], ")"}], ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"chadamardII", ",", "identity"}], "]"}], ")"}], ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"cnot", ",", "identity"}], "]"}], ")"}], ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"cnotII", ",", "identity"}], "]"}], ")"}], ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{ RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"paulix", ",", "identity"}], "]"}], ")"}], ",", "paulix"}], "]"}], ")"}], ".", "GateI", ".", RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{ RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"twothirds", ",", "hadamard"}], "]"}], ")"}], ",", "identity"}], "]"}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", "circuit", "]"}], ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}]}], "]"}]}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic", ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"2", ",", "1.85"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{"(", RowBox[{"circuit", ".", "InputI"}], ")"}], "]"}], ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"5", ",", "1"}], "}"}]}], "]"}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\\"", ",", "Italic", ",", "16"}], "]"}], ",", RowBox[{"{", RowBox[{"5", ",", "1.85"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "6"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2"}], "}"}]}], "}"}]}], ",", RowBox[{"ImageSize", "\[Rule]", "1200"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"InputI", ",", RowBox[{"{", RowBox[{ "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Style", "[", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", RowBox[{"\"\<|\>\"", ",", RowBox[{"Style", "[", RowBox[{"\"\<\[Psi]\>\"", ",", "Italic"}], "]"}], ",", "\"\<\[RightAngleBracket]\>\""}], "}"}], "]"}], ",", "14"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], "\[Rule]", "\"\<|01\[RightAngleBracket]|0\[RightAngleBracket]\>\""}], ",", RowBox[{ RowBox[{"{", RowBox[{ "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], "\[Rule]", "\"\<|01\[RightAngleBracket]|1\[RightAngleBracket]\>\""}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"GateI", ",", "cnotX", ",", RowBox[{"Style", "[", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", "\"\\"", "}"}], "]"}], ",", "14"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"cnotX", "\[Rule]", "\"\\""}], ",", RowBox[{"FIIX", "\[Rule]", "\"\\""}], ",", RowBox[{"FIIIX", "\[Rule]", "\"\\""}], ",", RowBox[{ RowBox[{"(", RowBox[{"KroneckerProduct", "[", RowBox[{"IDentity", ",", "identity"}], "]"}], ")"}], "\[Rule]", "\"\\""}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"ControlType", "\[Rule]", RowBox[{"{", RowBox[{"PopupMenu", ",", "PopupMenu"}], "}"}]}], ",", RowBox[{"SaveDefinitions", "\[Rule]", "True"}], ",", RowBox[{"ControlPlacement", "\[Rule]", "Left"}]}], "]"}]], "Input", CellChangeTimes->CompressedData[" 1:eJxTTMoPSmViYGAQA2IQ7fFQp2XL/leOaWkNnSBa/+6+GSC6fF/uXBAtE8W3 GERfrQjeDaLjdtWfgMjPPAmiD32NuweiVxwLvQ+i5VpbX4DoWTNng2mRdU/f g+isPZ++g2iPh1/ytwFpqy1RRSD6RJnHnW1g+V/3t4HtK3oGopME3F6AaL+k rJTtYHN700H0lhM2HSDakONS/3awvTevguhPl9g/gugCW4+vINrYuBBMx+1a /wdECzXX/QXRk952Me4A0ixhbzhBNJP2Vz4QPe/9VnkQrW7YpgyiVdlOq4Lo Ra4XNEH0hiI3IxCtu2m92Q6w+Q8ddoDDRdsDRLe+Vo8A0UE7XjSB6EdVizpB NAAIf9Dv "]], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`GateI$$ = {{1, 0, 0, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 0, 0, 1}}, $CellContext`InputI$$ = {0, 0, 0, 1, 0, 0, 0, 0}, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{ Hold[$CellContext`InputI$$], {0, 0, 1, 0, 0, 0, 0, 0}, Style[ Row[{"|", Style["\[Psi]", Italic], "\[RightAngleBracket]"}], 14]}, {{0, 0, 1, 0, 0, 0, 0, 0} -> "|01\[RightAngleBracket]|0\[RightAngleBracket]", {0, 0, 0, 1, 0, 0, 0, 0} -> "|01\[RightAngleBracket]|1\[RightAngleBracket]"}}, {{ Hold[$CellContext`GateI$$], {{1, 0, 0, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 1}, {0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, { 0, 0, 0, 0, 1, 0, 0, 0}}, Style[ Row[{"Function"}], 14]}, {{{1, 0, 0, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 1}, {0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}} -> "f1", {{0, 0, 0, 1, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0}, {1, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 0, 0, 1}} -> "f2", {{0, 0, 0, 1, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0}, {1, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 1}, {0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}} -> "f3", {{1, 0, 0, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 0, 0, 1}} -> "f4"}}}, Typeset`size$$ = {1200., {198., 202.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = False, $CellContext`InputI$4649158$$ = False, $CellContext`GateI$4649159$$ = False}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`GateI$$ = {{1, 0, 0, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 1}, {0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}}, $CellContext`InputI$$ = {0, 0, 1, 0, 0, 0, 0, 0}}, "ControllerVariables" :> { Hold[$CellContext`InputI$$, $CellContext`InputI$4649158$$, False], Hold[$CellContext`GateI$$, $CellContext`GateI$4649159$$, False]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Graphics[{$CellContext`circuit = Dot[ KroneckerProduct[$CellContext`identity, $CellContext`chadamardI], KroneckerProduct[ KroneckerProduct[$CellContext`identity, $CellContext`pauliz], \ $CellContext`identity], KroneckerProduct[$CellContext`cpauliz, $CellContext`paulix], KroneckerProduct[$CellContext`identity, $CellContext`chadamardI], KroneckerProduct[ KroneckerProduct[$CellContext`paulix, $CellContext`paulix], \ $CellContext`identity], KroneckerProduct[$CellContext`cpauliz, $CellContext`identity], KroneckerProduct[$CellContext`chadamardII, $CellContext`identity], KroneckerProduct[$CellContext`cnot, $CellContext`identity], KroneckerProduct[$CellContext`cnotII, $CellContext`identity], KroneckerProduct[ KroneckerProduct[$CellContext`paulix, $CellContext`identity], \ $CellContext`paulix], $CellContext`GateI$$, KroneckerProduct[ KroneckerProduct[$CellContext`twothirds, $CellContext`hadamard], \ $CellContext`identity]]; Text[ Style[ MatrixForm[$CellContext`circuit], 16], {2, 1}], Text[ Style["Circuit Matrix", Italic, 16], {2, 1.85}], Text[ Style[ MatrixForm[ Dot[$CellContext`circuit, $CellContext`InputI$$]], 16], {5, 1}], Text[ Style["Output State", Italic, 16], {5, 1.85}]}, PlotRange -> {{0, 6}, {0, 2}}, ImageSize -> 1200], "Specifications" :> {{{$CellContext`InputI$$, {0, 0, 1, 0, 0, 0, 0, 0}, Style[ Row[{"|", Style["\[Psi]", Italic], "\[RightAngleBracket]"}], 14]}, {{0, 0, 1, 0, 0, 0, 0, 0} -> "|01\[RightAngleBracket]|0\[RightAngleBracket]", {0, 0, 0, 1, 0, 0, 0, 0} -> "|01\[RightAngleBracket]|1\[RightAngleBracket]"}}, \ {{$CellContext`GateI$$, {{1, 0, 0, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0}, { 0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 1}, {0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}}, Style[ Row[{"Function"}], 14]}, {{{1, 0, 0, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 0}, { 0, 0, 0, 0, 0, 0, 0, 1}, {0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}} -> "f1", {{0, 0, 0, 1, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0}, {1, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 0, 0, 1}} -> "f2", {{0, 0, 0, 1, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0}, {1, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 1}, {0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}} -> "f3", {{1, 0, 0, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 0, 0, 1}} -> "f4"}}}, "Options" :> { ControlType -> {PopupMenu, PopupMenu}, ControlPlacement -> Left}, "DefaultOptions" :> {}], ImageSizeCache->{1379., {228., 233.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, Initialization:>({$CellContext`circuit = {{0, 0, 0, 1/Sqrt[3], 0, 0, 0, Sqrt[2/3]}, {0, 0, -(1/Sqrt[3]), 0, 0, 0, -Sqrt[2/3], 0}, { 0, -(1/Sqrt[3]), 0, -(1/Sqrt[3]), 0, 1/Sqrt[6], 0, 1/Sqrt[ 6]}, {-(1/Sqrt[3]), 0, -(1/Sqrt[3]), 0, 1/Sqrt[6], 0, 1/Sqrt[6], 0}, {0, 1/Sqrt[3], 0, 0, 0, Sqrt[2/3], 0, 0}, {-(1/Sqrt[3]), 0, 0, 0, -Sqrt[2/3], 0, 0, 0}, { 0, 1/Sqrt[3], 0, -(1/Sqrt[3]), 0, -(1/Sqrt[6]), 0, 1/Sqrt[6]}, { 1/Sqrt[3], 0, -(1/Sqrt[3]), 0, -(1/Sqrt[6]), 0, 1/Sqrt[6], 0}}, $CellContext`identity = {{1, 0}, {0, 1}}, $CellContext`chadamardI = {{1, 0, 0, 0}, {0, 1, 0, 0}, { 0, 0, 1/Sqrt[2], 1/Sqrt[2]}, { 0, 0, 1/Sqrt[2], -(1/Sqrt[2])}}, $CellContext`pauliz = {{1, 0}, { 0, -1}}, $CellContext`cpauliz = {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, -1}}, $CellContext`paulix = {{0, 1}, {1, 0}}, $CellContext`chadamardII = {{1, 0, 0, 0}, { 0, 1/Sqrt[2], 0, 1/Sqrt[2]}, {0, 0, 1, 0}, { 0, 1/Sqrt[2], 0, -(1/Sqrt[2])}}, $CellContext`cnot = {{1, 0, 0, 0}, { 0, 1, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}}, $CellContext`cnotII = {{1, 0, 0, 0}, {0, 0, 0, 1}, {0, 0, 1, 0}, {0, 1, 0, 0}}, $CellContext`twothirds = {{1/Sqrt[3], Sqrt[2/3]}, { Sqrt[2/3], -(1/Sqrt[3])}}, $CellContext`hadamard = {{ 1/Sqrt[2], 1/Sqrt[2]}, {1/Sqrt[2], -(1/Sqrt[2])}}, Attributes[PlotRange] = {ReadProtected}}; Typeset`initDone$$ = True), SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{ 3.5901745310465*^9, 3.5901755568925*^9, {3.5901758132705*^9, 3.5901758715205*^9}, 3.5901764407015*^9, {3.5901764711654997`*^9, 3.5901764781295*^9}, {3.5901765232535*^9, 3.5901765375785*^9}, { 3.5901765834245*^9, 3.5901765968245*^9}, {3.5901766360505*^9, 3.5901766504095*^9}, 3.5901766846795*^9, 3.5901767486925*^9, { 3.5901767810445004`*^9, 3.5901768480715*^9}, {3.5901768887145*^9, 3.5901769179965*^9}, {3.5901769533035*^9, 3.5901770230105*^9}, { 3.5901770535615*^9, 3.5901770721425*^9}, 3.5901771041184998`*^9, { 3.5901771341645*^9, 3.5901771707965*^9}, {3.5901772073355*^9, 3.5901772879005003`*^9}, 3.5901773511584997`*^9, {3.5901773955185003`*^9, 3.5901774738435*^9}, {3.5901778240695*^9, 3.5901778697635*^9}}] }, Open ]] }, WindowSize->{1904, 953}, WindowMargins->{{0, Automatic}, {Automatic, -8}}, FrontEndVersion->"8.0 for Microsoft Windows (64-bit) (November 7, 2010)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[557, 20, 17651, 460, 562, "Input"], Cell[CellGroupData[{ Cell[18233, 484, 17031, 442, 628, "Input"], Cell[35267, 928, 15433, 356, 412, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[50737, 1289, 17240, 363, 412, "Input"], Cell[67980, 1654, 6769, 141, 328, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[74786, 1800, 5163, 132, 180, "Input"], Cell[79952, 1934, 7983, 152, 478, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[87972, 2091, 8503, 240, 449, "Input"], Cell[96478, 2333, 6700, 136, 328, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[103215, 2474, 6412, 166, 232, "Input"], Cell[109630, 2642, 9478, 166, 478, "Output"] }, Open ]] } ] *) (* End of internal cache information *)