Page MenuHomeHEPForge
Files F8309952

2HDMteste.nb
No OneTemporary
Actions

2HDMteste.nb
View Options

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 0, 0]
NotebookDataLength[ 107639, 3029]
NotebookOptionsPosition[ 101984, 2830]
NotebookOutlinePosition[ 102322, 2845]
CellTagsIndexPosition[ 102279, 2842]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[""], "Input"],
Cell[CellGroupData[{
Cell["Higgs doublets parametrization", "Subsection",
CellChangeTimes->{{3.518246089630517*^9, 3.518246098836166*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"\[CapitalPhi]1", "=",
RowBox[{"{",
RowBox[{"phi1plus", ",",
RowBox[{
RowBox[{"v1", "/",
RowBox[{"Sqrt", "[", "2", "]"}]}], "+",
RowBox[{"rho1", "/",
RowBox[{"Sqrt", "[", "2", "]"}]}], "+",
RowBox[{"I", " ",
RowBox[{"eta1", "/",
RowBox[{"Sqrt", "[", "2", "]"}]}]}]}]}], "}"}]}]], "Input",
CellChangeTimes->{{3.518158055168479*^9, 3.518158055178003*^9}, {
3.518158267564507*^9, 3.518158304556962*^9}, {3.518158377160569*^9,
3.518158377830175*^9}, {3.518170755016883*^9, 3.518170759886158*^9}, {
3.51817218444456*^9, 3.518172187179514*^9}, {3.518173738593742*^9,
3.518173741632355*^9}, {3.555759810185387*^9, 3.555759821311977*^9}, {
3.565093566099414*^9, 3.565093567744572*^9}, {3.565093601371547*^9,
3.56509363537612*^9}, {3.566636819426292*^9, 3.566636826986998*^9}}],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{"phi1plus", ",",
RowBox[{
FractionBox[
RowBox[{"\[ImaginaryI]", " ", "eta1"}],
SqrtBox["2"]], "+",
FractionBox["rho1",
SqrtBox["2"]], "+",
FractionBox["v1",
SqrtBox["2"]]}]}], "}"}], TraditionalForm]], "Output",
CellChangeTimes->{
3.518158308731028*^9, 3.518158379309446*^9, 3.518158889481496*^9, {
3.518168915695763*^9, 3.518168925404616*^9}, 3.518170723423977*^9,
3.518170786040034*^9, 3.518171115299616*^9, 3.518171337205637*^9,
3.518171472513136*^9, 3.518172208617814*^9, 3.51817436504572*^9,
3.518174576652233*^9, 3.518244639317571*^9, 3.51824531237654*^9,
3.518246508911185*^9, 3.518252054065849*^9, 3.555758036155473*^9,
3.555758362385468*^9, 3.555758559703794*^9, 3.555760527913176*^9,
3.555830450728956*^9, 3.555925891935867*^9, 3.555927665097882*^9,
3.556020384925614*^9, 3.556024812873572*^9, 3.556025799128531*^9,
3.556026020281257*^9, 3.565093183682422*^9, 3.565093989499423*^9,
3.566282470258175*^9, 3.566283967889476*^9, 3.566284632791335*^9,
3.566287923514909*^9, 3.566300252784686*^9, 3.566636139309017*^9,
3.568458104278021*^9, 3.568458258220464*^9, 3.570863333234137*^9,
3.573297400225645*^9, 3.573298122474463*^9, 3.573301564023192*^9,
3.573301798011593*^9, 3.573302929172275*^9, 3.573372595986303*^9,
3.573372645142884*^9, 3.573372941053307*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"\[CapitalPhi]1Dag", "=",
RowBox[{"{",
RowBox[{"phi1minus", ",",
RowBox[{
RowBox[{"v1", "/",
RowBox[{"Sqrt", "[", "2", "]"}]}], "+",
RowBox[{"rho1", "/",
RowBox[{"Sqrt", "[", "2", "]"}]}], "-",
RowBox[{"I", " ",
RowBox[{"eta1", "/",
RowBox[{"Sqrt", "[", "2", "]"}]}]}]}]}], "}"}]}]], "Input",
CellChangeTimes->{{3.518158080009057*^9, 3.518158080010428*^9}, {
3.518158331524189*^9, 3.518158365420911*^9}, {3.518158396407685*^9,
3.518158396689956*^9}, {3.518173745352317*^9, 3.518173746192134*^9}, {
3.518174553468167*^9, 3.518174560050494*^9}, {3.555760457212876*^9,
3.555760476176291*^9}, {3.565093572903378*^9, 3.565093574382732*^9}, {
3.565093640768838*^9, 3.56509364636837*^9}}],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{"phi1minus", ",",
RowBox[{
RowBox[{"-",
FractionBox[
RowBox[{"\[ImaginaryI]", " ", "eta1"}],
SqrtBox["2"]]}], "+",
FractionBox["rho1",
SqrtBox["2"]], "+",
FractionBox["v1",
SqrtBox["2"]]}]}], "}"}], TraditionalForm]], "Output",
CellChangeTimes->{{3.518158366665777*^9, 3.518158397780324*^9},
3.518158891908221*^9, 3.518168927259134*^9, 3.518170725760932*^9,
3.518170787856744*^9, 3.518171118148692*^9, 3.51817133881338*^9,
3.518171474670794*^9, 3.518172210977564*^9, 3.518174367580109*^9,
3.518174578202096*^9, 3.518245314202701*^9, 3.518246511910359*^9,
3.518252056139315*^9, 3.555758040441137*^9, 3.555758365950649*^9,
3.555758563221275*^9, 3.555760528410511*^9, 3.555830452071462*^9,
3.555925892275273*^9, 3.555927665269523*^9, 3.556020386048026*^9,
3.556024815697949*^9, 3.55602579953006*^9, 3.556026021322343*^9,
3.565093186423581*^9, 3.565093990274347*^9, 3.566282471647018*^9,
3.566283968544471*^9, 3.566284633859134*^9, 3.566287924331307*^9,
3.566300255181125*^9, 3.566636139486762*^9, 3.56845810442887*^9,
3.568458258492392*^9, 3.570863333364462*^9, 3.573297400355745*^9,
3.573298122577531*^9, 3.573301564137911*^9, 3.57330179810878*^9,
3.57330292930061*^9, 3.573372596411743*^9, 3.573372645215032*^9,
3.573372941175957*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"\[CapitalPhi]2", "=",
RowBox[{"{",
RowBox[{"phi2plus", ",",
RowBox[{
RowBox[{"I", " ",
RowBox[{"eta2", "/",
RowBox[{"Sqrt", "[", "2", "]"}]}]}], "+",
RowBox[{"v2", "/",
RowBox[{"Sqrt", "[", "2", "]"}]}], "+",
RowBox[{"rho2", "/",
RowBox[{"Sqrt", "[", "2", "]"}]}]}]}], "}"}]}]], "Input",
CellChangeTimes->{{3.518158099428096*^9, 3.518158099429077*^9}, {
3.518158402479041*^9, 3.518158428188411*^9}, {3.518170766207867*^9,
3.518170770559507*^9}, {3.518172190695527*^9, 3.518172194170091*^9}, {
3.518173749739468*^9, 3.518173752719367*^9}, 3.518174369350962*^9,
3.518174580528692*^9, {3.555760481029362*^9, 3.555760501113645*^9}, {
3.565093579578488*^9, 3.565093580565559*^9}, {3.565093654390542*^9,
3.565093663260501*^9}}],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{"phi2plus", ",",
RowBox[{
FractionBox[
RowBox[{"\[ImaginaryI]", " ", "eta2"}],
SqrtBox["2"]], "+",
FractionBox["rho2",
SqrtBox["2"]], "+",
FractionBox["v2",
SqrtBox["2"]]}]}], "}"}], TraditionalForm]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQAeK1+wPPR5m9clR7upU1GkgrOCq+iQfSv0w+nUkA0p2b
d1wB0VHhDP9AtHd4t2QikBa60aQFon31prSB6HdTeqYkAelpvzeuA9H/GqZZ
tALp6XO1z4HoaazFzR1AOrPG7Ldg3SvH1jvPlYWAdN+duTYg+lTCfCNhIB05
uTfMFEhHsXR9SAbSGwO0z6UAabu2TJFJQHqnlqndFCDNeeXjDhC98e36KyBa
a3mYxoP+V47fWR/2gOiLaSx3VSa9crwTYT5DFUgLHo19DaLbTs5rUwfSzQsT
enSB9KIrlb0XgXTXYwF972mvHO/6BjmB6HMSm+c8nPXKUf08t3zb/FeOT1JD
K0G0oXGHegeQ/nX5sAuIPuSncwlEB6lNuLYKSN9JWXkHRDPeX864GkgDAANc
tUA=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"\[CapitalPhi]2Dag", "=",
RowBox[{"{",
RowBox[{"phi2minus", ",",
RowBox[{
RowBox[{
RowBox[{"-", "I"}], " ",
RowBox[{"eta2", "/",
RowBox[{"Sqrt", "[", "2", "]"}]}]}], "+",
RowBox[{"v2", "/",
RowBox[{"Sqrt", "[", "2", "]"}]}], "+",
RowBox[{"rho2", "/",
RowBox[{"Sqrt", "[", "2", "]"}]}]}]}], "}"}]}]], "Input",
CellChangeTimes->{{3.518158111470454*^9, 3.518158111471678*^9}, {
3.518158433604633*^9, 3.518158456534427*^9}, {3.518173756254172*^9,
3.518173757128548*^9}, {3.518174566666751*^9, 3.518174590858209*^9}, {
3.555760504584781*^9, 3.555760513960939*^9}, {3.565093585520023*^9,
3.565093586494281*^9}, {3.565093667890844*^9, 3.565093673703601*^9}}],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{"phi2minus", ",",
RowBox[{
RowBox[{"-",
FractionBox[
RowBox[{"\[ImaginaryI]", " ", "eta2"}],
SqrtBox["2"]]}], "+",
FractionBox["rho2",
SqrtBox["2"]], "+",
FractionBox["v2",
SqrtBox["2"]]}]}], "}"}], TraditionalForm]], "Output",
CellChangeTimes->{3.518174592291327*^9, 3.518245318682328*^9,
3.51824651518272*^9, 3.518252061916579*^9, 3.555758042010401*^9,
3.555758367392411*^9, 3.555758565641196*^9, 3.55576053604895*^9,
3.555830453194502*^9, 3.555925892338426*^9, 3.555927665443408*^9,
3.556020388210909*^9, 3.5560248176761*^9, 3.556025799582153*^9,
3.556026022060363*^9, 3.565093188948049*^9, 3.565093991635536*^9,
3.566282472918569*^9, 3.566283970931521*^9, 3.566284635958622*^9,
3.566287925617948*^9, 3.566300273795074*^9, 3.566636139842071*^9,
3.568458104607669*^9, 3.568458258803907*^9, 3.570863333612923*^9,
3.573297400382985*^9, 3.573298122841747*^9, 3.573301564373504*^9,
3.573301798130772*^9, 3.57330292947175*^9, 3.573372596769505*^9,
3.573372645946411*^9, 3.573372941629198*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Higgs potential", "Subsection",
CellChangeTimes->{{3.518246112538*^9, 3.518246115979202*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"LV2", "=",
RowBox[{"Expand", "[",
RowBox[{
RowBox[{"m11sq", " ",
RowBox[{"\[CapitalPhi]1Dag", ".", "\[CapitalPhi]1"}]}], "+",
RowBox[{"m22sq", " ",
RowBox[{"\[CapitalPhi]2Dag", ".", " ", "\[CapitalPhi]2"}]}], "-",
RowBox[{"m12sq", " ",
RowBox[{"(",
RowBox[{
RowBox[{"\[CapitalPhi]1Dag", " ", ".", "\[CapitalPhi]2"}], "+",
RowBox[{"\[CapitalPhi]2Dag", ".", " ", "\[CapitalPhi]1"}]}], ")"}]}],
"+",
RowBox[{
RowBox[{"\[Lambda]1", "/", "2"}], " ",
RowBox[{
RowBox[{"(",
RowBox[{"\[CapitalPhi]1Dag", ".", " ", "\[CapitalPhi]1"}], ")"}], "^",
"2"}]}], "+",
RowBox[{
RowBox[{"\[Lambda]2", "/", "2"}], " ",
RowBox[{
RowBox[{"(",
RowBox[{"\[CapitalPhi]2Dag", ".", " ", "\[CapitalPhi]2"}], ")"}], "^",
"2"}]}], "+",
RowBox[{"\[Lambda]3", " ",
RowBox[{"(",
RowBox[{"\[CapitalPhi]1Dag", " ", ".", "\[CapitalPhi]1"}], ")"}], " ",
RowBox[{"(",
RowBox[{"\[CapitalPhi]2Dag", ".", " ", "\[CapitalPhi]2"}], ")"}]}],
"+",
RowBox[{"\[Lambda]4", " ",
RowBox[{"(",
RowBox[{"\[CapitalPhi]2Dag", ".", "\[CapitalPhi]1"}], ")"}], " ",
RowBox[{"(",
RowBox[{"\[CapitalPhi]1Dag", ".", " ", "\[CapitalPhi]2"}], ")"}]}],
"+",
RowBox[{
RowBox[{"\[Lambda]5", "/", "2"}], " ",
RowBox[{"(", " ",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"\[CapitalPhi]1Dag", ".", " ", "\[CapitalPhi]2"}], ")"}],
"^", "2"}], "+",
RowBox[{
RowBox[{"(",
RowBox[{"\[CapitalPhi]2Dag", ".", " ", "\[CapitalPhi]1"}], ")"}],
"^", "2"}]}], ")"}]}]}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.518158132518091*^9, 3.518158132519033*^9}, {
3.518158464784969*^9, 3.518158504516389*^9}, {3.518158536722792*^9,
3.518158575042514*^9}, {3.518158713724118*^9, 3.518158739369266*^9}, {
3.518171239520615*^9, 3.518171263808588*^9}, {3.518171325181064*^9,
3.518171329947603*^9}, {3.518171361566021*^9, 3.518171369207738*^9}, {
3.518171437411308*^9, 3.518171444980818*^9}, {3.518171505122428*^9,
3.518171546996272*^9}, {3.518174611912791*^9, 3.518174780672682*^9},
3.51824532473769*^9, {3.555758342719565*^9, 3.555758343677582*^9}, {
3.56509400439415*^9, 3.565094007945549*^9}, {3.56664611649365*^9,
3.566646126011067*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell["stationary condition", "Subsection",
CellChangeTimes->{{3.518246130217912*^9, 3.518246138489787*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{"LV2", ",", "rho1"}], "]"}], "/.",
RowBox[{"rho1", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho2", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta1", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2minus", "\[Rule]", "0"}]}]], "Input",
CellChangeTimes->{{3.518158151498525*^9, 3.518158151499995*^9}, {
3.518158907912486*^9, 3.518158939768515*^9}, {3.518174797392729*^9,
3.51817480719688*^9}, {3.555760544556684*^9, 3.55576056187867*^9}, {
3.565093201476604*^9, 3.565093216182206*^9}, 3.565094075180586*^9, {
3.565094113513426*^9, 3.565094157667731*^9}}],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"m11sq", " ", "v1"}], "-",
RowBox[{"m12sq", " ", "v2"}], "+",
FractionBox[
RowBox[{
SuperscriptBox["v1", "3"], " ", "\[Lambda]1"}], "2"], "+",
RowBox[{
FractionBox["1", "2"], " ", "v1", " ",
SuperscriptBox["v2", "2"], " ", "\[Lambda]3"}], "+",
RowBox[{
FractionBox["1", "2"], " ", "v1", " ",
SuperscriptBox["v2", "2"], " ", "\[Lambda]4"}], "+",
RowBox[{
FractionBox["1", "2"], " ", "v1", " ",
SuperscriptBox["v2", "2"], " ", "\[Lambda]5"}]}],
TraditionalForm]], "Output",
CellChangeTimes->{3.566284638977273*^9, 3.566287928032642*^9,
3.566300279542473*^9, 3.566636140669108*^9, 3.56845810535126*^9,
3.568458259203354*^9, 3.570863333645168*^9, 3.573297400546869*^9,
3.573298122992493*^9, 3.573301564519761*^9, 3.573301798268438*^9,
3.573302929613559*^9, 3.573372597301525*^9, 3.573372646618073*^9,
3.573372942073453*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"m11sq", "=",
FormBox[
RowBox[{
RowBox[{"m12sq", " ",
RowBox[{"v2", "/", "v1"}]}], "-",
FractionBox[
RowBox[{
SuperscriptBox["v1", "2"], " ", "\[Lambda]1"}], "2"], "-",
RowBox[{
FractionBox["1", "2"], " ",
SuperscriptBox["v2", "2"], " ", "\[Lambda]3"}], "-",
RowBox[{
FractionBox["1", "2"], " ",
SuperscriptBox["v2", "2"], " ", "\[Lambda]4"}], "-",
RowBox[{
FractionBox["1", "2"], " ",
SuperscriptBox["v2", "2"], " ", "\[Lambda]5"}]}],
TraditionalForm]}]], "Input",
CellChangeTimes->{{3.566284542136222*^9, 3.566284619031555*^9}}],
Cell[BoxData[
FormBox[
RowBox[{
FractionBox[
RowBox[{"m12sq", " ", "v2"}], "v1"], "-",
FractionBox[
RowBox[{
SuperscriptBox["v1", "2"], " ", "\[Lambda]1"}], "2"], "-",
FractionBox[
RowBox[{
SuperscriptBox["v2", "2"], " ", "\[Lambda]3"}], "2"], "-",
FractionBox[
RowBox[{
SuperscriptBox["v2", "2"], " ", "\[Lambda]4"}], "2"], "-",
FractionBox[
RowBox[{
SuperscriptBox["v2", "2"], " ", "\[Lambda]5"}], "2"]}],
TraditionalForm]], "Output",
CellChangeTimes->{3.566284649937779*^9, 3.566287929111285*^9,
3.566300281185302*^9, 3.566636140984375*^9, 3.568458105499689*^9,
3.568458259276697*^9, 3.570863333861279*^9, 3.57329740072028*^9,
3.573298123216756*^9, 3.573301564748936*^9, 3.573301798496211*^9,
3.573302929914469*^9, 3.573372597318646*^9, 3.573372646638049*^9,
3.573372942759958*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{"LV2", ",", "rho2"}], "]"}], "/.",
RowBox[{"rho1", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho2", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta1", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2minus", "\[Rule]", "0"}]}]], "Input",
CellChangeTimes->{{3.565094270046732*^9, 3.565094270320194*^9}}],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"-",
RowBox[{"m12sq", " ", "v1"}]}], "+",
RowBox[{"m22sq", " ", "v2"}], "+",
RowBox[{
FractionBox["1", "2"], " ",
SuperscriptBox["v1", "2"], " ", "v2", " ", "\[Lambda]3"}], "+",
RowBox[{
FractionBox["1", "2"], " ",
SuperscriptBox["v1", "2"], " ", "v2", " ", "\[Lambda]4"}], "+",
RowBox[{
FractionBox["1", "2"], " ",
SuperscriptBox["v1", "2"], " ", "v2", " ", "\[Lambda]5"}], "+",
FractionBox[
RowBox[{
SuperscriptBox["v2", "3"], " ", "\[Lambda]2"}], "2"]}],
TraditionalForm]], "Output",
CellChangeTimes->{3.565094780365402*^9, 3.565095528671889*^9,
3.566282480697528*^9, 3.566283976463974*^9, 3.566285411965612*^9,
3.566287929929503*^9, 3.566300302919413*^9, 3.566636141256127*^9,
3.568458105633246*^9, 3.568458259626279*^9, 3.570863334169065*^9,
3.573297401004247*^9, 3.573298123520717*^9, 3.573301565093952*^9,
3.573301798759157*^9, 3.573302930235424*^9, 3.573372597336444*^9,
3.573372646658804*^9, 3.573372942906163*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
FormBox[
RowBox[{"m22sq", "=",
RowBox[{
RowBox[{"m12sq", " ",
RowBox[{"v1", "/", "v2"}]}], "-",
RowBox[{
FractionBox["1", "2"], " ",
SuperscriptBox["v1", "2"], " ", "\[Lambda]3"}], "-",
RowBox[{
FractionBox["1", "2"], " ",
SuperscriptBox["v1", "2"], " ", "\[Lambda]4"}], "-",
RowBox[{
FractionBox["1", "2"], " ",
SuperscriptBox["v1", "2"], " ", "\[Lambda]5"}], "-",
FractionBox[
RowBox[{
SuperscriptBox["v2", "2"], " ", "\[Lambda]2"}], "2"]}]}],
TraditionalForm]], "Input",
CellChangeTimes->{{3.566287851385718*^9, 3.566287898634802*^9}}],
Cell[BoxData[
FormBox[
RowBox[{
FractionBox[
RowBox[{"m12sq", " ", "v1"}], "v2"], "-",
FractionBox[
RowBox[{
SuperscriptBox["v1", "2"], " ", "\[Lambda]3"}], "2"], "-",
FractionBox[
RowBox[{
SuperscriptBox["v1", "2"], " ", "\[Lambda]4"}], "2"], "-",
FractionBox[
RowBox[{
SuperscriptBox["v1", "2"], " ", "\[Lambda]5"}], "2"], "-",
FractionBox[
RowBox[{
SuperscriptBox["v2", "2"], " ", "\[Lambda]2"}], "2"]}],
TraditionalForm]], "Output",
CellChangeTimes->{3.566287930873456*^9, 3.566300305012307*^9,
3.566636141374273*^9, 3.568458105894497*^9, 3.568458259716193*^9,
3.570863334422618*^9, 3.573297401210316*^9, 3.573298123780356*^9,
3.573301565374628*^9, 3.573301799225224*^9, 3.573302930520941*^9,
3.573372597498418*^9, 3.573372646857402*^9, 3.57337294292432*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{"LV2", ",", "eta1"}], "]"}], "/.",
RowBox[{"rho1", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho2", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta1", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2minus", "\[Rule]", "0"}]}]], "Input",
CellChangeTimes->{{3.565094608696567*^9, 3.56509461095972*^9}}],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
CellChangeTimes->{3.565094783029736*^9, 3.56628248185048*^9,
3.566283977508426*^9, 3.566285413016679*^9, 3.566287932374324*^9,
3.566300332817617*^9, 3.566636141675379*^9, 3.568458105907564*^9,
3.56845825974729*^9, 3.570863334679442*^9, 3.573297401535176*^9,
3.57329812400396*^9, 3.573301565626933*^9, 3.573301799582899*^9,
3.573302930690424*^9, 3.573372597530481*^9, 3.573372646873802*^9,
3.573372942938709*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{"LV2", ",", "eta2"}], "]"}], "/.",
RowBox[{"rho1", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho2", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta1", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2minus", "\[Rule]", "0"}]}]], "Input",
CellChangeTimes->{{3.565094616030319*^9, 3.565094622797341*^9}}],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
CellChangeTimes->{3.565094784368192*^9, 3.566282482756888*^9,
3.566283978516993*^9, 3.566285413893709*^9, 3.566287933266885*^9,
3.566300333582135*^9, 3.566636141792068*^9, 3.568458105919432*^9,
3.568458260018924*^9, 3.570863334803716*^9, 3.573297401909949*^9,
3.573298124234594*^9, 3.573301566055091*^9, 3.573301799704258*^9,
3.573302930939073*^9, 3.573372597542499*^9, 3.573372647041717*^9,
3.573372942951232*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{"LV2", ",", "phi1plus"}], "]"}], "/.",
RowBox[{"rho1", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho2", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta1", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2minus", "\[Rule]", "0"}]}]], "Input",
CellChangeTimes->{{3.565094628693044*^9, 3.565094633886735*^9}}],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
CellChangeTimes->{3.565094785487345*^9, 3.566282483709342*^9,
3.566283979539937*^9, 3.566285414684975*^9, 3.566287934207344*^9,
3.566300334433587*^9, 3.566636142039507*^9, 3.568458105931067*^9,
3.568458260037133*^9, 3.570863335102865*^9, 3.573297402183253*^9,
3.573298124547559*^9, 3.57330156649947*^9, 3.573301799947371*^9,
3.573302931248924*^9, 3.573372597696116*^9, 3.57337264707251*^9,
3.573372943070624*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{"LV2", ",", "phi1minus"}], "]"}], "/.",
RowBox[{"rho1", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho2", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta1", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2minus", "\[Rule]", "0"}]}]], "Input",
CellChangeTimes->{{3.565094639112397*^9, 3.56509464256178*^9}}],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
CellChangeTimes->{3.565094786595207*^9, 3.566282484662829*^9,
3.566283980521792*^9, 3.56628541549005*^9, 3.566287935145812*^9,
3.566300335333843*^9, 3.566636142365439*^9, 3.568458106055737*^9,
3.568458260049222*^9, 3.570863335425397*^9, 3.573297402237148*^9,
3.573298124666234*^9, 3.573301566775973*^9, 3.573301800456978*^9,
3.573302931378397*^9, 3.573372597708869*^9, 3.573372647086265*^9,
3.573372943085145*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{"LV2", ",", "phi2plus"}], "]"}], "/.",
RowBox[{"rho1", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho2", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta1", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2minus", "\[Rule]", "0"}]}]], "Input",
CellChangeTimes->{{3.56509464780974*^9, 3.565094652264134*^9}}],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
CellChangeTimes->{3.565094787631901*^9, 3.566282485691983*^9,
3.566283981547991*^9, 3.56628541635911*^9, 3.566287936029206*^9,
3.566300336251798*^9, 3.56663614258482*^9, 3.568458106067483*^9,
3.568458260060874*^9, 3.570863335802051*^9, 3.573297402323617*^9,
3.57329812490153*^9, 3.573301567017755*^9, 3.573301800780031*^9,
3.573302931640814*^9, 3.573372597721126*^9, 3.573372647230628*^9,
3.573372943100179*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{"LV2", ",", "phi2minus"}], "]"}], "/.",
RowBox[{"rho1", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho2", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta1", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2minus", "\[Rule]", "0"}]}]], "Input",
CellChangeTimes->{{3.565094656638588*^9, 3.565094660553723*^9}}],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
CellChangeTimes->{3.565094788627211*^9, 3.566282486770896*^9,
3.56628398283407*^9, 3.566285417278981*^9, 3.566287936956409*^9,
3.566300337163827*^9, 3.566636142937305*^9, 3.568458106078978*^9,
3.56845826020741*^9, 3.570863335938025*^9, 3.573297402486622*^9,
3.573298125409612*^9, 3.573301567347103*^9, 3.573301800959843*^9,
3.573302931884166*^9, 3.573372597852555*^9, 3.573372647244676*^9,
3.573372943234481*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Mass matrices of the higgs boson", "Subsection",
CellChangeTimes->{{3.518246154117909*^9, 3.518246166828953*^9}}],
Cell[CellGroupData[{
Cell["z and A mass eigenstates", "Subsubsection",
CellChangeTimes->{{3.518246204327144*^9, 3.518246207727553*^9}, {
3.518246625061435*^9, 3.518246628823984*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"MZA", "=",
RowBox[{"Simplify", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{"LV2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"eta1", ",", "eta2"}], "}"}], ",", "2"}], "}"}]}],
"]"}], "/.",
RowBox[{"eta1", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta2", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho1", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2plus", "\[Rule]", "0"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.518169844224855*^9, 3.518169851702161*^9},
3.518169884711885*^9, {3.518169942659599*^9, 3.518169945743903*^9}, {
3.518171080777882*^9, 3.518171088678749*^9}, {3.518171567760299*^9,
3.518171570391472*^9}, {3.518171619166702*^9, 3.518171625116568*^9}, {
3.518174934358617*^9, 3.518174949308076*^9}, {3.518246537981429*^9,
3.518246539161454*^9}, {3.555760607388956*^9, 3.555760625020503*^9},
3.565093250689918*^9, {3.566283999417806*^9, 3.566284030409506*^9}}],
Cell[BoxData[
FormBox[
RowBox[{"(", "\[NoBreak]", GridBox[{
{
FractionBox[
RowBox[{"v2", " ",
RowBox[{"(",
RowBox[{"m12sq", "-",
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}]}], ")"}]}], "v1"],
RowBox[{
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}], "-", "m12sq"}]},
{
RowBox[{
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}], "-", "m12sq"}],
FractionBox[
RowBox[{"v1", " ",
RowBox[{"(",
RowBox[{"m12sq", "-",
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}]}], ")"}]}], "v2"]}
},
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]", ")"}],
TraditionalForm]], "Output",
CellChangeTimes->{
3.518169856342865*^9, 3.518169887850506*^9, 3.51816994950758*^9,
3.518170811287187*^9, {3.518171089733212*^9, 3.518171097835909*^9}, {
3.518171560980118*^9, 3.518171571295033*^9}, 3.518171626211986*^9,
3.518172234160921*^9, {3.518174938914811*^9, 3.518174950159928*^9},
3.51817552001482*^9, 3.51824545542043*^9, {3.518246528916122*^9,
3.518246540374556*^9}, 3.518252081172051*^9, 3.555760626097229*^9,
3.555830461896191*^9, 3.555925894107862*^9, 3.555927666610593*^9,
3.556020390581536*^9, 3.556024818957288*^9, 3.556025800495782*^9,
3.556026025272173*^9, 3.565093251767513*^9, 3.566282489906321*^9,
3.56628398574776*^9, 3.566284036314099*^9, 3.566285423808513*^9,
3.566287938708937*^9, 3.566300339092137*^9, 3.566636143315725*^9,
3.568458106304558*^9, 3.56845826035754*^9, 3.570863336290861*^9,
3.573297402747481*^9, 3.573298126066908*^9, 3.573301567639972*^9,
3.573301801335431*^9, 3.573302932225737*^9, 3.573372597996557*^9,
3.573372647414111*^9, 3.573372943612187*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"MA2", "=",
RowBox[{"Simplify", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Cos", "[", "beta", "]"}], ",",
RowBox[{"Sin", "[", "beta", "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-",
RowBox[{"Sin", "[", "beta", "]"}]}], ",",
RowBox[{"Cos", "[", "beta", "]"}]}], "}"}]}], "}"}], " ", ".", "MZA",
".",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Cos", "[", "beta", "]"}], ",",
RowBox[{"-",
RowBox[{"Sin", "[", "beta", "]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"Sin", "[", "beta", "]"}], ",",
RowBox[{"Cos", "[", "beta", "]"}]}], "}"}]}], "}"}]}], " ",
"]"}]}]], "Input",
CellChangeTimes->{{3.518169600165405*^9, 3.518169606073928*^9}, {
3.518169687120667*^9, 3.51816975973599*^9}, {3.518169893452228*^9,
3.51816989382094*^9}, {3.518171638864627*^9, 3.518171647424083*^9}, {
3.518171689191844*^9, 3.51817169966431*^9}, {3.518175478865244*^9,
3.518175492545012*^9}, {3.518175527092468*^9, 3.518175558915751*^9}, {
3.51824642663394*^9, 3.518246482766029*^9}, {3.518246547410443*^9,
3.518246548411045*^9}, {3.555760773459064*^9, 3.555760822671286*^9}, {
3.555830393035963*^9, 3.555830437116318*^9}, {3.570862923346767*^9,
3.570862926035603*^9}}],
Cell[BoxData[
FormBox[
RowBox[{"(", "\[NoBreak]", GridBox[{
{
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{"m12sq", "-",
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}]}], ")"}], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
RowBox[{"v2", " ",
RowBox[{"cos", "(", "beta", ")"}]}], "-",
RowBox[{"v1", " ",
RowBox[{"sin", "(", "beta", ")"}]}]}], ")"}], "2"]}],
RowBox[{"v1", " ", "v2"}]],
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{"m12sq", "-",
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}]}], ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
SuperscriptBox["v1", "2"], "-",
SuperscriptBox["v2", "2"]}], ")"}], " ",
RowBox[{"sin", "(",
RowBox[{"2", " ", "beta"}], ")"}]}], "-",
RowBox[{"2", " ", "v1", " ", "v2", " ",
RowBox[{"cos", "(",
RowBox[{"2", " ", "beta"}], ")"}]}]}], ")"}]}],
RowBox[{"2", " ", "v1", " ", "v2"}]]},
{
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{"m12sq", "-",
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}]}], ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
SuperscriptBox["v1", "2"], "-",
SuperscriptBox["v2", "2"]}], ")"}], " ",
RowBox[{"sin", "(",
RowBox[{"2", " ", "beta"}], ")"}]}], "-",
RowBox[{"2", " ", "v1", " ", "v2", " ",
RowBox[{"cos", "(",
RowBox[{"2", " ", "beta"}], ")"}]}]}], ")"}]}],
RowBox[{"2", " ", "v1", " ", "v2"}]],
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{"m12sq", "-",
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}]}], ")"}], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ",
RowBox[{"cos", "(", "beta", ")"}]}], "+",
RowBox[{"v2", " ",
RowBox[{"sin", "(", "beta", ")"}]}]}], ")"}], "2"]}],
RowBox[{"v1", " ", "v2"}]]}
},
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]", ")"}],
TraditionalForm]], "Output",
CellChangeTimes->{3.573297403063076*^9, 3.573298126384935*^9,
3.573301568125468*^9, 3.573301802095307*^9, 3.573302932907926*^9,
3.573372598336127*^9, 3.573372647800351*^9, 3.573372944146654*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
FormBox[
RowBox[{"(", "\[NoBreak]", GridBox[{
{
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{"m12sq", "-",
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}]}], ")"}], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
RowBox[{"v2", " ",
RowBox[{"cos", "(", "beta", ")"}]}], "-",
RowBox[{"v1", " ",
RowBox[{"sin", "(", "beta", ")"}]}]}], ")"}], "2"]}],
RowBox[{"v1", " ", "v2"}]],
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{"m12sq", "-",
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}]}], ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
SuperscriptBox["v1", "2"], "-",
SuperscriptBox["v2", "2"]}], ")"}], " ",
RowBox[{"sin", "(",
RowBox[{"2", " ", "beta"}], ")"}]}], "-",
RowBox[{"2", " ", "v1", " ", "v2", " ",
RowBox[{"cos", "(",
RowBox[{"2", " ", "beta"}], ")"}]}]}], ")"}]}],
RowBox[{"2", " ", "v1", " ", "v2"}]]},
{
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{"m12sq", "-",
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}]}], ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
SuperscriptBox["v1", "2"], "-",
SuperscriptBox["v2", "2"]}], ")"}], " ",
RowBox[{"sin", "(",
RowBox[{"2", " ", "beta"}], ")"}]}], "-",
RowBox[{"2", " ", "v1", " ", "v2", " ",
RowBox[{"cos", "(",
RowBox[{"2", " ", "beta"}], ")"}]}]}], ")"}]}],
RowBox[{"2", " ", "v1", " ", "v2"}]],
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{"m12sq", "-",
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}]}], ")"}], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ",
RowBox[{"cos", "(", "beta", ")"}]}], "+",
RowBox[{"v2", " ",
RowBox[{"sin", "(", "beta", ")"}]}]}], ")"}], "2"]}],
RowBox[{"v1", " ", "v2"}]]}
},
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]", ")"}],
TraditionalForm]], "Input",
CellChangeTimes->{{3.570864449807649*^9, 3.570864454129427*^9}}],
Cell[BoxData[
FormBox[
RowBox[{"(", "\[NoBreak]", GridBox[{
{
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{"m12sq", "-",
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}]}], ")"}], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
RowBox[{"v2", " ",
RowBox[{"cos", "(", "beta", ")"}]}], "-",
RowBox[{"v1", " ",
RowBox[{"sin", "(", "beta", ")"}]}]}], ")"}], "2"]}],
RowBox[{"v1", " ", "v2"}]],
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{"m12sq", "-",
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}]}], ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
SuperscriptBox["v1", "2"], "-",
SuperscriptBox["v2", "2"]}], ")"}], " ",
RowBox[{"sin", "(",
RowBox[{"2", " ", "beta"}], ")"}]}], "-",
RowBox[{"2", " ", "v1", " ", "v2", " ",
RowBox[{"cos", "(",
RowBox[{"2", " ", "beta"}], ")"}]}]}], ")"}]}],
RowBox[{"2", " ", "v1", " ", "v2"}]]},
{
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{"m12sq", "-",
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}]}], ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
SuperscriptBox["v1", "2"], "-",
SuperscriptBox["v2", "2"]}], ")"}], " ",
RowBox[{"sin", "(",
RowBox[{"2", " ", "beta"}], ")"}]}], "-",
RowBox[{"2", " ", "v1", " ", "v2", " ",
RowBox[{"cos", "(",
RowBox[{"2", " ", "beta"}], ")"}]}]}], ")"}]}],
RowBox[{"2", " ", "v1", " ", "v2"}]],
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{"m12sq", "-",
RowBox[{"v1", " ", "v2", " ", "\[Lambda]5"}]}], ")"}], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ",
RowBox[{"cos", "(", "beta", ")"}]}], "+",
RowBox[{"v2", " ",
RowBox[{"sin", "(", "beta", ")"}]}]}], ")"}], "2"]}],
RowBox[{"v1", " ", "v2"}]]}
},
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]", ")"}],
TraditionalForm]], "Output",
CellChangeTimes->{3.573297403175636*^9, 3.573298126461266*^9,
3.573301568271603*^9, 3.573301802244065*^9, 3.573302933208499*^9,
3.573372598358512*^9, 3.573372647825147*^9, 3.57337294467497*^9}]
}, Open ]],
Cell[BoxData[{
RowBox[{
RowBox[{"mprog1", "=", "72.24"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"mprog2", "=", "223.81"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"mprog3", "=", "2.42761"}], ";"}]}], "Input",
CellChangeTimes->{{3.573301663651393*^9, 3.573301723933597*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"MA2", "[",
RowBox[{"[",
RowBox[{"2", ",", "2"}], "]"}], "]"}], "/.",
RowBox[{"beta", "\[Rule]",
RowBox[{"ArcTan", "[",
RowBox[{"194.193", "/", "130.659"}], "]"}]}]}], "/.",
RowBox[{"v1", "\[Rule]", "130.659"}]}], "/.",
RowBox[{"v2", "\[Rule]", "194.193"}]}], "/.",
RowBox[{"m12sq", "\[Rule]", " ", "33792.4"}]}], "/.",
RowBox[{"\[Lambda]5", "\[Rule]", "1.33171"}]}], "/.",
RowBox[{"\[Lambda]4", "->",
RowBox[{"-", "0.496787"}]}]}]], "Input",
CellChangeTimes->{{3.570862928587541*^9, 3.57086295609697*^9}, {
3.570863386799559*^9, 3.570863508857092*^9}, {3.570863657145086*^9,
3.570863690065579*^9}, 3.570863764664784*^9, {3.570863877830472*^9,
3.570863968163898*^9}, {3.570864294730952*^9, 3.570864347519697*^9}, {
3.573301348944411*^9, 3.573301361198296*^9}, {3.573301450929112*^9,
3.573301456485363*^9}, {3.573301493344468*^9, 3.57330153311025*^9}}],
Cell[BoxData[
FormBox["6.127544078180956`", TraditionalForm]], "Output",
CellChangeTimes->{{3.570863494544937*^9, 3.570863509538883*^9}, {
3.570864322411087*^9, 3.570864348598994*^9}, 3.570864682828592*^9,
3.573297403344877*^9, 3.573298126546963*^9, 3.573301568655844*^9,
3.573301766256586*^9, 3.573301802755401*^9, 3.573302933623418*^9,
3.573372598382872*^9, 3.57337264785084*^9, 3.573372945025245*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Sqrt", "[", "%", "]"}]], "Input",
CellChangeTimes->{{3.573372853135497*^9, 3.57337285875756*^9}}],
Cell[BoxData[
FormBox["2.475387662201813`", TraditionalForm]], "Output",
CellChangeTimes->{3.573372945282537*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["masses of charged higgs", "Subsubsection",
CellChangeTimes->{{3.518246647394612*^9, 3.518246663151641*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"M11", "=",
RowBox[{"Simplify", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{"LV2", ",", "phi1plus", ",", "phi1minus"}], "]"}], "/.",
RowBox[{"eta1", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta2", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho1", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2plus", "\[Rule]", "0"}]}], "]"}]}], "\[IndentingNewLine]",
RowBox[{"M12", "=",
RowBox[{"Simplify", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{"LV2", ",", "phi1plus", ",", "phi2minus"}], "]"}], "/.",
RowBox[{"eta1", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta2", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho1", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2plus", "\[Rule]", "0"}]}], "]"}]}], "\[IndentingNewLine]",
RowBox[{"M21", "=",
RowBox[{"Simplify", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{"LV2", ",", "phi2plus", ",", "phi1minus"}], "]"}], "/.",
RowBox[{"eta1", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta2", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho1", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2plus", "\[Rule]", "0"}]}], "]"}]}], "\n",
RowBox[{"M22", "=",
RowBox[{"Simplify", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{"LV2", ",", "phi2plus", ",", "phi2minus"}], "]"}], "/.",
RowBox[{"eta1", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta2", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho1", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2plus", "\[Rule]", "0"}]}], "]"}]}], "\[IndentingNewLine]",
RowBox[{"Mcharged", "=",
RowBox[{"Simplify", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Cos", "[", "beta", "]"}], ",",
RowBox[{"Sin", "[", "beta", "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-",
RowBox[{"Sin", "[", "beta", "]"}]}], ",",
RowBox[{"Cos", "[", "beta", "]"}]}], "}"}]}], "}"}], ".",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"M11", ",", "M12"}], "}"}], ",",
RowBox[{"{",
RowBox[{"M21", ",", "M22"}], "}"}]}], "}"}], ".",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Cos", "[", "beta", "]"}], ",",
RowBox[{"-",
RowBox[{"Sin", "[", "beta", "]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"Sin", "[", "beta", "]"}], ",",
RowBox[{"Cos", "[", "beta", "]"}]}], "}"}]}], "}"}]}], " ",
"]"}]}]}], "Input",
CellChangeTimes->{{3.556020191307186*^9, 3.556020354223098*^9}, {
3.556024707889605*^9, 3.556024716810388*^9}, {3.55602475515128*^9,
3.556024769113731*^9}, {3.556025697161375*^9, 3.55602569784786*^9}, {
3.566282728803023*^9, 3.566282760303268*^9}, {3.566282878293254*^9,
3.566283014986759*^9}, {3.573301898798575*^9, 3.573301902349469*^9}}],
Cell[BoxData[
FormBox[
RowBox[{"-",
FractionBox[
RowBox[{"v2", " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}],
RowBox[{"2", " ", "v1"}]]}], TraditionalForm]], "Output",
CellChangeTimes->{3.556020392959468*^9, 3.556024771664365*^9,
3.5560248199876*^9, 3.556025800875259*^9, 3.556026026574306*^9,
3.565093264556348*^9, 3.566284043444786*^9, 3.566287981443985*^9,
3.566300968048216*^9, 3.566636144286031*^9, 3.568458106895395*^9,
3.568458261024244*^9, 3.570863337341788*^9, 3.57329740413655*^9,
3.573298126968416*^9, 3.573301570417349*^9, 3.573301803678686*^9,
3.573302934003159*^9, 3.573372598965337*^9, 3.57337264851163*^9,
3.573372946993752*^9}],
Cell[BoxData[
FormBox[
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}], TraditionalForm]], "Output",
CellChangeTimes->{3.556020392959468*^9, 3.556024771664365*^9,
3.5560248199876*^9, 3.556025800875259*^9, 3.556026026574306*^9,
3.565093264556348*^9, 3.566284043444786*^9, 3.566287981443985*^9,
3.566300968048216*^9, 3.566636144286031*^9, 3.568458106895395*^9,
3.568458261024244*^9, 3.570863337341788*^9, 3.57329740413655*^9,
3.573298126968416*^9, 3.573301570417349*^9, 3.573301803678686*^9,
3.573302934003159*^9, 3.573372598965337*^9, 3.57337264851163*^9,
3.573372947097518*^9}],
Cell[BoxData[
FormBox[
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}], TraditionalForm]], "Output",
CellChangeTimes->{3.556020392959468*^9, 3.556024771664365*^9,
3.5560248199876*^9, 3.556025800875259*^9, 3.556026026574306*^9,
3.565093264556348*^9, 3.566284043444786*^9, 3.566287981443985*^9,
3.566300968048216*^9, 3.566636144286031*^9, 3.568458106895395*^9,
3.568458261024244*^9, 3.570863337341788*^9, 3.57329740413655*^9,
3.573298126968416*^9, 3.573301570417349*^9, 3.573301803678686*^9,
3.573302934003159*^9, 3.573372598965337*^9, 3.57337264851163*^9,
3.573372947201294*^9}],
Cell[BoxData[
FormBox[
RowBox[{"-",
FractionBox[
RowBox[{"v1", " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}],
RowBox[{"2", " ", "v2"}]]}], TraditionalForm]], "Output",
CellChangeTimes->{3.556020392959468*^9, 3.556024771664365*^9,
3.5560248199876*^9, 3.556025800875259*^9, 3.556026026574306*^9,
3.565093264556348*^9, 3.566284043444786*^9, 3.566287981443985*^9,
3.566300968048216*^9, 3.566636144286031*^9, 3.568458106895395*^9,
3.568458261024244*^9, 3.570863337341788*^9, 3.57329740413655*^9,
3.573298126968416*^9, 3.573301570417349*^9, 3.573301803678686*^9,
3.573302934003159*^9, 3.573372598965337*^9, 3.57337264851163*^9,
3.573372947314761*^9}],
Cell[BoxData[
FormBox[
RowBox[{"(", "\[NoBreak]", GridBox[{
{
RowBox[{"-",
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
RowBox[{"v2", " ",
RowBox[{"cos", "(", "beta", ")"}]}], "-",
RowBox[{"v1", " ",
RowBox[{"sin", "(", "beta", ")"}]}]}], ")"}], "2"]}],
RowBox[{"2", " ", "v1", " ", "v2"}]]}],
RowBox[{"-",
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
SuperscriptBox["v1", "2"], "-",
SuperscriptBox["v2", "2"]}], ")"}], " ",
RowBox[{"sin", "(",
RowBox[{"2", " ", "beta"}], ")"}]}], "-",
RowBox[{"2", " ", "v1", " ", "v2", " ",
RowBox[{"cos", "(",
RowBox[{"2", " ", "beta"}], ")"}]}]}], ")"}]}],
RowBox[{"4", " ", "v1", " ", "v2"}]]}]},
{
RowBox[{"-",
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
SuperscriptBox["v1", "2"], "-",
SuperscriptBox["v2", "2"]}], ")"}], " ",
RowBox[{"sin", "(",
RowBox[{"2", " ", "beta"}], ")"}]}], "-",
RowBox[{"2", " ", "v1", " ", "v2", " ",
RowBox[{"cos", "(",
RowBox[{"2", " ", "beta"}], ")"}]}]}], ")"}]}],
RowBox[{"4", " ", "v1", " ", "v2"}]]}],
RowBox[{"-",
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ",
RowBox[{"cos", "(", "beta", ")"}]}], "+",
RowBox[{"v2", " ",
RowBox[{"sin", "(", "beta", ")"}]}]}], ")"}], "2"]}],
RowBox[{"2", " ", "v1", " ", "v2"}]]}]}
},
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]", ")"}],
TraditionalForm]], "Output",
CellChangeTimes->{3.556020392959468*^9, 3.556024771664365*^9,
3.5560248199876*^9, 3.556025800875259*^9, 3.556026026574306*^9,
3.565093264556348*^9, 3.566284043444786*^9, 3.566287981443985*^9,
3.566300968048216*^9, 3.566636144286031*^9, 3.568458106895395*^9,
3.568458261024244*^9, 3.570863337341788*^9, 3.57329740413655*^9,
3.573298126968416*^9, 3.573301570417349*^9, 3.573301803678686*^9,
3.573302934003159*^9, 3.573372598965337*^9, 3.57337264851163*^9,
3.573372947461928*^9}]
}, Open ]],
Cell[BoxData[""], "Input",
CellChangeTimes->{{3.566634185170506*^9, 3.566634192002889*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"Mcharged", "[",
RowBox[{"[",
RowBox[{"2", ",", "2"}], "]"}], "]"}], "/.",
RowBox[{"beta", "\[Rule]",
RowBox[{"ArcTan", "[",
RowBox[{"194.193", "/", "130.659"}], "]"}]}]}], "/.",
RowBox[{"v1", "\[Rule]", "130.659"}]}], "/.",
RowBox[{"v2", "\[Rule]", "194.193"}]}], "/.",
RowBox[{"m12sq", "\[Rule]", " ", "33792.4"}]}], "/.",
RowBox[{"\[Lambda]5", "\[Rule]", "1.33171"}]}], "/.",
RowBox[{"\[Lambda]4", "->",
RowBox[{"-", "0.496787"}]}]}]], "Input",
CellChangeTimes->{{3.573301905646548*^9, 3.573301919857619*^9}}],
Cell[BoxData[
FormBox["50091.12475833738`", TraditionalForm]], "Output",
CellChangeTimes->{3.57330192153734*^9, 3.573302935111785*^9,
3.573372599388652*^9, 3.573372648879686*^9, 3.573372947832287*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Sqrt", "[", "%", "]"}]], "Input",
CellChangeTimes->{{3.573372807024681*^9, 3.573372811920996*^9}}],
Cell[BoxData[
FormBox["223.81046615012752`", TraditionalForm]], "Output",
CellChangeTimes->{3.573372948037717*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["\[LineSeparator]CP-even states", "Subsubsection",
CellChangeTimes->{{3.518253556113727*^9, 3.518253559085685*^9}, {
3.555926031860064*^9, 3.555926039434101*^9}, 3.566284044658494*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"MHh", "=",
RowBox[{"Simplify", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{"LV2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"rho1", ",", "rho2"}], "}"}], ",", "2"}], "}"}]}],
"]"}], "/.",
RowBox[{"rho1", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho2", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta1", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2minus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1plus", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2plus", "\[Rule]", "0"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.518253579211633*^9, 3.518253603960138*^9}, {
3.555925915405199*^9, 3.55592592459449*^9}, {3.555926011877941*^9,
3.555926025811697*^9}, {3.566282833691476*^9, 3.566282869575033*^9}}],
Cell[BoxData[
FormBox[
RowBox[{"(", "\[NoBreak]", GridBox[{
{
RowBox[{
RowBox[{"\[Lambda]1", " ",
SuperscriptBox["v1", "2"]}], "+",
FractionBox[
RowBox[{"m12sq", " ", "v2"}], "v1"]}],
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]3", "+", "\[Lambda]4", "+", "\[Lambda]5"}],
")"}]}], "-", "m12sq"}]},
{
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]3", "+", "\[Lambda]4", "+", "\[Lambda]5"}],
")"}]}], "-", "m12sq"}],
RowBox[{
RowBox[{"\[Lambda]2", " ",
SuperscriptBox["v2", "2"]}], "+",
FractionBox[
RowBox[{"m12sq", " ", "v1"}], "v2"]}]}
},
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]", ")"}],
TraditionalForm]], "Output",
CellChangeTimes->{
3.518253606608063*^9, 3.518253638244511*^9, 3.518259053232453*^9,
3.555925906123003*^9, 3.555926042192674*^9, 3.555927668423786*^9,
3.556020396119075*^9, {3.556024824725336*^9, 3.556024850379539*^9},
3.556025802712897*^9, 3.556026028940346*^9, 3.565093289353669*^9,
3.56628404766761*^9, 3.566636145080305*^9, 3.568458108234317*^9,
3.568458261468702*^9, 3.568530661040955*^9, 3.570863338335469*^9,
3.573297404668544*^9, 3.573298127319645*^9, 3.573301571588695*^9,
3.573301804782088*^9, 3.573302935256337*^9, 3.573372599557487*^9,
3.573372649040115*^9, 3.573372948313114*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Maux", "=",
RowBox[{"Simplify", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Cos", "[", "alpha", "]"}], ",",
RowBox[{"Sin", "[", "alpha", "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-",
RowBox[{"Sin", "[", "alpha", "]"}]}], ",",
RowBox[{"Cos", "[", "alpha", "]"}]}], "}"}]}], "}"}], " ", ".", "MHh",
".",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Cos", "[", "alpha", "]"}], ",",
RowBox[{"-",
RowBox[{"Sin", "[", "alpha", "]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"Sin", "[", "alpha", "]"}], ",",
RowBox[{"Cos", "[", "alpha", "]"}]}], "}"}]}], "}"}]}], " ",
"]"}]}]], "Input",
CellChangeTimes->{{3.518253620347498*^9, 3.51825363502033*^9}, {
3.518253731555717*^9, 3.518253738882341*^9}, {3.518253791494162*^9,
3.518253827969619*^9}, {3.518255132167069*^9, 3.518255168850791*^9}, {
3.518255814410916*^9, 3.518255818299632*^9}, {3.555926104700027*^9,
3.555926145043367*^9}}],
Cell[BoxData[
FormBox[
RowBox[{"(", "\[NoBreak]", GridBox[{
{
FractionBox[
RowBox[{
RowBox[{"v2", " ",
RowBox[{"(",
RowBox[{
RowBox[{"\[Lambda]1", " ",
SuperscriptBox["v1", "3"]}], "+",
RowBox[{"m12sq", " ", "v2"}]}], ")"}], " ",
RowBox[{
SuperscriptBox["cos", "2"], "(", "alpha", ")"}]}], "+",
RowBox[{"v1", " ",
RowBox[{"sin", "(", "alpha", ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{"2", " ", "v2", " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]3", "+", "\[Lambda]4", "+", "\[Lambda]5"}],
")"}]}], "-", "m12sq"}], ")"}], " ",
RowBox[{"cos", "(", "alpha", ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"\[Lambda]2", " ",
SuperscriptBox["v2", "3"]}], "+",
RowBox[{"m12sq", " ", "v1"}]}], ")"}], " ",
RowBox[{"sin", "(", "alpha", ")"}]}]}], ")"}]}]}],
RowBox[{"v1", " ", "v2"}]],
RowBox[{
RowBox[{
RowBox[{"cos", "(", "alpha", ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]3", "+", "\[Lambda]4", "+", "\[Lambda]5"}],
")"}]}], "-", "m12sq"}], ")"}], " ",
RowBox[{"cos", "(", "alpha", ")"}]}], "+",
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"\[Lambda]2", " ",
SuperscriptBox["v2", "3"]}], "+",
RowBox[{"m12sq", " ", "v1"}]}], ")"}], " ",
RowBox[{"sin", "(", "alpha", ")"}]}], "v2"]}], ")"}]}], "-",
RowBox[{
RowBox[{"sin", "(", "alpha", ")"}], " ",
RowBox[{"(",
RowBox[{
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"\[Lambda]1", " ",
SuperscriptBox["v1", "3"]}], "+",
RowBox[{"m12sq", " ", "v2"}]}], ")"}], " ",
RowBox[{"cos", "(", "alpha", ")"}]}], "v1"], "+",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]3", "+", "\[Lambda]4", "+", "\[Lambda]5"}],
")"}]}], "-", "m12sq"}], ")"}], " ",
RowBox[{"sin", "(", "alpha", ")"}]}]}], ")"}]}]}]},
{
FractionBox[
RowBox[{
RowBox[{"2", " ", "v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]3", "+", "\[Lambda]4", "+", "\[Lambda]5"}],
")"}]}], "-", "m12sq"}], ")"}], " ",
RowBox[{"cos", "(",
RowBox[{"2", " ", "alpha"}], ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"-", "v2"}], " ", "\[Lambda]1", " ",
SuperscriptBox["v1", "3"]}], "+",
RowBox[{
SuperscriptBox["v2", "3"], " ", "\[Lambda]2", " ", "v1"}], "+",
RowBox[{"m12sq", " ",
RowBox[{"(",
RowBox[{
SuperscriptBox["v1", "2"], "-",
SuperscriptBox["v2", "2"]}], ")"}]}]}], ")"}], " ",
RowBox[{"sin", "(",
RowBox[{"2", " ", "alpha"}], ")"}]}]}],
RowBox[{"2", " ", "v1", " ", "v2"}]],
FractionBox[
RowBox[{
RowBox[{"v1", " ",
RowBox[{"(",
RowBox[{
RowBox[{"\[Lambda]2", " ",
SuperscriptBox["v2", "3"]}], "+",
RowBox[{"m12sq", " ", "v1"}]}], ")"}], " ",
RowBox[{
SuperscriptBox["cos", "2"], "(", "alpha", ")"}]}], "+",
RowBox[{"v2", " ",
RowBox[{"sin", "(", "alpha", ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"\[Lambda]1", " ",
SuperscriptBox["v1", "3"]}], "+",
RowBox[{"m12sq", " ", "v2"}]}], ")"}], " ",
RowBox[{"sin", "(", "alpha", ")"}]}], "-",
RowBox[{"2", " ",
SuperscriptBox["v1", "2"], " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]3", "+", "\[Lambda]4", "+", "\[Lambda]5"}],
")"}], " ",
RowBox[{"cos", "(", "alpha", ")"}]}]}], ")"}]}], "+",
RowBox[{"m12sq", " ", "v1", " ", "v2", " ",
RowBox[{"sin", "(",
RowBox[{"2", " ", "alpha"}], ")"}]}]}],
RowBox[{"v1", " ", "v2"}]]}
},
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]", ")"}],
TraditionalForm]], "Output",
CellChangeTimes->{
3.518259056197415*^9, 3.555925906500875*^9, 3.555926045683943*^9,
3.555926107126254*^9, 3.555927670712859*^9, 3.556020401095962*^9,
3.55602482811455*^9, 3.556025803230267*^9, 3.556026032110089*^9,
3.565093297232837*^9, {3.566284052343152*^9, 3.566284054727527*^9},
3.566636147170597*^9, 3.568458110361394*^9, 3.568458263506551*^9,
3.568530663716196*^9, 3.570863341192167*^9, 3.573297406739289*^9,
3.5732981292466*^9, 3.573301573853879*^9, 3.573301806925122*^9,
3.57330293727744*^9, 3.573372601854964*^9, 3.573372651271179*^9,
3.57337295061685*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"alpha", "=",
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"ArcTan", "[",
RowBox[{"2", " ",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"-", "m12sq"}], "+", " ",
RowBox[{
RowBox[{"(",
RowBox[{
"\[Lambda]3", "+", "\[Lambda]4", "+", "\[Lambda]5"}], ")"}],
" ", "v1", " ", "v2"}]}], ")"}], "/",
RowBox[{"(",
RowBox[{
RowBox[{"m12sq", " ",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"v2", "^", "2"}], "-",
RowBox[{"v1", "^", "2"}]}], ")"}], "/", "v1"}], "/",
"v2"}]}], " ", "+", " ",
RowBox[{"\[Lambda]1", " ",
RowBox[{"v1", "^", "2"}]}], " ", "-", " ",
RowBox[{"\[Lambda]2", " ",
RowBox[{"v2", "^", "2"}]}]}], ")"}]}]}], "]"}], "/", "2"}], "/.",
RowBox[{"v1", "\[Rule]", "130.659"}]}], "/.",
RowBox[{"v2", "\[Rule]", "194.193"}]}], "/.",
RowBox[{"m12sq", "\[Rule]", " ", "33792.4"}]}], "/.",
RowBox[{"\[Lambda]5", "\[Rule]", "1.33171"}]}], "/.",
RowBox[{"\[Lambda]4", "->",
RowBox[{"-", "0.496787"}]}]}], "/.",
RowBox[{"\[Lambda]3", "->", "0.626236"}]}], "/.",
RowBox[{"\[Lambda]2", "->",
RowBox[{"-", "0.433625"}]}]}], "/.",
RowBox[{"\[Lambda]1", "->",
RowBox[{"-", "2.09497"}]}]}]}]], "Input",
CellChangeTimes->{{3.573372000560263*^9, 3.573372082956216*^9}, {
3.573372238100145*^9, 3.573372287074043*^9}, {3.57337242027761*^9,
3.573372506949559*^9}, {3.573372566171067*^9, 3.573372582972002*^9}}],
Cell[BoxData[
FormBox["0.34124221957575457`", TraditionalForm]], "Output",
CellChangeTimes->{3.573372310623126*^9, 3.573372480206149*^9,
3.573372602285185*^9, 3.5733726517723*^9, 3.573372950972779*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"Maux", "[",
RowBox[{"[",
RowBox[{"2", ",", "2"}], "]"}], "]"}], "/.",
RowBox[{"beta", "\[Rule]",
RowBox[{"ArcTan", "[",
RowBox[{"194.193", "/", "130.659"}], "]"}]}]}], "/.",
RowBox[{"v1", "\[Rule]", "130.659"}]}], "/.",
RowBox[{"v2", "\[Rule]", "194.193"}]}], "/.",
RowBox[{"m12sq", "\[Rule]", " ", "33792.4"}]}], "/.",
RowBox[{"\[Lambda]5", "\[Rule]", "1.33171"}]}], "/.",
RowBox[{"\[Lambda]4", "->",
RowBox[{"-", "0.496787"}]}]}], "/.",
RowBox[{"\[Lambda]3", "->", "0.626236"}]}], "/.",
RowBox[{"\[Lambda]2", "->",
RowBox[{"-", "0.433625"}]}]}], "/.",
RowBox[{"\[Lambda]1", "->",
RowBox[{"-", "2.09497"}]}]}]], "Input",
CellChangeTimes->{{3.573301853577368*^9, 3.57330187337492*^9},
3.573372623334076*^9}],
Cell[BoxData[
FormBox["5218.724016662783`", TraditionalForm]], "Output",
CellChangeTimes->{{3.573301858477266*^9, 3.573301874536581*^9},
3.573302937577957*^9, 3.57337260259006*^9, 3.57337265194702*^9,
3.57337295111827*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Sqrt", "[", "%", "]"}]], "Input",
CellChangeTimes->{{3.573372837552764*^9, 3.573372842622558*^9}}],
Cell[BoxData[
FormBox["72.24073654568302`", TraditionalForm]], "Output",
CellChangeTimes->{3.573372951459652*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"Maux", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}], "/.",
RowBox[{"beta", "\[Rule]",
RowBox[{"ArcTan", "[",
RowBox[{"194.193", "/", "130.659"}], "]"}]}]}], "/.",
RowBox[{"v1", "\[Rule]", "130.659"}]}], "/.",
RowBox[{"v2", "\[Rule]", "194.193"}]}], "/.",
RowBox[{"m12sq", "\[Rule]", " ", "33792.4"}]}], "/.",
RowBox[{"\[Lambda]5", "\[Rule]", "1.33171"}]}], "/.",
RowBox[{"\[Lambda]4", "->",
RowBox[{"-", "0.496787"}]}]}], "/.",
RowBox[{"\[Lambda]3", "->", "0.626236"}]}], "/.",
RowBox[{"\[Lambda]2", "->",
RowBox[{"-", "0.433625"}]}]}], "/.",
RowBox[{"\[Lambda]1", "->",
RowBox[{"-", "2.09497"}]}]}]], "Input",
CellChangeTimes->{{3.573372632504347*^9, 3.573372633949152*^9}}],
Cell[BoxData[
FormBox["15624.813799607497`", TraditionalForm]], "Output",
CellChangeTimes->{3.573372652303574*^9, 3.573372951825154*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Sqrt", "[", "%", "]"}]], "Input",
CellChangeTimes->{{3.573372817513925*^9, 3.573372823290552*^9}}],
Cell[BoxData[
FormBox["124.99925519621105`", TraditionalForm]], "Output",
CellChangeTimes->{3.573372952179645*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"eq1", "=",
RowBox[{"mA", "-", " ",
RowBox[{"2",
RowBox[{"m12sqr", "/",
RowBox[{"Sin", "[",
RowBox[{"2", " ", "beta"}], "]"}]}]}], "+", " ",
RowBox[{"lambda5", " ", "v2"}]}]}], "\[IndentingNewLine]",
RowBox[{"eq2", "=",
RowBox[{"mHplus", "-", " ",
RowBox[{"2",
RowBox[{"m12sqr", "/",
RowBox[{"Sin", "[",
RowBox[{"2", " ", "beta"}], "]"}]}]}], " ", "+", " ",
RowBox[{
RowBox[{"1", "/", "2"}], " ", "v2", " ",
RowBox[{"(",
RowBox[{"lambda4", " ", "+", " ", "lambda5"}],
")"}]}]}]}], "\[IndentingNewLine]",
RowBox[{"eq3", "=",
RowBox[{"m2H", " ", "-", " ",
RowBox[{
RowBox[{"(", " ",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"lambda3", " ", "+", "lambda4", "+", "lambda5"}], ")"}], "*",
"v2", "*",
RowBox[{"Sin", "[",
RowBox[{"2", " ", "beta"}], "]"}]}], "-",
RowBox[{"2", " ", "m12sqr"}]}], ")"}], "/",
RowBox[{"Sin", "[",
RowBox[{"2", " ", "alpha"}], "]"}]}]}]}]}], "Input",
CellChangeTimes->{{3.56872051648316*^9, 3.568720660516675*^9}, {
3.568721007390928*^9, 3.568721018322206*^9}, {3.568721495730062*^9,
3.568721556390166*^9}, {3.568721801523503*^9, 3.568721810202491*^9}, {
3.568721907590683*^9, 3.568721939504311*^9}, {3.568722069091484*^9,
3.568722077856181*^9}, {3.569050750064331*^9, 3.569050750408334*^9}, {
3.569051162025422*^9, 3.569051179752906*^9}, {3.56905125596475*^9,
3.569051256587268*^9}}],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"-",
RowBox[{"2", " ", "m12sqr", " ",
RowBox[{"csc", "(",
RowBox[{"2", " ", "beta"}], ")"}]}]}], "+",
RowBox[{"lambda5", " ", "v2"}], "+", "mA"}], TraditionalForm]], "Output",
CellChangeTimes->{
3.568721972673083*^9, {3.568722079185866*^9, 3.568722087939918*^9},
3.569050757053789*^9, 3.56905100709556*^9, {3.569051164393326*^9,
3.569051180812687*^9}, 3.56905125832629*^9, 3.570863341236089*^9,
3.573297407013676*^9, 3.573298129421322*^9, 3.573301574160626*^9,
3.573301807356476*^9, 3.573302937867585*^9, 3.573372602762645*^9,
3.573372652589296*^9, 3.573372952455188*^9}],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"-",
RowBox[{"2", " ", "m12sqr", " ",
RowBox[{"csc", "(",
RowBox[{"2", " ", "beta"}], ")"}]}]}], "+",
RowBox[{
FractionBox["1", "2"], " ", "v2", " ",
RowBox[{"(",
RowBox[{"lambda4", "+", "lambda5"}], ")"}]}], "+", "mHplus"}],
TraditionalForm]], "Output",
CellChangeTimes->{
3.568721972673083*^9, {3.568722079185866*^9, 3.568722087939918*^9},
3.569050757053789*^9, 3.56905100709556*^9, {3.569051164393326*^9,
3.569051180812687*^9}, 3.56905125832629*^9, 3.570863341236089*^9,
3.573297407013676*^9, 3.573298129421322*^9, 3.573301574160626*^9,
3.573301807356476*^9, 3.573302937867585*^9, 3.573372602762645*^9,
3.573372652589296*^9, 3.573372952539487*^9}],
Cell[BoxData[
FormBox[
RowBox[{"m2H", "-",
RowBox[{"1.585482275219422`", " ",
RowBox[{"(",
RowBox[{
RowBox[{"v2", " ",
RowBox[{"sin", "(",
RowBox[{"2", " ", "beta"}], ")"}], " ",
RowBox[{"(",
RowBox[{"lambda3", "+", "lambda4", "+", "lambda5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sqr"}]}], ")"}]}]}], TraditionalForm]], "Output",
CellChangeTimes->{
3.568721972673083*^9, {3.568722079185866*^9, 3.568722087939918*^9},
3.569050757053789*^9, 3.56905100709556*^9, {3.569051164393326*^9,
3.569051180812687*^9}, 3.56905125832629*^9, 3.570863341236089*^9,
3.573297407013676*^9, 3.573298129421322*^9, 3.573301574160626*^9,
3.573301807356476*^9, 3.573302937867585*^9, 3.573372602762645*^9,
3.573372652589296*^9, 3.573372952754562*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Solve", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"eq1", "\[Equal]", "0"}], ",",
RowBox[{"eq2", "\[Equal]", "0"}], ",",
RowBox[{"eq3", "\[Equal]", "0"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"lambda3", ",", "lambda4", ",", "lambda5"}], "}"}]}],
"]"}]], "Input",
CellChangeTimes->{{3.568721900676316*^9, 3.568721904469546*^9}, {
3.568721946823439*^9, 3.568721983596384*^9}, {3.568722126116726*^9,
3.568722133296148*^9}}],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{"{",
RowBox[{
RowBox[{"lambda3", "\[Rule]",
RowBox[{
RowBox[{"-",
FractionBox[
RowBox[{"2.`", " ", "m12sqr", " ",
RowBox[{"csc", "(",
RowBox[{"2.`", " ", "beta"}], ")"}]}], "v2"]}], "+",
FractionBox[
RowBox[{"0.6307229135447796`", " ", "m2H", " ",
RowBox[{"csc", "(",
RowBox[{"2.`", " ", "beta"}], ")"}]}], "v2"], "+",
FractionBox[
RowBox[{"0.`", " ", "mA"}], "v2"], "+",
FractionBox[
RowBox[{"2.`", " ", "mHplus"}], "v2"]}]}], ",",
RowBox[{"lambda4", "\[Rule]",
RowBox[{
FractionBox[
RowBox[{"2.`", " ", "m12sqr", " ",
RowBox[{"csc", "(",
RowBox[{"2.`", " ", "beta"}], ")"}]}], "v2"], "+",
FractionBox[
RowBox[{"1.`", " ", "mA"}], "v2"], "-",
FractionBox[
RowBox[{"2.`", " ", "mHplus"}], "v2"]}]}], ",",
RowBox[{"lambda5", "\[Rule]",
RowBox[{"-",
FractionBox[
RowBox[{"1.`", " ",
RowBox[{"(",
RowBox[{"mA", "-",
RowBox[{"2.`", " ", "m12sqr", " ",
RowBox[{"csc", "(",
RowBox[{"2.`", " ", "beta"}], ")"}]}]}], ")"}]}], "v2"]}]}]}],
"}"}], "}"}], TraditionalForm]], "Output",
CellChangeTimes->{{3.568721978458348*^9, 3.568721984997433*^9}, {
3.568722080768543*^9, 3.568722090262764*^9}, 3.568722134298573*^9,
3.569050758752348*^9, 3.569051007725435*^9, {3.569051165905752*^9,
3.569051181975547*^9}, 3.569051259330002*^9, 3.570863341387663*^9,
3.573297407485921*^9, 3.573298129571117*^9, 3.573301574664335*^9,
3.573301807906115*^9, 3.573302938301296*^9, 3.573372603673988*^9,
3.573372653123945*^9, 3.573372953067729*^9}]
}, Open ]],
Cell[BoxData[{
RowBox[{
RowBox[{"phi1plus", "=",
RowBox[{
RowBox[{"(",
RowBox[{"phi1", " ", "+", " ",
RowBox[{"I", " ", "phi2"}]}], ")"}], "/",
RowBox[{"Sqrt", "[", "2", "]"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"phi1minus", "=",
RowBox[{
RowBox[{"(",
RowBox[{"phi1", " ", "-", " ",
RowBox[{"I", " ", "phi2"}]}], ")"}], "/",
RowBox[{"Sqrt", "[", "2", "]"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"phi2plus", " ", "=",
RowBox[{
RowBox[{"(",
RowBox[{"phi5", " ", "+", " ",
RowBox[{"I", " ", "phi6"}]}], ")"}], "/",
RowBox[{"Sqrt", "[", "2", "]"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"phi2minus", " ", "=", " ",
RowBox[{
RowBox[{"(",
RowBox[{"phi5", " ", "-",
RowBox[{"I", " ", "phi6"}]}], ")"}], "/",
RowBox[{"Sqrt", "[", "2", "]"}]}]}], ";"}]}], "Input",
CellChangeTimes->{{3.57329725294614*^9, 3.573297335281806*^9}, {
3.57337018524408*^9, 3.573370236343179*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FullSimplify", "[", "LV2", "]"}]], "Input",
CellChangeTimes->{{3.573297379425547*^9, 3.573297380396515*^9}, {
3.573297432795392*^9, 3.573297447563957*^9}}],
Cell[BoxData[
FormBox[
RowBox[{
FractionBox["1",
RowBox[{"8", " ", "v1", " ", "v2"}]],
RowBox[{"(",
RowBox[{
RowBox[{"2", " ",
SuperscriptBox["eta2", "2"], " ", "v1", " ",
RowBox[{"(",
RowBox[{
RowBox[{"v2", " ", "\[Lambda]3", " ",
RowBox[{"(",
RowBox[{
SuperscriptBox["eta1", "2"], "+",
SuperscriptBox["phi1", "2"], "+",
SuperscriptBox["phi2", "2"], "+",
SuperscriptBox["rho1", "2"]}], ")"}]}], "+",
RowBox[{"v2", " ",
RowBox[{"(",
RowBox[{
RowBox[{
SuperscriptBox["eta1", "2"], " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "+",
RowBox[{
SuperscriptBox["rho1", "2"], " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "-", "\[Lambda]5"}], ")"}]}], "+",
RowBox[{"2", " ", "rho1", " ", "v1", " ",
RowBox[{"(",
RowBox[{"\[Lambda]3", "+", "\[Lambda]4", "-", "\[Lambda]5"}],
")"}]}], "-",
RowBox[{"2", " ",
SuperscriptBox["v1", "2"], " ", "\[Lambda]5"}]}], ")"}]}], "+",
RowBox[{"2", " ", "m12sq", " ", "v1"}], "+",
RowBox[{"v2", " ", "\[Lambda]2", " ",
RowBox[{"(",
RowBox[{
SuperscriptBox["phi5", "2"], "+",
SuperscriptBox["phi6", "2"], "+",
RowBox[{"rho2", " ",
RowBox[{"(",
RowBox[{"rho2", "+",
RowBox[{"2", " ", "v2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+",
RowBox[{"4", " ", "m12sq", " ",
RowBox[{"(",
RowBox[{
RowBox[{
SuperscriptBox["v2", "2"], " ",
RowBox[{"(",
RowBox[{
SuperscriptBox["eta1", "2"], "+",
SuperscriptBox["phi1", "2"], "+",
SuperscriptBox["phi2", "2"], "+",
SuperscriptBox["rho1", "2"]}], ")"}]}], "-",
RowBox[{"2", " ", "v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{
RowBox[{"phi1", " ", "phi5"}], "+",
RowBox[{"phi2", " ", "phi6"}], "+",
RowBox[{"rho1", " ", "rho2"}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["v1", "2"], " ",
RowBox[{"(",
RowBox[{
SuperscriptBox["phi5", "2"], "+",
SuperscriptBox["phi6", "2"], "+",
SuperscriptBox["rho2", "2"]}], ")"}]}]}], ")"}]}], "+",
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{
RowBox[{
SuperscriptBox["eta1", "4"], " ", "\[Lambda]1"}], "+",
RowBox[{"2", " ",
SuperscriptBox["eta1", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"\[Lambda]1", " ",
RowBox[{"(",
RowBox[{
SuperscriptBox["phi1", "2"], "+",
SuperscriptBox["phi2", "2"], "+",
RowBox[{"rho1", " ",
RowBox[{"(",
RowBox[{"rho1", "+",
RowBox[{"2", " ", "v1"}]}], ")"}]}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["phi5", "2"], " ", "\[Lambda]3"}], "+",
RowBox[{
SuperscriptBox["phi6", "2"], " ", "\[Lambda]3"}], "-",
RowBox[{"\[Lambda]5", " ",
RowBox[{"(",
RowBox[{
SuperscriptBox["rho2", "2"], "+",
RowBox[{"2", " ", "rho2", " ", "v2"}], "+",
RowBox[{"2", " ",
SuperscriptBox["v2", "2"]}]}], ")"}]}], "+",
RowBox[{"rho2", " ",
RowBox[{"(",
RowBox[{"rho2", "+",
RowBox[{"2", " ", "v2"}]}], ")"}], " ",
RowBox[{"(",
RowBox[{"\[Lambda]3", "+", "\[Lambda]4"}], ")"}]}]}], ")"}]}],
"+",
RowBox[{"4", " ", "eta1", " ",
RowBox[{"(",
RowBox[{"rho2", "+", "v2"}], ")"}], " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "-", "\[Lambda]5"}], ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{"phi2", " ", "phi5"}], "-",
RowBox[{"phi1", " ", "phi6"}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["phi1", "4"], " ", "\[Lambda]1"}], "+",
RowBox[{"2", " ",
SuperscriptBox["phi1", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"\[Lambda]1", " ",
RowBox[{"(",
RowBox[{
SuperscriptBox["phi2", "2"], "+",
RowBox[{"rho1", " ",
RowBox[{"(",
RowBox[{"rho1", "+",
RowBox[{"2", " ", "v1"}]}], ")"}]}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["phi5", "2"], " ",
RowBox[{"(",
RowBox[{"\[Lambda]3", "+", "\[Lambda]4", "+", "\[Lambda]5"}],
")"}]}], "+",
RowBox[{
SuperscriptBox["phi6", "2"], " ",
RowBox[{"(",
RowBox[{"\[Lambda]3", "+", "\[Lambda]4", "-", "\[Lambda]5"}],
")"}]}], "+",
RowBox[{
SuperscriptBox["rho2", "2"], " ", "\[Lambda]3"}], "+",
RowBox[{"2", " ", "rho2", " ", "v2", " ", "\[Lambda]3"}], "-",
RowBox[{
SuperscriptBox["v2", "2"], " ", "\[Lambda]4"}], "-",
RowBox[{
SuperscriptBox["v2", "2"], " ", "\[Lambda]5"}]}], ")"}]}], "+",
RowBox[{"4", " ", "phi1", " ", "phi5", " ",
RowBox[{"(",
RowBox[{
RowBox[{"2", " ", "phi2", " ", "phi6", " ", "\[Lambda]5"}], "+",
RowBox[{
RowBox[{"(",
RowBox[{"rho1", "+", "v1"}], ")"}], " ",
RowBox[{"(",
RowBox[{"rho2", "+", "v2"}], ")"}], " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}]}], ")"}]}],
"+",
RowBox[{
SuperscriptBox["phi2", "4"], " ", "\[Lambda]1"}], "+",
RowBox[{"2", " ", "\[Lambda]5", " ",
RowBox[{"(",
RowBox[{
RowBox[{
SuperscriptBox["phi2", "2"], " ",
RowBox[{"(",
RowBox[{"-",
RowBox[{"(",
RowBox[{
SuperscriptBox["phi5", "2"], "-",
SuperscriptBox["phi6", "2"], "+",
SuperscriptBox["v2", "2"]}], ")"}]}], ")"}]}], "+",
RowBox[{"2", " ", "phi2", " ", "phi6", " ",
RowBox[{"(",
RowBox[{"rho1", "+", "v1"}], ")"}], " ",
RowBox[{"(",
RowBox[{"rho2", "+", "v2"}], ")"}]}], "-",
RowBox[{
SuperscriptBox["v1", "2"], " ",
RowBox[{"(",
RowBox[{
SuperscriptBox["phi5", "2"], "+",
SuperscriptBox["phi6", "2"], "+",
SuperscriptBox["v2", "2"]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["rho1", "2"], " ", "rho2", " ",
RowBox[{"(",
RowBox[{"rho2", "+",
RowBox[{"2", " ", "v2"}]}], ")"}]}], "+",
RowBox[{"2", " ", "rho1", " ", "rho2", " ", "v1", " ",
RowBox[{"(",
RowBox[{"rho2", "+",
RowBox[{"2", " ", "v2"}]}], ")"}]}]}], ")"}]}], "+",
RowBox[{"2", " ",
SuperscriptBox["phi2", "2"], " ",
SuperscriptBox["phi5", "2"], " ", "\[Lambda]3"}], "+",
RowBox[{"2", " ",
SuperscriptBox["phi2", "2"], " ",
SuperscriptBox["phi5", "2"], " ", "\[Lambda]4"}], "+",
RowBox[{"2", " ",
SuperscriptBox["phi2", "2"], " ",
SuperscriptBox["phi6", "2"], " ", "\[Lambda]3"}], "+",
RowBox[{"2", " ",
SuperscriptBox["phi2", "2"], " ",
SuperscriptBox["phi6", "2"], " ", "\[Lambda]4"}], "+",
RowBox[{"2", " ",
SuperscriptBox["phi2", "2"], " ",
SuperscriptBox["rho1", "2"], " ", "\[Lambda]1"}], "+",
RowBox[{"4", " ",
SuperscriptBox["phi2", "2"], " ", "rho1", " ", "v1", " ",
"\[Lambda]1"}], "+",
RowBox[{"2", " ",
SuperscriptBox["phi2", "2"], " ",
SuperscriptBox["rho2", "2"], " ", "\[Lambda]3"}], "+",
RowBox[{"4", " ",
SuperscriptBox["phi2", "2"], " ", "rho2", " ", "v2", " ",
"\[Lambda]3"}], "-",
RowBox[{"2", " ",
SuperscriptBox["phi2", "2"], " ",
SuperscriptBox["v2", "2"], " ", "\[Lambda]4"}], "+",
RowBox[{
"4", " ", "phi2", " ", "phi6", " ", "rho1", " ", "rho2", " ",
"\[Lambda]4"}], "+",
RowBox[{
"4", " ", "phi2", " ", "phi6", " ", "rho1", " ", "v2", " ",
"\[Lambda]4"}], "+",
RowBox[{
"4", " ", "phi2", " ", "phi6", " ", "rho2", " ", "v1", " ",
"\[Lambda]4"}], "+",
RowBox[{
"4", " ", "phi2", " ", "phi6", " ", "v1", " ", "v2", " ",
"\[Lambda]4"}], "+",
RowBox[{"\[Lambda]2", " ",
RowBox[{"(",
RowBox[{
SuperscriptBox["phi5", "2"], "+",
SuperscriptBox["phi6", "2"], "+",
SuperscriptBox["rho2", "2"], "+",
RowBox[{"2", " ", "rho2", " ", "v2"}], "-",
SuperscriptBox["v2", "2"]}], ")"}], " ",
RowBox[{"(",
RowBox[{
SuperscriptBox["phi5", "2"], "+",
SuperscriptBox["phi6", "2"], "+",
SuperscriptBox[
RowBox[{"(",
RowBox[{"rho2", "+", "v2"}], ")"}], "2"]}], ")"}]}], "+",
RowBox[{"2", " ",
SuperscriptBox["phi5", "2"], " ",
SuperscriptBox["rho1", "2"], " ", "\[Lambda]3"}], "+",
RowBox[{"4", " ",
SuperscriptBox["phi5", "2"], " ", "rho1", " ", "v1", " ",
"\[Lambda]3"}], "-",
RowBox[{"2", " ",
SuperscriptBox["phi5", "2"], " ",
SuperscriptBox["v1", "2"], " ", "\[Lambda]4"}], "+",
RowBox[{"2", " ",
SuperscriptBox["phi6", "2"], " ",
SuperscriptBox["rho1", "2"], " ", "\[Lambda]3"}], "+",
RowBox[{"4", " ",
SuperscriptBox["phi6", "2"], " ", "rho1", " ", "v1", " ",
"\[Lambda]3"}], "-",
RowBox[{"2", " ",
SuperscriptBox["phi6", "2"], " ",
SuperscriptBox["v1", "2"], " ", "\[Lambda]4"}], "+",
RowBox[{
SuperscriptBox["rho1", "4"], " ", "\[Lambda]1"}], "+",
RowBox[{"4", " ",
SuperscriptBox["rho1", "3"], " ", "v1", " ", "\[Lambda]1"}], "+",
RowBox[{"2", " ",
SuperscriptBox["rho1", "2"], " ",
SuperscriptBox["rho2", "2"], " ", "\[Lambda]3"}], "+",
RowBox[{"2", " ",
SuperscriptBox["rho1", "2"], " ",
SuperscriptBox["rho2", "2"], " ", "\[Lambda]4"}], "+",
RowBox[{"4", " ",
SuperscriptBox["rho1", "2"], " ", "rho2", " ", "v2", " ",
"\[Lambda]3"}], "+",
RowBox[{"4", " ",
SuperscriptBox["rho1", "2"], " ", "rho2", " ", "v2", " ",
"\[Lambda]4"}], "+",
RowBox[{"4", " ",
SuperscriptBox["rho1", "2"], " ",
SuperscriptBox["v1", "2"], " ", "\[Lambda]1"}], "+",
RowBox[{"4", " ", "rho1", " ",
SuperscriptBox["rho2", "2"], " ", "v1", " ", "\[Lambda]3"}], "+",
RowBox[{"4", " ", "rho1", " ",
SuperscriptBox["rho2", "2"], " ", "v1", " ", "\[Lambda]4"}], "+",
RowBox[{
"8", " ", "rho1", " ", "rho2", " ", "v1", " ", "v2", " ",
"\[Lambda]3"}], "+",
RowBox[{
"8", " ", "rho1", " ", "rho2", " ", "v1", " ", "v2", " ",
"\[Lambda]4"}], "-",
RowBox[{
SuperscriptBox["v1", "4"], " ", "\[Lambda]1"}], "-",
RowBox[{"2", " ",
SuperscriptBox["v1", "2"], " ",
SuperscriptBox["v2", "2"], " ", "\[Lambda]3"}], "-",
RowBox[{"2", " ",
SuperscriptBox["v1", "2"], " ",
SuperscriptBox["v2", "2"], " ", "\[Lambda]4"}]}], ")"}]}], "+",
RowBox[{"4", " ", "eta2", " ", "v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{
RowBox[{"eta1", " ",
RowBox[{"(",
RowBox[{
RowBox[{"-",
RowBox[{"2", " ", "m12sq"}]}], "+",
RowBox[{"phi1", " ", "phi5", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "+",
RowBox[{"phi2", " ", "phi6", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "+",
RowBox[{"2", " ", "\[Lambda]5", " ",
RowBox[{"(",
RowBox[{"rho1", "+", "v1"}], ")"}], " ",
RowBox[{"(",
RowBox[{"rho2", "+", "v2"}], ")"}]}]}], ")"}]}], "-",
RowBox[{
RowBox[{"(",
RowBox[{"rho1", "+", "v1"}], ")"}], " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "-", "\[Lambda]5"}], ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{"phi2", " ", "phi5"}], "-",
RowBox[{"phi1", " ", "phi6"}]}], ")"}]}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["eta2", "4"], " ", "v1", " ", "v2", " ",
"\[Lambda]2"}]}], ")"}]}], TraditionalForm]], "Output",
CellChangeTimes->{{3.573297382001741*^9, 3.57329740779372*^9},
3.573297461771859*^9, 3.573298142787789*^9, 3.57330158995263*^9,
3.573301823576387*^9, 3.573302951575129*^9, 3.573372617625182*^9,
3.57337266756917*^9, 3.573372968559344*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Mtest", "=",
RowBox[{"Simplify", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{"LV2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"phi1", ",", "phi2", ",", "phi5", ",", "phi6"}],
"}"}], ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"rho1", "\[Rule]", "0"}]}], "/.",
RowBox[{"rho2", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta1", "\[Rule]", "0"}]}], "/.",
RowBox[{"eta2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi1", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi2", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi5", "\[Rule]", "0"}]}], "/.",
RowBox[{"phi6", "\[Rule]", "0"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.573297963663357*^9, 3.573297988916448*^9}, {
3.573298047750967*^9, 3.57329805117805*^9}}],
Cell[BoxData[
FormBox[
RowBox[{"(", "\[NoBreak]", GridBox[{
{
RowBox[{"-",
FractionBox[
RowBox[{"v2", " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}],
RowBox[{"2", " ", "v1"}]]}], "0",
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}], "0"},
{"0",
RowBox[{"-",
FractionBox[
RowBox[{"v2", " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}],
RowBox[{"2", " ", "v1"}]]}], "0",
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}]},
{
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}], "0",
RowBox[{"-",
FractionBox[
RowBox[{"v1", " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}],
RowBox[{"2", " ", "v2"}]]}], "0"},
{"0",
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}], "0",
RowBox[{"-",
FractionBox[
RowBox[{"v1", " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}],
RowBox[{"2", " ", "v2"}]]}]}
},
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]", ")"}],
TraditionalForm]], "Output",
CellChangeTimes->{3.573301590206797*^9, 3.573301824134938*^9,
3.57330295184097*^9, 3.573372618151923*^9, 3.573372667792076*^9,
3.573372968846305*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FullSimplify", "[",
RowBox[{"Eigenvalues", "[", "Mtest", "]"}], "]"}]], "Input",
CellChangeTimes->{{3.573300779608477*^9, 3.573300821978563*^9}}],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{"0", ",", "0", ",",
RowBox[{"-",
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
SuperscriptBox["v1", "2"], "+",
SuperscriptBox["v2", "2"]}], ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}],
RowBox[{"2", " ", "v1", " ", "v2"}]]}], ",",
RowBox[{"-",
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
SuperscriptBox["v1", "2"], "+",
SuperscriptBox["v2", "2"]}], ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}],
RowBox[{"2", " ", "v1", " ", "v2"}]]}]}], "}"}],
TraditionalForm]], "Output",
CellChangeTimes->{
3.573297989868123*^9, 3.573298143183293*^9, {3.573300793062839*^9,
3.573300822692048*^9}, 3.573301590555442*^9, 3.573301824306426*^9,
3.573302952046541*^9, 3.573372618371795*^9, 3.573372668028771*^9,
3.573372969004844*^9}]
}, Open ]],
Cell[BoxData[""], "Input"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"M11", ",", "M12"}], "}"}], ",",
RowBox[{"{",
RowBox[{"M21", ",", "M22"}], "}"}]}], "}"}]], "Input",
CellChangeTimes->{3.573298039527555*^9}],
Cell[BoxData[
FormBox[
RowBox[{"(", "\[NoBreak]", GridBox[{
{
RowBox[{"-",
FractionBox[
RowBox[{"v2", " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}],
RowBox[{"2", " ", "v1"}]]}],
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}]},
{
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}],
RowBox[{"-",
FractionBox[
RowBox[{"v1", " ",
RowBox[{"(",
RowBox[{
RowBox[{"v1", " ", "v2", " ",
RowBox[{"(",
RowBox[{"\[Lambda]4", "+", "\[Lambda]5"}], ")"}]}], "-",
RowBox[{"2", " ", "m12sq"}]}], ")"}]}],
RowBox[{"2", " ", "v2"}]]}]}
},
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]", ")"}],
TraditionalForm]], "Output",
CellChangeTimes->{3.573302952312802*^9, 3.573372620043045*^9,
3.57337266833971*^9, 3.573372969128375*^9}]
}, Open ]],
Cell[RawData[""], "Output"],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"sigma", "=",
RowBox[{"\:ffff",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.09", ",", "1.0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.0", ",", "0.08"}], "}"}]}], "}"}]}]}], "\[IndentingNewLine]",
RowBox[{"rho", " ", "=", " ",
RowBox[{"\:ffff",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1.0", ",", "0.88"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.88", ",", "1.0"}], "}"}]}], "}"}]}]}], "\[IndentingNewLine]",
RowBox[{"sigma", " ", ".", " ", "rho", ".", " ", "sigma"}]}], "Input",
CellChangeTimes->{{3.574506913647899*^9, 3.574506932070476*^9}, {
3.574507074296067*^9, 3.57450714613466*^9}, {3.574507359776976*^9,
3.574507402784537*^9}, {3.5745074621351*^9, 3.574507466076578*^9}}],
Cell[BoxData[
FormBox[
RowBox[{"(", "\[NoBreak]", GridBox[{
{
RowBox[{"0.09`", " ", "\:ffff"}],
RowBox[{"1.`", " ", "\:ffff"}]},
{
RowBox[{"1.`", " ", "\:ffff"}],
RowBox[{"0.08`", " ", "\:ffff"}]}
},
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]", ")"}],
TraditionalForm]], "Output",
CellChangeTimes->{{3.574507372986194*^9, 3.574507403995781*^9},
3.574507467103627*^9}],
Cell[BoxData[
FormBox[
RowBox[{"(", "\[NoBreak]", GridBox[{
{
RowBox[{"1.`", " ", "\:ffff"}],
RowBox[{"0.88`", " ", "\:ffff"}]},
{
RowBox[{"0.88`", " ", "\:ffff"}],
RowBox[{"1.`", " ", "\:ffff"}]}
},
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]", ")"}],
TraditionalForm]], "Output",
CellChangeTimes->{{3.574507372986194*^9, 3.574507403995781*^9},
3.574507467108877*^9}],
Cell[BoxData[
FormBox[
RowBox[{"(", "\[NoBreak]", GridBox[{
{
RowBox[{"1.1664999999999999`", " ",
SuperscriptBox["\:ffff", "3"]}],
RowBox[{"1.056336`", " ",
SuperscriptBox["\:ffff", "3"]}]},
{
RowBox[{"1.056336`", " ",
SuperscriptBox["\:ffff", "3"]}],
RowBox[{"1.1472`", " ",
SuperscriptBox["\:ffff", "3"]}]}
},
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]", ")"}],
TraditionalForm]], "Output",
CellChangeTimes->{{3.574507372986194*^9, 3.574507403995781*^9},
3.574507467113038*^9}]
}, Open ]]
}, Open ]]
}, Open ]]
},
WindowSize->{1278, 725},
WindowMargins->{{-9, Automatic}, {-8, Automatic}},
FrontEndVersion->"7.0 for Linux x86 (32-bit) (November 10, 2008)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[400, 13, 26, 0, 32, "Input"],
Cell[CellGroupData[{
Cell[451, 17, 118, 1, 39, "Subsection"],
Cell[CellGroupData[{
Cell[594, 22, 865, 18, 32, "Input"],
Cell[1462, 42, 1428, 28, 56, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2927, 75, 775, 17, 32, "Input"],
Cell[3705, 94, 1403, 28, 56, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[5145, 127, 825, 18, 32, "Input"],
Cell[5973, 147, 786, 21, 56, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[6796, 173, 749, 17, 32, "Input"],
Cell[7548, 192, 1132, 24, 56, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[8729, 222, 100, 1, 39, "Subsection"],
Cell[8832, 225, 2481, 61, 55, "Input"]
}, Open ]],
Cell[CellGroupData[{
Cell[11350, 291, 108, 1, 39, "Subsection"],
Cell[CellGroupData[{
Cell[11483, 296, 944, 23, 32, "Input"],
Cell[12430, 321, 940, 23, 53, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[13407, 349, 637, 19, 57, "Input"],
Cell[14047, 370, 865, 23, 53, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[14949, 398, 678, 19, 32, "Input"],
Cell[15630, 419, 1052, 25, 53, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[16719, 449, 638, 19, 60, "Input"],
Cell[17360, 470, 840, 22, 53, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[18237, 497, 677, 19, 32, "Input"],
Cell[18917, 518, 487, 8, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[19441, 531, 678, 19, 32, "Input"],
Cell[20122, 552, 490, 8, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[20649, 565, 682, 19, 32, "Input"],
Cell[21334, 586, 488, 8, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[21859, 599, 682, 19, 32, "Input"],
Cell[22544, 620, 489, 8, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[23070, 633, 681, 19, 32, "Input"],
Cell[23754, 654, 487, 8, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[24278, 667, 683, 19, 32, "Input"],
Cell[24964, 688, 488, 8, 32, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[25501, 702, 120, 1, 39, "Subsection"],
Cell[CellGroupData[{
Cell[25646, 707, 164, 2, 29, "Subsubsection"],
Cell[CellGroupData[{
Cell[25835, 713, 1367, 32, 32, "Input"],
Cell[27205, 747, 2104, 46, 68, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[29346, 798, 1417, 36, 32, "Input"],
Cell[30766, 836, 2914, 81, 84, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[33717, 922, 2777, 79, 88, "Input"],
Cell[36497, 1003, 2913, 81, 84, "Output"]
}, Open ]],
Cell[39425, 1087, 301, 7, 77, "Input"],
Cell[CellGroupData[{
Cell[39751, 1098, 1049, 24, 32, "Input"],
Cell[40803, 1124, 420, 6, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[41260, 1135, 122, 2, 32, "Input"],
Cell[41385, 1139, 115, 2, 32, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[41549, 1147, 114, 1, 29, "Subsubsection"],
Cell[CellGroupData[{
Cell[41688, 1152, 4244, 117, 209, "Input"],
Cell[45935, 1271, 849, 19, 50, "Output"],
Cell[46787, 1292, 790, 17, 50, "Output"],
Cell[47580, 1311, 790, 17, 50, "Output"],
Cell[48373, 1330, 849, 19, 50, "Output"],
Cell[49225, 1351, 3813, 102, 84, "Output"]
}, Open ]],
Cell[53053, 1456, 92, 1, 32, "Input"],
Cell[CellGroupData[{
Cell[53170, 1461, 692, 19, 32, "Input"],
Cell[53865, 1482, 205, 3, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[54107, 1490, 123, 2, 32, "Input"],
Cell[54233, 1494, 116, 2, 32, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[54398, 1502, 193, 2, 47, "Subsubsection"],
Cell[CellGroupData[{
Cell[54616, 1508, 1074, 28, 32, "Input"],
Cell[55693, 1538, 1848, 46, 68, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[57578, 1589, 1141, 32, 32, "Input"],
Cell[58722, 1623, 5950, 155, 87, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[64709, 1783, 1928, 49, 77, "Input"],
Cell[66640, 1834, 206, 3, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[66883, 1842, 1000, 28, 55, "Input"],
Cell[67886, 1872, 232, 4, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[68155, 1881, 123, 2, 32, "Input"],
Cell[68281, 1885, 115, 2, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[68433, 1892, 975, 27, 55, "Input"],
Cell[69411, 1921, 138, 2, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[69586, 1928, 123, 2, 32, "Input"],
Cell[69712, 1932, 116, 2, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[69865, 1939, 1510, 39, 77, "Input"],
Cell[71378, 1980, 662, 14, 32, "Output"],
Cell[72043, 1996, 759, 18, 50, "Output"],
Cell[72805, 2016, 814, 18, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[73656, 2039, 489, 13, 32, "Input"],
Cell[74148, 2054, 1801, 46, 93, "Output"]
}, Open ]],
Cell[75964, 2103, 1030, 30, 99, "Input"],
Cell[CellGroupData[{
Cell[77019, 2137, 182, 3, 32, "Input"],
Cell[77204, 2142, 13514, 336, 363, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[90755, 2483, 993, 27, 32, "Input"],
Cell[91751, 2512, 3189, 93, 124, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[94977, 2610, 173, 3, 32, "Input"],
Cell[95153, 2615, 1273, 37, 54, "Output"]
}, Open ]],
Cell[96441, 2655, 26, 0, 32, "Input"],
Cell[CellGroupData[{
Cell[96492, 2659, 220, 7, 32, "Input"],
Cell[96715, 2668, 1866, 54, 68, "Output"]
}, Open ]],
Cell[98596, 2725, 27, 0, 24, "Output"],
Cell[CellGroupData[{
Cell[98648, 2729, 785, 20, 77, "Input"],
Cell[99436, 2751, 786, 22, 50, "Output"],
Cell[100225, 2775, 786, 22, 50, "Output"],
Cell[101014, 2799, 930, 26, 54, "Output"]
}, Open ]]
}, Open ]]
}, Open ]]
}
]
*)

File Metadata

Mime Type
text/plain
Expires
Sat, Dec 21, 4:57 PM (18 h, 27 m)
Storage Engine
blob
Storage Format
Raw Data
Storage Handle
4013780
Default Alt Text
2HDMteste.nb (105 KB)

Event Timeline