Select Git revision
RDownScriptalphabeta.nb 240.46 KiB
(* Content-type: application/vnd.wolfram.mathematica *)
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
(* CreatedBy='Mathematica 12.0' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
NotebookDataLength[ 246076, 5147]
NotebookOptionsPosition[ 238591, 5019]
NotebookOutlinePosition[ 238992, 5036]
CellTagsIndexPosition[ 238949, 5033]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[CellGroupData[{
Cell["RDown alphas & betas", "Title",
CellChangeTimes->{{3.7171355710697517`*^9, 3.7171356028895473`*^9}, {
3.8029916730196133`*^9,
3.8029916809310827`*^9}},ExpressionUUID->"b53761d4-1b24-4b86-b93e-\
9c44d4b29d65"],
Cell[BoxData[
RowBox[{"Quit", "[", "]"}]], "Input",
CellChangeTimes->{{3.772628159141247*^9, 3.772628161249263*^9}, {
3.785052589392028*^9, 3.785052592823535*^9}},
CellLabel->
"In[258]:=",ExpressionUUID->"980e79f6-9c07-4072-bd1e-300ac946e8c3"],
Cell[CellGroupData[{
Cell["Setup", "Section",
CellChangeTimes->{{3.717145376675954*^9, 3.7171453778419027`*^9}, {
3.725360092733674*^9,
3.725360093603505*^9}},ExpressionUUID->"fe9e23be-b684-46cc-9b54-\
957e00ada2e3"],
Cell[CellGroupData[{
Cell["Load package and set root paths", "Subsection",
CellChangeTimes->{{3.799119833730782*^9, 3.7991198361011353`*^9}, {
3.801906007839068*^9,
3.8019060131649723`*^9}},ExpressionUUID->"e952a5b9-bbfe-43a9-9668-\
8567ca76bf42"],
Cell[BoxData[
RowBox[{
RowBox[{"rootpath", "=", "\"\<~/git/rdstackingproject/\>\""}],
";"}]], "Code",
CellChangeTimes->{{3.801893836989571*^9, 3.8018938554497147`*^9}, {
3.8018991673772917`*^9, 3.801899171272743*^9}, {3.801899220625408*^9,
3.801899220979004*^9}, {3.801899255251523*^9, 3.8018992567883883`*^9}, {
3.801900861015358*^9, 3.801900867609252*^9}, {3.8019010062879868`*^9,
3.801901006499617*^9}, {3.801905973467177*^9, 3.8019060065780773`*^9}},
CellLabel->
"In[127]:=",ExpressionUUID->"ded0ca57-00ba-4008-906d-ee5041d06f91"],
Cell[BoxData[{
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"rootpath", "<>", "\"\<code\>\""}], "]"}], ";"}], "\n",
RowBox[{"<<", "RDown.m"}], "\n",
RowBox[{"<<", "mcmc.m"}]}], "Code",
CellChangeTimes->{{3.799119881021441*^9, 3.799119911381034*^9}, { 3.80077965736977*^9, 3.800779661525262*^9}, {3.801736519951005*^9,
3.8017365270768414`*^9}, {3.801750413991219*^9, 3.80175045124013*^9}, {
3.801754031026664*^9, 3.8017540356351223`*^9}, {3.801893846779317*^9,
3.8018938856249447`*^9}, {3.80189915075161*^9, 3.801899152360096*^9}, {
3.801899239104719*^9, 3.801899268047777*^9}, 3.801899313824655*^9},
CellLabel->
"In[128]:=",ExpressionUUID->"df18942a-15e3-4e8b-880e-923fca9e18d7"],
Cell[BoxData[
RowBox[{"SetOptions", "[",
RowBox[{
RowBox[{"InputNotebook", "[", "]"}], ",", " ",
RowBox[{"AutoGeneratedPackage", " ", "->", " ", "Automatic"}]}],
"]"}]], "Code",
CellChangeTimes->{{3.801893836989571*^9, 3.8018938554497147`*^9}, {
3.8018991673772917`*^9, 3.801899171272743*^9}, {3.801899220625408*^9,
3.801899220979004*^9}, {3.801899255251523*^9, 3.8018992567883883`*^9}, {
3.801900861015358*^9, 3.801900867609252*^9}, {3.8019010062879868`*^9,
3.801901006499617*^9}, {3.801905973467177*^9, 3.8019060065780773`*^9},
3.802770574103994*^9},
CellLabel->
"In[131]:=",ExpressionUUID->"029b1804-86de-4457-bbc5-eda3da546f6a"],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"mysxscase", "=",
RowBox[{
"rootpath", "<>",
"\"\</SXS/BBH_SKS_d14.3_q1.22_sA_0_0_0.330_sB_0_0_-0.440\>\""}]}],
";"}], "\n",
RowBox[{
RowBox[{"ntones", "=", "1"}], ";"}], "\n",
RowBox[{
RowBox[{"tshift", "=", "19"}], ";"}], "\n",
RowBox[{
RowBox[{
RowBox[{"npoints", "=", "3000"}], ";"}], "\n",
RowBox[{"(*",
RowBox[{
RowBox[{"n", "=",
RowBox[{"1", ":", "19"}]}], ",", " ",
RowBox[{"n", "=",
RowBox[{"2", ":", "12"}]}], ",", " ",
RowBox[{"n", "=",
RowBox[{"3", ":", "8"}]}], ",", " ",
RowBox[{"n", "=",
RowBox[{"4", ":", "5"}]}], ",", " ",
RowBox[{"n", "=",
RowBox[{"5", ":", "3"}]}], ",", " ",
RowBox[{"n", "=",
RowBox[{"6", ":", "1"}]}], ",", " ",
RowBox[{"n", "=",
RowBox[{"7", ":",
RowBox[{"0", " ",
RowBox[{"(",
RowBox[{
RowBox[{"not", " ", "sure"}], ";", " ",
RowBox[{"is", " ", "that", " ", "really", " ", "a", " ", "minimum",
RowBox[{"??", "?"}]}]}], ")"}]}]}]}]}], " ", "*)"}]}], "\n",
RowBox[{
RowBox[{"allspectrum", " ", "=", " ",
RowBox[{"{",
RowBox[{
"x0", ",", "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6",
",", "x7"}], "}"}]}], ";"}], "\n",
RowBox[{
RowBox[{"allalphas", " ", "=", " ",
RowBox[{"{", RowBox[{
"\[Alpha]1", ",", "\[Alpha]2", ",", "\[Alpha]3", ",", "\[Alpha]4", ",",
"\[Alpha]5", ",", "\[Alpha]6", ",", "\[Alpha]7"}], "}"}]}],
";"}], "\n",
RowBox[{
RowBox[{"allbetas", " ", "=", " ",
RowBox[{"{",
RowBox[{
"\[Beta]1", ",", "\[Beta]2", ",", "\[Beta]3", ",", "\[Beta]4", ",",
"\[Beta]5", ",", "\[Beta]6", ",", "\[Beta]7"}], "}"}]}], ";"}], "\n",
RowBox[{"spectrum", " ", "=", " ",
RowBox[{"allspectrum", "[",
RowBox[{"[",
RowBox[{";;",
RowBox[{"ntones", "+", "1"}]}], "]"}], "]"}]}], "\n",
RowBox[{"alphas", " ", "=", " ",
RowBox[{"allalphas", "[",
RowBox[{"[",
RowBox[{";;", "ntones"}], "]"}], "]"}]}], "\n",
RowBox[{"betas", " ", "=", " ",
RowBox[{"allbetas", "[",
RowBox[{"[",
RowBox[{";;", "ntones"}], "]"}], "]"}]}], "\n",
RowBox[{
RowBox[{"\[Omega]fact", "=", "0.1"}], ";"}], "\n",
RowBox[{
RowBox[{"\[Tau]fact", "=", "0.1"}], ";"}], "\n",
RowBox[{"params", " ", "=", " ",
RowBox[{"{",
RowBox[{
"tshift", ",", " ", "ntones", ",", " ", "\[Omega]fact", ",", " ",
"\[Tau]fact"}], "}"}]}]}], "Code",
CellChangeTimes->{{3.8019064095845547`*^9, 3.801906411959391*^9}, {
3.801906985378249*^9, 3.801906993215358*^9}, {3.802722858895486*^9,
3.802722864689137*^9}, 3.802723604945443*^9, {3.8027241862160683`*^9,
3.802724186517077*^9}, {3.802738083300268*^9, 3.80273809605951*^9},
3.8027736570277443`*^9, {3.802773770910899*^9, 3.802773784158245*^9}, {
3.802822293076131*^9, 3.802822293270351*^9}, {3.802974061689045*^9,
3.80297411575915*^9}, {3.802985538075816*^9, 3.802985538259055*^9}, {
3.802991526986095*^9, 3.8029915277479153`*^9}, {3.802991689178053*^9,
3.802991690330517*^9}, {3.802995706660564*^9, 3.802995708091014*^9}, {
3.802998612519396*^9, 3.8029986145163727`*^9}, {3.803004769040555*^9,
3.803004771518778*^9}, {3.803024802915299*^9, 3.803024820581163*^9}, {
3.803027726994896*^9, 3.8030277419364758`*^9}, {3.803031155832178*^9,
3.803031160845806*^9}, {3.803031259614688*^9, 3.803031266368073*^9}, {
3.803031451522497*^9, 3.8030314736172123`*^9}, {3.803039068462916*^9,
3.803039068633751*^9}, {3.803039485953404*^9, 3.803039495699823*^9}, {
3.803040163128387*^9, 3.8030401638471203`*^9}, {3.803042268655837*^9,
3.803042275274218*^9}, {3.8030471470193777`*^9, 3.803047149435465*^9}, {
3.803047195974422*^9, 3.803047199363809*^9}, {3.803047276083467*^9,
3.803047276993865*^9}, {3.803049330457906*^9, 3.803049333680883*^9}, {
3.803050204307973*^9, 3.803050212310288*^9}, {3.803051145852007*^9,
3.803051164487495*^9}, {3.803072989527976*^9, 3.803073000747033*^9}, {
3.8030731497317333`*^9, 3.803073163211327*^9}, {3.803140621150222*^9,
3.803140622288619*^9}, {3.803141649372732*^9, 3.803141790305583*^9}, {
3.80314287846935*^9, 3.803142878672852*^9}, {3.8031433555128727`*^9,
3.8031433559901752`*^9}, {3.8031434148262663`*^9, 3.803143414979505*^9}, {
3.8031436722978573`*^9, 3.803143673108727*^9}, {3.803143791545849*^9,
3.803143807450953*^9}, 3.803144186793013*^9, {3.803144611996765*^9,
3.8031446146574087`*^9}, {3.803144943705608*^9, 3.803144946829894*^9}, {
3.803155985346513*^9, 3.803155990490343*^9}, {3.803158984671782*^9,
3.803158985634667*^9}, {3.8031807604498987`*^9, 3.803180766878624*^9}, {
3.8032432529480143`*^9, 3.803243255025971*^9}, {3.8032433745341988`*^9,
3.8032433757882633`*^9}, {3.803244354689518*^9, 3.803244356145488*^9}},
CellLabel->
"In[132]:=",ExpressionUUID->"d0e5d8fb-ddc3-4ce5-93a5-2a83bdf621d4"],
Cell[BoxData[
RowBox[{"{",
RowBox[{"x0", ",", "x1"}], "}"}]], "Output", CellChangeTimes->{
3.802974119399218*^9, 3.8029855408558607`*^9, {3.8029915291525583`*^9,
3.802991534202093*^9}, 3.802991697796813*^9, 3.802995712929796*^9,
3.802998620941657*^9, 3.8030047763982267`*^9, 3.803024824328607*^9, {
3.8030277345564833`*^9, 3.803027746061781*^9}, 3.8030312375830708`*^9,
3.803031269474059*^9, 3.803031457292012*^9, 3.8030389407667837`*^9,
3.803039071438265*^9, 3.803039498170081*^9, 3.803040168151453*^9, {
3.803042326724951*^9, 3.8030423487390337`*^9}, {3.803047202570747*^9,
3.8030472207310057`*^9}, 3.803047279943118*^9, 3.803047317917447*^9,
3.803049337145217*^9, 3.8030502182037888`*^9, 3.803051167162394*^9,
3.803140735811591*^9, {3.80314174663334*^9, 3.803141790768076*^9},
3.803142777841688*^9, 3.8031428830153837`*^9, 3.803143367629716*^9,
3.803143418408595*^9, 3.8031436803290586`*^9, 3.80314381132268*^9,
3.803144189585289*^9, 3.8031446189452963`*^9, 3.803144953361826*^9,
3.803155995582943*^9, 3.803170544576108*^9, 3.803171908417588*^9,
3.80317308764172*^9, 3.803174157497301*^9, 3.8031744729046793`*^9, {
3.803174519723084*^9, 3.8031745404484053`*^9}, 3.80317485603345*^9, {
3.803175107742867*^9, 3.8031751499361067`*^9}, 3.803175527990901*^9,
3.803179309881363*^9, 3.803180772436763*^9, 3.803243258898118*^9, {
3.80324335710674*^9, 3.803243380154896*^9}, 3.8032441829017363`*^9,
3.8032442616839933`*^9, 3.803244359258636*^9},
CellLabel->
"Out[139]=",ExpressionUUID->"9b0527c0-1958-4d34-94a7-1d951beff977"],
Cell[BoxData[
RowBox[{"{", "\[Alpha]1", "}"}]], "Output",
CellChangeTimes->{
3.802974119399218*^9, 3.8029855408558607`*^9, {3.8029915291525583`*^9,
3.802991534202093*^9}, 3.802991697796813*^9, 3.802995712929796*^9,
3.802998620941657*^9, 3.8030047763982267`*^9, 3.803024824328607*^9, {
3.8030277345564833`*^9, 3.803027746061781*^9}, 3.8030312375830708`*^9,
3.803031269474059*^9, 3.803031457292012*^9, 3.8030389407667837`*^9,
3.803039071438265*^9, 3.803039498170081*^9, 3.803040168151453*^9, {
3.803042326724951*^9, 3.8030423487390337`*^9}, {3.803047202570747*^9,
3.8030472207310057`*^9}, 3.803047279943118*^9, 3.803047317917447*^9,
3.803049337145217*^9, 3.8030502182037888`*^9, 3.803051167162394*^9,
3.803140735811591*^9, {3.80314174663334*^9, 3.803141790768076*^9},
3.803142777841688*^9, 3.8031428830153837`*^9, 3.803143367629716*^9,
3.803143418408595*^9, 3.8031436803290586`*^9, 3.80314381132268*^9,
3.803144189585289*^9, 3.8031446189452963`*^9, 3.803144953361826*^9,
3.803155995582943*^9, 3.803170544576108*^9, 3.803171908417588*^9,
3.80317308764172*^9, 3.803174157497301*^9, 3.8031744729046793`*^9, {
3.803174519723084*^9, 3.8031745404484053`*^9}, 3.80317485603345*^9, {
3.803175107742867*^9, 3.8031751499361067`*^9}, 3.803175527990901*^9,
3.803179309881363*^9, 3.803180772436763*^9, 3.803243258898118*^9, {
3.80324335710674*^9, 3.803243380154896*^9}, 3.8032441829017363`*^9,
3.8032442616839933`*^9, 3.803244359260154*^9},
CellLabel->
"Out[140]=",ExpressionUUID->"db208a9c-2a86-4f52-9737-1ad0b0a7db8a"],
Cell[BoxData[
RowBox[{"{", "\[Beta]1", "}"}]], "Output",
CellChangeTimes->{
3.802974119399218*^9, 3.8029855408558607`*^9, {3.8029915291525583`*^9,
3.802991534202093*^9}, 3.802991697796813*^9, 3.802995712929796*^9,
3.802998620941657*^9, 3.8030047763982267`*^9, 3.803024824328607*^9, {
3.8030277345564833`*^9, 3.803027746061781*^9}, 3.8030312375830708`*^9,
3.803031269474059*^9, 3.803031457292012*^9, 3.8030389407667837`*^9,
3.803039071438265*^9, 3.803039498170081*^9, 3.803040168151453*^9, {
3.803042326724951*^9, 3.8030423487390337`*^9}, {3.803047202570747*^9,
3.8030472207310057`*^9}, 3.803047279943118*^9, 3.803047317917447*^9,
3.803049337145217*^9, 3.8030502182037888`*^9, 3.803051167162394*^9,
3.803140735811591*^9, {3.80314174663334*^9, 3.803141790768076*^9},
3.803142777841688*^9, 3.8031428830153837`*^9, 3.803143367629716*^9,
3.803143418408595*^9, 3.8031436803290586`*^9, 3.80314381132268*^9,
3.803144189585289*^9, 3.8031446189452963`*^9, 3.803144953361826*^9,
3.803155995582943*^9, 3.803170544576108*^9, 3.803171908417588*^9,
3.80317308764172*^9, 3.803174157497301*^9, 3.8031744729046793`*^9, {
3.803174519723084*^9, 3.8031745404484053`*^9}, 3.80317485603345*^9, {
3.803175107742867*^9, 3.8031751499361067`*^9}, 3.803175527990901*^9, 3.803179309881363*^9, 3.803180772436763*^9, 3.803243258898118*^9, {
3.80324335710674*^9, 3.803243380154896*^9}, 3.8032441829017363`*^9,
3.8032442616839933`*^9, 3.803244359261859*^9},
CellLabel->
"Out[141]=",ExpressionUUID->"577ceb04-844e-43c5-92d2-a64fb9757fcf"],
Cell[BoxData[
RowBox[{"{",
RowBox[{"19", ",", "1", ",", "0.1`", ",", "0.1`"}], "}"}]], "Output",
CellChangeTimes->{
3.802974119399218*^9, 3.8029855408558607`*^9, {3.8029915291525583`*^9,
3.802991534202093*^9}, 3.802991697796813*^9, 3.802995712929796*^9,
3.802998620941657*^9, 3.8030047763982267`*^9, 3.803024824328607*^9, {
3.8030277345564833`*^9, 3.803027746061781*^9}, 3.8030312375830708`*^9,
3.803031269474059*^9, 3.803031457292012*^9, 3.8030389407667837`*^9,
3.803039071438265*^9, 3.803039498170081*^9, 3.803040168151453*^9, {
3.803042326724951*^9, 3.8030423487390337`*^9}, {3.803047202570747*^9,
3.8030472207310057`*^9}, 3.803047279943118*^9, 3.803047317917447*^9,
3.803049337145217*^9, 3.8030502182037888`*^9, 3.803051167162394*^9,
3.803140735811591*^9, {3.80314174663334*^9, 3.803141790768076*^9},
3.803142777841688*^9, 3.8031428830153837`*^9, 3.803143367629716*^9,
3.803143418408595*^9, 3.8031436803290586`*^9, 3.80314381132268*^9,
3.803144189585289*^9, 3.8031446189452963`*^9, 3.803144953361826*^9,
3.803155995582943*^9, 3.803170544576108*^9, 3.803171908417588*^9,
3.80317308764172*^9, 3.803174157497301*^9, 3.8031744729046793`*^9, {
3.803174519723084*^9, 3.8031745404484053`*^9}, 3.80317485603345*^9, {
3.803175107742867*^9, 3.8031751499361067`*^9}, 3.803175527990901*^9,
3.803179309881363*^9, 3.803180772436763*^9, 3.803243258898118*^9, {
3.80324335710674*^9, 3.803243380154896*^9}, 3.8032441829017363`*^9,
3.8032442616839933`*^9, 3.803244359263578*^9},
CellLabel->
"Out[144]=",ExpressionUUID->"e67bb052-0c11-4b17-a7df-d2de6e05ef6c"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Setup paths and other notebook folders", "Subsection",
CellChangeTimes->{{3.76257774139565*^9,
3.7625777648770647`*^9}},ExpressionUUID->"46366112-0a9f-4a64-97d3-\
72f08bceb964"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(*", " ",
RowBox[{"Change", " ", "them", " ", "accordingly"}], " ", "*)"}], "\n",
RowBox[{"(*",
RowBox[{"Notebook", " ", "directory"}], "*)"}], "\n",
RowBox[{
RowBox[{
RowBox[{"notdir", "=",
RowBox[{"rootpath", "<>", "\"\<code/\>\""}]}], ";"}], "\n",
RowBox[{"(*",
RowBox[{"Directory", " ", "of", " ", "the", " ",
RowBox[{"l", "'"}], "s", " ", "Ringdown", " ", "data"}], " ", "*)"}],
"\n",
RowBox[{
RowBox[{"modedir", "=", "rootpath"}], ";"}], "\n",
RowBox[{"(*", " ",
RowBox[{
"True", " ", "if", " ", "you", " ", "want", " ", "to", " ", "export", " ",
"the", " ", "plots"}], " ", "*)"}], "\n",
RowBox[{"ExportQ", "=", "False"}], "\n",
RowBox[{"ExportDir", "=", "notdir"}]}]}]], "Code",
CellChangeTimes->{
3.7625787067637377`*^9, {3.7625787621100388`*^9, 3.762578766498042*^9}, {
3.7625788039303837`*^9, 3.76257880843638*^9}, {3.762579176451227*^9,
3.762579205498322*^9}, 3.783842026281891*^9, {3.785048517032866*^9, 3.785048568634179*^9}, 3.785052064855216*^9, 3.785052098677169*^9, {
3.785052662782302*^9, 3.785052711482973*^9}, {3.799112511472287*^9,
3.799112532529355*^9}, 3.799119917854619*^9, {3.8007685960415173`*^9,
3.800768686902137*^9}, {3.8007688081677713`*^9, 3.80076883021767*^9}, {
3.8007688671018257`*^9, 3.800768867313781*^9}, {3.8017363103133783`*^9,
3.80173641269767*^9}, {3.801736444416366*^9, 3.801736507343718*^9}, {
3.801736668985515*^9, 3.801736672338735*^9}, {3.801887712719111*^9,
3.8018877185807247`*^9}, {3.8018939370001*^9, 3.801893986031884*^9},
3.801899307537121*^9, {3.801899347317583*^9, 3.8018994021627417`*^9},
3.801899549788517*^9, {3.801900970284079*^9, 3.8019010086863937`*^9}},
CellLabel->
"In[145]:=",ExpressionUUID->"2c37e1b9-5cb9-4980-a108-163d386515de"],
Cell[BoxData["False"], "Output",
CellChangeTimes->{
3.8019008734562407`*^9, {3.801900996088092*^9, 3.801901009074788*^9},
3.8027749934817333`*^9, 3.802822111813675*^9, 3.802822177778118*^9,
3.802974119448329*^9, 3.8029855409054403`*^9, 3.8029915342482347`*^9,
3.802991697885638*^9, 3.802995712975226*^9, 3.80299862099881*^9,
3.803004776445632*^9, 3.803024824344075*^9, {3.803027734613361*^9,
3.803027746115057*^9}, 3.803031237666851*^9, 3.803031457339632*^9,
3.803039071484624*^9, 3.803040168198042*^9, 3.803042348785822*^9,
3.80304720262836*^9, 3.803047317975972*^9, 3.803049337199809*^9,
3.803050218288992*^9, 3.803140735857259*^9, 3.803142777896626*^9,
3.803142883081031*^9, 3.80314341847545*^9, 3.8031436803778267`*^9,
3.803143811386845*^9, 3.803144189647481*^9, 3.803144619007515*^9,
3.803144953426005*^9, 3.803155995646412*^9, 3.803170544622587*^9,
3.803171908426827*^9, 3.8031730876502657`*^9, 3.803174157505879*^9,
3.8031744729367123`*^9, {3.803174519771844*^9, 3.803174540496244*^9},
3.803174856062611*^9, {3.8031751077925177`*^9, 3.803175160397167*^9},
3.803175528004149*^9, 3.803179309911989*^9, 3.803180772488659*^9, {
3.803243357170268*^9, 3.803243380220462*^9}, 3.8032441829408703`*^9,
3.803244261749275*^9, 3.803244359321556*^9},
CellLabel->
"Out[147]=",ExpressionUUID->"99e08be2-d0cd-4d54-af01-71a148e08b7d"],
Cell[BoxData["\<\"~/git/rdstackingproject/code/\"\>"], "Output",
CellChangeTimes->{
3.8019008734562407`*^9, {3.801900996088092*^9, 3.801901009074788*^9},
3.8027749934817333`*^9, 3.802822111813675*^9, 3.802822177778118*^9,
3.802974119448329*^9, 3.8029855409054403`*^9, 3.8029915342482347`*^9,
3.802991697885638*^9, 3.802995712975226*^9, 3.80299862099881*^9,
3.803004776445632*^9, 3.803024824344075*^9, {3.803027734613361*^9,
3.803027746115057*^9}, 3.803031237666851*^9, 3.803031457339632*^9,
3.803039071484624*^9, 3.803040168198042*^9, 3.803042348785822*^9,
3.80304720262836*^9, 3.803047317975972*^9, 3.803049337199809*^9,
3.803050218288992*^9, 3.803140735857259*^9, 3.803142777896626*^9,
3.803142883081031*^9, 3.80314341847545*^9, 3.8031436803778267`*^9,
3.803143811386845*^9, 3.803144189647481*^9, 3.803144619007515*^9,
3.803144953426005*^9, 3.803155995646412*^9, 3.803170544622587*^9,
3.803171908426827*^9, 3.8031730876502657`*^9, 3.803174157505879*^9,
3.8031744729367123`*^9, {3.803174519771844*^9, 3.803174540496244*^9},
3.803174856062611*^9, {3.8031751077925177`*^9, 3.803175160397167*^9},
3.803175528004149*^9, 3.803179309911989*^9, 3.803180772488659*^9, {
3.803243357170268*^9, 3.803243380220462*^9}, 3.8032441829408703`*^9,
3.803244261749275*^9, 3.8032443593220997`*^9},
CellLabel->
"Out[148]=",ExpressionUUID->"babc9bf4-10c1-480c-985a-53a50beafc3e"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Plot Formatting", "Subsection",
CellChangeTimes->{{3.801736555565851*^9,
3.80173655943112*^9}},ExpressionUUID->"2b160476-27ad-417e-ba6b-\
aba2f29dfd9c"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(*", " ", "PlotStyle", " ", "*)"}], "\n",
RowBox[{
RowBox[{"markers", "=",
RowBox[{"{",
RowBox[{
"\"\<\[FilledCircle]\>\"", ",", "\"\<\[FilledSquare]\>\"", ",",
"\"\<\[FilledDiamond]\>\"", ",", "\"\<\[FilledUpTriangle]\>\"", ",",
"\"\<\[FilledDownTriangle]\>\"", ",", "\"\<\[EmptyCircle]\>\"", ",",
"\"\<\[EmptySquare]\>\"", ",", "\"\<\[EmptyDiamond]\>\"", ",",
"\"\<\[EmptyUpTriangle]\>\"", ",", "\"\<\[EmptyDownTriangle]\>\""}],
"}"}]}], "\n",
RowBox[{"colors", "=",
RowBox[{"ColorData", "[",
RowBox[{"97", ",", "\"\<ColorList\>\""}], "]"}]}], "\n",
RowBox[{
RowBox[{"l1", "=", ".025"}], ";"}], "\n",
RowBox[{
RowBox[{"l2", "=", ".001"}], ";"}], "\n",
RowBox[{
RowBox[{"s", "=",
RowBox[{"l1", "/", "2"}]}], ";"}]}]}]], "Code",
CellChangeTimes->{{3.770258655384822*^9, 3.770258658711926*^9}, {
3.785048597172567*^9, 3.785048611784268*^9}, {3.7850518765860777`*^9,
3.785051879447013*^9}},
CellLabel->
"In[149]:=",ExpressionUUID->"91d0d186-3694-4095-b0ad-f5476cf3486b"],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"\[FilledCircle]\"\>", ",", "\<\"\[FilledSquare]\"\>",
",", "\<\"\[FilledDiamond]\"\>", ",", "\<\"\[FilledUpTriangle]\"\>",
",", "\<\"\[FilledDownTriangle]\"\>", ",", "\<\"\[EmptyCircle]\"\>",
",", "\<\"\[EmptySquare]\"\>", ",", "\<\"\[EmptyDiamond]\"\>",
",", "\<\"\[EmptyUpTriangle]\"\>", ",", "\<\"\[EmptyDownTriangle]\"\>"}],
"}"}]], "Output",
CellChangeTimes->{{3.785048598454445*^9, 3.7850486121743803`*^9},
3.7850492534864817`*^9, 3.7850518797807217`*^9, 3.7851593453111877`*^9,
3.788525055881117*^9, 3.788588576142179*^9, 3.789016362482636*^9,
3.7891011551402693`*^9, 3.7971326144003468`*^9, 3.799112667826545*^9,
3.799113935678566*^9, 3.799119920100224*^9, 3.79912099675138*^9,
3.799121678020488*^9, 3.79912196315336*^9, 3.7991220841956873`*^9, {
3.799122272245305*^9, 3.799122300399253*^9}, 3.8000746708421507`*^9,
3.8000885291890907`*^9, 3.800088987611136*^9, {3.800089240452045*^9,
3.800089269881946*^9}, 3.800089321591539*^9, 3.800089431077919*^9,
3.800089495187615*^9, 3.800089595616612*^9, 3.800148380233251*^9,
3.800539327345366*^9, 3.800610134971425*^9, 3.800705385664913*^9,
3.80070556987372*^9, 3.800768504913447*^9, 3.800798370679039*^9,
3.8008772883571987`*^9, 3.801281244944542*^9, 3.801285594509903*^9,
3.801567580742796*^9, {3.801723018647998*^9, 3.801723046894418*^9},
3.801736561561638*^9, 3.801738393523629*^9, 3.801744291978118*^9,
3.8017504625330067`*^9, 3.801754015153778*^9, 3.801754114168932*^9,
3.8018007150796423`*^9, 3.8018040233399773`*^9, 3.801882349914794*^9,
3.8018951501756773`*^9, {3.80190087812988*^9, 3.8019008850418577`*^9},
3.8027749934963837`*^9, 3.802822111861991*^9, 3.802822177784028*^9,
3.802974119454093*^9, 3.802985540910746*^9, 3.802991534287614*^9,
3.80299169789133*^9, 3.802995712980872*^9, 3.802998621004304*^9,
3.803004776493167*^9, 3.8030248243986883`*^9, {3.803027734669106*^9,
3.803027746157736*^9}, 3.80303123767232*^9, 3.8030314573459587`*^9,
3.803039071527216*^9, 3.803040168243313*^9, 3.803042348792696*^9,
3.803047202634519*^9, 3.803047318039352*^9, 3.803049337205765*^9,
3.803050218295183*^9, 3.8031407359122887`*^9, 3.803142777903883*^9,
3.8031428831333933`*^9, 3.803143418528857*^9, 3.803143680384963*^9,
3.80314381143324*^9, 3.8031441896535187`*^9, 3.803144619053787*^9,
3.803144953474568*^9, 3.8031705446291447`*^9, 3.8031719084569063`*^9,
3.80317308767623*^9, 3.803174157533538*^9, 3.803174472943399*^9, {
3.803174519778084*^9, 3.8031745406380367`*^9}, 3.803174856094193*^9, {
3.8031751077989073`*^9, 3.8031751604569817`*^9}, 3.8031755280499563`*^9,
3.803179309918973*^9, 3.803180772496706*^9, {3.803243357184814*^9, 3.80324338022818*^9}, 3.803244182995006*^9, 3.803244261788183*^9,
3.803244359331491*^9},
CellLabel->
"Out[149]=",ExpressionUUID->"d2ebf61c-1cb4-4bd1-9253-0f09897339f1"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{
{GrayLevel[0], RectangleBox[{0, 0}]},
{GrayLevel[0], RectangleBox[{1, -1}]},
{RGBColor[0.368417, 0.506779, 0.709798],
RectangleBox[{0, -1}, {2, 1}]}},
AspectRatio->1,
DefaultBaseStyle->"ColorSwatchGraphics",
Frame->True,
FrameStyle->RGBColor[
0.24561133333333335`, 0.3378526666666667, 0.4731986666666667],
FrameTicks->None,
ImageSize->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification]}],
PlotRangePadding->None],
StyleBox[
RowBox[{"RGBColor", "[",
RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], "]"}],
NumberMarks -> False]],
Appearance->None,
BaseStyle->{},
BaselinePosition->Baseline,
ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.368417, 0.506779, 0.709798];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
DefaultBaseStyle->{},
Evaluator->Automatic,
Method->"Preemptive"],
RGBColor[0.368417, 0.506779, 0.709798],
Editable->False,
Selectable->False], ",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{
{GrayLevel[0], RectangleBox[{0, 0}]},
{GrayLevel[0], RectangleBox[{1, -1}]},
{RGBColor[0.880722, 0.611041, 0.142051],
RectangleBox[{0, -1}, {2, 1}]}},
AspectRatio->1,
DefaultBaseStyle->"ColorSwatchGraphics",
Frame->True,
FrameStyle->RGBColor[
0.587148, 0.40736066666666665`, 0.09470066666666668],
FrameTicks->None,
ImageSize-> Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification]}],
PlotRangePadding->None],
StyleBox[
RowBox[{"RGBColor", "[",
RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], "]"}],
NumberMarks -> False]],
Appearance->None,
BaseStyle->{},
BaselinePosition->Baseline,
ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.880722, 0.611041, 0.142051];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
DefaultBaseStyle->{},
Evaluator->Automatic,
Method->"Preemptive"],
RGBColor[0.880722, 0.611041, 0.142051],
Editable->False,
Selectable->False], ",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{
{GrayLevel[0], RectangleBox[{0, 0}]},
{GrayLevel[0], RectangleBox[{1, -1}]},
{RGBColor[0.560181, 0.691569, 0.194885],
RectangleBox[{0, -1}, {2, 1}]}},
AspectRatio->1,
DefaultBaseStyle->"ColorSwatchGraphics",
Frame->True,
FrameStyle->RGBColor[
0.37345400000000006`, 0.461046, 0.12992333333333334`],
FrameTicks->None,
ImageSize->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification]}],
PlotRangePadding->None],
StyleBox[
RowBox[{"RGBColor", "[",
RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], "]"}],
NumberMarks -> False]],
Appearance->None,
BaseStyle->{},
BaselinePosition->Baseline,
ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.560181, 0.691569, 0.194885];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
DefaultBaseStyle->{},
Evaluator->Automatic,
Method->"Preemptive"],
RGBColor[0.560181, 0.691569, 0.194885],
Editable->False,
Selectable->False], ",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{
{GrayLevel[0], RectangleBox[{0, 0}]},
{GrayLevel[0], RectangleBox[{1, -1}]},
{RGBColor[0.922526, 0.385626, 0.209179],
RectangleBox[{0, -1}, {2, 1}]}},
AspectRatio->1,
DefaultBaseStyle->"ColorSwatchGraphics",
Frame->True,
FrameStyle->RGBColor[
0.6150173333333333, 0.25708400000000003`, 0.13945266666666667`],
FrameTicks->None,
ImageSize->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification]}],
PlotRangePadding->None],
StyleBox[
RowBox[{"RGBColor", "[",
RowBox[{"0.922526`", ",", "0.385626`", ",", "0.209179`"}], "]"}],
NumberMarks -> False]],
Appearance->None,
BaseStyle->{},
BaselinePosition->Baseline,
ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.922526, 0.385626, 0.209179];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
DefaultBaseStyle->{},
Evaluator->Automatic,
Method->"Preemptive"],
RGBColor[0.922526, 0.385626, 0.209179],
Editable->False,
Selectable->False], ",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{
{GrayLevel[0], RectangleBox[{0, 0}]},
{GrayLevel[0], RectangleBox[{1, -1}]},
{RGBColor[0.528488, 0.470624, 0.701351],
RectangleBox[{0, -1}, {2, 1}]}},
AspectRatio->1,
DefaultBaseStyle->"ColorSwatchGraphics",
Frame->True,
FrameStyle->RGBColor[
0.3523253333333333, 0.3137493333333333, 0.46756733333333333`],
FrameTicks->None, ImageSize->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification]}],
PlotRangePadding->None],
StyleBox[
RowBox[{"RGBColor", "[",
RowBox[{"0.528488`", ",", "0.470624`", ",", "0.701351`"}], "]"}],
NumberMarks -> False]],
Appearance->None,
BaseStyle->{},
BaselinePosition->Baseline,
ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.528488, 0.470624, 0.701351];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
DefaultBaseStyle->{},
Evaluator->Automatic,
Method->"Preemptive"],
RGBColor[0.528488, 0.470624, 0.701351],
Editable->False,
Selectable->False], ",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{
{GrayLevel[0], RectangleBox[{0, 0}]},
{GrayLevel[0], RectangleBox[{1, -1}]},
{RGBColor[0.772079, 0.431554, 0.102387],
RectangleBox[{0, -1}, {2, 1}]}},
AspectRatio->1,
DefaultBaseStyle->"ColorSwatchGraphics",
Frame->True,
FrameStyle->RGBColor[
0.5147193333333333, 0.28770266666666666`, 0.06825800000000001],
FrameTicks->None,
ImageSize->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification]}],
PlotRangePadding->None],
StyleBox[
RowBox[{"RGBColor", "[",
RowBox[{"0.772079`", ",", "0.431554`", ",", "0.102387`"}], "]"}],
NumberMarks -> False]],
Appearance->None,
BaseStyle->{},
BaselinePosition->Baseline,
ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.772079, 0.431554, 0.102387];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
DefaultBaseStyle->{},
Evaluator->Automatic,
Method->"Preemptive"],
RGBColor[0.772079, 0.431554, 0.102387],
Editable->False,
Selectable->False], ",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{
{GrayLevel[0], RectangleBox[{0, 0}]},
{GrayLevel[0], RectangleBox[{1, -1}]},
{RGBColor[0.363898, 0.618501, 0.782349],
RectangleBox[{0, -1}, {2, 1}]}},
AspectRatio->1,
DefaultBaseStyle->"ColorSwatchGraphics",
Frame->True,
FrameStyle->RGBColor[0.24259866666666668`, 0.412334, 0.521566],
FrameTicks->None,
ImageSize->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification]}],
PlotRangePadding->None],
StyleBox[
RowBox[{"RGBColor", "[",
RowBox[{"0.363898`", ",", "0.618501`", ",", "0.782349`"}], "]"}],
NumberMarks -> False]],
Appearance->None,
BaseStyle->{},
BaselinePosition->Baseline,
ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.363898, 0.618501, 0.782349];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
DefaultBaseStyle->{},
Evaluator->Automatic,
Method->"Preemptive"],
RGBColor[0.363898, 0.618501, 0.782349],
Editable->False,
Selectable->False], ",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{
{GrayLevel[0], RectangleBox[{0, 0}]},
{GrayLevel[0], RectangleBox[{1, -1}]},
{RGBColor[1, 0.75, 0], RectangleBox[{0, -1}, {2, 1}]}},
AspectRatio->1,
DefaultBaseStyle->"ColorSwatchGraphics",
Frame->True,
FrameStyle->RGBColor[0.6666666666666666, 0.5, 0.],
FrameTicks->None,
ImageSize->
Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification]}],
PlotRangePadding->None],
StyleBox[
RowBox[{"RGBColor", "[",
RowBox[{"1", ",", "0.75`", ",", "0"}], "]"}], NumberMarks -> False]],
Appearance->None,
BaseStyle->{},
BaselinePosition->Baseline,
ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[1, 0.75, 0];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
DefaultBaseStyle->{},
Evaluator->Automatic,
Method->"Preemptive"],
RGBColor[1, 0.75, 0],
Editable->False,
Selectable->False], ",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{
{GrayLevel[0], RectangleBox[{0, 0}]},
{GrayLevel[0], RectangleBox[{1, -1}]},
{RGBColor[0.647624, 0.37816, 0.614037],
RectangleBox[{0, -1}, {2, 1}]}},
AspectRatio->1,
DefaultBaseStyle->"ColorSwatchGraphics",
Frame->True,
FrameStyle->RGBColor[
0.4317493333333333, 0.2521066666666667, 0.40935800000000006`],
FrameTicks->None,
ImageSize->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification]}],
PlotRangePadding->None],
StyleBox[
RowBox[{"RGBColor", "[",
RowBox[{"0.647624`", ",", "0.37816`", ",", "0.614037`"}], "]"}],
NumberMarks -> False]],
Appearance->None,
BaseStyle->{},
BaselinePosition->Baseline,
ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.647624, 0.37816, 0.614037];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
Left, Top},
"ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
DefaultBaseStyle->{},
Evaluator->Automatic,
Method->"Preemptive"],
RGBColor[0.647624, 0.37816, 0.614037],
Editable->False,
Selectable->False], ",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{
{GrayLevel[0], RectangleBox[{0, 0}]},
{GrayLevel[0], RectangleBox[{1, -1}]},
{RGBColor[0.571589, 0.586483, 0.], RectangleBox[{0, -1}, {2, 1}]}},
AspectRatio->1,
DefaultBaseStyle->"ColorSwatchGraphics",
Frame->True,
FrameStyle->RGBColor[0.38105933333333336`, 0.39098866666666665`, 0.],
FrameTicks->None,
ImageSize->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification]}],
PlotRangePadding->None],
StyleBox[
RowBox[{"RGBColor", "[",
RowBox[{"0.571589`", ",", "0.586483`", ",", "0.`"}], "]"}],
NumberMarks -> False]],
Appearance->None,
BaseStyle->{},
BaselinePosition->Baseline,
ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.571589, 0.586483, 0.];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
DefaultBaseStyle->{},
Evaluator->Automatic,
Method->"Preemptive"],
RGBColor[0.571589, 0.586483, 0.],
Editable->False,
Selectable->False], ",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{
{GrayLevel[0], RectangleBox[{0, 0}]},
{GrayLevel[0], RectangleBox[{1, -1}]},
{RGBColor[0.915, 0.3325, 0.2125], RectangleBox[{0, -1}, {2, 1}]}},
AspectRatio->1,
DefaultBaseStyle->"ColorSwatchGraphics",
Frame->True,
FrameStyle->RGBColor[
0.6100000000000001, 0.22166666666666668`, 0.14166666666666666`],
FrameTicks->None,
ImageSize->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification]}],
PlotRangePadding->None], StyleBox[
RowBox[{"RGBColor", "[",
RowBox[{"0.915`", ",", "0.3325`", ",", "0.2125`"}], "]"}],
NumberMarks -> False]],
Appearance->None,
BaseStyle->{},
BaselinePosition->Baseline,
ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.915, 0.3325, 0.2125];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
DefaultBaseStyle->{},
Evaluator->Automatic,
Method->"Preemptive"],
RGBColor[0.915, 0.3325, 0.2125],
Editable->False,
Selectable->False], ",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{
{GrayLevel[0], RectangleBox[{0, 0}]},
{GrayLevel[0], RectangleBox[{1, -1}]},
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85],
RectangleBox[{0, -1}, {2, 1}]}},
AspectRatio->1,
DefaultBaseStyle->"ColorSwatchGraphics",
Frame->True,
FrameStyle->RGBColor[
0.2672148173956843, 0.34800444289592275`, 0.5666666666666667],
FrameTicks->None,
ImageSize->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification]}],
PlotRangePadding->None],
StyleBox[
RowBox[{"RGBColor", "[",
RowBox[{
"0.40082222609352647`", ",", "0.5220066643438841`", ",", "0.85`"}],
"]"}], NumberMarks -> False]],
Appearance->None,
BaseStyle->{},
BaselinePosition->Baseline,
ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{},
Evaluator->Automatic,
Method->"Preemptive"],
RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85],
Editable->False,
Selectable->False], ",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{
{GrayLevel[0], RectangleBox[{0, 0}]},
{GrayLevel[0], RectangleBox[{1, -1}]},
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
RectangleBox[{0, -1}, {2, 1}]}},
AspectRatio->1,
DefaultBaseStyle->"ColorSwatchGraphics",
Frame->True,
FrameStyle->RGBColor[
0.6485525936249404, 0.4144296347913687, 0.048907997212660946`],
FrameTicks->None,
ImageSize->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification]}],
PlotRangePadding->None],
StyleBox[
RowBox[{"RGBColor", "[",
RowBox[{
"0.9728288904374106`", ",", "0.621644452187053`", ",",
"0.07336199581899142`"}], "]"}], NumberMarks -> False]],
Appearance->None,
BaseStyle->{},
BaselinePosition->Baseline,
ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
DefaultBaseStyle->{},
Evaluator->Automatic,
Method->"Preemptive"],
RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
Editable->False,
Selectable->False], ",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{
{GrayLevel[0], RectangleBox[{0, 0}]},
{GrayLevel[0], RectangleBox[{1, -1}]},
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369],
RectangleBox[{0, -1}, {2, 1}]}},
AspectRatio->1,
DefaultBaseStyle->"ColorSwatchGraphics",
Frame->True,
FrameStyle->RGBColor[
0.4911884484706007, 0.23866666666666667`, 0.3353511049170246],
FrameTicks->None,
ImageSize->
Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification]}],
PlotRangePadding->None],
StyleBox[
RowBox[{"RGBColor", "[",
RowBox[{
"0.736782672705901`", ",", "0.358`", ",", "0.5030266573755369`"}],
"]"}], NumberMarks -> False]],
Appearance->None,
BaseStyle->{},
BaselinePosition->Baseline,
ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.736782672705901, 0.358, 0.5030266573755369];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
DefaultBaseStyle->{},
Evaluator->Automatic,
Method->"Preemptive"],
RGBColor[0.736782672705901, 0.358, 0.5030266573755369],
Editable->False,
Selectable->False], ",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{
{GrayLevel[0], RectangleBox[{0, 0}]},
{GrayLevel[0], RectangleBox[{1, -1}]},
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965],
RectangleBox[{0, -1}, {2, 1}]}},
AspectRatio->1,
DefaultBaseStyle->"ColorSwatchGraphics",
Frame->True,
FrameStyle->RGBColor[
0.18684294025131137`, 0.4766666666666667, 0.2861392881649977],
FrameTicks->None,
ImageSize->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification]}],
PlotRangePadding->None],
StyleBox[
RowBox[{"RGBColor", "[",
RowBox[{
"0.28026441037696703`", ",", "0.715`", ",", "0.4292089322474965`"}],
"]"}], NumberMarks -> False]],
Appearance->None,
BaseStyle->{},
BaselinePosition->Baseline,
ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
DefaultBaseStyle->{},
Evaluator->Automatic,
Method->"Preemptive"],
RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965],
Editable->False,
Selectable->False]}], "}"}]], "Output",
CellChangeTimes->{{3.785048598454445*^9, 3.7850486121743803`*^9},
3.7850492534864817`*^9, 3.7850518797807217`*^9, 3.7851593453111877`*^9,
3.788525055881117*^9, 3.788588576142179*^9, 3.789016362482636*^9,
3.7891011551402693`*^9, 3.7971326144003468`*^9, 3.799112667826545*^9,
3.799113935678566*^9, 3.799119920100224*^9, 3.79912099675138*^9,
3.799121678020488*^9, 3.79912196315336*^9, 3.7991220841956873`*^9, {
3.799122272245305*^9, 3.799122300399253*^9}, 3.8000746708421507`*^9,
3.8000885291890907`*^9, 3.800088987611136*^9, {3.800089240452045*^9,
3.800089269881946*^9}, 3.800089321591539*^9, 3.800089431077919*^9,
3.800089495187615*^9, 3.800089595616612*^9, 3.800148380233251*^9,
3.800539327345366*^9, 3.800610134971425*^9, 3.800705385664913*^9,
3.80070556987372*^9, 3.800768504913447*^9, 3.800798370679039*^9,
3.8008772883571987`*^9, 3.801281244944542*^9, 3.801285594509903*^9,
3.801567580742796*^9, {3.801723018647998*^9, 3.801723046894418*^9},
3.801736561561638*^9, 3.801738393523629*^9, 3.801744291978118*^9,
3.8017504625330067`*^9, 3.801754015153778*^9, 3.801754114168932*^9,
3.8018007150796423`*^9, 3.8018040233399773`*^9, 3.801882349914794*^9,
3.8018951501756773`*^9, {3.80190087812988*^9, 3.8019008850418577`*^9},
3.8027749934963837`*^9, 3.802822111861991*^9, 3.802822177784028*^9,
3.802974119454093*^9, 3.802985540910746*^9, 3.802991534287614*^9,
3.80299169789133*^9, 3.802995712980872*^9, 3.802998621004304*^9,
3.803004776493167*^9, 3.8030248243986883`*^9, {3.803027734669106*^9,
3.803027746157736*^9}, 3.80303123767232*^9, 3.8030314573459587`*^9,
3.803039071527216*^9, 3.803040168243313*^9, 3.803042348792696*^9,
3.803047202634519*^9, 3.803047318039352*^9, 3.803049337205765*^9,
3.803050218295183*^9, 3.8031407359122887`*^9, 3.803142777903883*^9,
3.8031428831333933`*^9, 3.803143418528857*^9, 3.803143680384963*^9,
3.80314381143324*^9, 3.8031441896535187`*^9, 3.803144619053787*^9,
3.803144953474568*^9, 3.8031705446291447`*^9, 3.8031719084569063`*^9,
3.80317308767623*^9, 3.803174157533538*^9, 3.803174472943399*^9, {
3.803174519778084*^9, 3.8031745406380367`*^9}, 3.803174856094193*^9, {
3.8031751077989073`*^9, 3.8031751604569817`*^9}, 3.8031755280499563`*^9,
3.803179309918973*^9, 3.803180772496706*^9, {3.803243357184814*^9,
3.80324338022818*^9}, 3.803244182995006*^9, 3.803244261788183*^9,
3.803244359336584*^9},
CellLabel->
"Out[150]=",ExpressionUUID->"e722ba36-e4ad-49d5-8145-273a0949539f"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Other functions", "Subsection",
CellChangeTimes->{{3.8017505701278543`*^9,
3.801750573727201*^9}},ExpressionUUID->"44e4b7cd-d026-4079-8fd8-\
3f63cf14cfa7"],
Cell[BoxData[{
RowBox[{
RowBox[{
RowBox[{"Options", "[", "pdf", "]"}], "=",
RowBox[{"{",
RowBox[{"\"\<SNR\>\"", "\[Rule]", "1"}], "}"}]}], ";"}], "\n",
RowBox[{
RowBox[{"pdf", "[",
RowBox[{"ansatz_", ",", "data_", ",",
RowBox[{"tend_", "?", "NumericQ"}], ",",
RowBox[{"x_", "?",
RowBox[{"(",
RowBox[{ RowBox[{"VectorQ", "[",
RowBox[{"#", ",", "NumericQ"}], "]"}], "&"}], ")"}]}], ",",
RowBox[{"OptionsPattern", "[", "]"}]}], "]"}], ":=",
RowBox[{"Block", "[",
RowBox[{
RowBox[{"{",
RowBox[{
"ansl", ",", "cfit", ",", "cfitd", ",", "h1red", ",", "h2red", ",",
"norm1", ",", "norm2", ",", "myTable", ",", "snr", ",", "tmax"}], "}"}],
",", "\[IndentingNewLine]", "\n",
RowBox[{
RowBox[{"snr", "=",
RowBox[{"OptionValue", "[", "\"\<SNR\>\"", "]"}]}], ";", "\n",
"\[IndentingNewLine]",
RowBox[{"tmax", "=",
RowBox[{"data", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}]}], ";", "\n",
RowBox[{"ansl", "=", "ansatz"}], ";", "\[IndentingNewLine]",
RowBox[{"cfitd", "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{
RowBox[{"data", "[",
RowBox[{"[",
RowBox[{"All", ",", "1"}], "]"}], "]"}], ",",
RowBox[{"ansl", "/.",
RowBox[{"t", "->",
RowBox[{"data", "[",
RowBox[{"[",
RowBox[{"All", ",", "1"}], "]"}], "]"}]}]}]}], "}"}], "]"}]}],
";", "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"h1red", "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{"data", ",",
RowBox[{
RowBox[{"tmax", "<=",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "<=",
RowBox[{"tmax", "+", "tend"}]}], "&"}]}], "]"}], "[",
RowBox[{"[",
RowBox[{"All", ",", "2"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]",
RowBox[{"h2red", "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{"cfitd", ",",
RowBox[{
RowBox[{"tmax", "<=",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "<=",
RowBox[{"tmax", "+", "tend"}]}], "&"}]}], "]"}], "[",
RowBox[{"[",
RowBox[{"All", ",", "2"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]",
RowBox[{"norm1", "=",
RowBox[{"Total", "[",
RowBox[{
RowBox[{"(",
RowBox[{"Abs", "@", "h1red"}], ")"}], "^", "2"}], " ", "]"}]}], ";",
"\n",
RowBox[{"norm2", "=",
RowBox[{"Total", "[",
RowBox[{
RowBox[{"(",
RowBox[{"Abs", "@", "h2red"}], ")"}], "^", "2"}], " ", "]"}]}], ";",
"\n", "\n",
RowBox[{"myTable", "=",
RowBox[{"h1red", " ",
RowBox[{"Conjugate", "@", "h2red"}]}]}], ";", "\n",
RowBox[{ RowBox[{"-",
RowBox[{"snr", "^", "2"}]}],
RowBox[{"(",
RowBox[{"1", "-",
RowBox[{"(",
RowBox[{
RowBox[{"Re", "@",
RowBox[{"Total", "[", "myTable", "]"}]}], "/",
RowBox[{"Sqrt", "[",
RowBox[{"norm1", " ", "norm2"}], "]"}]}], ")"}]}], ")"}]}]}]}],
"]"}]}]}], "Code",
CellChangeTimes->{{3.777193638014988*^9, 3.7771937755781918`*^9},
3.777194208058053*^9, {3.7771943136764383`*^9, 3.777194320159019*^9}, {
3.777194706435961*^9, 3.77719471195916*^9}, 3.777194844196529*^9,
3.777194878365808*^9, {3.80175364495243*^9, 3.801753680033052*^9}, {
3.801753838001347*^9, 3.801753865156281*^9}, {3.801753993285178*^9,
3.801753994197847*^9}, {3.801754228905569*^9, 3.801754233024242*^9}, {
3.801754997079472*^9, 3.801755001571432*^9}, {3.801755848922812*^9,
3.8017558520508947`*^9}, {3.801800854608481*^9, 3.801800861689166*^9}, {
3.801803635098641*^9, 3.801803732376952*^9}, {3.80180382005339*^9,
3.8018038226174717`*^9}, {3.801803864490718*^9, 3.801803875455367*^9}, {
3.801803950318574*^9, 3.801804017270652*^9}},
CellLabel->
"In[154]:=",ExpressionUUID->"48958061-652d-46b3-9aca-2ec5e658ec2a"],
Cell[BoxData[{
RowBox[{
RowBox[{
RowBox[{"Options", "[", "pdfFit", "]"}], "=",
RowBox[{"{",
RowBox[{"\"\<SNR\>\"", "\[Rule]", "1"}], "}"}]}], ";"}], "\n",
RowBox[{
RowBox[{"pdfFit", "[",
RowBox[{"ansatz_", ",", "data_", ",",
RowBox[{"tend_", "?", "NumericQ"}], ",",
RowBox[{"x_", "?",
RowBox[{"(",
RowBox[{
RowBox[{"VectorQ", "[",
RowBox[{"#", ",", "NumericQ"}], "]"}], "&"}], ")"}]}], ",",
RowBox[{"OptionsPattern", "[", "]"}]}], "]"}], ":=",
RowBox[{"Block", "[",
RowBox[{
RowBox[{"{",
RowBox[{
"ansl", ",", "cfit", ",", "cfitd", ",", "h1red", ",", "h2red", ",",
"norm1", ",", "norm2", ",", "myTable", ",", "snr", ",", "tmax"}], "}"}],
",", "\[IndentingNewLine]", "\n",
RowBox[{
RowBox[{"snr", "=",
RowBox[{"OptionValue", "[", "\"\<SNR\>\"", "]"}]}], ";", "\n",
"\[IndentingNewLine]",
RowBox[{"tmax", "=",
RowBox[{"data", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}]}], ";", "\n",
RowBox[{"ansl", "=", "ansatz"}], ";", "\[IndentingNewLine]",
RowBox[{"cfitd", "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{
RowBox[{"data", "[",
RowBox[{"[",
RowBox[{"All", ",", "1"}], "]"}], "]"}], ",",
RowBox[{"ansl", "/.",
RowBox[{"t", "->",
RowBox[{"data", "[",
RowBox[{"[",
RowBox[{"All", ",", "1"}], "]"}], "]"}]}]}]}], "}"}], "]"}]}],
";", "\[IndentingNewLine]", RowBox[{"h1red", "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{"data", ",",
RowBox[{
RowBox[{"tmax", "<=",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "<=",
RowBox[{"tmax", "+", "tend"}]}], "&"}]}], "]"}], "[",
RowBox[{"[",
RowBox[{"All", ",", "2"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]",
RowBox[{"h2red", "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{"cfitd", ",",
RowBox[{
RowBox[{"tmax", "<=",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "<=",
RowBox[{"tmax", "+", "tend"}]}], "&"}]}], "]"}], "[",
RowBox[{"[",
RowBox[{"All", ",", "2"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]",
"\n",
RowBox[{"Total", "[",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Re", "[",
RowBox[{"h1red", "-", "h2red"}], "]"}], "^", "2"}], "+",
RowBox[{
RowBox[{"Im", "[",
RowBox[{"h1red", "-", "h2red"}], "]"}], "^", "2"}]}], ")"}],
"]"}]}]}], "\n", "]"}]}]}], "Code",
CellChangeTimes->{{3.777193638014988*^9, 3.7771937755781918`*^9},
3.777194208058053*^9, {3.7771943136764383`*^9, 3.777194320159019*^9}, {
3.777194706435961*^9, 3.77719471195916*^9}, 3.777194844196529*^9,
3.777194878365808*^9, {3.80175364495243*^9, 3.801753680033052*^9}, {
3.801753838001347*^9, 3.801753865156281*^9}, {3.801753993285178*^9,
3.801753994197847*^9}, {3.801754228905569*^9, 3.801754233024242*^9}, {
3.801754997079472*^9, 3.801755001571432*^9}, {3.801755848922812*^9,
3.8017558520508947`*^9}, {3.801800854608481*^9, 3.801800861689166*^9}, {
3.801803635098641*^9, 3.801803732376952*^9}, {3.80180382005339*^9,
3.8018038226174717`*^9}, {3.801803864490718*^9, 3.801803875455367*^9}, {
3.801803950318574*^9, 3.801804017270652*^9}, 3.8018087211731253`*^9, {
3.8018087834835567`*^9, 3.801808901759162*^9}},
CellLabel->
"In[156]:=",ExpressionUUID->"0204b879-5f51-44f5-8a4f-95cc490da72f"]
}, Closed]],
Cell[CellGroupData[{
Cell["Imports", "Subsection",
CellChangeTimes->{{3.7991159558445053`*^9,
3.799115957130929*^9}},ExpressionUUID->"8488942b-dc04-47e9-8ca6-\
119712f58bc1"],
Cell[CellGroupData[{
Cell["RDown data", "Subsubsection",
CellChangeTimes->{{3.801736631218856*^9,
3.8017366327690687`*^9}},ExpressionUUID->"f0a39a1f-5153-4be0-b03d-\
fd24806eca3d"],
Cell[BoxData[
RowBox[{"(*", " ",
RowBox[{
RowBox[{
RowBox[{
"The", " ", "QNM", " ", "spectrum", " ", "is", " ", "obtained", " ",
"from", " ", RowBox[{"https", ":"}]}], "//",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"pages", ".", "jh", ".", "edu"}], "/",
RowBox[{"~", "eberti2"}]}], "/", "ringdown"}], "/.", " ",
RowBox[{"Up", " ", "to", " ", "now"}]}]}], ",", " ",
RowBox[{
RowBox[{
"we", " ", "can", " ", "load", " ", "any", " ", "lmn", " ", "combination",
" ", "up", " ", "to", " ", "l"}], "=",
RowBox[{
RowBox[{"4", " ", "and", " ", "n"}], "=",
RowBox[{
RowBox[{
"7.", " ", "To", " ", "extend", " ", "the", " ", "l", " ", "number",
" ", "you", " ", "need", " ", "to", " ", "download", " ", "the", " ",
"l"}], ">",
RowBox[{"4", " ",
RowBox[{"files", "."}]}]}]}]}]}], " ", "*)"}]], "Input",
CellChangeTimes->{{3.801737163175469*^9, 3.801737257507339*^9}},
CellLabel->
"In[158]:=",ExpressionUUID->"7694c13e-a765-44ce-9adc-09e59459c3d2"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(*", " ",
RowBox[{
"Import", " ", "all", " ", "the", " ", "modes", " ", "you", " ", "want",
" ", "to", " ", "use"}], " ", "*)"}], "\n",
RowBox[{"modelist", "=",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "3"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "4"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "5"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "6"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "7"}], "}"}]}], "}"}]}]}]], "Code",
CellChangeTimes->{{3.799116007730418*^9, 3.7991160596093693`*^9}, {
3.80173672888538*^9, 3.801736729854124*^9}, {3.801737022977298*^9,
3.8017370304868717`*^9}, {3.801741821615449*^9, 3.801741825149316*^9}, {
3.8018891925929213`*^9, 3.801889199423003*^9}, {3.801906226368847*^9,
3.801906250821456*^9}},
CellLabel->
"In[159]:=",ExpressionUUID->"763f62ae-036b-47b4-86e4-d1b0e24fc92b"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "3"}], "}"}], ",", RowBox[{"{",
RowBox[{"2", ",", "2", ",", "4"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "5"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "6"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "7"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.801737030858226*^9, 3.801738395377088*^9, {3.801741822713435*^9,
3.801741825490649*^9}, 3.801744292163055*^9, 3.801750462612952*^9,
3.801754015269165*^9, 3.80175411432535*^9, 3.8018007152800283`*^9,
3.801804024324876*^9, 3.801882350073197*^9, 3.801889169966961*^9,
3.801889200128565*^9, 3.8018951503870993`*^9, 3.801900897849856*^9,
3.801906099558012*^9, 3.801906251101836*^9, 3.802774993616014*^9,
3.802822111946159*^9, 3.8028221779080067`*^9, 3.802974119527211*^9,
3.802985540979797*^9, 3.802991534367497*^9, 3.802991697970209*^9,
3.8029957130575657`*^9, 3.80299862108222*^9, 3.8030047766105747`*^9,
3.803024824508391*^9, {3.8030277347598267`*^9, 3.803027746268955*^9},
3.803031237742359*^9, 3.803031457420868*^9, 3.8030390716000757`*^9,
3.803040168317803*^9, 3.803042348867366*^9, 3.803047202810749*^9,
3.803047318172863*^9, 3.803049337282555*^9, 3.803050218367134*^9,
3.8031407359951277`*^9, 3.8031427779842873`*^9, 3.803142883218544*^9,
3.803143418613693*^9, 3.8031436804599533`*^9, 3.803143811512782*^9,
3.803144189736257*^9, 3.8031446191341763`*^9, 3.8031449535543547`*^9,
3.803170544705274*^9, 3.8031719085247707`*^9, 3.803173087742878*^9,
3.803174157601404*^9, 3.803174473010859*^9, {3.803174519898884*^9,
3.8031745407543497`*^9}, 3.8031748561972017`*^9, {3.803175107923873*^9,
3.803175160593433*^9}, 3.803175528134157*^9, 3.803179310026613*^9,
3.803180772623858*^9, {3.8032433573525333`*^9, 3.803243380326086*^9},
3.80324418313192*^9, 3.803244261876692*^9, 3.803244359420518*^9},
CellLabel->
"Out[159]=",ExpressionUUID->"29922d04-dbfe-4dda-bfa1-dfde2b64a223"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(*", " ",
RowBox[{
RowBox[{
RowBox[{"Files", " ", "for", " ", "the", " ",
RowBox[{"modes", ".", " ", "Note"}], " ", "that", " ", "in", " ",
"this", " ", "file", " ", "notation", " ", "the", " ", "fundamental",
" ", "tone", " ", "corresponds", " ", "to", " ", "n"}], "=",
RowBox[{"1.", " ", "However"}]}], ",", " ",
RowBox[{
RowBox[{
"for", " ", "the", " ", "code", " ", "notation", " ", "we", " ", "will",
" ", "always", " ", "use", " ", "n"}], "=", "0."}]}], " ", "*)"}],
"\n",
RowBox[{"Modefiles", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"modedir", "<>", "\"\<l\>\"", "<>",
RowBox[{"ToString", "[",
RowBox[{"modelist", "[",
RowBox[{"[",
RowBox[{"j", ",", "1"}], "]"}], "]"}], "]"}], "<>", "\"\</n\>\"", "<>",
RowBox[{"ToString", "[",
RowBox[{
RowBox[{"modelist", "[",
RowBox[{"[",
RowBox[{"j", ",", "3"}], "]"}], "]"}], "+", "1"}], "]"}], "<>",
"\"\<l\>\"", "<>",
RowBox[{"ToString", "[",
RowBox[{"modelist", "[",
RowBox[{"[",
RowBox[{"j", ",", "1"}], "]"}], "]"}], "]"}], "<>", "\"\<m\>\"", "<>", RowBox[{"ToString", "[",
RowBox[{"modelist", "[",
RowBox[{"[",
RowBox[{"j", ",", "2"}], "]"}], "]"}], "]"}], "<>", "\"\<.dat\>\""}],
",",
RowBox[{"{",
RowBox[{"j", ",",
RowBox[{"Length", "@", "modelist"}]}], "}"}]}], "]"}]}]}]], "Code",
CellChangeTimes->{{3.799116066718706*^9, 3.799116183969667*^9}, {
3.799116221329751*^9, 3.799116223632145*^9}, {3.7991162786627827`*^9,
3.799116285885654*^9}, {3.7991163534374104`*^9, 3.79911639784995*^9}, {
3.799116694401691*^9, 3.7991167077116737`*^9}, 3.8007687513426323`*^9, {
3.800768840870967*^9, 3.800768851624331*^9}, 3.801736580303645*^9, {
3.8017367250936527`*^9, 3.8017367258167553`*^9}, {3.801737036972227*^9,
3.8017371320562687`*^9}, {3.8017418292956*^9, 3.8017418338861313`*^9},
3.801741882215084*^9},
CellLabel->
"In[160]:=",ExpressionUUID->"37d6369f-02c3-4af4-91b6-0490e703d64a"],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"~/git/rdstackingproject/l2/n1l2m2.dat\"\>",
",", "\<\"~/git/rdstackingproject/l2/n2l2m2.dat\"\>",
",", "\<\"~/git/rdstackingproject/l2/n3l2m2.dat\"\>",
",", "\<\"~/git/rdstackingproject/l2/n4l2m2.dat\"\>",
",", "\<\"~/git/rdstackingproject/l2/n5l2m2.dat\"\>",
",", "\<\"~/git/rdstackingproject/l2/n6l2m2.dat\"\>",
",", "\<\"~/git/rdstackingproject/l2/n7l2m2.dat\"\>",
",", "\<\"~/git/rdstackingproject/l2/n8l2m2.dat\"\>"}], "}"}]], "Output",
CellChangeTimes->{
3.799116184826573*^9, 3.799116224061639*^9, 3.7991162873873873`*^9,
3.799116355402153*^9, 3.799116398123296*^9, {3.799116696222416*^9,
3.799116708064439*^9}, 3.799119929262824*^9, 3.799121680129674*^9,
3.7991219634626427`*^9, 3.799122084375304*^9, {3.799122272555999*^9,
3.799122300874164*^9}, 3.800074671099461*^9, 3.8000885294715147`*^9,
3.8000889878447647`*^9, {3.800089240559409*^9, 3.800089270099875*^9},
3.8000893217612467`*^9, 3.800089431239541*^9, 3.800089495352811*^9,
3.800089595851823*^9, 3.800148405206428*^9, 3.800539327493127*^9,
3.800610135108379*^9, 3.8007055994616632`*^9, 3.8007685050622683`*^9,
3.800768736245232*^9, {3.800768841340745*^9, 3.800768873828692*^9},
3.800798370835478*^9, 3.800877288561569*^9, 3.801281245216522*^9,
3.801285597638463*^9, 3.80156758216507*^9, {3.801723018844685*^9,
3.8017230487687283`*^9}, {3.801736575720043*^9, 3.801736580659892*^9},
3.80173673506961*^9, 3.801737031790604*^9, 3.8017371395428753`*^9,
3.801738396238654*^9, 3.801741884414989*^9, 3.801744292170224*^9,
3.801750462618342*^9, 3.801754015286237*^9, 3.801754114331324*^9,
3.801800715386989*^9, 3.8018040243921223`*^9, 3.8018823500782957`*^9, {
3.801889182274848*^9, 3.801889203976694*^9}, 3.801895150442212*^9,
3.801900897858267*^9, 3.801906099628516*^9, 3.8019062528095083`*^9,
3.802774993649888*^9, 3.8028221119860363`*^9, 3.802822177944425*^9,
3.802974119531364*^9, 3.80298554101731*^9, 3.802991534372079*^9,
3.802991697974724*^9, 3.802995713063457*^9, 3.802998621128954*^9,
3.8030047766593723`*^9, 3.803024824515061*^9, {3.80302773482434*^9,
3.803027746277156*^9}, 3.803031237782967*^9, 3.803031457427092*^9,
3.803039071606495*^9, 3.803040168364151*^9, 3.803042348874536*^9,
3.803047202817436*^9, 3.803047318187971*^9, 3.8030493373320217`*^9,
3.803050218406805*^9, 3.803140736033925*^9, 3.803142778027673*^9,
3.803142883267044*^9, 3.803143418666291*^9, 3.803143680464707*^9,
3.803143811517727*^9, 3.803144189781461*^9, 3.803144619139204*^9,
3.803144953598023*^9, 3.803170544710621*^9, 3.803171908530007*^9,
3.803173087748908*^9, 3.803174157606955*^9, 3.8031744730157633`*^9, {
3.803174519935198*^9, 3.803174540759903*^9}, 3.803174856224729*^9, {
3.8031751079308453`*^9, 3.803175160599259*^9}, 3.803175528171412*^9,
3.803179310052989*^9, 3.803180772629854*^9, {3.803243357408448*^9,
3.803243380332831*^9}, 3.803244183178369*^9, 3.803244261882021*^9,
3.803244359470606*^9},
CellLabel->
"Out[160]=",ExpressionUUID->"cb882560-a9a2-4038-af62-66d0283d1901"]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"(*", " ",
RowBox[{"Import", " ", "modes", " ", "data"}], " ", "*)"}], "\n",
RowBox[{
RowBox[{"Modedata", "=",
RowBox[{"Import", "/@", "Modefiles"}]}], ";"}]}]], "Code",
CellChangeTimes->{{3.799117127671782*^9, 3.799117133283991*^9}, {
3.801736719816572*^9, 3.801736720908989*^9}},
CellLabel->
"In[161]:=",ExpressionUUID->"827b1be5-400a-4c10-97cf-df0471536b52"]
}, Closed]],
Cell[CellGroupData[{
Cell["NR data + EOBFits", "Subsubsection",
CellChangeTimes->{{3.762592741285844*^9,
3.762592747256867*^9}},ExpressionUUID->"e69b91c9-6c5f-47bb-9540-\
07f42335cb1a"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"modes", "=",
RowBox[{"{",
RowBox[{"{",
RowBox[{"2", ",", "2"}], "}"}], "}"}]}]], "Code",
CellChangeTimes->{{3.71721646622243*^9, 3.717216472004093*^9}, {
3.7172238332578897`*^9, 3.7172238699527483`*^9}, {3.7172239989120007`*^9,
3.717223999908312*^9}, {3.717230827569207*^9, 3.7172308284476624`*^9}, {
3.717233966560224*^9, 3.717233966743574*^9}, 3.762057923479889*^9, {
3.762681745081925*^9, 3.7626817794296007`*^9}, {3.7991133898969717`*^9,
3.799113390253549*^9}, {3.799113545789241*^9, 3.799113608581436*^9},
3.8018995918649387`*^9, {3.8019009292101917`*^9, 3.8019009565374517`*^9}, {
3.80190121855807*^9, 3.8019012197457848`*^9}},
CellLabel->
"In[162]:=",ExpressionUUID->"b361f1b5-e01e-4264-bf04-6b665f472fd9"],
Cell[BoxData[
RowBox[{"{",
RowBox[{"{",
RowBox[{"2", ",", "2"}], "}"}], "}"}]], "Output",
CellChangeTimes->{{3.7172238612766*^9, 3.717223870939024*^9},
3.717224000107691*^9, 3.717230828736228*^9, 3.717233929169869*^9,
3.7172339670405207`*^9, 3.717234264957567*^9, 3.7173898088553953`*^9,
3.717397795928178*^9, 3.7174090874909067`*^9, 3.719042266653441*^9,
3.719725716094987*^9, 3.7204979816442013`*^9, 3.720601795601798*^9,
3.7620579265503798`*^9, 3.762171305194047*^9, 3.762185874430632*^9,
3.762230695496544*^9, 3.7625796880016623`*^9, 3.762602459472851*^9,
3.7626038253288*^9, {3.762681745570024*^9, 3.762681784730443*^9},
3.7643108351004267`*^9, 3.764392213490958*^9, 3.764406815613749*^9,
3.7644071500828*^9, 3.764416940095358*^9, 3.764471032983673*^9,
3.764502309669742*^9, 3.76451318465303*^9, 3.764567390742053*^9,
3.768568010349392*^9, 3.768572297815539*^9, 3.768645827003063*^9, {
3.768649825183477*^9, 3.768649837869774*^9}, 3.768701845001706*^9,
3.768706532972953*^9, 3.768882352986763*^9, 3.768909643770508*^9,
3.7691352413787107`*^9, 3.769137120092252*^9, 3.769138853253389*^9,
3.7691738608203077`*^9, 3.769228308058159*^9, 3.769488529403152*^9,
3.7694887741511297`*^9, 3.769754030511262*^9, 3.769849331321813*^9,
3.769927143176673*^9, 3.7699298467484093`*^9, {3.769934942968072*^9,
3.7699349540967703`*^9}, 3.770001458398054*^9, 3.770089588112008*^9,
3.7700911499652567`*^9, 3.770091211153775*^9, 3.770096723859185*^9,
3.770175902879304*^9, 3.770355811386429*^9, 3.770368573284638*^9,
3.770431012241467*^9, 3.770452812170587*^9, 3.7712189390391197`*^9,
3.7716732302402697`*^9, 3.7719070307003307`*^9, 3.771907438653419*^9,
3.771915621511821*^9, 3.772190839282982*^9, 3.7721965104057217`*^9,
3.772247855130703*^9, 3.772256628537322*^9, 3.772259081090678*^9,
3.772348454834467*^9, 3.772367800626193*^9, 3.7723708897053223`*^9,
3.77241999957555*^9, 3.772428158523457*^9, 3.7724306638823853`*^9,
3.7724404539315863`*^9, 3.772529270837591*^9, 3.77287591387982*^9, 3.772878049981765*^9, 3.772885185257471*^9, 3.772942819052163*^9,
3.772943402403473*^9, 3.772943541727195*^9, 3.772944053630115*^9,
3.772949568223918*^9, 3.772950462032238*^9, 3.7729505152950287`*^9,
3.7730492848622227`*^9, 3.7730496269622517`*^9, 3.773144075606292*^9,
3.773460623067893*^9, 3.773463998185182*^9, 3.773471311405634*^9,
3.7734788836585703`*^9, 3.77347963931531*^9, 3.773481967361264*^9,
3.773645277259672*^9, 3.77364680378931*^9, 3.773986244987804*^9,
3.776510085446184*^9, 3.7765790810668097`*^9, 3.776662520028639*^9, {
3.776668739189172*^9, 3.7766687414143867`*^9}, 3.7766699887032843`*^9,
3.77667547130352*^9, 3.776676365915367*^9, 3.776677554777287*^9,
3.7766781567455072`*^9, 3.776679727486134*^9, 3.7766797993092937`*^9,
3.776679922316041*^9, 3.7766814663166523`*^9, 3.776762885603821*^9,
3.777024814636004*^9, 3.777117695799756*^9, 3.777184967225831*^9,
3.777625642290798*^9, 3.7776907191949377`*^9, 3.777725375557233*^9,
3.777786888566283*^9, 3.777953025346758*^9, 3.777964327509592*^9,
3.778220763424073*^9, 3.778241132739333*^9, 3.778242215252248*^9,
3.7783898515967083`*^9, 3.7784896886312447`*^9, 3.77883439339159*^9,
3.77891303655623*^9, 3.778918648410945*^9, 3.7789996814424963`*^9,
3.779014946820965*^9, 3.779016358474268*^9, 3.779091498367682*^9,
3.7791090633146276`*^9, 3.7794380428020563`*^9, 3.7794390353822803`*^9,
3.779446129755233*^9, 3.779512776856132*^9, 3.7795447057568073`*^9,
3.7795459143084173`*^9, 3.7796202554136963`*^9, 3.779967327286769*^9,
3.78005038675193*^9, 3.780061151611998*^9, 3.780115034323454*^9,
3.780115441240199*^9, {3.780997648127914*^9, 3.78099766425393*^9},
3.7824639793355637`*^9, 3.78394716725804*^9, 3.785049266720189*^9,
3.785052848198894*^9, 3.785057075575471*^9, 3.785159356530836*^9,
3.788525065848336*^9, 3.788588588179237*^9, 3.789016374435004*^9,
3.7891011634419317`*^9, 3.797132624620028*^9, 3.797135025936468*^9,
3.7991133916199923`*^9, 3.799113509759405*^9, {3.7991135463122883`*^9,
3.799113551635894*^9}, {3.799113586080545*^9, 3.799113610336619*^9},
3.799113982242723*^9, 3.799119936454014*^9, 3.799121028438673*^9,
3.799121682590557*^9, 3.799121965014926*^9, 3.799122085602578*^9, {
3.7991222752168427`*^9, 3.799122302495413*^9}, 3.8000746749992437`*^9,
3.800088876294077*^9, 3.800148382767583*^9, {3.800539328605701*^9,
3.8005393463625402`*^9}, 3.800610204606415*^9, 3.800768510807893*^9,
3.800768557054263*^9, 3.8007983952296457`*^9, 3.800836721589457*^9,
3.801289306841797*^9, 3.801723120829804*^9, 3.8018052338776903`*^9,
3.80190122034149*^9, 3.802774994344469*^9, 3.802822113137856*^9,
3.802822178780727*^9, 3.802974120242939*^9, 3.802985541817307*^9,
3.802991535096045*^9, 3.802991698758319*^9, 3.802995713783215*^9,
3.802998621984621*^9, 3.8030047774662533`*^9, 3.803024825334455*^9, {
3.803027735603188*^9, 3.803027747051991*^9}, 3.803031238594043*^9,
3.8030314581395397`*^9, 3.803039072452335*^9, 3.803040169137971*^9,
3.8030423497333097`*^9, 3.8030472036976213`*^9, 3.803047319205106*^9,
3.803049338031096*^9, 3.803050219207312*^9, 3.803140736840889*^9,
3.803142778860331*^9, 3.803142884095355*^9, 3.8031434195761642`*^9,
3.803143681189969*^9, 3.803143812273635*^9, 3.80314419061642*^9,
3.803144620004303*^9, 3.8031449544306498`*^9, 3.803170545540455*^9,
3.80317190935156*^9, 3.803173088472886*^9, 3.803174158330347*^9,
3.803174473755177*^9, {3.803174520893209*^9, 3.803174541945051*^9},
3.803174857183283*^9, {3.803175108878263*^9, 3.803175161301313*^9},
3.8031755291468*^9, 3.803179310947185*^9, 3.803180773323905*^9, {
3.803243358204846*^9, 3.8032433811061363`*^9}, 3.803244184293667*^9,
3.8032442626852922`*^9, 3.803244360321047*^9},
CellLabel->
"Out[162]=",ExpressionUUID->"a51746de-d660-486f-8873-b084675ed06f"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"mysxscaserh", "=",
RowBox[{"Reverse", "[",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"FileNames", "[",
RowBox[{"\"\<*Lev6/rh*\>\"", ",", "mysxscase", ",", "2"}], "]"}], ",",
RowBox[{
RowBox[{"Not", "@",
RowBox[{"StringMatchQ", "[", RowBox[{"#", ",", "\"\<*raw*\>\""}], "]"}]}], "&"}]}], "]"}],
"]"}]}], "\[IndentingNewLine]",
RowBox[{"mysxscasemetafile", "=",
RowBox[{
RowBox[{"FileNames", "[",
RowBox[{"\"\<metadata.txt\>\"", ",", "mysxscase", ",", "2"}], "]"}], "[",
RowBox[{"[", "1", "]"}], "]"}]}], "\n",
RowBox[{
RowBox[{"metadata", "=",
RowBox[{"SXSMetaFilesToRules", "[", "mysxscasemetafile", "]"}]}],
";"}]}], "Code",
CellChangeTimes->{
3.71714565326084*^9, {3.717216492175115*^9, 3.71721650261952*^9}, {
3.717223876329924*^9, 3.717223876601008*^9}, {3.717233944513124*^9,
3.717233958472711*^9}, {3.77000148377827*^9, 3.770001483895461*^9}, {
3.770089594441771*^9, 3.7700896091594048`*^9}, {3.770091181515603*^9,
3.770091181662176*^9}, {3.770091214426573*^9, 3.770091214585648*^9}, {
3.770092858390904*^9, 3.770092858508835*^9}, {3.770096730341798*^9,
3.770096740949168*^9}, {3.772428168100793*^9, 3.772428170608094*^9}, {
3.772428408521916*^9, 3.7724284091136923`*^9}, {3.772430667886035*^9,
3.772430670003887*^9}, {3.772885188569561*^9, 3.772885188844552*^9}, {
3.77294957315034*^9, 3.772949625242341*^9}, {3.780998797734757*^9,
3.780998797920843*^9}, {3.7991136519052963`*^9, 3.799113707640517*^9}},
CellLabel->
"In[163]:=",ExpressionUUID->"5584846d-d985-4ced-98a1-ac35c86181ea"],
Cell[BoxData[
RowBox[{"{", \
"\<\"~/git/rdstackingproject/SXS/BBH_SKS_d14.3_q1.22_sA_0_0_0.330_sB_0_0_-0.\
440/Lev6/rhOverM_Asymptotic_GeometricUnits_CoM.h5\"\>", "}"}]], "Output",
CellChangeTimes->{{3.717216498380938*^9, 3.7172165029748363`*^9},
3.7172194183959084`*^9, 3.717219451757556*^9, 3.7172210443770657`*^9,
3.717221284233238*^9, 3.717223885556622*^9, 3.71723083183225*^9,
3.7172308731861277`*^9, {3.717233930309966*^9, 3.717233959115399*^9},
3.717234265666395*^9, 3.717389810564118*^9, 3.717397796938533*^9,
3.717409087835437*^9, 3.719042267675703*^9, 3.719725716500965*^9,
3.720497982239339*^9, 3.720601796148543*^9, 3.7620579313020773`*^9,
3.7621713078981047`*^9, 3.762185875336357*^9, 3.762230696430828*^9,
3.762579690340506*^9, 3.762579774070689*^9, 3.76260245990764*^9,
3.762603825455809*^9, 3.762681789861004*^9, 3.762681826567923*^9,
3.764310836001659*^9, 3.76439221450559*^9, 3.764406818443306*^9,
3.7644071506895514`*^9, 3.7644169407193203`*^9, 3.764471034222904*^9,
3.7645023104911823`*^9, 3.7645131854137583`*^9, 3.764567390841213*^9,
3.7685680107885113`*^9, 3.768572298355291*^9, 3.768645827647299*^9,
3.768649839712215*^9, 3.76870184589828*^9, 3.76870653364054*^9,
3.7688823539170313`*^9, 3.768909643980805*^9, 3.769135241869529*^9,
3.7691371202865047`*^9, 3.769138853846279*^9, 3.7691738611067*^9,
3.7692283084744673`*^9, 3.769488530350202*^9, 3.769488774949139*^9,
3.769754030864167*^9, 3.769849332079545*^9, 3.769927143513033*^9,
3.769929847048765*^9, 3.7699349547247353`*^9, {3.7700014592708473`*^9,
3.770001484137087*^9}, {3.770089589019122*^9, 3.770089614454945*^9},
3.770091150926076*^9, {3.7700911818740463`*^9, 3.770091214764297*^9},
3.770092858828313*^9, {3.770096724350412*^9, 3.770096741200189*^9},
3.770175903073946*^9, 3.770355811577338*^9, 3.770368573479495*^9,
3.77043101246592*^9, 3.770452812583289*^9, 3.771218939593539*^9,
3.771673231116873*^9, 3.771907031257121*^9, 3.771907438848817*^9,
3.771915621797638*^9, 3.77219083949329*^9, 3.77219651074804*^9,
3.7722478558236303`*^9, 3.772256628919487*^9, 3.7722590823521147`*^9,
3.772348455019628*^9, 3.772367801149004*^9, 3.7723708907016478`*^9, {
3.7724200004504337`*^9, 3.7724200042661133`*^9}, {3.7724281623433*^9,
3.7724281708790503`*^9}, 3.772428409531721*^9, {3.7724306652135067`*^9,
3.772430670282818*^9}, {3.772440455361487*^9, 3.772440460876882*^9},
3.772529271686309*^9, 3.772875914079034*^9, 3.772878050591577*^9,
3.772885194256702*^9, 3.7729428221831827`*^9, 3.772943402612479*^9,
3.772943541918996*^9, 3.77294405673494*^9, {3.772949569772958*^9,
3.7729496256799297`*^9}, 3.7729504628386717`*^9, 3.77295051555145*^9,
3.7730492856798477`*^9, {3.773049628186563*^9, 3.773049630622552*^9},
3.773144075790704*^9, 3.773460623262436*^9, 3.7734639987477903`*^9,
3.773471312015882*^9, 3.7734788840985126`*^9, 3.773479639599619*^9, 3.773481967713728*^9, 3.773645277444871*^9, 3.773646804195562*^9,
3.77398624805871*^9, 3.776510090600584*^9, 3.7765790822290382`*^9,
3.776662520362281*^9, 3.776668741495263*^9, 3.776669989208765*^9,
3.7766754714003077`*^9, 3.776676366016034*^9, 3.776677554881569*^9,
3.776678156846538*^9, 3.776679728131668*^9, 3.776679799421623*^9,
3.776679922424872*^9, 3.7766814664267282`*^9, 3.776762885737376*^9,
3.777024814804093*^9, 3.777117695893361*^9, 3.777184967307158*^9,
3.77762564240553*^9, 3.7776907196567163`*^9, 3.777725375935665*^9,
3.777786888657611*^9, 3.777953025450624*^9, 3.7779643276193657`*^9,
3.778220763522934*^9, 3.778241132862837*^9, 3.778242215351343*^9,
3.778389851692855*^9, 3.778489688754407*^9, 3.778834393505157*^9,
3.778913036673313*^9, 3.778918648505211*^9, 3.778999681983601*^9,
3.779014946982914*^9, 3.779016358626405*^9, 3.779091498506896*^9,
3.779109063467824*^9, 3.779438042912994*^9, 3.779439035500759*^9,
3.7794461298809433`*^9, 3.77951277696731*^9, 3.779544706262*^9,
3.7795459144103613`*^9, 3.7796202555125847`*^9, 3.779967327387167*^9,
3.780050387061942*^9, 3.780061151710363*^9, 3.780115034431876*^9,
3.7801154413407516`*^9, {3.78099764910747*^9, 3.7809976642917347`*^9},
3.780997931988578*^9, 3.7824639802216053`*^9, 3.783947167922887*^9,
3.785049267615994*^9, 3.785052848818983*^9, 3.785057076455508*^9,
3.785159356717268*^9, 3.7885250658656263`*^9, 3.788588588281761*^9,
3.789016374469722*^9, 3.789101163461742*^9, 3.797132624634801*^9,
3.79713502596594*^9, 3.799113592904676*^9, {3.7991136528442707`*^9,
3.799113708088469*^9}, 3.7991139845245934`*^9, 3.799119938366549*^9,
3.799121028590159*^9, 3.7991216828410063`*^9, 3.7991219650292177`*^9,
3.7991220856243143`*^9, {3.79912227538988*^9, 3.79912230259875*^9},
3.8000746751750097`*^9, 3.800088876448193*^9, 3.800148382940559*^9, {
3.8005393286214533`*^9, 3.800539348433199*^9}, 3.8006102046741123`*^9,
3.8007685109300833`*^9, 3.8007685576592083`*^9, 3.800798395327581*^9,
3.8008367217300673`*^9, 3.801289306918448*^9, 3.801723120900467*^9,
3.8018052341161327`*^9, 3.801901223143807*^9, 3.8027749944315*^9,
3.8028221131822157`*^9, 3.8028221787857018`*^9, 3.802974120289509*^9,
3.802985541823215*^9, 3.802991535132868*^9, 3.802991698765131*^9,
3.802995713828867*^9, 3.802998621994754*^9, 3.803004777472494*^9,
3.803024825381072*^9, {3.80302773566409*^9, 3.8030277470598288`*^9},
3.803031238641964*^9, 3.803031458182097*^9, 3.803039072499342*^9,
3.803040169145499*^9, 3.803042349740728*^9, 3.803047203705255*^9,
3.803047319222816*^9, 3.80304933807652*^9, 3.803050219215205*^9,
3.8031407368465014`*^9, 3.803142778864929*^9, 3.803142884102295*^9,
3.8031434195847187`*^9, 3.8031436812287617`*^9, 3.8031438122800283`*^9,
3.8031441906645107`*^9, 3.803144620010943*^9, 3.803144954475986*^9,
3.803170545547654*^9, 3.803171909356278*^9, 3.803173088496866*^9,
3.803174158354175*^9, 3.80317447378373*^9, {3.8031745209014063`*^9,
3.8031745419567423`*^9}, 3.8031748572135344`*^9, {3.803175108887377*^9,
3.803175161345769*^9}, 3.803175529155691*^9, 3.8031793109533052`*^9,
3.8031807733320103`*^9, {3.8032433582128687`*^9, 3.80324338111413*^9},
3.803244184302025*^9, 3.803244262739552*^9, 3.803244360328866*^9},
CellLabel->
"Out[163]=",ExpressionUUID->"0c70cb63-c331-46d1-878b-11319e4d7366"],
Cell[BoxData["\<\"~/git/rdstackingproject//SXS/BBH_SKS_d14.3_q1.22_sA_0_0_0.\
330_sB_0_0_-0.440/Lev6/metadata.txt\"\>"], "Output",
CellChangeTimes->{{3.717216498380938*^9, 3.7172165029748363`*^9},
3.7172194183959084`*^9, 3.717219451757556*^9, 3.7172210443770657`*^9,
3.717221284233238*^9, 3.717223885556622*^9, 3.71723083183225*^9,
3.7172308731861277`*^9, {3.717233930309966*^9, 3.717233959115399*^9},
3.717234265666395*^9, 3.717389810564118*^9, 3.717397796938533*^9,
3.717409087835437*^9, 3.719042267675703*^9, 3.719725716500965*^9,
3.720497982239339*^9, 3.720601796148543*^9, 3.7620579313020773`*^9,
3.7621713078981047`*^9, 3.762185875336357*^9, 3.762230696430828*^9,
3.762579690340506*^9, 3.762579774070689*^9, 3.76260245990764*^9,
3.762603825455809*^9, 3.762681789861004*^9, 3.762681826567923*^9,
3.764310836001659*^9, 3.76439221450559*^9, 3.764406818443306*^9,
3.7644071506895514`*^9, 3.7644169407193203`*^9, 3.764471034222904*^9,
3.7645023104911823`*^9, 3.7645131854137583`*^9, 3.764567390841213*^9,
3.7685680107885113`*^9, 3.768572298355291*^9, 3.768645827647299*^9,
3.768649839712215*^9, 3.76870184589828*^9, 3.76870653364054*^9,
3.7688823539170313`*^9, 3.768909643980805*^9, 3.769135241869529*^9,
3.7691371202865047`*^9, 3.769138853846279*^9, 3.7691738611067*^9,
3.7692283084744673`*^9, 3.769488530350202*^9, 3.769488774949139*^9, 3.769754030864167*^9, 3.769849332079545*^9, 3.769927143513033*^9,
3.769929847048765*^9, 3.7699349547247353`*^9, {3.7700014592708473`*^9,
3.770001484137087*^9}, {3.770089589019122*^9, 3.770089614454945*^9},
3.770091150926076*^9, {3.7700911818740463`*^9, 3.770091214764297*^9},
3.770092858828313*^9, {3.770096724350412*^9, 3.770096741200189*^9},
3.770175903073946*^9, 3.770355811577338*^9, 3.770368573479495*^9,
3.77043101246592*^9, 3.770452812583289*^9, 3.771218939593539*^9,
3.771673231116873*^9, 3.771907031257121*^9, 3.771907438848817*^9,
3.771915621797638*^9, 3.77219083949329*^9, 3.77219651074804*^9,
3.7722478558236303`*^9, 3.772256628919487*^9, 3.7722590823521147`*^9,
3.772348455019628*^9, 3.772367801149004*^9, 3.7723708907016478`*^9, {
3.7724200004504337`*^9, 3.7724200042661133`*^9}, {3.7724281623433*^9,
3.7724281708790503`*^9}, 3.772428409531721*^9, {3.7724306652135067`*^9,
3.772430670282818*^9}, {3.772440455361487*^9, 3.772440460876882*^9},
3.772529271686309*^9, 3.772875914079034*^9, 3.772878050591577*^9,
3.772885194256702*^9, 3.7729428221831827`*^9, 3.772943402612479*^9,
3.772943541918996*^9, 3.77294405673494*^9, {3.772949569772958*^9,
3.7729496256799297`*^9}, 3.7729504628386717`*^9, 3.77295051555145*^9,
3.7730492856798477`*^9, {3.773049628186563*^9, 3.773049630622552*^9},
3.773144075790704*^9, 3.773460623262436*^9, 3.7734639987477903`*^9,
3.773471312015882*^9, 3.7734788840985126`*^9, 3.773479639599619*^9,
3.773481967713728*^9, 3.773645277444871*^9, 3.773646804195562*^9,
3.77398624805871*^9, 3.776510090600584*^9, 3.7765790822290382`*^9,
3.776662520362281*^9, 3.776668741495263*^9, 3.776669989208765*^9,
3.7766754714003077`*^9, 3.776676366016034*^9, 3.776677554881569*^9,
3.776678156846538*^9, 3.776679728131668*^9, 3.776679799421623*^9,
3.776679922424872*^9, 3.7766814664267282`*^9, 3.776762885737376*^9,
3.777024814804093*^9, 3.777117695893361*^9, 3.777184967307158*^9,
3.77762564240553*^9, 3.7776907196567163`*^9, 3.777725375935665*^9,
3.777786888657611*^9, 3.777953025450624*^9, 3.7779643276193657`*^9,
3.778220763522934*^9, 3.778241132862837*^9, 3.778242215351343*^9,
3.778389851692855*^9, 3.778489688754407*^9, 3.778834393505157*^9,
3.778913036673313*^9, 3.778918648505211*^9, 3.778999681983601*^9,
3.779014946982914*^9, 3.779016358626405*^9, 3.779091498506896*^9,
3.779109063467824*^9, 3.779438042912994*^9, 3.779439035500759*^9,
3.7794461298809433`*^9, 3.77951277696731*^9, 3.779544706262*^9,
3.7795459144103613`*^9, 3.7796202555125847`*^9, 3.779967327387167*^9,
3.780050387061942*^9, 3.780061151710363*^9, 3.780115034431876*^9,
3.7801154413407516`*^9, {3.78099764910747*^9, 3.7809976642917347`*^9},
3.780997931988578*^9, 3.7824639802216053`*^9, 3.783947167922887*^9,
3.785049267615994*^9, 3.785052848818983*^9, 3.785057076455508*^9,
3.785159356717268*^9, 3.7885250658656263`*^9, 3.788588588281761*^9,
3.789016374469722*^9, 3.789101163461742*^9, 3.797132624634801*^9,
3.79713502596594*^9, 3.799113592904676*^9, {3.7991136528442707`*^9,
3.799113708088469*^9}, 3.7991139845245934`*^9, 3.799119938366549*^9,
3.799121028590159*^9, 3.7991216828410063`*^9, 3.7991219650292177`*^9,
3.7991220856243143`*^9, {3.79912227538988*^9, 3.79912230259875*^9},
3.8000746751750097`*^9, 3.800088876448193*^9, 3.800148382940559*^9, {
3.8005393286214533`*^9, 3.800539348433199*^9}, 3.8006102046741123`*^9,
3.8007685109300833`*^9, 3.8007685576592083`*^9, 3.800798395327581*^9,
3.8008367217300673`*^9, 3.801289306918448*^9, 3.801723120900467*^9,
3.8018052341161327`*^9, 3.801901223143807*^9, 3.8027749944315*^9,
3.8028221131822157`*^9, 3.8028221787857018`*^9, 3.802974120289509*^9,
3.802985541823215*^9, 3.802991535132868*^9, 3.802991698765131*^9,
3.802995713828867*^9, 3.802998621994754*^9, 3.803004777472494*^9,
3.803024825381072*^9, {3.80302773566409*^9, 3.8030277470598288`*^9},
3.803031238641964*^9, 3.803031458182097*^9, 3.803039072499342*^9,
3.803040169145499*^9, 3.803042349740728*^9, 3.803047203705255*^9,
3.803047319222816*^9, 3.80304933807652*^9, 3.803050219215205*^9,
3.8031407368465014`*^9, 3.803142778864929*^9, 3.803142884102295*^9,
3.8031434195847187`*^9, 3.8031436812287617`*^9, 3.8031438122800283`*^9,
3.8031441906645107`*^9, 3.803144620010943*^9, 3.803144954475986*^9,
3.803170545547654*^9, 3.803171909356278*^9, 3.803173088496866*^9,
3.803174158354175*^9, 3.80317447378373*^9, {3.8031745209014063`*^9,
3.8031745419567423`*^9}, 3.8031748572135344`*^9, {3.803175108887377*^9,
3.803175161345769*^9}, 3.803175529155691*^9, 3.8031793109533052`*^9,
3.8031807733320103`*^9, {3.8032433582128687`*^9, 3.80324338111413*^9},
3.803244184302025*^9, 3.803244262739552*^9, 3.803244360330673*^9},
CellLabel->
"Out[164]=",ExpressionUUID->"b5c965e9-7725-45cb-845e-6349350cc8d2"]}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"Print", "[",
RowBox[{"\"\<mass1 = \>\"", ",",
RowBox[{"mass1", "=",
RowBox[{
RowBox[{"(",
RowBox[{"\"\<initial-mass1\>\"", "/.", "metadata"}], ")"}], "[",
RowBox[{"[", "1", "]"}], "]"}]}]}], "]"}], "\[IndentingNewLine]",
RowBox[{"Print", "[",
RowBox[{"\"\<mass2 = \>\"", ",",
RowBox[{"mass2", "=",
RowBox[{
RowBox[{"(",
RowBox[{"\"\<initial-mass2\>\"", "/.", "metadata"}], ")"}], "[",
RowBox[{"[", "1", "]"}], "]"}]}]}], "]"}], "\[IndentingNewLine]",
RowBox[{"Print", "[",
RowBox[{"\"\<\[Chi]1 = \>\"", ",",
RowBox[{"\[Chi]1", "=",
RowBox[{"Chop", "[",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"\"\<initial-dimensionless-spin1\>\"", "/.", "metadata"}],
")"}], "[",
RowBox[{"[",
RowBox[{"-", "1"}], "]"}], "]"}], ")"}], "]"}]}]}],
"]"}], "\[IndentingNewLine]",
RowBox[{"Print", "[",
RowBox[{"\"\<\[Chi]2 = \>\"", ",",
RowBox[{"\[Chi]2", "=",
RowBox[{"Chop", "[",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"\"\<initial-dimensionless-spin2\>\"", "/.", "metadata"}],
")"}], "[",
RowBox[{"[",
RowBox[{"-", "1"}], "]"}], "]"}], ")"}], "]"}]}]}],
"]"}], "\[IndentingNewLine]",
RowBox[{"Print", "[",
RowBox[{"\"\<m1/m2 = \>\"", ",",
RowBox[{"q", "=",
RowBox[{"Max", "[",
RowBox[{"{",
RowBox[{
RowBox[{"mass1", "/", "mass2"}], ",", "1"}], "}"}], "]"}]}]}],
"]"}], "\[IndentingNewLine]",
RowBox[{"Print", "[",
RowBox[{"\"\<m1\[CenterDot]m2 = \>\"", ",",
RowBox[{"\[Eta]", "=",
RowBox[{
RowBox[{"q", "/",
RowBox[{
RowBox[{"(",
RowBox[{"1", "+", "q"}], ")"}], "^", "2"}]}], "*", "1."}]}]}],
"]"}], "\n",
RowBox[{"Print", "[",
RowBox[{"\"\<af = \>\"", ",",
RowBox[{"af", "=",
RowBox[{
RowBox[{"(",
RowBox[{"\"\<remnant-dimensionless-spin\>\"", "/.", "metadata"}], ")"}],
"[",
RowBox[{"[",
RowBox[{"-", "1"}], "]"}], "]"}]}]}], "]"}], "\n",
RowBox[{"Print", "[", RowBox[{"\"\<mf = \>\"", ",",
RowBox[{"mf", "=",
RowBox[{
RowBox[{"(",
RowBox[{"\"\<remnant-mass\>\"", "/.", "metadata"}], ")"}], "[",
RowBox[{"[", "1", "]"}], "]"}]}]}], "]"}], "\n",
RowBox[{"Print", "[",
RowBox[{"\"\<Tag = \>\"", ",",
RowBox[{"tag", "=",
RowBox[{
RowBox[{"(",
RowBox[{"\"\<alternative-names\>\"", "/.", "metadata"}], ")"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}]}], "]"}]}], "Code",
CellChangeTimes->{{3.7171458048227043`*^9, 3.7171458352702723`*^9}, {
3.71721654881397*^9, 3.717216557507278*^9}, {3.717223896217493*^9,
3.717223976111596*^9}, {3.762057934955058*^9, 3.762057944429266*^9}, {
3.762681836996138*^9, 3.762681839233232*^9}, {3.7626820639192266`*^9,
3.7626820648200083`*^9}, {3.7700014602000523`*^9, 3.770001460770048*^9}, {
3.770355810960787*^9, 3.77035581334439*^9}, {3.779514788245801*^9,
3.779514823386899*^9}, 3.779514858783835*^9, {3.78002425250508*^9,
3.7800242983466043`*^9}, {3.7800243862787457`*^9, 3.780024392075529*^9}, {
3.7850570816980143`*^9, 3.7850570936459417`*^9}, {3.7850571258554573`*^9,
3.785057158276864*^9}},
CellLabel->
"In[166]:=",ExpressionUUID->"6e14f11c-a2d0-4ce1-82ab-1a2a53c717dd"],
Cell[CellGroupData[{
Cell[BoxData[
InterpretationBox[
RowBox[{"\<\"mass1 = \"\>", "\[InvisibleSpace]", "0.5497953688701543`"}],
SequenceForm["mass1 = ", 0.5497953688701543],
Editable->False]], "Print",
CellChangeTimes->{{3.717223923734548*^9, 3.717223928214951*^9}, {
3.717223971239379*^9, 3.7172239766293097`*^9}, {3.717233931322109*^9,
3.7172339602600603`*^9}, 3.717234266025383*^9, 3.717389811826817*^9,
3.717397798635911*^9, 3.717409088225647*^9, 3.719042269449914*^9,
3.71972571685752*^9, 3.720497982809791*^9, 3.7206017968494253`*^9,
3.762057944992012*^9, 3.762171308612159*^9, 3.762185878959035*^9,
3.762230704000032*^9, 3.76257969223776*^9, 3.762579775163062*^9,
3.76260246063175*^9, 3.762603825586153*^9, {3.7626818315079517`*^9,
3.76268183964472*^9}, {3.762682055451223*^9, 3.762682065259396*^9},
3.764310838838461*^9, 3.76439221561644*^9, 3.764406820576201*^9,
3.7644071524893913`*^9, 3.764416941641247*^9, 3.764471035389357*^9,
3.764502311266172*^9, 3.76451318673353*^9, 3.764567390943874*^9,
3.768568011438259*^9, 3.768572299139023*^9, 3.768645828428453*^9,
3.7686498406439943`*^9, 3.7687018467692337`*^9, 3.7687065345918627`*^9,
3.768882355269024*^9, 3.76890964428026*^9, 3.769135242785296*^9,
3.769137120470574*^9, 3.769138854628717*^9, 3.769173861479599*^9,
3.769228309277001*^9, 3.769488536636314*^9, 3.769488775493741*^9,
3.7697540311309013`*^9, 3.7698493329786863`*^9, 3.769927143788989*^9,
3.7699298474833517`*^9, 3.7699349643369827`*^9, {3.7700014615163918`*^9,
3.770001486342461*^9}, 3.770089615045055*^9, 3.770091151999776*^9,
3.7700911832234373`*^9, 3.77009121560664*^9, 3.770092860611184*^9, {
3.770096733677506*^9, 3.770096743552308*^9}, 3.770175904771923*^9,
3.770355813747511*^9, 3.770368575883328*^9, 3.7704310126844397`*^9,
3.7704528133156967`*^9, 3.771218941512669*^9, 3.771673232190048*^9,
3.771907031907504*^9, 3.771907439029517*^9, 3.771915621974977*^9,
3.7721908396758137`*^9, 3.77219651143331*^9, 3.772247856888829*^9,
3.7722566296994762`*^9, 3.772259084152637*^9, 3.772348455386256*^9,
3.772367801749072*^9, 3.772370891811442*^9, {3.77242000146596*^9,
3.7724200050229883`*^9}, 3.7724281731485243`*^9, 3.772428410081149*^9,
3.772430677028174*^9, 3.772440462784586*^9, 3.772529273853674*^9,
3.7728759142457733`*^9, 3.7728780519980917`*^9, 3.772885195029847*^9,
3.772942823379051*^9, 3.7729434028029613`*^9, 3.772943543318931*^9,
3.7729440577300873`*^9, 3.772949628763401*^9, 3.772950463819756*^9,
3.772950515768664*^9, 3.773049286443142*^9, 3.7730496313722057`*^9,
3.773144076011161*^9, 3.773460624127591*^9, 3.7734639993643*^9,
3.7734713127079906`*^9, 3.773478884641347*^9, 3.773479639752248*^9,
3.7734819682595043`*^9, 3.773645277661384*^9, 3.773646804937044*^9, 3.773986250904626*^9, 3.7765100953056383`*^9, 3.776579083431468*^9,
3.776662521396657*^9, 3.7766687415984173`*^9, 3.776669989743709*^9,
3.7766754714989023`*^9, 3.7766763661356173`*^9, 3.776677554983851*^9,
3.776678156945221*^9, 3.776679730384227*^9, 3.7766797995218353`*^9,
3.776679922527975*^9, 3.776681466538108*^9, 3.776762885901209*^9,
3.7770248152256727`*^9, 3.77711769599905*^9, 3.7771849674192142`*^9,
3.77762564250346*^9, 3.777690720738963*^9, 3.7777253762606087`*^9,
3.777786888754923*^9, 3.777953025556863*^9, 3.777964327722644*^9,
3.778220763638605*^9, 3.778241133006884*^9, 3.77824221545049*^9,
3.778389851806761*^9, 3.778489688892495*^9, 3.778834393767021*^9,
3.778913036796289*^9, 3.7789186486061497`*^9, 3.778999683599246*^9,
3.779014947266182*^9, 3.779016358891302*^9, 3.779091498784801*^9,
3.779109063617063*^9, 3.77943804301024*^9, 3.7794390356224527`*^9,
3.779446129998694*^9, 3.779512777100968*^9, 3.779514823682631*^9,
3.779514859562222*^9, 3.779544709953924*^9, 3.7795459145467453`*^9,
3.779620255613166*^9, 3.779967327511076*^9, {3.780024275082299*^9,
3.7800242987111483`*^9}, {3.7800243789563026`*^9, 3.780024392712452*^9},
3.78005038726173*^9, 3.7800611518316393`*^9, 3.780115034568583*^9,
3.7801154414361067`*^9, {3.780997650057397*^9, 3.78099766439631*^9},
3.7824639813777742`*^9, 3.7839471685460453`*^9, 3.78504926862815*^9,
3.785052849502256*^9, 3.785057077348769*^9, {3.785057141637362*^9,
3.7850571599033833`*^9}, 3.785159356911799*^9, 3.7885250659535437`*^9,
3.7885885882949257`*^9, 3.789016374575654*^9, 3.7891011635298862`*^9,
3.797132624730732*^9, 3.7971350260463753`*^9, 3.799113710120328*^9,
3.7991139854914227`*^9, 3.799119939271639*^9, 3.799121028607518*^9,
3.79912168285885*^9, 3.799121965114169*^9, 3.7991220861947727`*^9, {
3.7991222754707747`*^9, 3.799122302610426*^9}, 3.800074675182968*^9,
3.8000888764634867`*^9, 3.8001483829496517`*^9, {3.800539328667665*^9,
3.80053935006597*^9}, 3.8006102047411127`*^9, 3.800768511041994*^9,
3.8007685584485817`*^9, 3.800798395343419*^9, 3.80083672174466*^9,
3.801289306970142*^9, 3.801723120960483*^9, 3.801805234128213*^9,
3.80190123947233*^9, 3.802774994703823*^9, 3.8028221131946907`*^9,
3.8028221788287077`*^9, 3.8029741203902283`*^9, 3.802985541831491*^9,
3.802991535192218*^9, 3.802991698809568*^9, 3.802995713889069*^9,
3.802998622048595*^9, 3.803004777526676*^9, 3.803024825393283*^9, {
3.803027735674712*^9, 3.803027747105722*^9}, 3.803031238747754*^9,
3.8030314582373343`*^9, 3.803039072510062*^9, 3.8030401691939697`*^9,
3.803042349750293*^9, 3.80304720375817*^9, 3.80304731930881*^9,
3.8030493381362247`*^9, 3.803050219223942*^9, 3.803140736891797*^9,
3.8031427789146833`*^9, 3.80314288415772*^9, 3.803143419647159*^9,
3.803143681280093*^9, 3.803143812330427*^9, 3.803144190678129*^9,
3.803144620020019*^9, 3.8031449544882383`*^9, 3.803170545587533*^9,
3.8031719093970213`*^9, 3.803173088541155*^9, 3.803174158361299*^9,
3.803174473791127*^9, {3.80317452091203*^9, 3.803174542003994*^9},
3.803174857222417*^9, {3.803175108930497*^9, 3.803175161356251*^9},
3.803175529200306*^9, 3.803179310988064*^9, 3.803180773375772*^9, {
3.803243358266247*^9, 3.803243381172014*^9}, 3.803244184346326*^9,
3.8032442627513533`*^9, 3.803244360390023*^9},
CellLabel->
"During evaluation of \
In[166]:=",ExpressionUUID->"7c574374-0482-4a49-bae6-e183e5943422"],
Cell[BoxData[
InterpretationBox[
RowBox[{"\<\"mass2 = \"\>", "\[InvisibleSpace]", "0.450204644189637`"}],
SequenceForm["mass2 = ", 0.450204644189637],
Editable->False]], "Print",
CellChangeTimes->{{3.717223923734548*^9, 3.717223928214951*^9}, {
3.717223971239379*^9, 3.7172239766293097`*^9}, {3.717233931322109*^9,
3.7172339602600603`*^9}, 3.717234266025383*^9, 3.717389811826817*^9,
3.717397798635911*^9, 3.717409088225647*^9, 3.719042269449914*^9,
3.71972571685752*^9, 3.720497982809791*^9, 3.7206017968494253`*^9,
3.762057944992012*^9, 3.762171308612159*^9, 3.762185878959035*^9,
3.762230704000032*^9, 3.76257969223776*^9, 3.762579775163062*^9,
3.76260246063175*^9, 3.762603825586153*^9, {3.7626818315079517`*^9,
3.76268183964472*^9}, {3.762682055451223*^9, 3.762682065259396*^9},
3.764310838838461*^9, 3.76439221561644*^9, 3.764406820576201*^9,
3.7644071524893913`*^9, 3.764416941641247*^9, 3.764471035389357*^9,
3.764502311266172*^9, 3.76451318673353*^9, 3.764567390943874*^9,
3.768568011438259*^9, 3.768572299139023*^9, 3.768645828428453*^9, 3.7686498406439943`*^9, 3.7687018467692337`*^9, 3.7687065345918627`*^9,
3.768882355269024*^9, 3.76890964428026*^9, 3.769135242785296*^9,
3.769137120470574*^9, 3.769138854628717*^9, 3.769173861479599*^9,
3.769228309277001*^9, 3.769488536636314*^9, 3.769488775493741*^9,
3.7697540311309013`*^9, 3.7698493329786863`*^9, 3.769927143788989*^9,
3.7699298474833517`*^9, 3.7699349643369827`*^9, {3.7700014615163918`*^9,
3.770001486342461*^9}, 3.770089615045055*^9, 3.770091151999776*^9,
3.7700911832234373`*^9, 3.77009121560664*^9, 3.770092860611184*^9, {
3.770096733677506*^9, 3.770096743552308*^9}, 3.770175904771923*^9,
3.770355813747511*^9, 3.770368575883328*^9, 3.7704310126844397`*^9,
3.7704528133156967`*^9, 3.771218941512669*^9, 3.771673232190048*^9,
3.771907031907504*^9, 3.771907439029517*^9, 3.771915621974977*^9,
3.7721908396758137`*^9, 3.77219651143331*^9, 3.772247856888829*^9,
3.7722566296994762`*^9, 3.772259084152637*^9, 3.772348455386256*^9,
3.772367801749072*^9, 3.772370891811442*^9, {3.77242000146596*^9,
3.7724200050229883`*^9}, 3.7724281731485243`*^9, 3.772428410081149*^9,
3.772430677028174*^9, 3.772440462784586*^9, 3.772529273853674*^9,
3.7728759142457733`*^9, 3.7728780519980917`*^9, 3.772885195029847*^9,
3.772942823379051*^9, 3.7729434028029613`*^9, 3.772943543318931*^9,
3.7729440577300873`*^9, 3.772949628763401*^9, 3.772950463819756*^9,
3.772950515768664*^9, 3.773049286443142*^9, 3.7730496313722057`*^9,
3.773144076011161*^9, 3.773460624127591*^9, 3.7734639993643*^9,
3.7734713127079906`*^9, 3.773478884641347*^9, 3.773479639752248*^9,
3.7734819682595043`*^9, 3.773645277661384*^9, 3.773646804937044*^9,
3.773986250904626*^9, 3.7765100953056383`*^9, 3.776579083431468*^9,
3.776662521396657*^9, 3.7766687415984173`*^9, 3.776669989743709*^9,
3.7766754714989023`*^9, 3.7766763661356173`*^9, 3.776677554983851*^9,
3.776678156945221*^9, 3.776679730384227*^9, 3.7766797995218353`*^9,
3.776679922527975*^9, 3.776681466538108*^9, 3.776762885901209*^9,
3.7770248152256727`*^9, 3.77711769599905*^9, 3.7771849674192142`*^9,
3.77762564250346*^9, 3.777690720738963*^9, 3.7777253762606087`*^9,
3.777786888754923*^9, 3.777953025556863*^9, 3.777964327722644*^9,
3.778220763638605*^9, 3.778241133006884*^9, 3.77824221545049*^9,
3.778389851806761*^9, 3.778489688892495*^9, 3.778834393767021*^9,
3.778913036796289*^9, 3.7789186486061497`*^9, 3.778999683599246*^9,
3.779014947266182*^9, 3.779016358891302*^9, 3.779091498784801*^9,
3.779109063617063*^9, 3.77943804301024*^9, 3.7794390356224527`*^9,
3.779446129998694*^9, 3.779512777100968*^9, 3.779514823682631*^9,
3.779514859562222*^9, 3.779544709953924*^9, 3.7795459145467453`*^9,
3.779620255613166*^9, 3.779967327511076*^9, {3.780024275082299*^9,
3.7800242987111483`*^9}, {3.7800243789563026`*^9, 3.780024392712452*^9},
3.78005038726173*^9, 3.7800611518316393`*^9, 3.780115034568583*^9,
3.7801154414361067`*^9, {3.780997650057397*^9, 3.78099766439631*^9},
3.7824639813777742`*^9, 3.7839471685460453`*^9, 3.78504926862815*^9,
3.785052849502256*^9, 3.785057077348769*^9, {3.785057141637362*^9,
3.7850571599033833`*^9}, 3.785159356911799*^9, 3.7885250659535437`*^9,
3.7885885882949257`*^9, 3.789016374575654*^9, 3.7891011635298862`*^9,
3.797132624730732*^9, 3.7971350260463753`*^9, 3.799113710120328*^9,
3.7991139854914227`*^9, 3.799119939271639*^9, 3.799121028607518*^9,
3.79912168285885*^9, 3.799121965114169*^9, 3.7991220861947727`*^9, {
3.7991222754707747`*^9, 3.799122302610426*^9}, 3.800074675182968*^9,
3.8000888764634867`*^9, 3.8001483829496517`*^9, {3.800539328667665*^9,
3.80053935006597*^9}, 3.8006102047411127`*^9, 3.800768511041994*^9,
3.8007685584485817`*^9, 3.800798395343419*^9, 3.80083672174466*^9,
3.801289306970142*^9, 3.801723120960483*^9, 3.801805234128213*^9,
3.80190123947233*^9, 3.802774994703823*^9, 3.8028221131946907`*^9,
3.8028221788287077`*^9, 3.8029741203902283`*^9, 3.802985541831491*^9,
3.802991535192218*^9, 3.802991698809568*^9, 3.802995713889069*^9,
3.802998622048595*^9, 3.803004777526676*^9, 3.803024825393283*^9, {
3.803027735674712*^9, 3.803027747105722*^9}, 3.803031238747754*^9,
3.8030314582373343`*^9, 3.803039072510062*^9, 3.8030401691939697`*^9,
3.803042349750293*^9, 3.80304720375817*^9, 3.80304731930881*^9,
3.8030493381362247`*^9, 3.803050219223942*^9, 3.803140736891797*^9,
3.8031427789146833`*^9, 3.80314288415772*^9, 3.803143419647159*^9,
3.803143681280093*^9, 3.803143812330427*^9, 3.803144190678129*^9,
3.803144620020019*^9, 3.8031449544882383`*^9, 3.803170545587533*^9,
3.8031719093970213`*^9, 3.803173088541155*^9, 3.803174158361299*^9,
3.803174473791127*^9, {3.80317452091203*^9, 3.803174542003994*^9},
3.803174857222417*^9, {3.803175108930497*^9, 3.803175161356251*^9},
3.803175529200306*^9, 3.803179310988064*^9, 3.803180773375772*^9, { 3.803243358266247*^9, 3.803243381172014*^9}, 3.803244184346326*^9,
3.8032442627513533`*^9, 3.803244360392899*^9},
CellLabel->
"During evaluation of \
In[166]:=",ExpressionUUID->"a19a03f8-bb27-4aaa-b5a8-5186d36cac13"],
Cell[BoxData[
InterpretationBox[
RowBox[{"\<\"\[Chi]1 = \"\>", "\[InvisibleSpace]", "0.330000004123`"}],
SequenceForm["\[Chi]1 = ", 0.330000004123],
Editable->False]], "Print",
CellChangeTimes->{{3.717223923734548*^9, 3.717223928214951*^9}, {
3.717223971239379*^9, 3.7172239766293097`*^9}, {3.717233931322109*^9,
3.7172339602600603`*^9}, 3.717234266025383*^9, 3.717389811826817*^9,
3.717397798635911*^9, 3.717409088225647*^9, 3.719042269449914*^9,
3.71972571685752*^9, 3.720497982809791*^9, 3.7206017968494253`*^9,
3.762057944992012*^9, 3.762171308612159*^9, 3.762185878959035*^9,
3.762230704000032*^9, 3.76257969223776*^9, 3.762579775163062*^9,
3.76260246063175*^9, 3.762603825586153*^9, {3.7626818315079517`*^9,
3.76268183964472*^9}, {3.762682055451223*^9, 3.762682065259396*^9},
3.764310838838461*^9, 3.76439221561644*^9, 3.764406820576201*^9,
3.7644071524893913`*^9, 3.764416941641247*^9, 3.764471035389357*^9,
3.764502311266172*^9, 3.76451318673353*^9, 3.764567390943874*^9,
3.768568011438259*^9, 3.768572299139023*^9, 3.768645828428453*^9,
3.7686498406439943`*^9, 3.7687018467692337`*^9, 3.7687065345918627`*^9,
3.768882355269024*^9, 3.76890964428026*^9, 3.769135242785296*^9,
3.769137120470574*^9, 3.769138854628717*^9, 3.769173861479599*^9,
3.769228309277001*^9, 3.769488536636314*^9, 3.769488775493741*^9,
3.7697540311309013`*^9, 3.7698493329786863`*^9, 3.769927143788989*^9,
3.7699298474833517`*^9, 3.7699349643369827`*^9, {3.7700014615163918`*^9,
3.770001486342461*^9}, 3.770089615045055*^9, 3.770091151999776*^9,
3.7700911832234373`*^9, 3.77009121560664*^9, 3.770092860611184*^9, {
3.770096733677506*^9, 3.770096743552308*^9}, 3.770175904771923*^9,
3.770355813747511*^9, 3.770368575883328*^9, 3.7704310126844397`*^9,
3.7704528133156967`*^9, 3.771218941512669*^9, 3.771673232190048*^9,
3.771907031907504*^9, 3.771907439029517*^9, 3.771915621974977*^9,
3.7721908396758137`*^9, 3.77219651143331*^9, 3.772247856888829*^9,
3.7722566296994762`*^9, 3.772259084152637*^9, 3.772348455386256*^9,
3.772367801749072*^9, 3.772370891811442*^9, {3.77242000146596*^9,
3.7724200050229883`*^9}, 3.7724281731485243`*^9, 3.772428410081149*^9,
3.772430677028174*^9, 3.772440462784586*^9, 3.772529273853674*^9,
3.7728759142457733`*^9, 3.7728780519980917`*^9, 3.772885195029847*^9,
3.772942823379051*^9, 3.7729434028029613`*^9, 3.772943543318931*^9,
3.7729440577300873`*^9, 3.772949628763401*^9, 3.772950463819756*^9,
3.772950515768664*^9, 3.773049286443142*^9, 3.7730496313722057`*^9,
3.773144076011161*^9, 3.773460624127591*^9, 3.7734639993643*^9,
3.7734713127079906`*^9, 3.773478884641347*^9, 3.773479639752248*^9,
3.7734819682595043`*^9, 3.773645277661384*^9, 3.773646804937044*^9,
3.773986250904626*^9, 3.7765100953056383`*^9, 3.776579083431468*^9,
3.776662521396657*^9, 3.7766687415984173`*^9, 3.776669989743709*^9,
3.7766754714989023`*^9, 3.7766763661356173`*^9, 3.776677554983851*^9,
3.776678156945221*^9, 3.776679730384227*^9, 3.7766797995218353`*^9,
3.776679922527975*^9, 3.776681466538108*^9, 3.776762885901209*^9,
3.7770248152256727`*^9, 3.77711769599905*^9, 3.7771849674192142`*^9,
3.77762564250346*^9, 3.777690720738963*^9, 3.7777253762606087`*^9,
3.777786888754923*^9, 3.777953025556863*^9, 3.777964327722644*^9,
3.778220763638605*^9, 3.778241133006884*^9, 3.77824221545049*^9,
3.778389851806761*^9, 3.778489688892495*^9, 3.778834393767021*^9,
3.778913036796289*^9, 3.7789186486061497`*^9, 3.778999683599246*^9,
3.779014947266182*^9, 3.779016358891302*^9, 3.779091498784801*^9,
3.779109063617063*^9, 3.77943804301024*^9, 3.7794390356224527`*^9,
3.779446129998694*^9, 3.779512777100968*^9, 3.779514823682631*^9,
3.779514859562222*^9, 3.779544709953924*^9, 3.7795459145467453`*^9,
3.779620255613166*^9, 3.779967327511076*^9, {3.780024275082299*^9,
3.7800242987111483`*^9}, {3.7800243789563026`*^9, 3.780024392712452*^9},
3.78005038726173*^9, 3.7800611518316393`*^9, 3.780115034568583*^9,
3.7801154414361067`*^9, {3.780997650057397*^9, 3.78099766439631*^9},
3.7824639813777742`*^9, 3.7839471685460453`*^9, 3.78504926862815*^9,
3.785052849502256*^9, 3.785057077348769*^9, {3.785057141637362*^9,
3.7850571599033833`*^9}, 3.785159356911799*^9, 3.7885250659535437`*^9, 3.7885885882949257`*^9, 3.789016374575654*^9, 3.7891011635298862`*^9,
3.797132624730732*^9, 3.7971350260463753`*^9, 3.799113710120328*^9,
3.7991139854914227`*^9, 3.799119939271639*^9, 3.799121028607518*^9,
3.79912168285885*^9, 3.799121965114169*^9, 3.7991220861947727`*^9, {
3.7991222754707747`*^9, 3.799122302610426*^9}, 3.800074675182968*^9,
3.8000888764634867`*^9, 3.8001483829496517`*^9, {3.800539328667665*^9,
3.80053935006597*^9}, 3.8006102047411127`*^9, 3.800768511041994*^9,
3.8007685584485817`*^9, 3.800798395343419*^9, 3.80083672174466*^9,
3.801289306970142*^9, 3.801723120960483*^9, 3.801805234128213*^9,
3.80190123947233*^9, 3.802774994703823*^9, 3.8028221131946907`*^9,
3.8028221788287077`*^9, 3.8029741203902283`*^9, 3.802985541831491*^9,
3.802991535192218*^9, 3.802991698809568*^9, 3.802995713889069*^9,
3.802998622048595*^9, 3.803004777526676*^9, 3.803024825393283*^9, {
3.803027735674712*^9, 3.803027747105722*^9}, 3.803031238747754*^9,
3.8030314582373343`*^9, 3.803039072510062*^9, 3.8030401691939697`*^9,
3.803042349750293*^9, 3.80304720375817*^9, 3.80304731930881*^9,
3.8030493381362247`*^9, 3.803050219223942*^9, 3.803140736891797*^9,
3.8031427789146833`*^9, 3.80314288415772*^9, 3.803143419647159*^9,
3.803143681280093*^9, 3.803143812330427*^9, 3.803144190678129*^9,
3.803144620020019*^9, 3.8031449544882383`*^9, 3.803170545587533*^9,
3.8031719093970213`*^9, 3.803173088541155*^9, 3.803174158361299*^9,
3.803174473791127*^9, {3.80317452091203*^9, 3.803174542003994*^9},
3.803174857222417*^9, {3.803175108930497*^9, 3.803175161356251*^9},
3.803175529200306*^9, 3.803179310988064*^9, 3.803180773375772*^9, {
3.803243358266247*^9, 3.803243381172014*^9}, 3.803244184346326*^9,
3.8032442627513533`*^9, 3.8032443603980494`*^9},
CellLabel->
"During evaluation of \
In[166]:=",ExpressionUUID->"fce784a6-2a91-43a8-986b-7bffc5d3760a"],
Cell[BoxData[
InterpretationBox[
RowBox[{"\<\"\[Chi]2 = \"\>", "\[InvisibleSpace]",
RowBox[{"-", "0.440000004931`"}]}],
SequenceForm["\[Chi]2 = ", -0.440000004931],
Editable->False]], "Print",
CellChangeTimes->{{3.717223923734548*^9, 3.717223928214951*^9}, {
3.717223971239379*^9, 3.7172239766293097`*^9}, {3.717233931322109*^9,
3.7172339602600603`*^9}, 3.717234266025383*^9, 3.717389811826817*^9,
3.717397798635911*^9, 3.717409088225647*^9, 3.719042269449914*^9,
3.71972571685752*^9, 3.720497982809791*^9, 3.7206017968494253`*^9,
3.762057944992012*^9, 3.762171308612159*^9, 3.762185878959035*^9,
3.762230704000032*^9, 3.76257969223776*^9, 3.762579775163062*^9,
3.76260246063175*^9, 3.762603825586153*^9, {3.7626818315079517`*^9,
3.76268183964472*^9}, {3.762682055451223*^9, 3.762682065259396*^9},
3.764310838838461*^9, 3.76439221561644*^9, 3.764406820576201*^9,
3.7644071524893913`*^9, 3.764416941641247*^9, 3.764471035389357*^9,
3.764502311266172*^9, 3.76451318673353*^9, 3.764567390943874*^9,
3.768568011438259*^9, 3.768572299139023*^9, 3.768645828428453*^9,
3.7686498406439943`*^9, 3.7687018467692337`*^9, 3.7687065345918627`*^9,
3.768882355269024*^9, 3.76890964428026*^9, 3.769135242785296*^9,
3.769137120470574*^9, 3.769138854628717*^9, 3.769173861479599*^9,
3.769228309277001*^9, 3.769488536636314*^9, 3.769488775493741*^9,
3.7697540311309013`*^9, 3.7698493329786863`*^9, 3.769927143788989*^9,
3.7699298474833517`*^9, 3.7699349643369827`*^9, {3.7700014615163918`*^9,
3.770001486342461*^9}, 3.770089615045055*^9, 3.770091151999776*^9,
3.7700911832234373`*^9, 3.77009121560664*^9, 3.770092860611184*^9, {
3.770096733677506*^9, 3.770096743552308*^9}, 3.770175904771923*^9,
3.770355813747511*^9, 3.770368575883328*^9, 3.7704310126844397`*^9,
3.7704528133156967`*^9, 3.771218941512669*^9, 3.771673232190048*^9,
3.771907031907504*^9, 3.771907439029517*^9, 3.771915621974977*^9,
3.7721908396758137`*^9, 3.77219651143331*^9, 3.772247856888829*^9,
3.7722566296994762`*^9, 3.772259084152637*^9, 3.772348455386256*^9,
3.772367801749072*^9, 3.772370891811442*^9, {3.77242000146596*^9,
3.7724200050229883`*^9}, 3.7724281731485243`*^9, 3.772428410081149*^9,
3.772430677028174*^9, 3.772440462784586*^9, 3.772529273853674*^9,
3.7728759142457733`*^9, 3.7728780519980917`*^9, 3.772885195029847*^9,
3.772942823379051*^9, 3.7729434028029613`*^9, 3.772943543318931*^9,
3.7729440577300873`*^9, 3.772949628763401*^9, 3.772950463819756*^9,
3.772950515768664*^9, 3.773049286443142*^9, 3.7730496313722057`*^9, 3.773144076011161*^9, 3.773460624127591*^9, 3.7734639993643*^9,
3.7734713127079906`*^9, 3.773478884641347*^9, 3.773479639752248*^9,
3.7734819682595043`*^9, 3.773645277661384*^9, 3.773646804937044*^9,
3.773986250904626*^9, 3.7765100953056383`*^9, 3.776579083431468*^9,
3.776662521396657*^9, 3.7766687415984173`*^9, 3.776669989743709*^9,
3.7766754714989023`*^9, 3.7766763661356173`*^9, 3.776677554983851*^9,
3.776678156945221*^9, 3.776679730384227*^9, 3.7766797995218353`*^9,
3.776679922527975*^9, 3.776681466538108*^9, 3.776762885901209*^9,
3.7770248152256727`*^9, 3.77711769599905*^9, 3.7771849674192142`*^9,
3.77762564250346*^9, 3.777690720738963*^9, 3.7777253762606087`*^9,
3.777786888754923*^9, 3.777953025556863*^9, 3.777964327722644*^9,
3.778220763638605*^9, 3.778241133006884*^9, 3.77824221545049*^9,
3.778389851806761*^9, 3.778489688892495*^9, 3.778834393767021*^9,
3.778913036796289*^9, 3.7789186486061497`*^9, 3.778999683599246*^9,
3.779014947266182*^9, 3.779016358891302*^9, 3.779091498784801*^9,
3.779109063617063*^9, 3.77943804301024*^9, 3.7794390356224527`*^9,
3.779446129998694*^9, 3.779512777100968*^9, 3.779514823682631*^9,
3.779514859562222*^9, 3.779544709953924*^9, 3.7795459145467453`*^9,
3.779620255613166*^9, 3.779967327511076*^9, {3.780024275082299*^9,
3.7800242987111483`*^9}, {3.7800243789563026`*^9, 3.780024392712452*^9},
3.78005038726173*^9, 3.7800611518316393`*^9, 3.780115034568583*^9,
3.7801154414361067`*^9, {3.780997650057397*^9, 3.78099766439631*^9},
3.7824639813777742`*^9, 3.7839471685460453`*^9, 3.78504926862815*^9,
3.785052849502256*^9, 3.785057077348769*^9, {3.785057141637362*^9,
3.7850571599033833`*^9}, 3.785159356911799*^9, 3.7885250659535437`*^9,
3.7885885882949257`*^9, 3.789016374575654*^9, 3.7891011635298862`*^9,
3.797132624730732*^9, 3.7971350260463753`*^9, 3.799113710120328*^9,
3.7991139854914227`*^9, 3.799119939271639*^9, 3.799121028607518*^9,
3.79912168285885*^9, 3.799121965114169*^9, 3.7991220861947727`*^9, {
3.7991222754707747`*^9, 3.799122302610426*^9}, 3.800074675182968*^9,
3.8000888764634867`*^9, 3.8001483829496517`*^9, {3.800539328667665*^9,
3.80053935006597*^9}, 3.8006102047411127`*^9, 3.800768511041994*^9,
3.8007685584485817`*^9, 3.800798395343419*^9, 3.80083672174466*^9,
3.801289306970142*^9, 3.801723120960483*^9, 3.801805234128213*^9,
3.80190123947233*^9, 3.802774994703823*^9, 3.8028221131946907`*^9,
3.8028221788287077`*^9, 3.8029741203902283`*^9, 3.802985541831491*^9,
3.802991535192218*^9, 3.802991698809568*^9, 3.802995713889069*^9,
3.802998622048595*^9, 3.803004777526676*^9, 3.803024825393283*^9, {
3.803027735674712*^9, 3.803027747105722*^9}, 3.803031238747754*^9,
3.8030314582373343`*^9, 3.803039072510062*^9, 3.8030401691939697`*^9,
3.803042349750293*^9, 3.80304720375817*^9, 3.80304731930881*^9,
3.8030493381362247`*^9, 3.803050219223942*^9, 3.803140736891797*^9,
3.8031427789146833`*^9, 3.80314288415772*^9, 3.803143419647159*^9,
3.803143681280093*^9, 3.803143812330427*^9, 3.803144190678129*^9,
3.803144620020019*^9, 3.8031449544882383`*^9, 3.803170545587533*^9,
3.8031719093970213`*^9, 3.803173088541155*^9, 3.803174158361299*^9,
3.803174473791127*^9, {3.80317452091203*^9, 3.803174542003994*^9},
3.803174857222417*^9, {3.803175108930497*^9, 3.803175161356251*^9},
3.803175529200306*^9, 3.803179310988064*^9, 3.803180773375772*^9, {
3.803243358266247*^9, 3.803243381172014*^9}, 3.803244184346326*^9,
3.8032442627513533`*^9, 3.803244360399561*^9},
CellLabel->
"During evaluation of \
In[166]:=",ExpressionUUID->"f91da2db-965b-4433-b9ab-598b1a941f44"],
Cell[BoxData[
InterpretationBox[
RowBox[{"\<\"m1/m2 = \"\>", "\[InvisibleSpace]", "1.2212121220112675`"}],
SequenceForm["m1/m2 = ", 1.2212121220112675`],
Editable->False]], "Print",
CellChangeTimes->{{3.717223923734548*^9, 3.717223928214951*^9}, {
3.717223971239379*^9, 3.7172239766293097`*^9}, {3.717233931322109*^9,
3.7172339602600603`*^9}, 3.717234266025383*^9, 3.717389811826817*^9,
3.717397798635911*^9, 3.717409088225647*^9, 3.719042269449914*^9,
3.71972571685752*^9, 3.720497982809791*^9, 3.7206017968494253`*^9,
3.762057944992012*^9, 3.762171308612159*^9, 3.762185878959035*^9,
3.762230704000032*^9, 3.76257969223776*^9, 3.762579775163062*^9,
3.76260246063175*^9, 3.762603825586153*^9, {3.7626818315079517`*^9,
3.76268183964472*^9}, {3.762682055451223*^9, 3.762682065259396*^9},
3.764310838838461*^9, 3.76439221561644*^9, 3.764406820576201*^9, 3.7644071524893913`*^9, 3.764416941641247*^9, 3.764471035389357*^9,
3.764502311266172*^9, 3.76451318673353*^9, 3.764567390943874*^9,
3.768568011438259*^9, 3.768572299139023*^9, 3.768645828428453*^9,
3.7686498406439943`*^9, 3.7687018467692337`*^9, 3.7687065345918627`*^9,
3.768882355269024*^9, 3.76890964428026*^9, 3.769135242785296*^9,
3.769137120470574*^9, 3.769138854628717*^9, 3.769173861479599*^9,
3.769228309277001*^9, 3.769488536636314*^9, 3.769488775493741*^9,
3.7697540311309013`*^9, 3.7698493329786863`*^9, 3.769927143788989*^9,
3.7699298474833517`*^9, 3.7699349643369827`*^9, {3.7700014615163918`*^9,
3.770001486342461*^9}, 3.770089615045055*^9, 3.770091151999776*^9,
3.7700911832234373`*^9, 3.77009121560664*^9, 3.770092860611184*^9, {
3.770096733677506*^9, 3.770096743552308*^9}, 3.770175904771923*^9,
3.770355813747511*^9, 3.770368575883328*^9, 3.7704310126844397`*^9,
3.7704528133156967`*^9, 3.771218941512669*^9, 3.771673232190048*^9,
3.771907031907504*^9, 3.771907439029517*^9, 3.771915621974977*^9,
3.7721908396758137`*^9, 3.77219651143331*^9, 3.772247856888829*^9,
3.7722566296994762`*^9, 3.772259084152637*^9, 3.772348455386256*^9,
3.772367801749072*^9, 3.772370891811442*^9, {3.77242000146596*^9,
3.7724200050229883`*^9}, 3.7724281731485243`*^9, 3.772428410081149*^9,
3.772430677028174*^9, 3.772440462784586*^9, 3.772529273853674*^9,
3.7728759142457733`*^9, 3.7728780519980917`*^9, 3.772885195029847*^9,
3.772942823379051*^9, 3.7729434028029613`*^9, 3.772943543318931*^9,
3.7729440577300873`*^9, 3.772949628763401*^9, 3.772950463819756*^9,
3.772950515768664*^9, 3.773049286443142*^9, 3.7730496313722057`*^9,
3.773144076011161*^9, 3.773460624127591*^9, 3.7734639993643*^9,
3.7734713127079906`*^9, 3.773478884641347*^9, 3.773479639752248*^9,
3.7734819682595043`*^9, 3.773645277661384*^9, 3.773646804937044*^9,
3.773986250904626*^9, 3.7765100953056383`*^9, 3.776579083431468*^9,
3.776662521396657*^9, 3.7766687415984173`*^9, 3.776669989743709*^9,
3.7766754714989023`*^9, 3.7766763661356173`*^9, 3.776677554983851*^9,
3.776678156945221*^9, 3.776679730384227*^9, 3.7766797995218353`*^9,
3.776679922527975*^9, 3.776681466538108*^9, 3.776762885901209*^9,
3.7770248152256727`*^9, 3.77711769599905*^9, 3.7771849674192142`*^9,
3.77762564250346*^9, 3.777690720738963*^9, 3.7777253762606087`*^9,
3.777786888754923*^9, 3.777953025556863*^9, 3.777964327722644*^9,
3.778220763638605*^9, 3.778241133006884*^9, 3.77824221545049*^9,
3.778389851806761*^9, 3.778489688892495*^9, 3.778834393767021*^9,
3.778913036796289*^9, 3.7789186486061497`*^9, 3.778999683599246*^9,
3.779014947266182*^9, 3.779016358891302*^9, 3.779091498784801*^9,
3.779109063617063*^9, 3.77943804301024*^9, 3.7794390356224527`*^9,
3.779446129998694*^9, 3.779512777100968*^9, 3.779514823682631*^9,
3.779514859562222*^9, 3.779544709953924*^9, 3.7795459145467453`*^9,
3.779620255613166*^9, 3.779967327511076*^9, {3.780024275082299*^9,
3.7800242987111483`*^9}, {3.7800243789563026`*^9, 3.780024392712452*^9},
3.78005038726173*^9, 3.7800611518316393`*^9, 3.780115034568583*^9,
3.7801154414361067`*^9, {3.780997650057397*^9, 3.78099766439631*^9},
3.7824639813777742`*^9, 3.7839471685460453`*^9, 3.78504926862815*^9,
3.785052849502256*^9, 3.785057077348769*^9, {3.785057141637362*^9,
3.7850571599033833`*^9}, 3.785159356911799*^9, 3.7885250659535437`*^9,
3.7885885882949257`*^9, 3.789016374575654*^9, 3.7891011635298862`*^9,
3.797132624730732*^9, 3.7971350260463753`*^9, 3.799113710120328*^9,
3.7991139854914227`*^9, 3.799119939271639*^9, 3.799121028607518*^9,
3.79912168285885*^9, 3.799121965114169*^9, 3.7991220861947727`*^9, {
3.7991222754707747`*^9, 3.799122302610426*^9}, 3.800074675182968*^9,
3.8000888764634867`*^9, 3.8001483829496517`*^9, {3.800539328667665*^9,
3.80053935006597*^9}, 3.8006102047411127`*^9, 3.800768511041994*^9,
3.8007685584485817`*^9, 3.800798395343419*^9, 3.80083672174466*^9,
3.801289306970142*^9, 3.801723120960483*^9, 3.801805234128213*^9,
3.80190123947233*^9, 3.802774994703823*^9, 3.8028221131946907`*^9,
3.8028221788287077`*^9, 3.8029741203902283`*^9, 3.802985541831491*^9,
3.802991535192218*^9, 3.802991698809568*^9, 3.802995713889069*^9,
3.802998622048595*^9, 3.803004777526676*^9, 3.803024825393283*^9, {
3.803027735674712*^9, 3.803027747105722*^9}, 3.803031238747754*^9,
3.8030314582373343`*^9, 3.803039072510062*^9, 3.8030401691939697`*^9,
3.803042349750293*^9, 3.80304720375817*^9, 3.80304731930881*^9,
3.8030493381362247`*^9, 3.803050219223942*^9, 3.803140736891797*^9,
3.8031427789146833`*^9, 3.80314288415772*^9, 3.803143419647159*^9,
3.803143681280093*^9, 3.803143812330427*^9, 3.803144190678129*^9,
3.803144620020019*^9, 3.8031449544882383`*^9, 3.803170545587533*^9,
3.8031719093970213`*^9, 3.803173088541155*^9, 3.803174158361299*^9, 3.803174473791127*^9, {3.80317452091203*^9, 3.803174542003994*^9},
3.803174857222417*^9, {3.803175108930497*^9, 3.803175161356251*^9},
3.803175529200306*^9, 3.803179310988064*^9, 3.803180773375772*^9, {
3.803243358266247*^9, 3.803243381172014*^9}, 3.803244184346326*^9,
3.8032442627513533`*^9, 3.803244360401103*^9},
CellLabel->
"During evaluation of \
In[166]:=",ExpressionUUID->"f6bf26f2-bc6c-4945-8ba2-4fad5d43a183"],
Cell[BoxData[
InterpretationBox[
RowBox[{"\<\"m1\[CenterDot]m2 = \"\>", "\[InvisibleSpace]",
"0.24752042195416796`"}],
SequenceForm["m1\[CenterDot]m2 = ", 0.24752042195416796`],
Editable->False]], "Print",
CellChangeTimes->{{3.717223923734548*^9, 3.717223928214951*^9}, {
3.717223971239379*^9, 3.7172239766293097`*^9}, {3.717233931322109*^9,
3.7172339602600603`*^9}, 3.717234266025383*^9, 3.717389811826817*^9,
3.717397798635911*^9, 3.717409088225647*^9, 3.719042269449914*^9,
3.71972571685752*^9, 3.720497982809791*^9, 3.7206017968494253`*^9,
3.762057944992012*^9, 3.762171308612159*^9, 3.762185878959035*^9,
3.762230704000032*^9, 3.76257969223776*^9, 3.762579775163062*^9,
3.76260246063175*^9, 3.762603825586153*^9, {3.7626818315079517`*^9,
3.76268183964472*^9}, {3.762682055451223*^9, 3.762682065259396*^9},
3.764310838838461*^9, 3.76439221561644*^9, 3.764406820576201*^9,
3.7644071524893913`*^9, 3.764416941641247*^9, 3.764471035389357*^9,
3.764502311266172*^9, 3.76451318673353*^9, 3.764567390943874*^9,
3.768568011438259*^9, 3.768572299139023*^9, 3.768645828428453*^9,
3.7686498406439943`*^9, 3.7687018467692337`*^9, 3.7687065345918627`*^9,
3.768882355269024*^9, 3.76890964428026*^9, 3.769135242785296*^9,
3.769137120470574*^9, 3.769138854628717*^9, 3.769173861479599*^9,
3.769228309277001*^9, 3.769488536636314*^9, 3.769488775493741*^9,
3.7697540311309013`*^9, 3.7698493329786863`*^9, 3.769927143788989*^9,
3.7699298474833517`*^9, 3.7699349643369827`*^9, {3.7700014615163918`*^9,
3.770001486342461*^9}, 3.770089615045055*^9, 3.770091151999776*^9,
3.7700911832234373`*^9, 3.77009121560664*^9, 3.770092860611184*^9, {
3.770096733677506*^9, 3.770096743552308*^9}, 3.770175904771923*^9,
3.770355813747511*^9, 3.770368575883328*^9, 3.7704310126844397`*^9,
3.7704528133156967`*^9, 3.771218941512669*^9, 3.771673232190048*^9,
3.771907031907504*^9, 3.771907439029517*^9, 3.771915621974977*^9,
3.7721908396758137`*^9, 3.77219651143331*^9, 3.772247856888829*^9,
3.7722566296994762`*^9, 3.772259084152637*^9, 3.772348455386256*^9,
3.772367801749072*^9, 3.772370891811442*^9, {3.77242000146596*^9,
3.7724200050229883`*^9}, 3.7724281731485243`*^9, 3.772428410081149*^9,
3.772430677028174*^9, 3.772440462784586*^9, 3.772529273853674*^9,
3.7728759142457733`*^9, 3.7728780519980917`*^9, 3.772885195029847*^9,
3.772942823379051*^9, 3.7729434028029613`*^9, 3.772943543318931*^9,
3.7729440577300873`*^9, 3.772949628763401*^9, 3.772950463819756*^9,
3.772950515768664*^9, 3.773049286443142*^9, 3.7730496313722057`*^9,
3.773144076011161*^9, 3.773460624127591*^9, 3.7734639993643*^9,
3.7734713127079906`*^9, 3.773478884641347*^9, 3.773479639752248*^9,
3.7734819682595043`*^9, 3.773645277661384*^9, 3.773646804937044*^9,
3.773986250904626*^9, 3.7765100953056383`*^9, 3.776579083431468*^9,
3.776662521396657*^9, 3.7766687415984173`*^9, 3.776669989743709*^9,
3.7766754714989023`*^9, 3.7766763661356173`*^9, 3.776677554983851*^9,
3.776678156945221*^9, 3.776679730384227*^9, 3.7766797995218353`*^9,
3.776679922527975*^9, 3.776681466538108*^9, 3.776762885901209*^9,
3.7770248152256727`*^9, 3.77711769599905*^9, 3.7771849674192142`*^9,
3.77762564250346*^9, 3.777690720738963*^9, 3.7777253762606087`*^9,
3.777786888754923*^9, 3.777953025556863*^9, 3.777964327722644*^9,
3.778220763638605*^9, 3.778241133006884*^9, 3.77824221545049*^9,
3.778389851806761*^9, 3.778489688892495*^9, 3.778834393767021*^9,
3.778913036796289*^9, 3.7789186486061497`*^9, 3.778999683599246*^9,
3.779014947266182*^9, 3.779016358891302*^9, 3.779091498784801*^9,
3.779109063617063*^9, 3.77943804301024*^9, 3.7794390356224527`*^9,
3.779446129998694*^9, 3.779512777100968*^9, 3.779514823682631*^9,
3.779514859562222*^9, 3.779544709953924*^9, 3.7795459145467453`*^9,
3.779620255613166*^9, 3.779967327511076*^9, {3.780024275082299*^9,
3.7800242987111483`*^9}, {3.7800243789563026`*^9, 3.780024392712452*^9},
3.78005038726173*^9, 3.7800611518316393`*^9, 3.780115034568583*^9, 3.7801154414361067`*^9, {3.780997650057397*^9, 3.78099766439631*^9},
3.7824639813777742`*^9, 3.7839471685460453`*^9, 3.78504926862815*^9,
3.785052849502256*^9, 3.785057077348769*^9, {3.785057141637362*^9,
3.7850571599033833`*^9}, 3.785159356911799*^9, 3.7885250659535437`*^9,
3.7885885882949257`*^9, 3.789016374575654*^9, 3.7891011635298862`*^9,
3.797132624730732*^9, 3.7971350260463753`*^9, 3.799113710120328*^9,
3.7991139854914227`*^9, 3.799119939271639*^9, 3.799121028607518*^9,
3.79912168285885*^9, 3.799121965114169*^9, 3.7991220861947727`*^9, {
3.7991222754707747`*^9, 3.799122302610426*^9}, 3.800074675182968*^9,
3.8000888764634867`*^9, 3.8001483829496517`*^9, {3.800539328667665*^9,
3.80053935006597*^9}, 3.8006102047411127`*^9, 3.800768511041994*^9,
3.8007685584485817`*^9, 3.800798395343419*^9, 3.80083672174466*^9,
3.801289306970142*^9, 3.801723120960483*^9, 3.801805234128213*^9,
3.80190123947233*^9, 3.802774994703823*^9, 3.8028221131946907`*^9,
3.8028221788287077`*^9, 3.8029741203902283`*^9, 3.802985541831491*^9,
3.802991535192218*^9, 3.802991698809568*^9, 3.802995713889069*^9,
3.802998622048595*^9, 3.803004777526676*^9, 3.803024825393283*^9, {
3.803027735674712*^9, 3.803027747105722*^9}, 3.803031238747754*^9,
3.8030314582373343`*^9, 3.803039072510062*^9, 3.8030401691939697`*^9,
3.803042349750293*^9, 3.80304720375817*^9, 3.80304731930881*^9,
3.8030493381362247`*^9, 3.803050219223942*^9, 3.803140736891797*^9,
3.8031427789146833`*^9, 3.80314288415772*^9, 3.803143419647159*^9,
3.803143681280093*^9, 3.803143812330427*^9, 3.803144190678129*^9,
3.803144620020019*^9, 3.8031449544882383`*^9, 3.803170545587533*^9,
3.8031719093970213`*^9, 3.803173088541155*^9, 3.803174158361299*^9,
3.803174473791127*^9, {3.80317452091203*^9, 3.803174542003994*^9},
3.803174857222417*^9, {3.803175108930497*^9, 3.803175161356251*^9},
3.803175529200306*^9, 3.803179310988064*^9, 3.803180773375772*^9, {
3.803243358266247*^9, 3.803243381172014*^9}, 3.803244184346326*^9,
3.8032442627513533`*^9, 3.803244360402628*^9},
CellLabel->
"During evaluation of \
In[166]:=",ExpressionUUID->"55d78e7c-e083-45e5-8097-0825c3642e07"],
Cell[BoxData[
InterpretationBox[
RowBox[{"\<\"af = \"\>", "\[InvisibleSpace]", "0.692085186818`"}],
SequenceForm["af = ", 0.692085186818],
Editable->False]], "Print",
CellChangeTimes->{{3.717223923734548*^9, 3.717223928214951*^9}, {
3.717223971239379*^9, 3.7172239766293097`*^9}, {3.717233931322109*^9,
3.7172339602600603`*^9}, 3.717234266025383*^9, 3.717389811826817*^9,
3.717397798635911*^9, 3.717409088225647*^9, 3.719042269449914*^9,
3.71972571685752*^9, 3.720497982809791*^9, 3.7206017968494253`*^9,
3.762057944992012*^9, 3.762171308612159*^9, 3.762185878959035*^9,
3.762230704000032*^9, 3.76257969223776*^9, 3.762579775163062*^9,
3.76260246063175*^9, 3.762603825586153*^9, {3.7626818315079517`*^9,
3.76268183964472*^9}, {3.762682055451223*^9, 3.762682065259396*^9},
3.764310838838461*^9, 3.76439221561644*^9, 3.764406820576201*^9,
3.7644071524893913`*^9, 3.764416941641247*^9, 3.764471035389357*^9,
3.764502311266172*^9, 3.76451318673353*^9, 3.764567390943874*^9,
3.768568011438259*^9, 3.768572299139023*^9, 3.768645828428453*^9,
3.7686498406439943`*^9, 3.7687018467692337`*^9, 3.7687065345918627`*^9,
3.768882355269024*^9, 3.76890964428026*^9, 3.769135242785296*^9,
3.769137120470574*^9, 3.769138854628717*^9, 3.769173861479599*^9,
3.769228309277001*^9, 3.769488536636314*^9, 3.769488775493741*^9,
3.7697540311309013`*^9, 3.7698493329786863`*^9, 3.769927143788989*^9,
3.7699298474833517`*^9, 3.7699349643369827`*^9, {3.7700014615163918`*^9,
3.770001486342461*^9}, 3.770089615045055*^9, 3.770091151999776*^9,
3.7700911832234373`*^9, 3.77009121560664*^9, 3.770092860611184*^9, {
3.770096733677506*^9, 3.770096743552308*^9}, 3.770175904771923*^9,
3.770355813747511*^9, 3.770368575883328*^9, 3.7704310126844397`*^9,
3.7704528133156967`*^9, 3.771218941512669*^9, 3.771673232190048*^9,
3.771907031907504*^9, 3.771907439029517*^9, 3.771915621974977*^9,
3.7721908396758137`*^9, 3.77219651143331*^9, 3.772247856888829*^9,
3.7722566296994762`*^9, 3.772259084152637*^9, 3.772348455386256*^9,
3.772367801749072*^9, 3.772370891811442*^9, {3.77242000146596*^9,
3.7724200050229883`*^9}, 3.7724281731485243`*^9, 3.772428410081149*^9,
3.772430677028174*^9, 3.772440462784586*^9, 3.772529273853674*^9,
3.7728759142457733`*^9, 3.7728780519980917`*^9, 3.772885195029847*^9, 3.772942823379051*^9, 3.7729434028029613`*^9, 3.772943543318931*^9,
3.7729440577300873`*^9, 3.772949628763401*^9, 3.772950463819756*^9,
3.772950515768664*^9, 3.773049286443142*^9, 3.7730496313722057`*^9,
3.773144076011161*^9, 3.773460624127591*^9, 3.7734639993643*^9,
3.7734713127079906`*^9, 3.773478884641347*^9, 3.773479639752248*^9,
3.7734819682595043`*^9, 3.773645277661384*^9, 3.773646804937044*^9,
3.773986250904626*^9, 3.7765100953056383`*^9, 3.776579083431468*^9,
3.776662521396657*^9, 3.7766687415984173`*^9, 3.776669989743709*^9,
3.7766754714989023`*^9, 3.7766763661356173`*^9, 3.776677554983851*^9,
3.776678156945221*^9, 3.776679730384227*^9, 3.7766797995218353`*^9,
3.776679922527975*^9, 3.776681466538108*^9, 3.776762885901209*^9,
3.7770248152256727`*^9, 3.77711769599905*^9, 3.7771849674192142`*^9,
3.77762564250346*^9, 3.777690720738963*^9, 3.7777253762606087`*^9,
3.777786888754923*^9, 3.777953025556863*^9, 3.777964327722644*^9,
3.778220763638605*^9, 3.778241133006884*^9, 3.77824221545049*^9,
3.778389851806761*^9, 3.778489688892495*^9, 3.778834393767021*^9,
3.778913036796289*^9, 3.7789186486061497`*^9, 3.778999683599246*^9,
3.779014947266182*^9, 3.779016358891302*^9, 3.779091498784801*^9,
3.779109063617063*^9, 3.77943804301024*^9, 3.7794390356224527`*^9,
3.779446129998694*^9, 3.779512777100968*^9, 3.779514823682631*^9,
3.779514859562222*^9, 3.779544709953924*^9, 3.7795459145467453`*^9,
3.779620255613166*^9, 3.779967327511076*^9, {3.780024275082299*^9,
3.7800242987111483`*^9}, {3.7800243789563026`*^9, 3.780024392712452*^9},
3.78005038726173*^9, 3.7800611518316393`*^9, 3.780115034568583*^9,
3.7801154414361067`*^9, {3.780997650057397*^9, 3.78099766439631*^9},
3.7824639813777742`*^9, 3.7839471685460453`*^9, 3.78504926862815*^9,
3.785052849502256*^9, 3.785057077348769*^9, {3.785057141637362*^9,
3.7850571599033833`*^9}, 3.785159356911799*^9, 3.7885250659535437`*^9,
3.7885885882949257`*^9, 3.789016374575654*^9, 3.7891011635298862`*^9,
3.797132624730732*^9, 3.7971350260463753`*^9, 3.799113710120328*^9,
3.7991139854914227`*^9, 3.799119939271639*^9, 3.799121028607518*^9,
3.79912168285885*^9, 3.799121965114169*^9, 3.7991220861947727`*^9, {
3.7991222754707747`*^9, 3.799122302610426*^9}, 3.800074675182968*^9,
3.8000888764634867`*^9, 3.8001483829496517`*^9, {3.800539328667665*^9,
3.80053935006597*^9}, 3.8006102047411127`*^9, 3.800768511041994*^9,
3.8007685584485817`*^9, 3.800798395343419*^9, 3.80083672174466*^9,
3.801289306970142*^9, 3.801723120960483*^9, 3.801805234128213*^9,
3.80190123947233*^9, 3.802774994703823*^9, 3.8028221131946907`*^9,
3.8028221788287077`*^9, 3.8029741203902283`*^9, 3.802985541831491*^9,
3.802991535192218*^9, 3.802991698809568*^9, 3.802995713889069*^9,
3.802998622048595*^9, 3.803004777526676*^9, 3.803024825393283*^9, {
3.803027735674712*^9, 3.803027747105722*^9}, 3.803031238747754*^9,
3.8030314582373343`*^9, 3.803039072510062*^9, 3.8030401691939697`*^9,
3.803042349750293*^9, 3.80304720375817*^9, 3.80304731930881*^9,
3.8030493381362247`*^9, 3.803050219223942*^9, 3.803140736891797*^9,
3.8031427789146833`*^9, 3.80314288415772*^9, 3.803143419647159*^9,
3.803143681280093*^9, 3.803143812330427*^9, 3.803144190678129*^9,
3.803144620020019*^9, 3.8031449544882383`*^9, 3.803170545587533*^9,
3.8031719093970213`*^9, 3.803173088541155*^9, 3.803174158361299*^9,
3.803174473791127*^9, {3.80317452091203*^9, 3.803174542003994*^9},
3.803174857222417*^9, {3.803175108930497*^9, 3.803175161356251*^9},
3.803175529200306*^9, 3.803179310988064*^9, 3.803180773375772*^9, {
3.803243358266247*^9, 3.803243381172014*^9}, 3.803244184346326*^9,
3.8032442627513533`*^9, 3.803244360404085*^9},
CellLabel->
"During evaluation of \
In[166]:=",ExpressionUUID->"7b0d9152-d447-48f2-8957-08d8504dfa34"],
Cell[BoxData[
InterpretationBox[
RowBox[{"\<\"mf = \"\>", "\[InvisibleSpace]", "0.952032939704`"}],
SequenceForm["mf = ", 0.952032939704],
Editable->False]], "Print",
CellChangeTimes->{{3.717223923734548*^9, 3.717223928214951*^9}, {
3.717223971239379*^9, 3.7172239766293097`*^9}, {3.717233931322109*^9,
3.7172339602600603`*^9}, 3.717234266025383*^9, 3.717389811826817*^9,
3.717397798635911*^9, 3.717409088225647*^9, 3.719042269449914*^9,
3.71972571685752*^9, 3.720497982809791*^9, 3.7206017968494253`*^9,
3.762057944992012*^9, 3.762171308612159*^9, 3.762185878959035*^9,
3.762230704000032*^9, 3.76257969223776*^9, 3.762579775163062*^9, 3.76260246063175*^9, 3.762603825586153*^9, {3.7626818315079517`*^9,
3.76268183964472*^9}, {3.762682055451223*^9, 3.762682065259396*^9},
3.764310838838461*^9, 3.76439221561644*^9, 3.764406820576201*^9,
3.7644071524893913`*^9, 3.764416941641247*^9, 3.764471035389357*^9,
3.764502311266172*^9, 3.76451318673353*^9, 3.764567390943874*^9,
3.768568011438259*^9, 3.768572299139023*^9, 3.768645828428453*^9,
3.7686498406439943`*^9, 3.7687018467692337`*^9, 3.7687065345918627`*^9,
3.768882355269024*^9, 3.76890964428026*^9, 3.769135242785296*^9,
3.769137120470574*^9, 3.769138854628717*^9, 3.769173861479599*^9,
3.769228309277001*^9, 3.769488536636314*^9, 3.769488775493741*^9,
3.7697540311309013`*^9, 3.7698493329786863`*^9, 3.769927143788989*^9,
3.7699298474833517`*^9, 3.7699349643369827`*^9, {3.7700014615163918`*^9,
3.770001486342461*^9}, 3.770089615045055*^9, 3.770091151999776*^9,
3.7700911832234373`*^9, 3.77009121560664*^9, 3.770092860611184*^9, {
3.770096733677506*^9, 3.770096743552308*^9}, 3.770175904771923*^9,
3.770355813747511*^9, 3.770368575883328*^9, 3.7704310126844397`*^9,
3.7704528133156967`*^9, 3.771218941512669*^9, 3.771673232190048*^9,
3.771907031907504*^9, 3.771907439029517*^9, 3.771915621974977*^9,
3.7721908396758137`*^9, 3.77219651143331*^9, 3.772247856888829*^9,
3.7722566296994762`*^9, 3.772259084152637*^9, 3.772348455386256*^9,
3.772367801749072*^9, 3.772370891811442*^9, {3.77242000146596*^9,
3.7724200050229883`*^9}, 3.7724281731485243`*^9, 3.772428410081149*^9,
3.772430677028174*^9, 3.772440462784586*^9, 3.772529273853674*^9,
3.7728759142457733`*^9, 3.7728780519980917`*^9, 3.772885195029847*^9,
3.772942823379051*^9, 3.7729434028029613`*^9, 3.772943543318931*^9,
3.7729440577300873`*^9, 3.772949628763401*^9, 3.772950463819756*^9,
3.772950515768664*^9, 3.773049286443142*^9, 3.7730496313722057`*^9,
3.773144076011161*^9, 3.773460624127591*^9, 3.7734639993643*^9,
3.7734713127079906`*^9, 3.773478884641347*^9, 3.773479639752248*^9,
3.7734819682595043`*^9, 3.773645277661384*^9, 3.773646804937044*^9,
3.773986250904626*^9, 3.7765100953056383`*^9, 3.776579083431468*^9,
3.776662521396657*^9, 3.7766687415984173`*^9, 3.776669989743709*^9,
3.7766754714989023`*^9, 3.7766763661356173`*^9, 3.776677554983851*^9,
3.776678156945221*^9, 3.776679730384227*^9, 3.7766797995218353`*^9,
3.776679922527975*^9, 3.776681466538108*^9, 3.776762885901209*^9,
3.7770248152256727`*^9, 3.77711769599905*^9, 3.7771849674192142`*^9,
3.77762564250346*^9, 3.777690720738963*^9, 3.7777253762606087`*^9,
3.777786888754923*^9, 3.777953025556863*^9, 3.777964327722644*^9,
3.778220763638605*^9, 3.778241133006884*^9, 3.77824221545049*^9,
3.778389851806761*^9, 3.778489688892495*^9, 3.778834393767021*^9,
3.778913036796289*^9, 3.7789186486061497`*^9, 3.778999683599246*^9,
3.779014947266182*^9, 3.779016358891302*^9, 3.779091498784801*^9,
3.779109063617063*^9, 3.77943804301024*^9, 3.7794390356224527`*^9,
3.779446129998694*^9, 3.779512777100968*^9, 3.779514823682631*^9,
3.779514859562222*^9, 3.779544709953924*^9, 3.7795459145467453`*^9,
3.779620255613166*^9, 3.779967327511076*^9, {3.780024275082299*^9,
3.7800242987111483`*^9}, {3.7800243789563026`*^9, 3.780024392712452*^9},
3.78005038726173*^9, 3.7800611518316393`*^9, 3.780115034568583*^9,
3.7801154414361067`*^9, {3.780997650057397*^9, 3.78099766439631*^9},
3.7824639813777742`*^9, 3.7839471685460453`*^9, 3.78504926862815*^9,
3.785052849502256*^9, 3.785057077348769*^9, {3.785057141637362*^9,
3.7850571599033833`*^9}, 3.785159356911799*^9, 3.7885250659535437`*^9,
3.7885885882949257`*^9, 3.789016374575654*^9, 3.7891011635298862`*^9,
3.797132624730732*^9, 3.7971350260463753`*^9, 3.799113710120328*^9,
3.7991139854914227`*^9, 3.799119939271639*^9, 3.799121028607518*^9,
3.79912168285885*^9, 3.799121965114169*^9, 3.7991220861947727`*^9, {
3.7991222754707747`*^9, 3.799122302610426*^9}, 3.800074675182968*^9,
3.8000888764634867`*^9, 3.8001483829496517`*^9, {3.800539328667665*^9,
3.80053935006597*^9}, 3.8006102047411127`*^9, 3.800768511041994*^9,
3.8007685584485817`*^9, 3.800798395343419*^9, 3.80083672174466*^9,
3.801289306970142*^9, 3.801723120960483*^9, 3.801805234128213*^9,
3.80190123947233*^9, 3.802774994703823*^9, 3.8028221131946907`*^9,
3.8028221788287077`*^9, 3.8029741203902283`*^9, 3.802985541831491*^9,
3.802991535192218*^9, 3.802991698809568*^9, 3.802995713889069*^9,
3.802998622048595*^9, 3.803004777526676*^9, 3.803024825393283*^9, {
3.803027735674712*^9, 3.803027747105722*^9}, 3.803031238747754*^9,
3.8030314582373343`*^9, 3.803039072510062*^9, 3.8030401691939697`*^9,
3.803042349750293*^9, 3.80304720375817*^9, 3.80304731930881*^9,
3.8030493381362247`*^9, 3.803050219223942*^9, 3.803140736891797*^9,
3.8031427789146833`*^9, 3.80314288415772*^9, 3.803143419647159*^9, 3.803143681280093*^9, 3.803143812330427*^9, 3.803144190678129*^9,
3.803144620020019*^9, 3.8031449544882383`*^9, 3.803170545587533*^9,
3.8031719093970213`*^9, 3.803173088541155*^9, 3.803174158361299*^9,
3.803174473791127*^9, {3.80317452091203*^9, 3.803174542003994*^9},
3.803174857222417*^9, {3.803175108930497*^9, 3.803175161356251*^9},
3.803175529200306*^9, 3.803179310988064*^9, 3.803180773375772*^9, {
3.803243358266247*^9, 3.803243381172014*^9}, 3.803244184346326*^9,
3.8032442627513533`*^9, 3.803244360405319*^9},
CellLabel->
"During evaluation of \
In[166]:=",ExpressionUUID->"44494259-aa00-4701-8e11-39a82e95f55b"],
Cell[BoxData[
InterpretationBox[
RowBox[{"\<\"Tag = \"\>", "\[InvisibleSpace]", "\<\"SXS:BBH:0305\"\>"}],
SequenceForm["Tag = ", "SXS:BBH:0305"],
Editable->False]], "Print",
CellChangeTimes->{{3.717223923734548*^9, 3.717223928214951*^9}, {
3.717223971239379*^9, 3.7172239766293097`*^9}, {3.717233931322109*^9,
3.7172339602600603`*^9}, 3.717234266025383*^9, 3.717389811826817*^9,
3.717397798635911*^9, 3.717409088225647*^9, 3.719042269449914*^9,
3.71972571685752*^9, 3.720497982809791*^9, 3.7206017968494253`*^9,
3.762057944992012*^9, 3.762171308612159*^9, 3.762185878959035*^9,
3.762230704000032*^9, 3.76257969223776*^9, 3.762579775163062*^9,
3.76260246063175*^9, 3.762603825586153*^9, {3.7626818315079517`*^9,
3.76268183964472*^9}, {3.762682055451223*^9, 3.762682065259396*^9},
3.764310838838461*^9, 3.76439221561644*^9, 3.764406820576201*^9,
3.7644071524893913`*^9, 3.764416941641247*^9, 3.764471035389357*^9,
3.764502311266172*^9, 3.76451318673353*^9, 3.764567390943874*^9,
3.768568011438259*^9, 3.768572299139023*^9, 3.768645828428453*^9,
3.7686498406439943`*^9, 3.7687018467692337`*^9, 3.7687065345918627`*^9,
3.768882355269024*^9, 3.76890964428026*^9, 3.769135242785296*^9,
3.769137120470574*^9, 3.769138854628717*^9, 3.769173861479599*^9,
3.769228309277001*^9, 3.769488536636314*^9, 3.769488775493741*^9,
3.7697540311309013`*^9, 3.7698493329786863`*^9, 3.769927143788989*^9,
3.7699298474833517`*^9, 3.7699349643369827`*^9, {3.7700014615163918`*^9,
3.770001486342461*^9}, 3.770089615045055*^9, 3.770091151999776*^9,
3.7700911832234373`*^9, 3.77009121560664*^9, 3.770092860611184*^9, {
3.770096733677506*^9, 3.770096743552308*^9}, 3.770175904771923*^9,
3.770355813747511*^9, 3.770368575883328*^9, 3.7704310126844397`*^9,
3.7704528133156967`*^9, 3.771218941512669*^9, 3.771673232190048*^9,
3.771907031907504*^9, 3.771907439029517*^9, 3.771915621974977*^9,
3.7721908396758137`*^9, 3.77219651143331*^9, 3.772247856888829*^9,
3.7722566296994762`*^9, 3.772259084152637*^9, 3.772348455386256*^9,
3.772367801749072*^9, 3.772370891811442*^9, {3.77242000146596*^9,
3.7724200050229883`*^9}, 3.7724281731485243`*^9, 3.772428410081149*^9,
3.772430677028174*^9, 3.772440462784586*^9, 3.772529273853674*^9,
3.7728759142457733`*^9, 3.7728780519980917`*^9, 3.772885195029847*^9,
3.772942823379051*^9, 3.7729434028029613`*^9, 3.772943543318931*^9,
3.7729440577300873`*^9, 3.772949628763401*^9, 3.772950463819756*^9,
3.772950515768664*^9, 3.773049286443142*^9, 3.7730496313722057`*^9,
3.773144076011161*^9, 3.773460624127591*^9, 3.7734639993643*^9,
3.7734713127079906`*^9, 3.773478884641347*^9, 3.773479639752248*^9,
3.7734819682595043`*^9, 3.773645277661384*^9, 3.773646804937044*^9,
3.773986250904626*^9, 3.7765100953056383`*^9, 3.776579083431468*^9,
3.776662521396657*^9, 3.7766687415984173`*^9, 3.776669989743709*^9,
3.7766754714989023`*^9, 3.7766763661356173`*^9, 3.776677554983851*^9,
3.776678156945221*^9, 3.776679730384227*^9, 3.7766797995218353`*^9,
3.776679922527975*^9, 3.776681466538108*^9, 3.776762885901209*^9,
3.7770248152256727`*^9, 3.77711769599905*^9, 3.7771849674192142`*^9,
3.77762564250346*^9, 3.777690720738963*^9, 3.7777253762606087`*^9,
3.777786888754923*^9, 3.777953025556863*^9, 3.777964327722644*^9,
3.778220763638605*^9, 3.778241133006884*^9, 3.77824221545049*^9,
3.778389851806761*^9, 3.778489688892495*^9, 3.778834393767021*^9,
3.778913036796289*^9, 3.7789186486061497`*^9, 3.778999683599246*^9,
3.779014947266182*^9, 3.779016358891302*^9, 3.779091498784801*^9,
3.779109063617063*^9, 3.77943804301024*^9, 3.7794390356224527`*^9,
3.779446129998694*^9, 3.779512777100968*^9, 3.779514823682631*^9,
3.779514859562222*^9, 3.779544709953924*^9, 3.7795459145467453`*^9,
3.779620255613166*^9, 3.779967327511076*^9, {3.780024275082299*^9, 3.7800242987111483`*^9}, {3.7800243789563026`*^9, 3.780024392712452*^9},
3.78005038726173*^9, 3.7800611518316393`*^9, 3.780115034568583*^9,
3.7801154414361067`*^9, {3.780997650057397*^9, 3.78099766439631*^9},
3.7824639813777742`*^9, 3.7839471685460453`*^9, 3.78504926862815*^9,
3.785052849502256*^9, 3.785057077348769*^9, {3.785057141637362*^9,
3.7850571599033833`*^9}, 3.785159356911799*^9, 3.7885250659535437`*^9,
3.7885885882949257`*^9, 3.789016374575654*^9, 3.7891011635298862`*^9,
3.797132624730732*^9, 3.7971350260463753`*^9, 3.799113710120328*^9,
3.7991139854914227`*^9, 3.799119939271639*^9, 3.799121028607518*^9,
3.79912168285885*^9, 3.799121965114169*^9, 3.7991220861947727`*^9, {
3.7991222754707747`*^9, 3.799122302610426*^9}, 3.800074675182968*^9,
3.8000888764634867`*^9, 3.8001483829496517`*^9, {3.800539328667665*^9,
3.80053935006597*^9}, 3.8006102047411127`*^9, 3.800768511041994*^9,
3.8007685584485817`*^9, 3.800798395343419*^9, 3.80083672174466*^9,
3.801289306970142*^9, 3.801723120960483*^9, 3.801805234128213*^9,
3.80190123947233*^9, 3.802774994703823*^9, 3.8028221131946907`*^9,
3.8028221788287077`*^9, 3.8029741203902283`*^9, 3.802985541831491*^9,
3.802991535192218*^9, 3.802991698809568*^9, 3.802995713889069*^9,
3.802998622048595*^9, 3.803004777526676*^9, 3.803024825393283*^9, {
3.803027735674712*^9, 3.803027747105722*^9}, 3.803031238747754*^9,
3.8030314582373343`*^9, 3.803039072510062*^9, 3.8030401691939697`*^9,
3.803042349750293*^9, 3.80304720375817*^9, 3.80304731930881*^9,
3.8030493381362247`*^9, 3.803050219223942*^9, 3.803140736891797*^9,
3.8031427789146833`*^9, 3.80314288415772*^9, 3.803143419647159*^9,
3.803143681280093*^9, 3.803143812330427*^9, 3.803144190678129*^9,
3.803144620020019*^9, 3.8031449544882383`*^9, 3.803170545587533*^9,
3.8031719093970213`*^9, 3.803173088541155*^9, 3.803174158361299*^9,
3.803174473791127*^9, {3.80317452091203*^9, 3.803174542003994*^9},
3.803174857222417*^9, {3.803175108930497*^9, 3.803175161356251*^9},
3.803175529200306*^9, 3.803179310988064*^9, 3.803180773375772*^9, {
3.803243358266247*^9, 3.803243381172014*^9}, 3.803244184346326*^9,
3.8032442627513533`*^9, 3.803244360406509*^9},
CellLabel->
"During evaluation of \
In[166]:=",ExpressionUUID->"dccf1746-edf8-4ef3-af8e-a86e06f107c6"]
}, Open ]]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"sxsrhs", "=",
RowBox[{"Flatten", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"Conjugate", "/@",
RowBox[{"GetAsymptoticMultiMode", "[",
RowBox[{"#", ",", "2", ",", "modes", ",",
RowBox[{"\"\<ReSample\>\"", "\[Rule]", "True"}]}], "]"}]}], "&"}], "/@",
"mysxscaserh"}], ",", "1"}], "]"}]}], ";"}]], "Code",
CellChangeTimes->{{3.7171635521596403`*^9, 3.717163558141595*^9}, {
3.7172166219975853`*^9, 3.717216627320222*^9}, {3.7172194728512707`*^9,
3.717219490830843*^9}, {3.717223993502838*^9, 3.717223996533388*^9}, {
3.72060202502007*^9, 3.720602032786186*^9}, {3.764404927143031*^9,
3.764404936617689*^9}, {3.764405546249731*^9, 3.764405548934586*^9}, {
3.764406129145973*^9, 3.764406130113237*^9}, {3.764406181485956*^9,
3.764406184078907*^9}, {3.770355814410892*^9, 3.7703558160102386`*^9}, {
3.772949641678318*^9, 3.772949677949027*^9}, {3.773653255970372*^9,
3.773653259449843*^9}, {3.7736533620280743`*^9, 3.773653364920361*^9}, {
3.773986356744377*^9, 3.7739863583243027`*^9}, {3.7991140470420923`*^9,
3.7991140508638773`*^9}},
CellLabel->
"In[175]:=",ExpressionUUID->"96195c64-1c6d-4895-96a0-d93b22b41c3c"]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Results for the paper", "Section", CellChangeTimes->{{3.717216037964575*^9, 3.717216039170602*^9}, {
3.762579673099522*^9, 3.762579673682219*^9}, {3.76369974318791*^9,
3.763699749547122*^9}, {3.7850573300501738`*^9,
3.785057336126431*^9}},ExpressionUUID->"55e918b2-ca1f-498b-a377-\
bd7458fe203c"],
Cell[CellGroupData[{
Cell["Vary the overtone frequency", "Subsubsection",
CellChangeTimes->{{3.799115057201908*^9, 3.799115066138445*^9}, {
3.7991152472676363`*^9, 3.799115260025752*^9}, {3.799115347398109*^9,
3.799115355434946*^9}, {3.803141822308281*^9,
3.803141823228383*^9}},ExpressionUUID->"d264caca-e5b5-4c88-941a-\
93010756d554"],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"tmax", " ", "=", " ",
RowBox[{"TimeOfMaximum", "[",
RowBox[{"sxsrhs", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}]}], "\n",
RowBox[{"t0", " ", "=", " ",
RowBox[{"tmax", "+", "tshift"}]}], "\n",
RowBox[{
RowBox[{"data", " ", "=", " ",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"sxsrhs", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[GreaterEqual]", " ", "t0"}],
"&"}]}], "]"}]}], ";"}]}], "Code",
CellChangeTimes->{{3.801901370029584*^9, 3.801901406233098*^9}, {
3.801901893503097*^9, 3.801901895231626*^9}, {3.801905966678508*^9,
3.801905966881785*^9}, {3.8019061500176573`*^9, 3.8019061832460957`*^9}, {
3.80190671422969*^9, 3.8019067208765078`*^9}, {3.80190675541617*^9,
3.801906761681551*^9}, 3.802723616427272*^9, {3.8027384140100937`*^9,
3.802738416899352*^9}, {3.802770838218026*^9, 3.802770849243594*^9}, {
3.802770992388349*^9, 3.802771015734352*^9}, {3.802822142715057*^9,
3.802822149777363*^9}, {3.803171761845991*^9, 3.803171764146563*^9}, {
3.803173917003592*^9, 3.803173918772482*^9}, {3.80317484388929*^9,
3.803174846046609*^9}, {3.803179336632937*^9, 3.8031793394819117`*^9},
3.8032432427203217`*^9, 3.8032437899855433`*^9, {3.80324407599511*^9,
3.803244098689637*^9}},
CellLabel->
"In[191]:=",ExpressionUUID->"3c15dded-a57b-4656-b83e-c264f7e27e40"],
Cell[BoxData["3692.632566631851`"], "Output",
CellChangeTimes->{
3.80317934318454*^9, 3.80318077909107*^9, {3.803243361952593*^9,
3.803243384961196*^9}, 3.803244275527689*^9, {3.803244342055788*^9,
3.803244369021735*^9}, 3.803290468469144*^9},
CellLabel->
"Out[191]=",ExpressionUUID->"f3fef36c-6422-42a2-a76b-0e1f448056a1"],
Cell[BoxData["3711.632566631851`"], "Output",
CellChangeTimes->{
3.80317934318454*^9, 3.80318077909107*^9, {3.803243361952593*^9,
3.803243384961196*^9}, 3.803244275527689*^9, {3.803244342055788*^9,
3.803244369021735*^9}, 3.8032904684709*^9},
CellLabel->
"Out[192]=",ExpressionUUID->"814ea4f9-f9d5-4fba-9a94-1b65dae2bd6c"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[ RowBox[{"(*",
RowBox[{
RowBox[{"mysxscase22modeRD", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"sxsrhs", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[GreaterEqual]", " ",
RowBox[{"tmax", "-", "25"}]}], "&"}]}], "]"}]}], ";",
"\[IndentingNewLine]",
RowBox[{"data1", " ", "=", " ",
RowBox[{"Select", "[",
RowBox[{"mysxscase22modeRD", ",", " ",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[GreaterEqual]",
RowBox[{"tmax", "+", "tshift"}]}], "&"}]}], "]"}]}]}], "*)"}]], "Code",\
CellChangeTimes->{{3.801901370029584*^9, 3.801901406233098*^9}, {
3.801901893503097*^9, 3.801901895231626*^9}, {3.801905966678508*^9,
3.801905966881785*^9}, {3.8019061500176573`*^9, 3.8019061832460957`*^9}, {
3.80190671422969*^9, 3.8019067208765078`*^9}, {3.80190675541617*^9,
3.801906761681551*^9}, 3.802723616427272*^9, {3.8027384140100937`*^9,
3.802738416899352*^9}, {3.802770838218026*^9, 3.802770849243594*^9}, {
3.802770992388349*^9, 3.802771015734352*^9}, {3.802822142715057*^9,
3.802822149777363*^9}, {3.803171761845991*^9, 3.803171821665563*^9},
3.803173078900977*^9, {3.803174118387392*^9, 3.803174120825693*^9}, {
3.803174848183864*^9, 3.8031748500194187`*^9}, {3.803175262004191*^9,
3.8031752626719313`*^9}, {3.8031755841946487`*^9,
3.8031756134408903`*^9}, {3.803179276832767*^9, 3.803179279137244*^9}, {
3.80324320421745*^9, 3.803243236447274*^9}, {3.803243393545035*^9,
3.803243394925576*^9}, {3.803243488707748*^9, 3.803243491836802*^9}, {
3.8032904394024763`*^9, 3.803290466004636*^9}, {3.803290503576976*^9,
3.803290506151078*^9}},ExpressionUUID->"3c2e4ad2-108f-4f17-bea7-\
97b751d2d371"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"3711.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.1778005605677032`"}], "+",
RowBox[{"0.046121893696650734`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3712.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.17688991226833575`"}], "-",
RowBox[{"0.0021367343418076303`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3712.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.16372373808316296`"}], "-",
RowBox[{"0.04688068603979928`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3713.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.14001781390939222`"}], "-",
RowBox[{"0.08517901386874743`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3713.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.10814273898970102`"}], "-", RowBox[{"0.11473874798166178`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3714.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.07091292520050392`"}], "-",
RowBox[{"0.13403720602321975`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3714.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.03135379895533175`"}], "-",
RowBox[{"0.14238919287396384`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3715.132566631851`", ",",
RowBox[{"0.007533693773563205`", "\[VeryThinSpace]", "-",
RowBox[{"0.13994748365882753`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3715.632566631851`", ",",
RowBox[{"0.042993063193440276`", "\[VeryThinSpace]", "-",
RowBox[{"0.12764030625329728`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3716.132566631851`", ",",
RowBox[{"0.07270078163819191`", "\[VeryThinSpace]", "-",
RowBox[{"0.10705424532350694`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3716.632566631851`", ",",
RowBox[{"0.09491075301969566`", "\[VeryThinSpace]", "-",
RowBox[{"0.08027475260849239`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3717.132566631851`", ",",
RowBox[{"0.10854635248370746`", "\[VeryThinSpace]", "-",
RowBox[{"0.049699025085690476`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3717.632566631851`", ",",
RowBox[{"0.11323622718667199`", "\[VeryThinSpace]", "-",
RowBox[{"0.017837261857924232`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3718.132566631851`", ",",
RowBox[{"0.10929464484956283`", "\[VeryThinSpace]", "+",
RowBox[{"0.012881785732511907`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3718.632566631851`", ",",
RowBox[{"0.09765141377314118`", "\[VeryThinSpace]", "+",
RowBox[{"0.04028639344286376`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3719.132566631851`", ",",
RowBox[{"0.07973997161607645`", "\[VeryThinSpace]", "+",
RowBox[{"0.06260637712284026`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3719.632566631851`", ",",
RowBox[{"0.05735492281304016`", "\[VeryThinSpace]", "+",
RowBox[{"0.07857751642478417`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3720.132566631851`", ",",
RowBox[{"0.032491945165989196`", "\[VeryThinSpace]", "+",
RowBox[{"0.08750054029664518`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3720.632566631851`", ",",
RowBox[{"0.0071835171633715935`", "\[VeryThinSpace]", "+",
RowBox[{"0.08925318715001304`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3721.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.016656636851169915`"}], "+",
RowBox[{"0.0842575891824025`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3721.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.03736901650904451`"}], "+",
RowBox[{"0.07340855561797245`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3722.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.05365468905229392`"}], "+",
RowBox[{"0.05797100670131646`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3722.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.0646463566224621`"}], "+",
RowBox[{"0.039456663368373036`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3723.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.06994118771028533`"}], "+",
RowBox[{"0.01949102419661937`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3723.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.06959566663485935`"}], "-",
RowBox[{"0.0003183555317433377`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3724.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.06408569209480015`"}], "-",
RowBox[{"0.018502164135823857`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3724.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.05423767104951985`"}], "-",
RowBox[{"0.03382974439622132`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3725.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.04113822101791459`"}], "-",
RowBox[{"0.045383369464234324`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3725.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.02603118545133989`"}], "-",
RowBox[{"0.0526027055342092`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3726.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.010210948520570692`"}], "-",
RowBox[{"0.055298436588389975`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3726.632566631851`", ",",
RowBox[{"0.005079431891851003`", "\[VeryThinSpace]", "-",
RowBox[{"0.053636527586494176`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3727.132566631851`", ",",
RowBox[{"0.01873785087897748`", "\[VeryThinSpace]", "-",
RowBox[{"0.048096765187737256`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{", RowBox[{"3727.632566631851`", ",",
RowBox[{"0.029874701743939934`", "\[VeryThinSpace]", "-",
RowBox[{"0.03941090278833287`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3728.132566631851`", ",",
RowBox[{"0.037862399850593254`", "\[VeryThinSpace]", "-",
RowBox[{"0.02848685562524145`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3728.632566631851`", ",",
RowBox[{"0.042360984896450925`", "\[VeryThinSpace]", "-",
RowBox[{"0.01632590148236639`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3729.132566631851`", ",",
RowBox[{"0.04331989996819606`", "\[VeryThinSpace]", "-",
RowBox[{"0.003939762406132386`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3729.632566631851`", ",",
RowBox[{"0.040957849294213644`", "\[VeryThinSpace]", "+",
RowBox[{"0.0077261581232015075`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3730.132566631851`", ",",
RowBox[{"0.0357241266800465`", "\[VeryThinSpace]", "+",
RowBox[{"0.01785812944409959`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3730.632566631851`", ",",
RowBox[{"0.028245901717516137`", "\[VeryThinSpace]", "+",
RowBox[{"0.025824109167085947`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3731.132566631851`", ",",
RowBox[{"0.019266607239886758`", "\[VeryThinSpace]", "+",
RowBox[{"0.031205984373609084`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3731.632566631851`", ",",
RowBox[{"0.009580783998930496`", "\[VeryThinSpace]", "+",
RowBox[{"0.033813141225701705`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3732.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000029463408465458864`"}], "+",
RowBox[{"0.033677930362935225`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3732.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.008851807238109643`"}], "+",
RowBox[{"0.03103488868991062`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3733.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.016291091561304174`"}], "+",
RowBox[{"0.026286623048271764`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3733.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.021904091279887645`"}], "+",
RowBox[{"0.019960003149588273`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3734.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.025420106118424702`"}], "+",
RowBox[{"0.012656720691687566`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3734.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.02674703611707445`"}], "+", RowBox[{"0.005002347192349542`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3735.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.025963688044646122`"}], "-",
RowBox[{"0.0024022118253093036`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3735.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.023300016460879924`"}], "-",
RowBox[{"0.00902347067363947`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3736.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.01910774965422246`"}], "-",
RowBox[{"0.0144296385930984`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3736.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.013824353072547457`"}], "-",
RowBox[{"0.018314573445615625`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3737.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.007933529147597951`"}], "-",
RowBox[{"0.020510477888622387`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3737.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.001925448661229875`"}], "-",
RowBox[{"0.020989302429979234`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3738.132566631851`", ",",
RowBox[{"0.0037403256618142376`", "\[VeryThinSpace]", "-",
RowBox[{"0.019853651893214516`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3738.632566631851`", ",",
RowBox[{"0.008666694631428008`", "\[VeryThinSpace]", "-",
RowBox[{"0.01731870013008213`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3739.132566631851`", ",",
RowBox[{"0.012543710763654741`", "\[VeryThinSpace]", "-",
RowBox[{"0.013687159450646578`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3739.632566631851`", ",",
RowBox[{"0.01516483057131797`", "\[VeryThinSpace]", "-",
RowBox[{"0.009319701447874218`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3740.132566631851`", ",",
RowBox[{"0.016434179638853123`", "\[VeryThinSpace]", "-",
RowBox[{"0.004603375735787516`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3740.632566631851`", ",",
RowBox[{"0.016364983066026167`", "\[VeryThinSpace]", "+",
RowBox[{"0.0000794723988322668`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3741.132566631851`", ",",
RowBox[{"0.015069955456824217`", "\[VeryThinSpace]", "+",
RowBox[{"0.004379508539900403`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3741.632566631851`", ",",
RowBox[{"0.012744982134255987`", "\[VeryThinSpace]", "+",
RowBox[{"0.008004038121927277`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3742.132566631851`", ",",
RowBox[{"0.009647824066557958`", "\[VeryThinSpace]", "+", RowBox[{"0.010734544943011542`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3742.632566631851`", ",",
RowBox[{"0.0060738234019291565`", "\[VeryThinSpace]", "+",
RowBox[{"0.012437285258542633`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3743.132566631851`", ",",
RowBox[{"0.002330666750216887`", "\[VeryThinSpace]", "+",
RowBox[{"0.013066667597715933`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3743.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.0012858161797234537`"}], "+",
RowBox[{"0.012661712228734641`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3744.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.0045130645104883155`"}], "+",
RowBox[{"0.01133638705516922`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3744.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.007138996279581533`"}], "+",
RowBox[{"0.009265023699517807`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3745.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.009014030788355401`"}], "+",
RowBox[{"0.0066643040694487265`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3745.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.010057410689537126`"}], "+",
RowBox[{"0.003773458668580608`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3746.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.010257790366199861`"}], "+",
RowBox[{"0.0008343293514234435`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3746.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.009668501625665403`"}], "-",
RowBox[{"0.0019271701371621815`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3747.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.008398283686888317`"}], "-",
RowBox[{"0.004316891946776157`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3747.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.006598549088095977`"}], "-",
RowBox[{"0.006184597962882944`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3748.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.0044484368608205035`"}], "-",
RowBox[{"0.007431780431467337`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3748.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.0021389735624649546`"}], "-",
RowBox[{"0.00801491315014611`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{", RowBox[{"3749.132566631851`", ",",
RowBox[{"0.00014237630077566858`", "\[VeryThinSpace]", "-",
RowBox[{"0.007944258245055347`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3749.632566631851`", ",",
RowBox[{"0.0022256241224080982`", "\[VeryThinSpace]", "-",
RowBox[{"0.007278684172596019`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3750.132566631851`", ",",
RowBox[{"0.00396970150016498`", "\[VeryThinSpace]", "-",
RowBox[{"0.006117217980781272`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3750.632566631851`", ",",
RowBox[{"0.005270767273912598`", "\[VeryThinSpace]", "-",
RowBox[{"0.004588244246566468`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3751.132566631851`", ",",
RowBox[{"0.006067004512458724`", "\[VeryThinSpace]", "-",
RowBox[{"0.0028373669580761193`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3751.632566631851`", ",",
RowBox[{"0.006339833370785613`", "\[VeryThinSpace]", "-",
RowBox[{"0.001014968093833393`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3752.132566631851`", ",",
RowBox[{"0.006111744960423227`", "\[VeryThinSpace]", "+",
RowBox[{"0.0007355662873676162`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3752.632566631851`", ",",
RowBox[{"0.005441201560438422`", "\[VeryThinSpace]", "+",
RowBox[{"0.0022881132055294056`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3753.132566631851`", ",",
RowBox[{"0.004415234784723739`", "\[VeryThinSpace]", "+",
RowBox[{"0.0035419184498916645`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3753.632566631851`", ",",
RowBox[{"0.0031404961788717564`", "\[VeryThinSpace]", "+",
RowBox[{"0.004427105326458472`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3754.132566631851`", ",",
RowBox[{"0.0017335697839839718`", "\[VeryThinSpace]", "+",
RowBox[{"0.004907385692017616`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3754.632566631851`", ",",
RowBox[{"0.00031134425476610927`", "\[VeryThinSpace]", "+",
RowBox[{"0.004980003006821793`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3755.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.0010178301699347077`"}], "+",
RowBox[{"0.004673145649078559`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3755.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.002161596489970852`"}], "+",
RowBox[{"0.004041241000726078`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3756.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.0030492118900098102`"}], "+",
RowBox[{"0.0031586665077210146`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3756.632566631851`", ",",
RowBox[{ RowBox[{"-", "0.00363506711967166`"}], "+",
RowBox[{"0.0021124874342876142`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3757.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.0039000187223907756`"}], "+",
RowBox[{"0.0009948514688402832`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3757.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.003850620493239025`"}], "-",
RowBox[{"0.00010435856586099213`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3758.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.0035164906877811564`"}], "-",
RowBox[{"0.001104084125104266`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3758.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.0029461708631303356`"}], "-",
RowBox[{"0.0019374377056033956`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3759.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.002201914343476478`"}], "-",
RowBox[{"0.002555539814867962`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3759.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00135388448147115`"}], "-",
RowBox[{"0.0029296874543337133`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3760.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.00047424529154405125`"}], "-",
RowBox[{"0.0030518333041091553`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3760.632566631851`", ",",
RowBox[{"0.000368406111853031`", "\[VeryThinSpace]", "-",
RowBox[{"0.0029334817567141028`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3761.132566631851`", ",",
RowBox[{"0.001113879247754379`", "\[VeryThinSpace]", "-",
RowBox[{"0.0026032162313750357`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3761.632566631851`", ",",
RowBox[{"0.0017142024022974503`", "\[VeryThinSpace]", "-",
RowBox[{"0.0021031555422465764`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3762.132566631851`", ",",
RowBox[{"0.002136208503580919`", "\[VeryThinSpace]", "-",
RowBox[{"0.0014846917087482578`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3762.632566631851`", ",",
RowBox[{"0.0023628033588324595`", "\[VeryThinSpace]", "-",
RowBox[{"0.0008038856311059359`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3763.132566631851`", ",", RowBox[{"0.002392930051582297`", "\[VeryThinSpace]", "-",
RowBox[{"0.00011689146212929897`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3763.632566631851`", ",",
RowBox[{"0.0022403387806637495`", "\[VeryThinSpace]", "+",
RowBox[{"0.0005242519336856705`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3764.132566631851`", ",",
RowBox[{"0.0019313512923149997`", "\[VeryThinSpace]", "+",
RowBox[{"0.001075178896210486`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3764.632566631851`", ",",
RowBox[{"0.0015018684128128659`", "\[VeryThinSpace]", "+",
RowBox[{"0.0015018920738219307`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3765.132566631851`", ",",
RowBox[{"0.000993905402091136`", "\[VeryThinSpace]", "+",
RowBox[{"0.0017824640269241167`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3765.632566631851`", ",",
RowBox[{"0.000451951923648531`", "\[VeryThinSpace]", "+",
RowBox[{"0.0019076991516570846`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3766.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.00008055768794382287`"}], "+",
RowBox[{"0.0018807910251263348`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3766.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.0005644098045478924`"}], "+",
RowBox[{"0.001716082190689408`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3767.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000967206451023209`"}], "+",
RowBox[{"0.0014370914324204921`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3767.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.0012652428070233047`"}], "+",
RowBox[{"0.0010740143443726743`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3768.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.0014445850680801606`"}], "+",
RowBox[{"0.0006609253148540004`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3768.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.0015013320162620505`"}], "+",
RowBox[{"0.00023291297467543606`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3769.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.0014411054332405854`"}], "-",
RowBox[{"0.00017663225467853182`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3769.632566631851`", ",", RowBox[{
RowBox[{"-", "0.001277868108697083`"}], "-",
RowBox[{"0.0005383882888569888`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3770.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.0010322104400355308`"}], "-",
RowBox[{"0.0008289792621960187`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3770.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.0007292751086025344`"}], "-",
RowBox[{"0.0010322593605763559`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3771.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.00039650321700199806`"}], "-",
RowBox[{"0.0011399526893612786`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3771.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00006138464166117372`"}], "-",
RowBox[{"0.0011516509925656208`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3772.132566631851`", ",",
RowBox[{"0.00025061867054383495`", "\[VeryThinSpace]", "-",
RowBox[{"0.0010742189211036717`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3772.632566631851`", ",",
RowBox[{"0.0005178333848126253`", "\[VeryThinSpace]", "-",
RowBox[{"0.0009206972288154432`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3773.132566631851`", ",",
RowBox[{"0.0007237107688005323`", "\[VeryThinSpace]", "-",
RowBox[{"0.0007088253831772696`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3773.632566631851`", ",",
RowBox[{"0.0008576695683129805`", "\[VeryThinSpace]", "-",
RowBox[{"0.0004593247870787895`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3774.132566631851`", ",",
RowBox[{"0.000915419893023096`", "\[VeryThinSpace]", "-",
RowBox[{"0.000194091461013671`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3774.632566631851`", ",",
RowBox[{"0.0008987838085338631`", "\[VeryThinSpace]", "+",
RowBox[{"0.00006555725959423243`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3775.132566631851`", ",",
RowBox[{"0.0008150656324036836`", "\[VeryThinSpace]", "+",
RowBox[{"0.0003004525445414118`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3775.632566631851`", ",",
RowBox[{"0.0006760555133286618`", "\[VeryThinSpace]", "+",
RowBox[{"0.0004948549921320389`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3776.132566631851`", ",",
RowBox[{"0.0004967715400468601`", "\[VeryThinSpace]", "+", RowBox[{"0.0006373716545254361`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3776.632566631851`", ",",
RowBox[{"0.00029405748906436574`", "\[VeryThinSpace]", "+",
RowBox[{"0.0007214680587392621`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3777.132566631851`", ",",
RowBox[{"0.00008515513667467457`", "\[VeryThinSpace]", "+",
RowBox[{"0.0007455685468852521`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3777.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00011363751949295966`"}], "+",
RowBox[{"0.0007127705297957388`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3778.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.0002881263968292421`"}], "+",
RowBox[{"0.0006302259444093652`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3778.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.000427125807306301`"}], "+",
RowBox[{"0.0005082645509016337`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3779.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.0005230590857559792`"}], "+",
RowBox[{"0.00035934750815270154`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3779.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.000572234546166337`"}], "+",
RowBox[{"0.000196945397175096`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3780.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.0005748027326773382`"}], "+",
RowBox[{"0.000034432850988900595`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3780.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.0005344249697558023`"}], "-",
RowBox[{"0.00011591711791153878`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3781.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.00045770284302631167`"}], "-",
RowBox[{"0.00024377067083886013`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3781.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.0003534323955108883`"}], "-",
RowBox[{"0.0003413528910280196`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3782.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.0002317548306822652`"}], "-",
RowBox[{"0.0004038210072629135`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3782.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00010327728027105396`"}], "-",
RowBox[{"0.000429383717800757`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3783.132566631851`", ",",
RowBox[{"0.000021766912751585446`", "\[VeryThinSpace]", "-",
RowBox[{"0.0004191793606608787`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3783.632566631851`", ",",
RowBox[{"0.00013425800983347388`", "\[VeryThinSpace]", "-",
RowBox[{"0.00037694302722585544`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3784.132566631851`", ",",
RowBox[{"0.00022678240184634618`", "\[VeryThinSpace]", "-",
RowBox[{"0.0003085061841743156`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3784.632566631851`", ",",
RowBox[{"0.00029404583200909177`", "\[VeryThinSpace]", "-",
RowBox[{"0.00022118123515014912`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3785.132566631851`", ",",
RowBox[{"0.0003330918410465543`", "\[VeryThinSpace]", "-",
RowBox[{"0.0001230875294335981`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3785.632566631851`", ",",
RowBox[{"0.00034332607919179545`", "\[VeryThinSpace]", "-",
RowBox[{"0.000022474670011712814`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3786.132566631851`", ",",
RowBox[{"0.00032636174074601417`", "\[VeryThinSpace]", "+",
RowBox[{"0.00007290590853607798`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3786.632566631851`", ",",
RowBox[{"0.000285713435197864`", "\[VeryThinSpace]", "+",
RowBox[{"0.00015633837280595755`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3787.132566631851`", ",",
RowBox[{"0.00022637556460958796`", "\[VeryThinSpace]", "+",
RowBox[{"0.00022255693914538435`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3787.632566631851`", ",",
RowBox[{"0.00015432654260580673`", "\[VeryThinSpace]", "+",
RowBox[{"0.0002680173716277785`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3788.132566631851`", ",",
RowBox[{"0.00007600185880351399`", "\[VeryThinSpace]", "+",
RowBox[{"0.00029101787476925754`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3788.632566631851`", ",",
RowBox[{
RowBox[{"-", "2.222586103096283`*^-6"}], "+",
RowBox[{"0.0002916733971422845`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3789.132566631851`", ",",
RowBox[{ RowBox[{"-", "0.00007449979456256061`"}], "+",
RowBox[{"0.0002717576728148202`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3789.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00013590321624101033`"}], "+",
RowBox[{"0.0002344356603755414`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3790.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000182718253009683`"}], "+",
RowBox[{"0.00018391503764119904`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3790.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.0002126205380829135`"}], "+",
RowBox[{"0.00012504888406236384`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3791.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.00022473707328423475`"}], "+",
RowBox[{"0.00006292256416990757`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3791.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00021959504011500133`"}], "+",
RowBox[{"2.4563392320858744`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3792.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.00019897087464255616`"}], "-",
RowBox[{"0.00005194834022635232`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3792.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00016565843529302456`"}], "-",
RowBox[{"0.00009669619446483862`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3793.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.00012317960329869988`"}], "-",
RowBox[{"0.00012920304901472377`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3793.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00007546313934682445`"}], "-",
RowBox[{"0.00014800939289379736`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3794.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.0000265180831657337`"}], "-",
RowBox[{"0.00015280108795761294`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3794.632566631851`", ",",
RowBox[{"0.00001987354644721707`", "\[VeryThinSpace]", "-",
RowBox[{"0.00014434269649939583`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3795.132566631851`", ",", RowBox[{"0.000060423185471256884`", "\[VeryThinSpace]", "-",
RowBox[{"0.00012433503684148144`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3795.632566631851`", ",",
RowBox[{"0.00009254441116816145`", "\[VeryThinSpace]", "-",
RowBox[{"0.00009521338326365863`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3796.132566631851`", ",",
RowBox[{"0.00011449253954621936`", "\[VeryThinSpace]", "-",
RowBox[{"0.000059905980119156764`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3796.632566631851`", ",",
RowBox[{"0.0001254298625903563`", "\[VeryThinSpace]", "-",
RowBox[{"0.00002157411916789169`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3797.132566631851`", ",",
RowBox[{"0.0001254172460849251`", "\[VeryThinSpace]", "+",
RowBox[{"0.00001664518567449056`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3797.632566631851`", ",",
RowBox[{"0.00011533833597018986`", "\[VeryThinSpace]", "+",
RowBox[{"0.000051874608069579076`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3798.132566631851`", ",",
RowBox[{"0.00009676729882453481`", "\[VeryThinSpace]", "+",
RowBox[{"0.00008169380480576028`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3798.632566631851`", ",",
RowBox[{"0.00007179449599556633`", "\[VeryThinSpace]", "+",
RowBox[{"0.00010428650339637885`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3799.132566631851`", ",",
RowBox[{"0.000042826638089887826`", "\[VeryThinSpace]", "+",
RowBox[{"0.00011853004844565281`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3799.632566631851`", ",",
RowBox[{"0.000012378673982022227`", "\[VeryThinSpace]", "+",
RowBox[{"0.00012402504474860946`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3800.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000017126017018934627`"}], "+",
RowBox[{"0.00012106751119031535`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3800.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00004353246656267874`"}], "+",
RowBox[{"0.0001105702018400462`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3801.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.00006509623703621492`"}], "+",
RowBox[{"0.00009394316848549942`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3801.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00008058268873027281`"}], "+", RowBox[{"0.00007294598581941361`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3802.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.00008931919690751223`"}], "+",
RowBox[{"0.00004952528958527896`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3802.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00009120011956390115`"}], "+",
RowBox[{"0.000025651329654855384`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3803.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.00008664802993038457`"}], "+",
RowBox[{"3.166178427272718`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3803.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00007653779827592079`"}], "-",
RowBox[{"0.000016345651317024914`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3804.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.00006209247752337001`"}], "-",
RowBox[{"0.000031656131095122235`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3804.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00004476137777266833`"}], "-",
RowBox[{"0.00004195711456427477`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3805.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000026091222352577202`"}], "-",
RowBox[{"0.00004688638839003227`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3805.632566631851`", ",",
RowBox[{
RowBox[{"-", "7.600844958786067`*^-6"}], "-",
RowBox[{"0.00004651759124277327`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3806.132566631851`", ",",
RowBox[{"9.331284377767185`*^-6", "-",
RowBox[{"0.00004131791004214613`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3806.632566631851`", ",",
RowBox[{"0.00002355926883222562`", "\[VeryThinSpace]", "-",
RowBox[{"0.000032079592335795074`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3807.132566631851`", ",",
RowBox[{"0.00003423651670955087`", "\[VeryThinSpace]", "-",
RowBox[{"0.000019832783679331606`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3807.632566631851`", ",",
RowBox[{"0.000040854171463231395`", "\[VeryThinSpace]", "-",
RowBox[{"5.747914725115383`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",", RowBox[{"{",
RowBox[{"3808.132566631851`", ",",
RowBox[{"0.00004325086207196203`", "\[VeryThinSpace]", "+",
RowBox[{"8.964081371178974`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3808.632566631851`", ",",
RowBox[{"0.00004159555373233258`", "\[VeryThinSpace]", "+",
RowBox[{"0.00002314604307673961`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3809.132566631851`", ",",
RowBox[{"0.00003634714354617395`", "\[VeryThinSpace]", "+",
RowBox[{"0.00003577678089385568`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3809.632566631851`", ",",
RowBox[{"0.000028195826367084157`", "\[VeryThinSpace]", "+",
RowBox[{"0.000046036126074009696`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3810.132566631851`", ",",
RowBox[{"0.000017992166285941942`", "\[VeryThinSpace]", "+",
RowBox[{"0.00005334947917012139`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3810.632566631851`", ",",
RowBox[{"6.670196071420039`*^-6", "+",
RowBox[{"0.000057410323072708466`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3811.132566631851`", ",",
RowBox[{
RowBox[{"-", "4.829258040422409`*^-6"}], "+",
RowBox[{"0.000058180894754557855`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3811.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00001562937740492121`"}], "+",
RowBox[{"0.000055872823787015046`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3812.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000024977538618657754`"}], "+",
RowBox[{"0.00005091084066605043`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3812.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00003229132991253336`"}], "+",
RowBox[{"0.00004388361164006423`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3813.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000037188133537786125`"}], "+",
RowBox[{"0.00003548641036556648`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3813.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.000039497454623643186`"}], "+",
RowBox[{"0.00002646049533155559`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3814.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000039256454072660194`"}], "+", RowBox[{"0.00001753399241334494`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3814.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.000036690356157348564`"}], "+",
RowBox[{"9.368525800511464`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3815.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.00003218041717250914`"}], "+",
RowBox[{"2.5151063372800006`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3815.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.000026222808629294137`"}], "-",
RowBox[{"2.6182027194987266`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3816.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000019382211566264113`"}], "-",
RowBox[{"5.7853324112682395`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3816.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.000012243992033576698`"}], "-",
RowBox[{"6.907638366982082`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3817.132566631851`", ",",
RowBox[{
RowBox[{"-", "5.368649504572034`*^-6"}], "-",
RowBox[{"6.0663494622628435`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3817.632566631851`", ",",
RowBox[{"7.482538965536961`*^-7", "-",
RowBox[{"3.4836612323727887`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3818.132566631851`", ",",
RowBox[{"5.708095250479285`*^-6", "+",
RowBox[{"5.052367190298766`*^-7", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3818.632566631851`", ",",
RowBox[{"9.231379166416233`*^-6", "+",
RowBox[{"5.486408157388172`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3819.132566631851`", ",",
RowBox[{"0.000011169221401364504`", "\[VeryThinSpace]", "+",
RowBox[{"0.00001100462242677332`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3819.632566631851`", ",",
RowBox[{"0.000011504092132742921`", "\[VeryThinSpace]", "+",
RowBox[{"0.00001660091505564033`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3820.132566631851`", ",",
RowBox[{"0.00001034061026102501`", "\[VeryThinSpace]", "+",
RowBox[{"0.000021847462052602792`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3820.632566631851`", ",", RowBox[{"7.887861604149175`*^-6", "+",
RowBox[{"0.000026377313483978266`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3821.132566631851`", ",",
RowBox[{"4.43523745538612`*^-6", "+",
RowBox[{"0.00002990718485251023`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3821.632566631851`", ",",
RowBox[{"3.2413871759606825`*^-7", "+",
RowBox[{"0.00003225208256791229`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3822.132566631851`", ",",
RowBox[{
RowBox[{"-", "4.08200264812688`*^-6"}], "+",
RowBox[{"0.00003333135081095128`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3822.632566631851`", ",",
RowBox[{
RowBox[{"-", "8.42693528627177`*^-6"}], "+",
RowBox[{"0.00003316633554525373`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3823.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000012387918588649926`"}], "+",
RowBox[{"0.00003187055773955749`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3823.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00001569738557804594`"}], "+",
RowBox[{"0.00002963367041689932`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3824.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000018158688475884028`"}], "+",
RowBox[{"0.000026700951006595927`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3824.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.000019655179941058294`"}], "+",
RowBox[{"0.000023350241513980166`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3825.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000020152529485899708`"}], "+",
RowBox[{"0.000019868299456168586`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3825.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.000019694599766430126`"}], "+",
RowBox[{"0.000016528374010147642`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3826.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.00001839376019313363`"}], "+",
RowBox[{"0.000013570686097121042`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3826.632566631851`", ",",
RowBox[{ RowBox[{"-", "0.000016416787100832167`"}], "+",
RowBox[{"0.000011186980587902443`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3827.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000013967821420160964`"}], "+",
RowBox[{"9.510054176274846`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3827.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.000011269874360683005`"}], "+",
RowBox[{"8.608580646973226`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3828.132566631851`", ",",
RowBox[{
RowBox[{"-", "8.54651235974674`*^-6"}], "+",
RowBox[{"8.487147219682071`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3828.632566631851`", ",",
RowBox[{
RowBox[{"-", "6.004885640591886`*^-6"}], "+",
RowBox[{"9.091207610045402`*^-6", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3829.132566631851`", ",",
RowBox[{
RowBox[{"-", "3.821523678130284`*^-6"}], "+",
RowBox[{"0.000010316009685849613`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3829.632566631851`", ",",
RowBox[{
RowBox[{"-", "2.131525885793247`*^-6"}], "+",
RowBox[{"0.000012018577389491901`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3830.132566631851`", ",",
RowBox[{
RowBox[{"-", "1.0217716019399397`*^-6"}], "+",
RowBox[{"0.000014031616236901422`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3830.632566631851`", ",",
RowBox[{
RowBox[{"-", "5.283676244190897`*^-7"}], "+",
RowBox[{"0.000016178065435244537`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3831.132566631851`", ",",
RowBox[{
RowBox[{"-", "6.379303082004937`*^-7"}], "+",
RowBox[{"0.00001828531039067111`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3831.632566631851`", ",",
RowBox[{
RowBox[{"-", "1.2927954809047225`*^-6"}], "+",
RowBox[{"0.00002019779822931084`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3832.132566631851`", ",",
RowBox[{
RowBox[{"-", "2.3988312840262527`*^-6"}], "+",
RowBox[{"0.000021787388082766088`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{", RowBox[{"3832.632566631851`", ",",
RowBox[{
RowBox[{"-", "3.835625065853508`*^-6"}], "+",
RowBox[{"0.00002296081459117834`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3833.132566631851`", ",",
RowBox[{
RowBox[{"-", "5.467680792654617`*^-6"}], "+",
RowBox[{"0.000023663820925220204`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3833.632566631851`", ",",
RowBox[{
RowBox[{"-", "7.155795599735288`*^-6"}], "+",
RowBox[{"0.000023882001201852812`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3834.132566631851`", ",",
RowBox[{
RowBox[{"-", "8.768100769754115`*^-6"}], "+",
RowBox[{"0.000023638919445558538`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3834.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.000010189301154024553`"}], "+",
RowBox[{"0.000022990700891820492`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3835.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000011327768607650977`"}], "+",
RowBox[{"0.000022019554659496704`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3835.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.000012120848664283514`"}], "+",
RowBox[{"0.000020825273905878117`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3836.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000012537079064461968`"}], "+",
RowBox[{"0.000019516276098676654`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3836.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.00001257587911254469`"}], "+",
RowBox[{"0.000018200550184577732`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3837.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.00001226545673590589`"}], "+",
RowBox[{"0.00001697789517152898`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3837.632566631851`", ",",
RowBox[{
RowBox[{"-", "0.000011657708167598064`"}], "+",
RowBox[{"0.000015932733914856547`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3838.132566631851`", ",",
RowBox[{
RowBox[{"-", "0.000010822520989649433`"}], "+",
RowBox[{"0.000015129161780487304`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3838.632566631851`", ",",
RowBox[{
RowBox[{"-", "9.84136280568393`*^-6"}], "+",
RowBox[{"0.000014607957451532819`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3839.132566631851`", ",",
RowBox[{
RowBox[{"-", "8.799919044159762`*^-6"}], "+",
RowBox[{"0.000014385274055883525`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3839.632566631851`", ",",
RowBox[{
RowBox[{"-", "7.781228253916296`*^-6"}], "+",
RowBox[{"0.000014453403858084917`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3840.132566631851`", ",",
RowBox[{
RowBox[{"-", "6.859909907991834`*^-6"}], "+",
RowBox[{"0.00001478358447814041`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3840.632566631851`", ",",
RowBox[{
RowBox[{"-", "6.097077569564994`*^-6"}], "+",
RowBox[{"0.000015329628377412348`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3841.132566631851`", ",",
RowBox[{
RowBox[{"-", "5.5369354094328435`*^-6"}], "+",
RowBox[{"0.000016032958184064646`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3841.632566631851`", ",",
RowBox[{
RowBox[{"-", "5.2047869094242114`*^-6"}], "+",
RowBox[{"0.000016828054976002096`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3842.132566631851`", ",",
RowBox[{
RowBox[{"-", "5.106755474236371`*^-6"}], "+",
RowBox[{"0.000017647918967839548`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3842.632566631851`", ",",
RowBox[{
RowBox[{"-", "5.231060801816723`*^-6"}], "+",
RowBox[{"0.00001842912418753431`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3843.132566631851`", ",",
RowBox[{
RowBox[{"-", "5.550066052175394`*^-6"}], "+",
RowBox[{"0.00001911640206404573`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3843.632566631851`", ",",
RowBox[{
RowBox[{"-", "6.02386360592299`*^-6"}], "+",
RowBox[{"0.00001966604403914544`", " ", "\[ImaginaryI]"}]}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"3844.132566631851`", ",",
RowBox[{ RowBox[{"-", "6.604257150324257`*^-6"}], "+",
RowBox[{"0.00002004834980411519`", " ", "\[ImaginaryI]"}]}]}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->{3.803290472787409*^9},
CellLabel->
"Out[195]=",ExpressionUUID->"df2f9615-8e05-445c-8120-c9477c29f9ab"]
}, Closed]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"(*",
RowBox[{"MapThread", "[",
RowBox[{"Equal", ",",
RowBox[{"{",
RowBox[{"data", ",", "data1"}], "}"}]}], "]"}], "*)"}]], "Input",
CellChangeTimes->{{3.8032434516712523`*^9, 3.803243458357511*^9}, {
3.8032434949014606`*^9, 3.8032434973477163`*^9}, {3.8032904787095947`*^9,
3.803290510819427*^9}},ExpressionUUID->"00c7ac87-cbe6-4238-8a2a-\
460662985b9b"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True"}], "}"}]], "Output",
CellChangeTimes->{{3.803290481043002*^9, 3.803290496368853*^9}},
CellLabel->
"Out[197]=",ExpressionUUID->"eb73c598-0fff-4888-ad83-1cfdd90f1082"]
}, Closed]],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"I", " ", "did", " ", "check", " ",
RowBox[{"it", ".", " ", "The"}], " ", "data", " ", "selection", " ", "for",
" ", "the", " ", "two", " ", "packages", " ", "are", " ", "the", " ",
RowBox[{"same", ".", " ", "So"}], " ", "the", " ", "discrepancy", " ",
"must", " ", "have", " ", "been", " ", "due", " ", "to", " ", "something",
" ",
RowBox[{"else", ".", " ", "I"}], " ", "think", " ", "the", " ",
"difference", " ", "is", " ", "due", " ", "to", " ", "that", " ", "the",
" ", "fitting", " ", "time", " ", "is", " ",
RowBox[{"different", ".", " ", "I"}], " ", "think", " ", "what", " ", "we",
" ", "previously", " ", "have", " ", "is", " ", "because", " ",
"OvertoneModelV2", " ", "was", " ", "always", " ", "fitting", " ", "at",
" ",
RowBox[{"tmax", "."}]}], "*)"}]], "Input",
CellChangeTimes->{{3.8027732381292667`*^9, 3.80277325000593*^9}, {
3.802773325282261*^9, 3.8027733434368563`*^9}, {3.802820721739662*^9,
3.802820753278511*^9}, {3.803243501076262*^9, 3.8032435529317017`*^9}, {
3.8032436148233547`*^9, 3.803243642689152*^9}, {3.803243797231555*^9,
3.803243828491214*^9}},
CellLabel->
"In[181]:=",ExpressionUUID->"14ae1fd2-11d8-4787-8673-e643b76374d3"],
Cell[BoxData[
RowBox[{
RowBox[{"(*", " ",
RowBox[{
RowBox[{
RowBox[{"Some", " ", "tests", "\[IndentingNewLine]", "ntones"}], " ",
"=", " ", "7"}], ";", "\[IndentingNewLine]",
RowBox[{"alphas", " ", "=", " ",
RowBox[{
RowBox[{
RowBox[{"allalphas", "[",
RowBox[{"[",
RowBox[{";;", "ntones"}], "]"}], "]"}], "\n", "betas"}], " ", "=",
" ",
RowBox[{
RowBox[{
RowBox[{"allbetas", "[",
RowBox[{"[",
RowBox[{";;", "ntones"}], "]"}], "]"}], "\[IndentingNewLine]",
"p"}], " ", "=", " ",
RowBox[{
RowBox[{
RowBox[{"RandomReal", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "\[Omega]fact"}], ",", " ", "\[Omega]fact"}], "}"}],
",", " ", "ntones"}], "]"}], "\[IndentingNewLine]", "alphas"}], "/.",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{
RowBox[{"alphas", "[",
RowBox[{"[", "i", "]"}], "]"}], "\[Rule]",
RowBox[{"p", "[",
RowBox[{"[", "i", "]"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "ntones"}], "}"}]}], "]"}], "\[IndentingNewLine]", "alphas"}]}]}]}]}]}], "*)"}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{
RowBox[{"Now", " ",
RowBox[{"let", "'"}], "s", " ", "write", " ", "two", " ", "separate",
" ", "functions", " ", "that", " ", "fit", " ", "at", " ", "t0", " ",
"and", " ",
RowBox[{"tmax", ".", " ", "Just"}], " ", "use", " ", "the", " ", "n"}],
"=",
RowBox[{"1", " ",
RowBox[{"tone", ".", " ", "Generate"}], " ", "two", " ", "plots", " ",
"and", " ",
RowBox[{"compare", "."}]}]}], " ", "*)"}]}]], "Input",
CellChangeTimes->{{3.80314137980869*^9, 3.803141513262596*^9}, {
3.803141575167782*^9, 3.803141608961442*^9}, {3.8031418319905367`*^9,
3.8031418802456713`*^9}, {3.8031419107579727`*^9, 3.8031420723470697`*^9},
3.803142117113082*^9, {3.803142305460614*^9, 3.80314235024502*^9}, {
3.803142768308063*^9, 3.803142770066595*^9}, {3.803243565198303*^9,
3.8032435736844254`*^9}, {3.803243833461101*^9, 3.8032438389617233`*^9}, {
3.803244064192643*^9, 3.8032440741406527`*^9}, {3.803244125043792*^9,
3.8032441467304993`*^9}},
CellLabel->
"In[182]:=",ExpressionUUID->"4bcf0baa-0cd5-4c82-8dd8-18e4bddca2a7"],
Cell[BoxData[
RowBox[{
RowBox[{"tabvars", "=",
RowBox[{"Table", "[", "\n",
RowBox[{
RowBox[{
RowBox[{"randomvar\[Alpha]s", "=", " ",
RowBox[{"RandomReal", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "\[Omega]fact"}], ",", " ", "\[Omega]fact"}], "}"}],
",", " ", "ntones"}], "]"}]}], ";", "\n",
RowBox[{"randomvar\[Beta]s", " ", "=", " ",
RowBox[{"RandomReal", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "\[Omega]fact"}], ",", " ", "\[Omega]fact"}], "}"}],
",", " ", "ntones"}], "]"}]}], ";", "\n",
RowBox[{"ansatz", "=",
RowBox[{
RowBox[{
RowBox[{"OvertoneModelV2", "[",
RowBox[{"ntones", ",",
RowBox[{"{",
RowBox[{"\[Eta]", ",", "\[Chi]1", ",", "\[Chi]2"}], "}"}], ",",
"t0", ",",
RowBox[{"\"\<Fit\[Alpha]\>\"", "\[Rule]",
RowBox[{"Range", "[",
RowBox[{"1", ",", " ", "ntones"}], "]"}]}], ",",
RowBox[{"\"\<Fit\[Tau]\>\"", "\[Rule]",
RowBox[{"Range", "[",
RowBox[{"1", ",", " ", "ntones"}], "]"}]}], ",",
RowBox[{"\"\<ModesData\>\"", "->", "Modedata"}]}], "]"}], "\n", "/.",
RowBox[{"Table", "[",
RowBox[{
RowBox[{
RowBox[{"alphas", "[",
RowBox[{"[", "i", "]"}], "]"}], "\[Rule]",
RowBox[{"randomvar\[Alpha]s", "[",
RowBox[{"[", "i", "]"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "ntones"}], "}"}]}], "]"}]}], "/.",
RowBox[{"Table", "[", RowBox[{
RowBox[{
RowBox[{"betas", "[",
RowBox[{"[", "j", "]"}], "]"}], "\[Rule]",
RowBox[{"randomvar\[Beta]s", "[",
RowBox[{"[", "j", "]"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"j", ",", "ntones"}], "}"}]}], "]"}]}]}], ";",
"\[IndentingNewLine]",
RowBox[{"cfit", "=",
RowBox[{"NonlinearModelFit", "[",
RowBox[{"data", ",", "ansatz", ",", "spectrum", ",", "t"}], "]"}]}],
";", "\[IndentingNewLine]",
RowBox[{"cfitd", "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{
RowBox[{"data", "[",
RowBox[{"[",
RowBox[{"All", ",", "1"}], "]"}], "]"}], ",",
RowBox[{
RowBox[{"Normal", "[", "cfit", "]"}], "/.",
RowBox[{"t", "->",
RowBox[{"data", "[",
RowBox[{"[",
RowBox[{"All", ",", "1"}], "]"}], "]"}]}]}]}], "}"}], "]"}]}],
";", "\n",
RowBox[{"alphasandmis", " ", "=", " ",
RowBox[{"Join", "[",
RowBox[{
RowBox[{"alphas", "/.",
RowBox[{"Table", "[",
RowBox[{
RowBox[{
RowBox[{"alphas", "[",
RowBox[{"[", "i", "]"}], "]"}], "\[Rule]",
RowBox[{"randomvar\[Alpha]s", "[",
RowBox[{"[", "i", "]"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "ntones"}], "}"}]}], "]"}]}], ",", " ",
RowBox[{"{",
RowBox[{"1", "-",
RowBox[{"EasyMatchT", "[",
RowBox[{"data", ",", "cfitd", ",", "t0", ",",
RowBox[{"t0", "+", "90"}]}], "]"}]}], "}"}]}], "]"}]}], ";", " ",
"\n",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"This", " ", "extra", " ", "step", " ", "is", " ", "to", " ", "make",
" ", "sure", " ",
RowBox[{"everything", "'"}], "s", " ", "correct"}], ",", " ",
RowBox[{
"and", " ", "also", " ", "to", " ", "make", " ", "the", " ", "output",
" ", "a", " ", "uniform", " ", "shape"}]}], " ", "*)"}], "\n",
RowBox[{"betasandtfit", " ", "=", " ",
RowBox[{"Join", "[",
RowBox[{
RowBox[{"betas", "/.",
RowBox[{"Table", "[",
RowBox[{
RowBox[{
RowBox[{"betas", "[",
RowBox[{"[", "j", "]"}], "]"}], "\[Rule]",
RowBox[{"randomvar\[Beta]s", "[",
RowBox[{"[", "j", "]"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"j", ",", "ntones"}], "}"}]}], "]"}]}], ",", " ",
RowBox[{"{", "tshift", "}"}]}], "]"}]}], ";", "\n",
RowBox[{"complexamps", " ", "=", " ", RowBox[{"spectrum", "/.",
RowBox[{"cfit", "[", "\"\<BestFitParameters\>\"", "]"}]}]}], ";",
"\n",
RowBox[{"amplitudes", " ", "=", " ",
RowBox[{"Re", "[",
RowBox[{"Sqrt", "[",
RowBox[{"complexamps", " ", "*", " ",
RowBox[{"Conjugate", "[", "complexamps", "]"}]}], "]"}], "]"}]}],
";", "\n",
RowBox[{"phases", " ", "=", " ",
RowBox[{"Mod", "[",
RowBox[{
RowBox[{"Arg", "[", "complexamps", "]"}], ",", " ",
RowBox[{"2", " ", "Pi"}]}], "]"}]}], ";", "\n",
RowBox[{"{",
RowBox[{
"alphasandmis", ",", " ", "betasandtfit", ",", " ", "amplitudes", ",",
" ", "phases"}], "}"}]}], ",", " ",
RowBox[{"{",
RowBox[{"j", ",", "npoints"}], "}"}]}], "]"}]}], ";"}]], "Code",
CellChangeTimes->{
3.8019012567182837`*^9, {3.801901306368492*^9, 3.801901347644397*^9},
3.801901410887135*^9, {3.80190187722987*^9, 3.801901879607212*^9}, {
3.801905987882124*^9, 3.801905989699266*^9}, {3.8019062871664743`*^9,
3.801906312482821*^9}, {3.8019063425225697`*^9, 3.801906429559026*^9}, {
3.801906653354439*^9, 3.801906654839933*^9}, {3.801906698689931*^9,
3.8019067056553392`*^9}, {3.801906766302006*^9, 3.801906766497856*^9}, {
3.801906809977264*^9, 3.8019068263340263`*^9}, {3.801906889494577*^9,
3.8019069354645443`*^9}, {3.801906976150055*^9, 3.801906980794434*^9},
3.802723625211141*^9, {3.802725289077022*^9, 3.802725372599122*^9}, {
3.802725403915537*^9, 3.802725405453145*^9}, {3.8027381221988897`*^9,
3.802738128753804*^9}, 3.8027382189480667`*^9, {3.80273829120744*^9,
3.802738338077341*^9}, {3.80273843437359*^9, 3.8027384351090117`*^9}, {
3.8027384859079227`*^9, 3.8027384870168257`*^9}, {3.802738649170569*^9,
3.802738653224839*^9}, {3.8027389137338963`*^9, 3.8027389144600983`*^9}, {
3.8027739091611233`*^9, 3.802774028216634*^9}, {3.802774260330141*^9,
3.802774262123005*^9}, {3.802775168380761*^9, 3.8027751693148603`*^9}, {
3.802779469045109*^9, 3.802779474278122*^9}, {3.8028195321605453`*^9,
3.802819549351095*^9}, {3.802819649019054*^9, 3.802819650684476*^9}, {
3.8029718924410477`*^9, 3.8029719122869587`*^9}, {3.803023852618524*^9,
3.803023861841371*^9}, {3.803024324278982*^9, 3.803024326593643*^9}, {
3.803024577303836*^9, 3.803024577987797*^9}, {3.803024764485598*^9,
3.803024789425659*^9}, {3.803038777257547*^9, 3.803038930975946*^9}, {
3.8030389654128447`*^9, 3.803038967747855*^9}, {3.8031407070736103`*^9,
3.803140816229475*^9}, {3.803140919789867*^9, 3.803140928127294*^9}, {
3.8031420847026176`*^9, 3.8031421349566174`*^9}, {3.8031424741871443`*^9,
3.80314274761318*^9}, {3.803142906816615*^9, 3.8031429095458527`*^9}, {
3.80314302369702*^9, 3.803143192429762*^9}, {3.803143242023755*^9,
3.8031432741978207`*^9}, {3.8031560316331167`*^9, 3.803156095640521*^9}, {
3.803156153543808*^9, 3.8031561899550247`*^9}, {3.8031562206651897`*^9,
3.80315622521733*^9}, {3.803170515970438*^9, 3.803170516914722*^9},
3.803171571706768*^9, {3.803171893052779*^9, 3.803171893988744*^9}, {
3.803174367762936*^9, 3.803174368661742*^9}, {3.8031748871038303`*^9,
3.80317489000391*^9}, {3.8031792871944113`*^9, 3.803179290627304*^9}},
CellLabel->
"In[184]:=",ExpressionUUID->"a627adcd-28ff-47a5-9e2b-807e814fa96a"],
Cell[BoxData[
RowBox[{"(*", "tabvars", "*)"}]], "Input",
CellChangeTimes->{{3.803143398759705*^9, 3.8031434053299723`*^9}, {
3.803143479146696*^9, 3.803143479323927*^9}, {3.8031453943571672`*^9,
3.8031453945268307`*^9}, {3.803156207763258*^9, 3.803156210206444*^9}},
CellLabel->
"In[186]:=",ExpressionUUID->"4d4d7ba5-68b6-458d-8fbc-39f5e028a1c8"],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"MatrixForm", "[", "tabvars", "]"}], "*)"}]], "Input",
CellChangeTimes->{{3.803142803594363*^9, 3.803142805533977*^9}, {
3.803142843321476*^9, 3.803142868819158*^9}, {3.803142919157063*^9, 3.803142923203508*^9}, {3.803143484729534*^9, 3.803143490096158*^9}, {
3.8031453965072823`*^9, 3.8031453967009573`*^9}},
CellLabel->
"In[187]:=",ExpressionUUID->"5821af17-a4c6-42d6-bff7-21700919dcb6"],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"Export", "[",
RowBox[{
RowBox[{"rootpath", "<>", "\"\<plots/n=\>\"", "<>",
RowBox[{"ToString", "[", "ntones", "]"}], "<>", "\"\<_params.fits\>\""}],
",", " ", "params"}], "]"}], "\n",
RowBox[{"Export", "[",
RowBox[{
RowBox[{"rootpath", "<>", "\"\<plots/n=\>\"", "<>",
RowBox[{"ToString", "[", "ntones", "]"}], "<>", "\"\<_t0=\>\"", "<>",
RowBox[{"ToString", "[", "tshift", "]"}], "<>", "\"\<M_data.fits\>\""}],
",", " ", "tabvars"}], "]"}]}], "Code",
CellChangeTimes->{{3.8019065069435463`*^9, 3.80190652588253*^9}, {
3.801906563232386*^9, 3.80190658024755*^9}, {3.801906639024638*^9,
3.801906645087222*^9}, {3.801906945654804*^9, 3.801906958171398*^9}, {
3.802775297391609*^9, 3.802775315905003*^9}, {3.8027754112886972`*^9,
3.802775433629244*^9}, {3.802777386307939*^9, 3.802777390010846*^9}, {
3.802779525148198*^9, 3.802779525567844*^9}, {3.8027795922322273`*^9,
3.8027795957475357`*^9}, {3.8027797255319157`*^9,
3.8027797348414392`*^9}, {3.802779783831923*^9, 3.8027797870700502`*^9}, {
3.802800525790202*^9, 3.802800529358205*^9}, {3.802800595169345*^9,
3.802800603969894*^9}, {3.802800957499465*^9, 3.8028009660672693`*^9}, {
3.802820654811384*^9, 3.802820684154482*^9}, {3.802820835314728*^9,
3.802820835711516*^9}, {3.802820899595097*^9, 3.802820907349113*^9}, {
3.802822373592733*^9, 3.802822396912744*^9}, 3.8029551860942*^9, {
3.802974130852302*^9, 3.8029741398503647`*^9}, {3.803039364830682*^9,
3.8030394190834713`*^9}, {3.803073034436673*^9, 3.8030730420899363`*^9}, {
3.803073072968874*^9, 3.8030731335785093`*^9}, {3.8031435793158484`*^9,
3.803143635273448*^9}, 3.803143700797092*^9, {3.803244322455467*^9,
3.803244334470828*^9}, {3.803300627930951*^9,
3.803300628466501*^9}},ExpressionUUID->"599f1833-d91e-4999-b904-\
ddbb9f32dd32"],
Cell[BoxData["\<\"~/git/rdstackingproject/plots/n=1_params.fits\"\>"], \
"Output",
CellChangeTimes->{
3.801906632797943*^9, 3.801906958786167*^9, 3.802775434706009*^9,
3.8027773910229177`*^9, 3.802779526603694*^9, 3.802779596303043*^9,
3.80277973543213*^9, 3.802779787592304*^9, 3.8028005311659803`*^9,
3.802800606003826*^9, 3.802800966439932*^9, 3.802820908221634*^9,
3.802822122449877*^9, 3.8028221848663387`*^9, 3.8028223176586533`*^9, {
3.802822376719575*^9, 3.802822397488453*^9}, 3.8029551878330927`*^9,
3.8029741447126217`*^9, 3.802985555752239*^9, 3.802991551411234*^9,
3.802991765096395*^9, 3.802995846247011*^9, 3.803004454923922*^9,
3.803025067269126*^9, 3.803027878805398*^9, 3.803031464189167*^9,
3.803039450780648*^9, 3.803039739334799*^9, 3.803042508006186*^9,
3.8030446171545277`*^9, 3.8030472912993193`*^9, 3.803047414248501*^9,
3.803049519127301*^9, 3.803050629689013*^9, 3.803052021464507*^9, {
3.803143613296617*^9, 3.803143637432125*^9}, {3.803143689188904*^9,
3.803143706731982*^9}, 3.8031438321707582`*^9, 3.8031443155952663`*^9,
3.80314479902766*^9, 3.803145184903799*^9, 3.803172450455964*^9,
3.803173548400772*^9, 3.803174285161511*^9, 3.803174688276619*^9,
3.803175005864601*^9, 3.803175440301227*^9, 3.803175790721271*^9,
3.803175826532639*^9, 3.803179439707921*^9, 3.8031813827324677`*^9,
3.803244277266409*^9, 3.803244344749514*^9, 3.8032451340157957`*^9},
CellLabel->
"Out[188]=",ExpressionUUID->"7ae8458a-28fa-4f0a-b557-21ad5f19ceab"],
Cell[BoxData["\<\"~/git/rdstackingproject/plots/n=1_t0=19M_data.fits\"\>"], \
"Output",
CellChangeTimes->{
3.801906632797943*^9, 3.801906958786167*^9, 3.802775434706009*^9,
3.8027773910229177`*^9, 3.802779526603694*^9, 3.802779596303043*^9, 3.80277973543213*^9, 3.802779787592304*^9, 3.8028005311659803`*^9,
3.802800606003826*^9, 3.802800966439932*^9, 3.802820908221634*^9,
3.802822122449877*^9, 3.8028221848663387`*^9, 3.8028223176586533`*^9, {
3.802822376719575*^9, 3.802822397488453*^9}, 3.8029551878330927`*^9,
3.8029741447126217`*^9, 3.802985555752239*^9, 3.802991551411234*^9,
3.802991765096395*^9, 3.802995846247011*^9, 3.803004454923922*^9,
3.803025067269126*^9, 3.803027878805398*^9, 3.803031464189167*^9,
3.803039450780648*^9, 3.803039739334799*^9, 3.803042508006186*^9,
3.8030446171545277`*^9, 3.8030472912993193`*^9, 3.803047414248501*^9,
3.803049519127301*^9, 3.803050629689013*^9, 3.803052021464507*^9, {
3.803143613296617*^9, 3.803143637432125*^9}, {3.803143689188904*^9,
3.803143706731982*^9}, 3.8031438321707582`*^9, 3.8031443155952663`*^9,
3.80314479902766*^9, 3.803145184903799*^9, 3.803172450455964*^9,
3.803173548400772*^9, 3.803174285161511*^9, 3.803174688276619*^9,
3.803175005864601*^9, 3.803175440301227*^9, 3.803175790721271*^9,
3.803175826532639*^9, 3.803179439707921*^9, 3.8031813827324677`*^9,
3.803244277266409*^9, 3.803244344749514*^9, 3.803245134361959*^9},
CellLabel->
"Out[189]=",ExpressionUUID->"27560ea5-99e3-47c8-b0a2-c8b7a15627b8"],
Cell[BoxData["\<\"~/git/rdstackingproject/plots/n=1_t0=19M_data@tmax.fits\"\>\
"], "Output",
CellChangeTimes->{
3.801906632797943*^9, 3.801906958786167*^9, 3.802775434706009*^9,
3.8027773910229177`*^9, 3.802779526603694*^9, 3.802779596303043*^9,
3.80277973543213*^9, 3.802779787592304*^9, 3.8028005311659803`*^9,
3.802800606003826*^9, 3.802800966439932*^9, 3.802820908221634*^9,
3.802822122449877*^9, 3.8028221848663387`*^9, 3.8028223176586533`*^9, {
3.802822376719575*^9, 3.802822397488453*^9}, 3.8029551878330927`*^9,
3.8029741447126217`*^9, 3.802985555752239*^9, 3.802991551411234*^9,
3.802991765096395*^9, 3.802995846247011*^9, 3.803004454923922*^9,
3.803025067269126*^9, 3.803027878805398*^9, 3.803031464189167*^9,
3.803039450780648*^9, 3.803039739334799*^9, 3.803042508006186*^9,
3.8030446171545277`*^9, 3.8030472912993193`*^9, 3.803047414248501*^9,
3.803049519127301*^9, 3.803050629689013*^9, 3.803052021464507*^9, {
3.803143613296617*^9, 3.803143637432125*^9}, {3.803143689188904*^9,
3.803143706731982*^9}, 3.8031438321707582`*^9, 3.8031443155952663`*^9,
3.80314479902766*^9, 3.803145184903799*^9, 3.803172450455964*^9,
3.803173548400772*^9, 3.803174285161511*^9, 3.803174688276619*^9,
3.803175005864601*^9, 3.803175440301227*^9, 3.803175790721271*^9,
3.803175826532639*^9, 3.803179439707921*^9, 3.8031813827324677`*^9,
3.803244277266409*^9, 3.803244344749514*^9, 3.803245134366295*^9},
CellLabel->
"Out[190]=",ExpressionUUID->"c7156f84-e8f4-4730-adfa-cff7438dff46"]
}, Open ]]
}, Open ]]
}, Open ]]
}, Open ]]
},
AutoGeneratedPackage->Automatic,
WindowSize->{1537, 1058},
WindowMargins->{{Automatic, 87}, {Automatic, 0}},
Magnification:>1.5 Inherited,
FrontEndVersion->"12.0 for Mac OS X x86 (64-bit) (April 8, 2019)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 220, 4, 146, "Title",ExpressionUUID->"b53761d4-1b24-4b86-b93e-9c44d4b29d65"],
Cell[803, 28, 250, 5, 46, "Input",ExpressionUUID->"980e79f6-9c07-4072-bd1e-300ac946e8c3"],Cell[CellGroupData[{
Cell[1078, 37, 201, 4, 101, "Section",ExpressionUUID->"fe9e23be-b684-46cc-9b54-957e00ada2e3"],
Cell[CellGroupData[{
Cell[1304, 45, 232, 4, 81, "Subsection",ExpressionUUID->"e952a5b9-bbfe-43a9-9668-8567ca76bf42"],
Cell[1539, 51, 554, 10, 78, "Code",ExpressionUUID->"ded0ca57-00ba-4008-906d-ee5041d06f91"],
Cell[2096, 63, 712, 13, 137, "Code",ExpressionUUID->"df18942a-15e3-4e8b-880e-923fca9e18d7"],
Cell[2811, 78, 668, 13, 78, "Code",ExpressionUUID->"029b1804-86de-4457-bbc5-eda3da546f6a"],
Cell[CellGroupData[{
Cell[3504, 95, 4933, 110, 456, "Code",ExpressionUUID->"d0e5d8fb-ddc3-4ce5-93a5-2a83bdf621d4"],
Cell[8440, 207, 1600, 25, 52, "Output",ExpressionUUID->"9b0527c0-1958-4d34-94a7-1d951beff977"],
Cell[10043, 234, 1583, 24, 52, "Output",ExpressionUUID->"db208a9c-2a86-4f52-9737-1ad0b0a7db8a"],
Cell[11629, 260, 1582, 24, 52, "Output",ExpressionUUID->"577ceb04-844e-43c5-92d2-a64fb9757fcf"],
Cell[13214, 286, 1625, 25, 52, "Output",ExpressionUUID->"e67bb052-0c11-4b17-a7df-d2de6e05ef6c"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[14888, 317, 187, 3, 81, "Subsection",ExpressionUUID->"46366112-0a9f-4a64-97d3-72f08bceb964"],
Cell[CellGroupData[{
Cell[15100, 324, 1861, 37, 280, "Code",ExpressionUUID->"2c37e1b9-5cb9-4980-a108-163d386515de"],
Cell[16964, 363, 1397, 21, 70, "Output",ExpressionUUID->"99e08be2-d0cd-4d54-af01-71a148e08b7d"],
Cell[18364, 386, 1431, 21, 70, "Output",ExpressionUUID->"babc9bf4-10c1-480c-985a-53a50beafc3e"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[19844, 413, 162, 3, 55, "Subsection",ExpressionUUID->"2b160476-27ad-417e-ba6b-aba2f29dfd9c"],
Cell[CellGroupData[{
Cell[20031, 420, 1113, 27, 222, "Code",ExpressionUUID->"91d0d186-3694-4095-b0ad-f5476cf3486b"],
Cell[21147, 449, 2955, 44, 70, "Output",ExpressionUUID->"d2ebf61c-1cb4-4bd1-9253-0f09897339f1"],
Cell[24105, 495, 28986, 741, 70, "Output",ExpressionUUID->"e722ba36-e4ad-49d5-8145-273a0949539f"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[53140, 1242, 165, 3, 55, "Subsection",ExpressionUUID->"44e4b7cd-d026-4079-8fd8-3f63cf14cfa7"],
Cell[53308, 1247, 4114, 106, 506, "Code",ExpressionUUID->"48958061-652d-46b3-9aca-2ec5e658ec2a"],
Cell[57425, 1355, 3650, 91, 421, "Code",ExpressionUUID->"0204b879-5f51-44f5-8a4f-95cc490da72f"]
}, Closed]],
Cell[CellGroupData[{
Cell[61112, 1451, 157, 3, 55, "Subsection",ExpressionUUID->"8488942b-dc04-47e9-8ca6-119712f58bc1"],
Cell[CellGroupData[{
Cell[61294, 1458, 163, 3, 67, "Subsubsection",ExpressionUUID->"f0a39a1f-5153-4be0-b03d-fd24806eca3d"],
Cell[61460, 1463, 1075, 29, 78, "Input",ExpressionUUID->"7694c13e-a765-44ce-9adc-09e59459c3d2"],
Cell[CellGroupData[{
Cell[62560, 1496, 1237, 31, 108, "Code",ExpressionUUID->"763f62ae-036b-47b4-86e4-d1b0e24fc92b"],
Cell[63800, 1529, 2286, 43, 70, "Output",ExpressionUUID->"29922d04-dbfe-4dda-bfa1-dfde2b64a223"]
}, Open ]],
Cell[CellGroupData[{
Cell[66123, 1577, 2162, 50, 108, "Code",ExpressionUUID->"37d6369f-02c3-4af4-91b6-0490e703d64a"],
Cell[68288, 1629, 3143, 48, 70, "Output",ExpressionUUID->"cb882560-a9a2-4038-af62-66d0283d1901"]
}, Open ]],
Cell[71446, 1680, 416, 10, 108, "Code",ExpressionUUID->"827b1be5-400a-4c10-97cf-df0471536b52"]
}, Closed]],
Cell[CellGroupData[{
Cell[71899, 1695, 168, 3, 53, "Subsubsection",ExpressionUUID->"e69b91c9-6c5f-47bb-9540-07f42335cb1a"],
Cell[CellGroupData[{
Cell[72092, 1702, 777, 14, 78, "Code",ExpressionUUID->"b361f1b5-e01e-4264-bf04-6b665f472fd9"],
Cell[72872, 1718, 6012, 87, 52, "Output",ExpressionUUID->"a51746de-d660-486f-8873-b084675ed06f"]
}, Open ]],
Cell[CellGroupData[{
Cell[78921, 1810, 1643, 35, 137, "Code",ExpressionUUID->"5584846d-d985-4ced-98a1-ac35c86181ea"],
Cell[80567, 1847, 6424, 91, 84, "Output",ExpressionUUID->"0c70cb63-c331-46d1-878b-11319e4d7366"],
Cell[86994, 1940, 6373, 89, 52, "Output",ExpressionUUID->"b5c965e9-7725-45cb-845e-6349350cc8d2"]
}, Open ]],
Cell[CellGroupData[{
Cell[93404, 2034, 3350, 90, 311, "Code",ExpressionUUID->"6e14f11c-a2d0-4ce1-82ab-1a2a53c717dd"],
Cell[CellGroupData[{
Cell[96779, 2128, 6356, 92, 36, "Print",ExpressionUUID->"7c574374-0482-4a49-bae6-e183e5943422"],
Cell[103138, 2222, 6354, 92, 36, "Print",ExpressionUUID->"a19a03f8-bb27-4aaa-b5a8-5186d36cac13"],
Cell[109495, 2316, 6354, 92, 36, "Print",ExpressionUUID->"fce784a6-2a91-43a8-986b-7bffc5d3760a"],
Cell[115852, 2410, 6372, 93, 36, "Print",ExpressionUUID->"f91da2db-965b-4433-b9ab-598b1a941f44"],
Cell[122227, 2505, 6357, 92, 36, "Print",ExpressionUUID->"f6bf26f2-bc6c-4945-8ba2-4fad5d43a183"],Cell[128587, 2599, 6385, 93, 36, "Print",ExpressionUUID->"55d78e7c-e083-45e5-8097-0825c3642e07"],
Cell[134975, 2694, 6342, 92, 36, "Print",ExpressionUUID->"7b0d9152-d447-48f2-8957-08d8504dfa34"],
Cell[141320, 2788, 6342, 92, 36, "Print",ExpressionUUID->"44494259-aa00-4701-8e11-39a82e95f55b"],
Cell[147665, 2882, 6349, 92, 36, "Print",ExpressionUUID->"dccf1746-edf8-4ef3-af8e-a86e06f107c6"]
}, Open ]]
}, Open ]],
Cell[154041, 2978, 1236, 24, 78, "Code",ExpressionUUID->"96195c64-1c6d-4895-96a0-d93b22b41c3c"]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[155338, 3009, 311, 5, 78, "Section",ExpressionUUID->"55e918b2-ca1f-498b-a377-bd7458fe203c"],
Cell[CellGroupData[{
Cell[155674, 3018, 324, 5, 67, "Subsubsection",ExpressionUUID->"d264caca-e5b5-4c88-941a-93010756d554"],
Cell[CellGroupData[{
Cell[156023, 3027, 1473, 31, 137, "Code",ExpressionUUID->"3c15dded-a57b-4656-b83e-c264f7e27e40"],
Cell[157499, 3060, 337, 6, 52, "Output",ExpressionUUID->"f3fef36c-6422-42a2-a76b-0e1f448056a1"],
Cell[157839, 3068, 335, 6, 52, "Output",ExpressionUUID->"814ea4f9-f9d5-4fba-9a94-1b65dae2bd6c"]
}, Open ]],
Cell[CellGroupData[{
Cell[158211, 3079, 1881, 39, 108, "Code",ExpressionUUID->"3c2e4ad2-108f-4f17-bea7-97b751d2d371"],
Cell[160095, 3120, 55200, 1435, 70, "Output",ExpressionUUID->"df2f9615-8e05-445c-8120-c9477c29f9ab"]
}, Closed]],
Cell[CellGroupData[{
Cell[215332, 4560, 402, 9, 38, "Input",ExpressionUUID->"00c7ac87-cbe6-4238-8a2a-460662985b9b"],
Cell[215737, 4571, 3855, 54, 487, "Output",ExpressionUUID->"eb73c598-0fff-4888-ad83-1cfdd90f1082"]
}, Closed]],
Cell[219607, 4628, 1265, 22, 101, "Input",ExpressionUUID->"14ae1fd2-11d8-4787-8673-e643b76374d3"],
Cell[220875, 4652, 2482, 61, 326, "Input",ExpressionUUID->"4bcf0baa-0cd5-4c82-8dd8-18e4bddca2a7"],
Cell[223360, 4715, 7829, 170, 456, "Code",ExpressionUUID->"a627adcd-28ff-47a5-9e2b-807e814fa96a"],
Cell[231192, 4887, 356, 6, 46, "Input",ExpressionUUID->"4d4d7ba5-68b6-458d-8fbc-39f5e028a1c8"],
Cell[231551, 4895, 440, 8, 46, "Input",ExpressionUUID->"5821af17-a4c6-42d6-bff7-21700919dcb6"],
Cell[CellGroupData[{
Cell[232016, 4907, 1877, 31, 108, "Code",ExpressionUUID->"599f1833-d91e-4999-b904-ddbb9f32dd32"],
Cell[233896, 4940, 1542, 23, 52, "Output",ExpressionUUID->"7ae8458a-28fa-4f0a-b557-21ad5f19ceab"],
Cell[235441, 4965, 1545, 23, 52, "Output",ExpressionUUID->"27560ea5-99e3-47c8-b0a2-c8b7a15627b8"],
Cell[236989, 4990, 1550, 23, 52, "Output",ExpressionUUID->"c7156f84-e8f4-4730-adfa-cff7438dff46"]
}, Open ]]
}, Open ]]
}, Open ]]
}, Open ]]
}
]
*)