Squeezed_QI_previous_version.nb

(* 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[    316288,       6863]
NotebookOptionsPosition[    301792,       6641]
NotebookOutlinePosition[    302315,       6660]
CellTagsIndexPosition[    302272,       6657]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell["\<\
MIT License
Copyright (c) 2021 Gaetana Spedalieri  gae.spedalieri@york.ac.uk

Permission is hereby granted, free of charge, to any person obtaining a copy \
of this software and associated documentation files (the \
\[OpenCurlyDoubleQuote]Software\[CloseCurlyDoubleQuote]), to deal in the \
Software without restriction, including without limitation the rights to use, \
copy, modify, merge, publish, distribute, sublicense, and/or sell copies of \
the Software, and to permit persons to whom the Software is furnished to do \
so,subject to the following conditions: The above copyright notice and this \
permission notice shall be included in all copies or substantial portions of \
the Software.

THE SOFTWARE IS PROVIDED \[OpenCurlyDoubleQuote]AS \
IS\[CloseCurlyDoubleQuote], WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, \
INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,  FITNESS FOR \
A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR \
COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, \
WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR \
IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.\
\>", "Text",
 CellChangeTimes->{{3.839571273162124*^9, 3.8395713968319306`*^9}, 
   3.8450550185682325`*^9},ExpressionUUID->"36718b04-584e-42ac-aec3-\
53b40f67a816"],

Cell[" Optimal displaced-squeezed probes", "Item",
 CellChangeTimes->{{3.8375171387230124`*^9, 
  3.837517157573023*^9}},ExpressionUUID->"26819ba0-a3c5-4d93-a597-\
112a298d5edc"],

Cell[BoxData[
 RowBox[{"Quit", "[", "]"}]], "Input",
 CellChangeTimes->{{3.8369750367980137`*^9, 3.836975039098144*^9}},
 CellLabel->"In[1]:=",ExpressionUUID->"6f8c1c38-ef3b-4d36-bc46-44fd34e1f5af"],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"**", 
   RowBox[{
   "*", " ", "check", " ", "of", " ", "the", " ", "Pfa", " ", "and", " ", 
    "Pmd"}]}], " ", "****)"}]], "Input",
 CellChangeTimes->{{3.8370209872145443`*^9, 
  3.837020999231499*^9}},ExpressionUUID->"a8e8d6c4-bdec-4a4f-9232-\
8c2b771b7411"],

Cell[BoxData[
 RowBox[{
  RowBox[{"gauss", "[", 
   RowBox[{"z_", ",", "zm_", ",", "\[Sigma]_"}], "]"}], ":=", 
  RowBox[{
   FractionBox["1", 
    RowBox[{" ", 
     RowBox[{"\[Sigma]", "  ", 
      SqrtBox[
       RowBox[{"2", " ", "\[Pi]", " "}]]}]}]], 
   RowBox[{"Exp", "[", 
    FractionBox[
     RowBox[{"-", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"z", "-", "zm"}], ")"}], "2"]}], 
     RowBox[{"2", " ", 
      SuperscriptBox["\[Sigma]", "2"]}]], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.8370210038476496`*^9, 3.8370210717481823`*^9}, {
  3.837021108182034*^9, 3.8370211159542603`*^9}, {3.837021884174449*^9, 
  3.8370218962200794`*^9}, {3.84503472986583*^9, 3.8450347305739975`*^9}},
 CellLabel->"In[3]:=",ExpressionUUID->"025b1c15-87df-404e-9233-3bf63fcfba3b"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Simplify", "[", 
  RowBox[{
   RowBox[{
    SubsuperscriptBox["\[Integral]", "t", 
     RowBox[{"+", "\[Infinity]"}]], 
    RowBox[{
     RowBox[{"gauss", "[", 
      RowBox[{"z", ",", "zm", ",", "\[Sigma]"}], "]"}], 
     RowBox[{"\[DifferentialD]", "z"}]}]}], ",", 
   RowBox[{"\[Sigma]", ">", "0"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.83702109043085*^9, 3.8370211285358944`*^9}, {
   3.83702116428465*^9, 3.8370211648843*^9}, {3.8370212502659845`*^9, 
   3.837021268165243*^9}, {3.8370219175362115`*^9, 3.8370219204441214`*^9}, {
   3.8370559892636495`*^9, 3.8370559901908965`*^9}, 3.837056252062849*^9, {
   3.845034732998409*^9, 3.8450347333138447`*^9}},
 CellLabel->"In[4]:=",ExpressionUUID->"cfd87186-d4ae-4ea9-b033-d49d7c886d7b"],

Cell[BoxData[
 RowBox[{
  FractionBox["1", "2"], " ", 
  RowBox[{"(", 
   RowBox[{"1", "-", 
    RowBox[{"Erf", "[", 
     FractionBox[
      RowBox[{"t", "-", "zm"}], 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]"}]], "]"}]}], ")"}]}]], "Output",
 CellChangeTimes->{
  3.837021150080965*^9, 3.8370211900069227`*^9, 3.8370212958782225`*^9, 
   3.837021933886241*^9, 3.8370559984084272`*^9, 3.837056266612175*^9, 
   3.8375171943376184`*^9, 3.8446769466714287`*^9, {3.8450347255415926`*^9, 
   3.84503474221616*^9}},
 CellLabel->"Out[4]=",ExpressionUUID->"514667d8-8283-4ad8-b1ce-50fc94182914"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Simplify", "[", 
  RowBox[{
   RowBox[{
    SubsuperscriptBox["\[Integral]", 
     RowBox[{"-", "\[Infinity]"}], "t"], 
    RowBox[{
     RowBox[{"gauss", "[", 
      RowBox[{"z", ",", "zm", ",", "\[Sigma]"}], "]"}], 
     RowBox[{"\[DifferentialD]", "z"}]}]}], ",", 
   RowBox[{"\[Sigma]", ">", "0"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.8370562908083224`*^9, 3.837056295587343*^9}, {
  3.845034746811617*^9, 3.845034746927801*^9}},
 CellLabel->"In[5]:=",ExpressionUUID->"e78f4f88-2b0c-4f3e-989e-3d762d40a5b3"],

Cell[BoxData[
 RowBox[{
  FractionBox["1", "2"], " ", 
  RowBox[{"(", 
   RowBox[{"1", "+", 
    RowBox[{"Erf", "[", 
     FractionBox[
      RowBox[{"t", "-", "zm"}], 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]"}]], "]"}]}], ")"}]}]], "Output",
 CellChangeTimes->{3.837056305363576*^9, 3.8450347562150393`*^9},
 CellLabel->"Out[5]=",ExpressionUUID->"b830c0ef-7e88-4362-a156-34c9b77d1cc7"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"Erf", "[", 
   RowBox[{"-", "x"}], "]"}], "+", 
  RowBox[{"Erf", "[", "x", "]"}]}]], "Input",
 CellChangeTimes->{{3.8370576850675354`*^9, 3.8370576917537313`*^9}},
 CellLabel->"In[6]:=",ExpressionUUID->"9ec0b9c9-33a6-4879-a0be-f9bf6cc9238e"],

Cell[BoxData["0"], "Output",
 CellChangeTimes->{3.8370576920040765`*^9, 3.845034850988482*^9},
 CellLabel->"Out[6]=",ExpressionUUID->"bc68f168-34e0-4657-96a0-cf2e28da29b3"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"*", " ", "evaluation", " ", "thermal", " ", "noise"}], " ", 
  "**)"}]], "Input",
 CellChangeTimes->{{3.837073428834882*^9, 
  3.8370734352633495`*^9}},ExpressionUUID->"d47985b5-48a1-456e-bd3a-\
8f160be15efc"],

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"\[Lambda]NUM", "=", 
    RowBox[{"8", " ", 
     SuperscriptBox["10", 
      RowBox[{"-", "7"}]]}]}], ";"}], " ", 
  RowBox[{"(*", " ", 
   RowBox[{"800", " ", "nm"}], " ", "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"Wband", " ", "=", " ", 
    SuperscriptBox["10", "8"]}], ";"}], "  ", 
  RowBox[{"(*", " ", 
   RowBox[{"100", " ", "MHz"}], " ", "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"aRNUM", " ", "=", "  ", 
    RowBox[{"1", "/", "10"}]}], ";"}], " ", 
  RowBox[{"(*", "  ", 
   RowBox[{"0.1", " ", ";"}], " ", "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"(*", " ", 
   RowBox[{"10", " ", "cm"}], " ", "*)"}]}]}], "Input",
 CellChangeTimes->{{3.8370729445677166`*^9, 3.8370729793973*^9}, {
  3.8370731004970713`*^9, 3.8370731030385213`*^9}, {3.8446786349637585`*^9, 
  3.8446786621644335`*^9}},
 CellLabel->"In[7]:=",ExpressionUUID->"314d41f4-1f8e-4ff0-856c-9fa08e574aa3"],

Cell[BoxData[
 RowBox[{
  RowBox[{"hplanck", "=", 
   RowBox[{"6.62607004", " ", 
    SuperscriptBox["10", 
     RowBox[{"-", "34"}]]}]}], ";"}]], "Input",
 CellLabel->"In[10]:=",ExpressionUUID->"15143ef7-26cc-491a-a986-bb039f0dc123"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"cLIGHT", "=", "299792458"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"\[Nu]freq", "=", 
  FractionBox["cLIGHT", "\[Lambda]NUM"]}]}], "Input",
 CellLabel->"In[11]:=",ExpressionUUID->"060e3d7c-fce4-494e-89ff-1d2d458b1a36"],

Cell[BoxData["374740572500000"], "Output",
 CellChangeTimes->{3.837072479725625*^9, 3.8370731042816424`*^9, 
  3.837517197386531*^9, 3.844676946858885*^9, 3.8446786698189774`*^9, 
  3.8450350019585342`*^9},
 CellLabel->"Out[12]=",ExpressionUUID->"d046b895-da20-4fcf-8b86-78b9b41b07a5"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"angleVIEW", " ", "=", " ", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"1", "/", "10"}], ")"}], " ", 
     FractionBox[
      RowBox[{"2", " ", "\[Pi]"}], 
      RowBox[{"360", " "}]]}]}], ";"}], " ", 
  RowBox[{"(*", " ", 
   RowBox[{
    RowBox[{"1", "/", "10"}], " ", "degree"}], " ", "*)"}], " "}]], "Input",
 CellChangeTimes->{{3.837072485092349*^9, 3.8370725240595927`*^9}, {
  3.8370731272486467`*^9, 3.8370731403726635`*^9}, {3.837077138525388*^9, 
  3.83707714190773*^9}, {3.8370771878548155`*^9, 3.8370771969556828`*^9}},
 CellLabel->"In[13]:=",ExpressionUUID->"1357aec1-5d79-4e0b-97a4-c8f1b0ad3fd3"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[CapitalOmega]fov", "=", 
  RowBox[{"N", "[", 
   SuperscriptBox["angleVIEW", "2"], "]"}], "  ", 
  RowBox[{"(*", " ", 
   RowBox[{"in", " ", "steradians"}], " ", "*)"}]}]], "Input",
 CellLabel->"In[14]:=",ExpressionUUID->"c0ce421c-9323-478b-86d1-fcb5ca7f2e89"],

Cell[BoxData["3.0461741978670857`*^-6"], "Output",
 CellChangeTimes->{3.8370724800922174`*^9, 3.837072529176094*^9, 
  3.8370731052986374`*^9, 3.837073143015254*^9, 3.837077142808571*^9, 
  3.8370771988086786`*^9, 3.8375171988590107`*^9, 3.8446769469838543`*^9, 
  3.8446786730758934`*^9, 3.8450352354242983`*^9},
 CellLabel->"Out[14]=",ExpressionUUID->"c670d49e-208b-4e11-beec-065f82550acb"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"N", "[", 
   RowBox[{
    FractionBox[
     RowBox[{"\[Pi]", "  ", "\[Lambda]NUM"}], 
     RowBox[{"hplanck", " ", "cLIGHT"}]], " ", 
    RowBox[{"(", " ", 
     RowBox[{"1.5", " ", 
      SuperscriptBox["10", 
       RowBox[{"-", "1"}]]}], ")"}]}], "]"}], " ", 
  RowBox[{"(*", " ", 
   RowBox[{"converting", " ", "units", " ", "for", " ", "HskyDay"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"HskyDay", "=", 
    RowBox[{"1.9", " ", 
     SuperscriptBox["10", "18"]}]}], ";"}], "  ", 
  RowBox[{"(*", " ", 
   RowBox[{"Cloudy", " ", "sky", " ", "800", " ", "nm"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[CapitalDelta]\[Lambda]", "=", 
    SuperscriptBox["10", 
     RowBox[{"-", "4"}]]}], ";"}], " ", 
  RowBox[{"(*", " ", 
   RowBox[{
    RowBox[{"in", " ", "nm"}], " ", "-", " ", 
    RowBox[{"homodyne", " ", "detector"}]}], " ", "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", " ", 
   RowBox[{
    RowBox[{"Wband", "=", 
     SuperscriptBox["10", "8"]}], ";"}], " ", 
   RowBox[{"(*", " ", 
    RowBox[{
     RowBox[{"100", " ", "MHz", " ", "homodyne", " ", "detector"}], " ", "-", 
     " ", 
     RowBox[{"already", " ", "defined", " ", "above"}]}], " ", "*)"}], "  ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{"\[CapitalGamma]R", "=", 
  RowBox[{"N", "[", 
   RowBox[{"\[CapitalDelta]\[Lambda]", " ", 
    SuperscriptBox["Wband", 
     RowBox[{"-", "1"}]], " ", "\[CapitalOmega]fov", " ", 
    SuperscriptBox["aRNUM", "2"]}], "]"}]}]}], "Input",
 CellChangeTimes->{{3.8370729153769426`*^9, 3.837072918560115*^9}, {
  3.837073063183638*^9, 3.837073077648113*^9}},
 CellLabel->"In[15]:=",ExpressionUUID->"16e5eb05-57de-425d-8be3-a21d487bb430"],

Cell[BoxData["1.89781726661466`*^18"], "Output",
 CellChangeTimes->{
  3.8370729035297437`*^9, 3.837072983113837*^9, {3.8370730782150617`*^9, 
   3.8370731062318826`*^9}, 3.8370731438998137`*^9, 3.83707714359172*^9, 
   3.837077199358786*^9, 3.83751719969304*^9, 3.844676949101823*^9, 
   3.844678676922597*^9, 3.845035302717708*^9},
 CellLabel->"Out[15]=",ExpressionUUID->"af0f919a-97c4-47c7-9928-b2a0f274f771"],

Cell[BoxData["3.046174197867086`*^-20"], "Output",
 CellChangeTimes->{
  3.8370729035297437`*^9, 3.837072983113837*^9, {3.8370730782150617`*^9, 
   3.8370731062318826`*^9}, 3.8370731438998137`*^9, 3.83707714359172*^9, 
   3.837077199358786*^9, 3.83751719969304*^9, 3.844676949101823*^9, 
   3.844678676922597*^9, 3.845035302733358*^9},
 CellLabel->"Out[18]=",ExpressionUUID->"6ad87842-7452-422f-a11e-86de9fd7d5bd"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"nback", "=", 
  RowBox[{"HskyDay", " ", "\[CapitalGamma]R"}]}]], "Input",
 CellChangeTimes->{{3.837072988313978*^9, 3.837073008780937*^9}},
 CellLabel->"In[19]:=",ExpressionUUID->"ca8745a2-589a-465b-8228-05be9b96b1e4"],

Cell[BoxData["0.05787730975947463`"], "Output",
 CellChangeTimes->{
  3.83707300938597*^9, {3.837073078781521*^9, 3.8370731071658287`*^9}, 
   3.837073144665369*^9, 3.8370771446749954`*^9, 3.8370772014754066`*^9, 
   3.837517200744093*^9, 3.844676951253254*^9, 3.8446786795277996`*^9, 
   3.8450353490152917`*^9},
 CellLabel->"Out[19]=",ExpressionUUID->"e991a586-6d5b-46e8-852b-f76ab2426eb7"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{" ", 
  RowBox[{"N", "[", 
   FractionBox["578773", "10000000"], "]"}]}]], "Input",
 CellChangeTimes->{{3.837078024478752*^9, 3.8370780550800867`*^9}},
 CellLabel->"In[98]:=",ExpressionUUID->"f214d981-783a-4037-b0aa-e8487b2645ab"],

Cell[BoxData["0.0578773`"], "Output",
 CellChangeTimes->{{3.837078050629119*^9, 3.8370780553288345`*^9}, 
   3.8446786799339542`*^9},
 CellLabel->"Out[98]=",ExpressionUUID->"2051dfa0-829f-4e4b-b1b1-018777849c5d"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"*", "  ", "probabilities"}], " ", "**)"}]], "Input",
 CellChangeTimes->{{3.837059219026568*^9, 
  3.8370592237101088`*^9}},ExpressionUUID->"b15fd94a-c7e1-4332-a2b4-\
439b04ec5f90"],

Cell[BoxData[
 RowBox[{
  RowBox[{"f", "[", "r_", "]"}], ":=", 
  FractionBox[
   RowBox[{"r", "+", 
    SuperscriptBox["r", 
     RowBox[{"-", "1"}]], "-", "2"}], "4"]}]], "Input",
 CellChangeTimes->{{3.8370585964390235`*^9, 3.8370586194184465`*^9}},
 CellLabel->"In[20]:=",ExpressionUUID->"d06f9d04-0f80-4f6e-845f-0d0b9703f567"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Solve", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"nS", "-", 
     RowBox[{"f", "[", "r", "]"}]}], "\[Equal]", "0"}], ",", "r"}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.837059379804179*^9, 3.8370593865274878`*^9}},
 CellLabel->"In[21]:=",ExpressionUUID->"6655856f-5e9f-45b5-b474-6c328d9fcdd2"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"r", "\[Rule]", 
     RowBox[{"1", "+", 
      RowBox[{"2", " ", "nS"}], "-", 
      RowBox[{"2", " ", 
       SqrtBox[
        RowBox[{"nS", "+", 
         SuperscriptBox["nS", "2"]}]]}]}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"r", "\[Rule]", 
     RowBox[{"1", "+", 
      RowBox[{"2", " ", "nS"}], "+", 
      RowBox[{"2", " ", 
       SqrtBox[
        RowBox[{"nS", "+", 
         SuperscriptBox["nS", "2"]}]]}]}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.837059386927231*^9, 3.8370771476253757`*^9, 
  3.8370772044755106`*^9, 3.83751720449728*^9, 3.844678682528516*^9, 
  3.8450365850283422`*^9},
 CellLabel->"Out[21]=",ExpressionUUID->"ce98276c-eba0-440b-97aa-22b16809d6b8"]
}, Open  ]],

Cell[BoxData[{
 RowBox[{
  RowBox[{"rmin", "[", "nS_", "]"}], ":=", 
  RowBox[{"1", "+", 
   RowBox[{"2", " ", "nS"}], "-", 
   RowBox[{"2", " ", 
    SqrtBox[
     RowBox[{"nS", "+", 
      SuperscriptBox["nS", "2"]}]]}]}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"rmax", "[", "nS_", "]"}], ":=", 
  RowBox[{"1", "+", 
   RowBox[{"2", " ", "nS"}], "+", 
   RowBox[{"2", " ", 
    SqrtBox[
     RowBox[{"nS", "+", 
      SuperscriptBox["nS", "2"]}]]}]}]}]}], "Input",
 CellChangeTimes->{{3.837059410625389*^9, 3.837059441244351*^9}, {
  3.8370594894942236`*^9, 3.8370595019611826`*^9}},
 CellLabel->"In[22]:=",ExpressionUUID->"59e6ea32-0d4e-4bf6-a324-7bfc4470f7e5"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"rmin", "[", "nS", "]"}], ",", 
     RowBox[{"rmax", "[", "nS", "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"nS", ",", "0", ",", "1.5"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.8446769572561817`*^9, 3.8446770037535963`*^9}},
 CellLabel->"In[24]:=",ExpressionUUID->"ab89428c-7f6e-4ce3-97fc-57d995c6d100"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
      1.], LineBox[CompressedData["
1:eJwVlXk81Ikbx2dlsdVG1rEVYmhCP7Gd2vCxElKiJUpqkZuVbOuKTDmqacZd
VHKsrWHlKCSRvuOWI3JMWTTGPeRmRNj5/fG8ntfzz+fzfn2e1/N6lBwv/eos
RCKR4gT1/7543PuRxSV7vd8ydhuTVyYR6bRT9R1FD9tr/nwmmjmBpokBDwbl
JDZmbSjslp9AtvS/aR+TrSFCKbEIL/qMqYIjdC/KBZTpuDT/c+Eztqp1lq6x
HfHuw3fRK5KfoRtA+6k+2QWg78zQezcO+1o9ZpyDB7TbK8jXY8dxQ2ZWzo7i
jaIcoS9hZ8bx/rllfdy8DypaSRpuyuNw6tII57N94WWi5HNnegyRatwvRLIf
ErTSQ4i7Y5A9VVa4IzQAXxM+X93pOYbMgHuXaA5BCOud4HkYjKGh1nTQknIN
lvQJ8+p5HnL9JS3shKnIWfzfuahWHvzvhOZEzVMx6N/ATcjlQazgrNss+wZm
3X5mzHnyoC60qbcsORL7DteeYU+PYkb66uFJxk3Yml9ZNO4YRanaSJJS6C2E
ph2lu5eM4sSpCstIBxqs/J7cTQwbxaU0v3pzShQcyNrLRQqj0C7sp9yQjUZI
ZwFei4yC5KRqYCscg12vam9rT46g3v9uKn0+BrIqgzw/1ghsUy/ZTrPjsFk/
sCjRYwTBE8otr5LvQTU/muPQOAz7gK5VS+lE0AYXDLpKhmEoFKvxmZGIEUrA
5jjmML6XWaVtD02CX3We2cuwYaTofjga7vAATcmM4ly9YbDo9FIzSgpesnYX
L78eQjnvY+OGrBSM71+85ZIzhDKTnb31u1KxdLM84ptHQzgn5EDK+DENKeTw
PZXBQzhdvkzerpCOVIWmU9Z6QzA98JObrFoGtA8EHh+oG4TJINvHzyMDudO9
PuxXgzBOuBbYkZ2BD2fLVsaeDsJwpoEWv/tvtJhYZPjFDkIv1yVHfN9jBDh0
JpPsBrGXkjwjCia4HbGeHgsD2NNhsOxCZcJXM29JgzcArfDRdTUsJuIlidPr
ewewm3tAOtwwEw/2eNZtqBmAakrrQZJpFoSb3jyhJA5ATkY0ZNEqG5ZCWTQv
3QF8K+IrOuqRhyrH5iLlpH6MHAsVn2Xm4ag9VXdddD/eMuiyKwN5uF29yXQq
oh+1tLb4W5r5qJaLPznzRz/uSE5kJGfl4+SGry9jLfohRVauqnr0DCLbbRfk
N/aD8gtDWDqyAPPrC31od7iQ7Y8Xe/B3AbrO1hazw7gQi3iwcXtlAaoVbeN2
B3PBq2NKqZEK4fzxj4xFLy7yLCpUdIMKYbQpvGD5JBfa9nxDZ+8ilMf3xv4j
xcWxUIeIIutiLB6J7SM/6cOeaJZR+pVioGRRIjm1D3KpSmKMuGJ05/+qJne/
D1PlfTSn5mK4kqW7teh9uLfqEPOD0UvkWuyt+ce3DwMhjg8v7y/B4nf8bR36
faAGX3ymIVUK0itVzbw+DooDnXset5ZD9siku85eDp7oebK3zpRD2TbkBFOD
g3vrLrdGS75BiaiGjawqB36M4OpAyzeQazzKEpHn4EB6fI5ZxxucPtY5qyTK
wbkBTnmQFwGdb12nwl9+QtcG8WiyDws3epfbeT98wkdbT01f/0osJgwftujv
AY1r7JUYWYk9AZe8OV09+NlDJavsbiWsqJWFfu97kBzYQxYtrITIpi92Rawe
2CeZyyRPVcI+R0M/KK0Hwx17V6rdq/DA0Dtz2289mLf4+naLXTV8Ey0f0zjd
2GzMcGHp18LD5q+VvJl/IdHu/PzguQaEOx9s2KreBWVFr6wIx3eoO9TKDsr8
AO2e3xt+iWuFk/z7mjQvNlhL1BPtD9tA1a6Vz9LphNuburryGx2g6xQxS/U6
cP8ic6u0PRtfebEFuufboXGmb2HV+SPGt0bl9F9rQ++sebP+sX/R2O2Y7s56
j5lPW7RkTvfAKkZcZUn4PWKyg1xtbD6BRDr+Ysq2FRRxMbOAhxxYqd9ckalr
wQsfanaUYO9potWx5H0taN8RL3oqjgvOo450Mdd3UAlrUz1/vx/aZqVzFY7N
OGTxaV/qwwFI5Aa3fnOlCT0+EXoM+iCoGd8lNfzViOeHzn5fHTsERWetOqum
BshY137MjBjG1HRbqd/mBoBLiq24MgLq7116Mhff4r6M2/eUgFEQ+V7TS3n1
uJHifnO/Bw/6m/RP3tpcj0fNSTVRPmNQNN3iHuldhxDv+Cl533FoNZkw/+qs
xZiD6o9nHQV/ReFEQr55Le6s8IR7XSbQ8pOTL6WqBq/GjSc32U6Cah/W2GFc
g84d2tyfVaagGHz5vFpbNdzULmrGP57C1BEd8urZarCsz139RWEa1Ou1sS8+
V2HvGV6WVPo0OLN0j70hVfAKM2LrbpuBxHm2pPePVbjlIrb0TfwMFI+pDbqX
VOK1vMMaT2oWElaj+VbWlShZjVynHjWLlhfCc/YrFWguOMJjbJ5DS232yP20
CsEdu9TQ4+Yg4aoRzDepQHjx6fS+9fOwV8nzVFpiwY7cfeEcYx4cEXERJpOF
5Rea23aJLmCK4qJqeZ6F4HWjjXevLSDG5rFUpwwLMiqHHHaQ+NAP80vqbyTg
7209tz6QD9L57HEVGgG5A051lKt85Muuz127RYBYuZxsEMIHNa8wqesmgfUM
hmHQdT4Uhd6OxkQQSMmuShi9zUda/ErgGpVAzcie/XUP+PB532Y64E9A6qK4
X0QZHxKX5S83OhMoUZc3TS/no4W+bPrUicCFGXWF14SAp2STGf0igczrRjVz
VQI/yef1JxwIHE4LkXFq4mNqZiXjnR0Bx56xFwa9Ar7Owx3dlgREH3+hXeDw
YaHtvfvNrwSeeon+FsQV6K+a5aWfIrCwTBZ9PsQX5DW309WcAG2rrY3SpIBP
b2p21pSAJtd1l+60gJ+ccZt9jEB71p9rZ2YFeVwjjEpNCCgcimXG8PnQOrXl
YJgRgUpS6tWnXwSzuqGH61ECbnVPzeuWBX46L6uOGxLYGPNKeWBFMON3I60j
BJ7Z1PHX1gR647aTUgYE/gN5IJmb
       "]]},
     Annotation[#, "Charting`Private`Tag$25087#1"]& ], 
    TagBox[
     {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[
      1.], LineBox[CompressedData["
1:eJwVznk41AkYwPHJNaVCaGRifhETevYhtUVt3pfaSCna0LjKJCQhuyJH61aM
u1o0rqc8rdiUikI6hNFBLWUl5OoYLXP/HA3b/vF9vv9+DNihB44pUCgU9vf+
//SekGLn0CM2Gfvt5SGLBJDqt86ki2kDz5jq/Sm3BfByciwok7kPRMU1X40o
Qqha2V/Wx3UDLYedt95tE4Lg9g5OMNMH3IxZyq9DhEA3fdu40MsG/kPRlg1c
IWyPSt/QwfWH1/u6sKhVCIk0sZ4XMwQOZt9rVNUQwd+1v3TkScNgYvzqJkNL
Efi9+yGZ7A2HTVoUZtEBEaSajsw84p4GLwGtNS9bBM/bHcd/YZ4Fcqz4Wp1c
BDciNZ29lOIhQId/x1NHDJEZv/+VJY2HIFRRYluIYfFtVqC4NxEYhRUHW4+I
wUxBbbCJmwpRf3O2zjaKIbTsdMd+Zhb0XKmJ7/WVgNWdUWaiTjb4WXqf8o6Q
AMXPxM5DKQfMKm0OV56TQEfkxVKONAfCWlMPFt+QgEdpqIewNw8mWfytG6cl
EDu59lUD9xL0+Dc0FSVJ4TGH0+jELAFBgAElIEkGzfy+F0srS6AuySVqIF8G
TQ7rBjvWl0K2hWL/tqsy8FTwpVxZVQZytWdttU9l4No8Z0gwyiH6c1RjgRIJ
jps3BOqYXoEbGbvbb8aTsJHJFVHhGrwpTOdVBU+Dsko49UtQDfioU3ftMZiF
3b/7ptx1q4e3D7IFlxXkUH/m2EDF62YYafK1e160AH0eJ8zDI1tAZ8w7Odxg
Ea6wz/R/jO3QqzLFeueigBo9x2q3eD6Hg+cs89NzFXHtmuDKFHYXvPpwRD2v
RQmtBk4+t817DYLr719w+pXx8Wz83p7L3eB8KU3BVYWKgQ95vObEN2B47+RU
mu5iLDx6jb7ySC8E/zb8lm20BH84NCybP9YH9z43K6/doYqD4v2duLsf3Erm
LH/duxRFQ7oWNNcBmJSnd08cX4Y5VdEB7u5DwJOKuU7xy5Gpvtgp6vIHeG/q
fjIiUQ3rwuKrskqH4UmXPUu1UB17jPOpLnkjMDfeYCNw0kCjpG4T78JRMPnU
ElvQp4HWzkObSi+PQfWT0Qxz9gocCEuxyeSMw4ETiXYWwyuw1pq1vDX3I9zU
PfEhMkgTaW7tfX+mfILYpcr1DnxNhBFK7pPfPsOd4vOXHAK0sJAWuJwZ9QXa
KkzM8ye1MLHkeNqPQXzo6rRLyArWxuLOgrassAmQcxUtuiXaGBeSL9AP/wo9
YeqjrOiVOOFrsorF/hfmu05Ra2QrMUPOVxr0nwQr75FOpzgaNny1n1LzmAJW
P3TwZmn41thqZKuRAKSFe/8oj9DBQNOj5vkVAnCwd7FpmdXBx26eMbYMIdyl
v2zrPr0KNx7iV2qXC+GC4KLaevkqDE7a1bt9tQiSeTX+0dG6eM5/8eyifBGA
3tD1zVJdfKDvu8DXFoNedx/LKpqO9+dTFc2yxKDQ93HORkbHzts7+JkrJJDj
Ok8/H7saW9f4t3HyJMC5m6z6M0UPk+tdy4dVpeBrM31RI0YPvQzf+3hmSsH4
ehWTQdHHuTrz1eupMnia8jUBY/UxVvHLi4tnZfDonx16Q1J9pBlZ+xpTSPgW
GrGz+QwDI0PcJKpnSMjWEr64L2Gg3mY/HjOGBJ9x8bNBGQMfyU9x7eJI2Hmo
ul1xhoGqmZk7oxNImPkJHjjJGVhS9fTCl/MkLHooKRhWJrDts+WPvCISLB3f
ay7RIVD7qPrplCYSOJGpmu7WBN4303csbybhwL7WTzHbCPQRmTEePCLhQuyT
xrLtBP6ZsKtN8pQEbeH0Yb4tgdvK4mh+L0m4etO7MM6RQPbARJ3dIAnV87av
rngSSK2YSff58N23MTWX501gdTD1cPQICXXfOC7/HiZQNmdIrf1IQrfH6MvN
fgSm0z3cDaZIuFTQUN8RTKD5SMD67UIS6B300MkQAnsqIxYOiUkYqwBjrVME
Mqxzr+WQ330h/2R6RRDYQimNqZ4hIXxoLyZEEhjIq97PmyMhUSVNWHGGwGU5
DWvH5CSoMdPKn8UQeMudRy4skOAS7+Q8FUfgf1Oa+R4=
       "]]},
     Annotation[#, "Charting`Private`Tag$25087#2"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0, 1.5}, {0., 7.8729832217505455`}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.8446769690675297`*^9, 3.84467700496594*^9}, 
   3.844678685472618*^9, 3.8450365960964518`*^9},
 CellLabel->"Out[24]=",ExpressionUUID->"c68bb147-9e0d-41fa-ab2a-23c0fd03bfd4"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"\[CapitalOmega]", "[", 
   RowBox[{
   "\[Eta]_", ",", "nS_", ",", "nB_", ",", "m_", ",", "r_", ",", "t_"}], 
   "]"}], ":=", 
  RowBox[{"Erf", "[", 
   FractionBox[
    RowBox[{"t", "-", 
     RowBox[{"m", " ", 
      SqrtBox[
       RowBox[{"2", " ", "\[Eta]", 
        RowBox[{"(", 
         RowBox[{"nS", "-", 
          RowBox[{"f", "[", "r", "]"}]}], ")"}], " "}]]}]}], 
    RowBox[{
     SqrtBox[
      RowBox[{"m", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"2", " ", "nB"}], "+", "1", "-", 
         RowBox[{"\[Eta]", 
          RowBox[{"(", 
           RowBox[{"1", "-", "r"}], ")"}]}]}], ")"}], " "}]], " "}]], 
   "]"}]}]], "Input",
 CellChangeTimes->{{3.8370585761243763`*^9, 3.837058582157502*^9}, {
  3.837058642210827*^9, 3.837058716676939*^9}, {3.837058756291479*^9, 
  3.8370587564917593`*^9}},
 CellLabel->"In[25]:=",ExpressionUUID->"7ffe6a70-fc6b-4b35-a7bd-845c05a9bd26"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"pFA", "[", 
   RowBox[{
   "\[Eta]0_", ",", "nS_", ",", "nB_", ",", "m_", ",", "r_", ",", "t_"}], 
   "]"}], ":=", 
  RowBox[{
   FractionBox["1", "2"], " ", 
   RowBox[{"(", 
    RowBox[{"1", "-", " ", 
     RowBox[{"\[CapitalOmega]", "[", 
      RowBox[{"\[Eta]0", ",", "nS", ",", "nB", ",", "m", ",", "r", ",", "t"}],
       "]"}]}], ")"}]}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"pMD", "[", 
   RowBox[{
   "\[Eta]1_", ",", "nS_", ",", "nB_", ",", "m_", ",", "r_", ",", "t_"}], 
   "]"}], ":=", 
  RowBox[{
   FractionBox["1", "2"], " ", 
   RowBox[{"(", 
    RowBox[{"1", "+", " ", 
     RowBox[{"\[CapitalOmega]", "[", 
      RowBox[{"\[Eta]1", ",", "nS", ",", "nB", ",", "m", ",", "r", ",", "t"}],
       "]"}]}], ")"}]}]}]}], "Input",
 CellChangeTimes->{{3.8370587798443303`*^9, 3.837058825108749*^9}},
 CellLabel->"In[26]:=",ExpressionUUID->"d83f4a33-cb39-4578-a56b-b14265e5badb"],

Cell[BoxData[
 RowBox[{
  RowBox[{"pERR", "[", 
   RowBox[{
   "\[Eta]0_", ",", "\[Eta]1_", ",", "nS_", ",", "nB_", ",", "m_", ",", "r_", 
    ",", "t_"}], "]"}], ":=", 
  FractionBox[
   RowBox[{
    RowBox[{"pFA", "[", 
     RowBox[{"\[Eta]0", ",", "nS", ",", "nB", ",", "m", ",", "r", ",", "t"}], 
     "]"}], "+", 
    RowBox[{"pMD", "[", 
     RowBox[{"\[Eta]1", ",", "nS", ",", "nB", ",", "m", ",", "r", ",", "t"}], 
     "]"}]}], "2"]}]], "Input",
 CellChangeTimes->{{3.83705884412106*^9, 3.8370588774252415`*^9}, {
  3.8370589179726486`*^9, 3.837058918675704*^9}},
 CellLabel->"In[28]:=",ExpressionUUID->"fe470852-4364-4086-b583-d2e193baa3ba"],

Cell[BoxData[
 RowBox[{
  RowBox[{"zmean", "[", 
   RowBox[{"\[Eta]_", ",", "nS_", ",", "m_", ",", "r_"}], "]"}], ":=", 
  RowBox[{"m", " ", 
   SqrtBox[
    RowBox[{"2", " ", "\[Eta]", " ", 
     RowBox[{"(", 
      RowBox[{"nS", "-", 
       RowBox[{"f", "[", "r", "]"}]}], ")"}]}]]}]}]], "Input",
 CellChangeTimes->{{3.8370589665092936`*^9, 3.8370589945928984`*^9}, {
  3.8370591383930187`*^9, 3.8370591847766914`*^9}},
 CellLabel->"In[29]:=",ExpressionUUID->"4c5b6fe9-3cfe-4108-9d4e-9440ad5437b9"],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"*", " ", 
   RowBox[{"numerical", "/", "testing"}], " ", "parameters"}], " ", 
  "**)"}]], "Input",
 CellChangeTimes->{{3.8370584413860846`*^9, 3.8370584431404514`*^9}, {
  3.837058498286044*^9, 3.837058500940712*^9}, {3.837073522902562*^9, 
  3.837073524435645*^9}},
 CellLabel->
  "In[610]:=",ExpressionUUID->"f989a53b-b3e4-4301-ab83-c62657a28c4c"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"\[Eta]0num", "=", "0"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Eta]1num", "=", 
   RowBox[{"2", "/", "10"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"nBnum", "=", 
   FractionBox["578773", "10000000"]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"nSnum", "=", 
   RowBox[{"1", "/", "10"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"mnum", "=", "10"}], ";"}], " ", 
  RowBox[{"(*", " ", 
   RowBox[{"testing", " ", "value", " ", "only"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tnum", "=", "1"}], ";", " ", 
  RowBox[{"(*", " ", 
   RowBox[{"threshold", " ", "value", " ", "for", " ", "test"}], " ", "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{"N", "[", 
   RowBox[{"rmin", "[", "nSnum", "]"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{"rmax", "[", "nSnum", "]"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"rnum", " ", "=", 
   RowBox[{"6", "/", "10"}]}], ";", " ", 
  RowBox[{"(*", " ", 
   RowBox[{
    RowBox[{"squeezing", " ", "for", " ", "testing"}], " ", "=", " ", "0.6"}],
    " ", "*)"}], "\[IndentingNewLine]", 
  RowBox[{"N", "[", 
   RowBox[{"zmean", "[", 
    RowBox[{"\[Eta]1num", ",", "nSnum", ",", "mnum", ",", "rnum"}], "]"}], 
   "]"}]}]}], "Input",
 CellChangeTimes->{{3.818586728815115*^9, 3.818586762682409*^9}, {
   3.818591090981303*^9, 3.818591091197733*^9}, 3.8185926803088284`*^9, {
   3.8185927142674227`*^9, 3.8185927190129366`*^9}, {3.8185955265486126`*^9, 
   3.8185955288206997`*^9}, {3.818597348819919*^9, 3.818597370335909*^9}, {
   3.8186110957506294`*^9, 3.818611101700478*^9}, {3.837058495419982*^9, 
   3.837058495557536*^9}, {3.837059264868888*^9, 3.8370592952438946`*^9}, {
   3.8370593327938333`*^9, 3.8370593350439816`*^9}, {3.837059522699581*^9, 
   3.8370595378499503`*^9}, {3.8370620954295073`*^9, 3.837062100835696*^9}, {
   3.8370629778793387`*^9, 3.837063024426381*^9}, {3.837064921240126*^9, 
   3.837064921408561*^9}, {3.83706496158817*^9, 3.837065014799161*^9}, {
   3.837073445423647*^9, 3.8370734573664646`*^9}, {3.8370734886637425`*^9, 
   3.8370735208187017`*^9}, {3.837073579552035*^9, 3.837073582851056*^9}, {
   3.8370736926369886`*^9, 3.837073702102214*^9}, {3.837073766159895*^9, 
   3.83707376664089*^9}, {3.8370737971039*^9, 3.8370738041880217`*^9}, {
   3.8370771234934783`*^9, 3.8370771236584435`*^9}, 3.8370780619603233`*^9, {
   3.844677272311138*^9, 3.8446773039902*^9}, {3.844678697332971*^9, 
   3.8446787095139847`*^9}, {3.845038973243894*^9, 3.845039005936458*^9}, {
   3.8450390531330214`*^9, 3.845039073543357*^9}, {3.8450391401710815`*^9, 
   3.8450391760020723`*^9}},ExpressionUUID->"3f9825e1-ffe3-48ca-9782-\
1944865784fb"],

Cell[BoxData["0.5366750419289199`"], "Output",
 CellChangeTimes->{{3.845039039305214*^9, 3.8450390541439385`*^9}},
 CellLabel->"Out[47]=",ExpressionUUID->"be1a1823-1c81-451a-85e7-2bf81cd087fa"],

Cell[BoxData["1.86332495807108`"], "Output",
 CellChangeTimes->{{3.845039039305214*^9, 3.8450390541439385`*^9}},
 CellLabel->"Out[48]=",ExpressionUUID->"71d9ad87-147f-4cee-b24a-4b7870c7074f"],

Cell[BoxData["1.1547005383792517`"], "Output",
 CellChangeTimes->{{3.845039039305214*^9, 3.8450390541595445`*^9}},
 CellLabel->"Out[50]=",ExpressionUUID->"9cafd59f-940a-4a6d-9553-42180ddc4cf7"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"N", "[", 
  RowBox[{"pERR", "[", 
   RowBox[{
   "\[Eta]0num", ",", "\[Eta]1num", ",", "nSnum", ",", "nBnum", ",", "mnum", 
    ",", "rnum", ",", "tnum"}], "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.8370593300603848`*^9, 3.8370593519771867`*^9}, {
  3.837073696161501*^9, 3.837073696934411*^9}, {3.8446787233994083`*^9, 
  3.84467872533258*^9}},
 CellLabel->"In[51]:=",ExpressionUUID->"753eb2d4-eff1-4641-ba49-e232618601d4"],

Cell[BoxData["0.4044549275610046`"], "Output",
 CellChangeTimes->{
  3.837059352427331*^9, {3.837059558993519*^9, 3.8370595623113146`*^9}, 
   3.8370630278713827`*^9, 3.8370649312421722`*^9, 3.8370649782422943`*^9, 
   3.8370650241591496`*^9, 3.837073496752104*^9, 3.8370735321679044`*^9, {
   3.8370736973868413`*^9, 3.837073703470751*^9}, 3.8370737680209084`*^9, 
   3.837073808754653*^9, 3.8370771571420155`*^9, 3.8370772136421647`*^9, 
   3.837078065229244*^9, 3.837517213939027*^9, {3.844677293155753*^9, 
   3.8446773050112762`*^9}, {3.8446787204039297`*^9, 3.8446787256604967`*^9}, 
   3.845039213687895*^9},
 CellLabel->"Out[51]=",ExpressionUUID->"a2946d09-dbd5-49d9-b58a-31e225b7cfb7"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"pERR", "[", 
    RowBox[{
    "\[Eta]0num", ",", "\[Eta]1num", ",", "nSnum", ",", "nBnum", ",", "mnum", 
     ",", "r", ",", "tnum"}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"r", ",", 
     RowBox[{"rmin", "[", "nSnum", "]"}], ",", "1"}], "}"}], ",", 
   RowBox[{"ImageSize", "\[Rule]", "Small"}], ",", 
   RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]], "Input",
 CellChangeTimes->{3.844677331521136*^9},
 CellLabel->"In[52]:=",ExpressionUUID->"1bf26b71-e124-4b42-9075-fa27c5e2493b"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
      1.], LineBox[CompressedData["
1:eJwV1Xk8VdsXAHA8SZIkiQy/UJKZzGSZSSrkVfSEIpTMVCpTmaonlSfVNRQR
SShCeiWqizTfa7i4zjUP92xDcd974rfPX/fz/exzzl17rbXXVjwa6uYvwMfH
J8bPx0f9Hv3qqBquQcDP1fU2ObIDcM2Mt/2uJgFT9ay7NeNsaCwqUX+rRYBU
e7e0fCsbxtcc1ETaBLyTGR/6rZINUqeFtGV0Cbjq+0Sz4w4bbAZqdGz0CHDy
+uuORBobwnb5653aQUBP0QV3udNsaJdtMWgyIIC+wqqJe4gNvEuRRpOGBPCS
z9DNd7NBhVQy2WBMwOLoSnV7CzYkvE40DzIlwPyt/05FFTbo+4PNOiCgdsta
C7X/+sH3I2lrZknApgbhQoeZfsgwyrP3tyKg4pWY+uPRfhhb9WtXvQ325b2T
Jox+oFU0uPg6EnBHrFKRXd0PK3gGR6pcCfie9D9TenQ/6PkOe7PcCMhTtBeq
CekHn7Ys3xXuBOx1XOA0BvRDA23Oz+MAAdl/21nIePZDiFXVSf7DOF7J1Bdj
0A/MyxpnXf0IyIgmanas7YeH8spZMzEEcLYqvvha1wfHhoeL9c8QkKW98MDv
aR8oPH5Yf/osATqRkscFKvrgL3Mt9q9zBHz1lHT2KeyDpMMmaiKJBLgvDmfk
ZfSB1+19r5Wu4P9PeXp47ngfSGw4P7U/n4AIz9jPrfJ90NFrsZxdQED1Bes/
I2X6IK2IX6LnHgFlQwnPlTf0wfKOVCOfIgIElFRmskX7YMrtRlJwKQGC/BX+
7/7rhXeZD6WTnxLgmTdxzZDVC+dEGba17/H/PRlt7cvthaQbTeQgnYACJWP1
U3d6IU26ImddGwF8+WfM+W71QtaW1KngDwQUx5Y46Gb2QoW5SZbyFwK2+F7i
vUzqBSI4dzCzh4DMF0vCsYG94NDhn3SSi+vXXOJsb9gL6zPmX21ezwE/xp9O
37pZoOK1It5RkgP0y529yp0sMNaQtAjbwIGWrBVxMd9Z4NWm2/hqIwfcjD71
K35iQYnQqbojchyY3/+0LrOFBWbxg5W0rRwwPvB9sP0JC46Ffb4nbcyBsGeZ
pfdTWfDUreyiuBcHohS7osCcBQMNBldtH3PgcLbYCb1HPfCtRsdbgceB83t0
bZ4Z9MB+999Om+8aBImbiZnRb7uBZRDYyc4ZhK9PNEpuHOsG1TJzge2Dg3Ai
Xqbg6LpuEHgzFl67Ywhie+Scql93wb1gwfLxuCE4aHFJyuB8Fzh6Vmvdpw+B
qYDJxUcWXXBh0mg+T3oYBr4tFkbwd8HptZppVseGQSzMzG7+QycsMf85ovps
GHKuftyZk9MJfxKH4rJ+G4HLZJzqvqBOIOK2BRbvGQG/s515Vyw74c2rjuzF
XLxuG2XzYGMnBN0cvMYbG4GUGol21x9MyBX50mFsOgrzM+9iBj8zobvFxX0p
fRSk4sbsmyqZ0LPO8kHQ91G4vt9gz0IWEwIFVprJbB2DxpyH6aJnmfAieefd
kLAxSOWZN034MEHKWch2VwO26inlOScmLNcU6waKjAM9daF6UJ8Jj6trxzV+
H4elQqGMXkUmjLnljRgUj4OfiI8EQ4wJ6obSGi0/xyHwAfdc2S8G7CjnN+fB
BES0DHdzSQbQ377JDMucgIEDT1OtBxigHDH3JIM1AdUmLy+++MaAZN/ajXpb
J6H6Vf7keToDon+4tMhET0KAlUjKsZcMUNt02Kzk1STU+7n7CT5jQPCg+cIZ
8Snw5DhND5QxIBIyLkwfngIz/49x1oUMSOoPd+Y+mAJj79XsuzQG/E9R00dr
fgp4u8Mj7LIZkDh/0GKDFRf4An8Kb73OAD++oQkPay7o/3soXBzbUSTsVp4N
F1SFw0b/y2SAuELa9DZ7LvQIP1n8ip1nV3ffdDcXFAjN9kTsxizplT6/cyE2
VHaeuMYAnl73p7IgLhxfZRlZnsGAsFBPX8sbXCiTdU8PusoAnzfCyvE3ubC0
/TLtELbLhudDL7Pw+qqARgdsnRfrA81ucYHJElVSwUZCHSGGNC5M2328NHiF
ASF5cF6jmAtRaw4U+2AHd2y5Jd3Ahc8Zwrv9LjMgQB19mCa4oKgWUpqZxoD7
5u+3bhrkQnFAZvNF7N49+XE2Q1ywzrQdi8F2C9unkz3ChUOuf7h6YVvUPLlp
NskF43D5+2rYUhDmmfKDC6yLKebvUxnw1m1mVHYlCZmOa5yEsfn8Wi3thEmw
zvJ/upjCANPoe7dDVpEQKK6wbQa78pbr7qbVJIjGl2r2YNN6qyqOi5NQd225
thw76nhEdJUMCQ/L3Ov3YyvHzgk4aJAw8VImojSZAVPj/cHpmiQY0x7a52HX
erQx27VIiH2hu+0mtqPJvTIXXbxupC56ATuYt9fN05CEzXdT/F2p52PK7p2y
xPHlm7svXsLPR/paZrmTkHK7QvIw9rpB5zLm7yTMG076uWL3uBlLyhwkoXd2
5LUDdrDe2rFcDxK6kyVp+tjXZxqvlRwhoSFqA1uMej5Umt0QSILUetnstxfx
88GfLhDn8Xp9zQsz7IQ7Q3FicXi/CjOr9bGz6P/Em8WTsHra6LgG9sstW5L+
SsTxbeMYy2OL9Z1J2ZVCQrBa4oHlJJy/PUrXqq6RsNRTHv4W+4dWdEHifRL6
q8blPbCFvS7fqyjEDuwqd8OWu5J/n1VEgn7zAztnbLvR1iKDEpx/DjMLsLPz
FUrHH+H8HQkuVcE2FqdXudaQoGeqVzafyIBzM5uaFekk3BAr58vDpgW6dTu2
kjDts8DJwW5kp6PQNhKmjv318Sb2YgdP9u8PJPicbWlKx44rY0Z5fiHBbah9
Ywx2wrEbKjd7SPjKDkx0wS7oaTVvYJFwpGgXbzd2kyv/fqKXhEOGQWccsAUs
w+K12SRYMryzLLAvyu3tah8kgX5T2EwTO4Wx6rIgF3+vzcBaFLvY2apAnSRh
k3WYszD2++YztW6IBKEFhrcgtnD1KKdgBveDlcL9xQQGpGe8Nds5j+M9l5DF
xb7qkMiNXiah8sUF7S/Y5X/X/ZbLh/B5YLV3YH8wmJZp4UfQPOIS3oa9Zou3
vYQggijn+M5m7Ay+nfkVwggGat6LP8e+Xs9zGV2HwJH2yyAf2/KazZlt6xFc
2rdfhYZN+mXkB0giSJ2yV7yN7Sy+hRyVQkCO8BvdxBYK2HdlTBbBDZFcIhX7
mfmdalV5BHsN61SSsY9JDHcHKiAQ8PKPScJ+/TJWdXwzAt6jUIML2LGSxW/H
tyI43rtJLxJbdWJ6avs2BGpBtPYw7M5XZpInVBFoyheFhmDrn/xydEINgaSM
ZWcQFV/T4vKENoKnTolbfLFptxy2qesi+M4TkfDG3n3qxt6TegjPrbUiXtgP
pVVzJ/URdLUkyHhQ8YXuN50yQZBkR9S4YkvY5flqmCEQfbRhYR8V76bxtGBz
BPcH6qz3Yiu8i+ucskBw+4fdP07YXXJlUVwbBD7H3AZtsVNmf9zVtEMgPPH9
tA22AR2aT9kjaGhskLLGvhHJWEc6Ivj3SlkkUPls43tC7kEw8Xm21BT73/zd
TK19CISeBVw3wS6Nzv4V4oLA6Kz+RWMq34oazsgNQdbip2RDKt/zMZHa7gjk
hu9mG1D7+dB0J/R3BBGCDVX6VPynD46jgwieWY4K7cAO2XNfXMcDgc6VOUs9
bHllrlGYJ4KCAOdkXap/eEbelYcRfD41/U2Hqs/HpJTpPxCMG/RrUN5e1PFY
5wjuj0OSmdrU/s9KM8K88fsh139pUfvdWqE844tAn+W5oImtVa/EkT2G8xGw
9gpl1T23Cuz9ECQsV22jrESs9g73x/lPsurQwJaLTpCnHUdg+LHxHGWpVT9Z
7wIQbGpS2kF5bW7QnZlABNMmEXPq2MK6/YfkTiD4sLGskbLAW7eNDicRiJu2
ZlBePPSeER6MwC/hYxDl+SmzLNopBG/a6vZQnk6odHsfgiD4nxRTyuOSW9fN
hiKYnTLSocx5ePuTXDjOV0qbFuVec7EMhwjcT8U7DSkzPyc5R0QieK2VaU/5
s9+CSG4UAlv+Jm/KbbyTre+jEQwtf0yk3Hx1IHU2BsGCaH055cbNv9vLn0Gg
sDpugHLts1ZBx7MIHPrk5Kn9VjpaNEfEIig7nnWUcllvdWLuOQRtlwcrKReF
bbOkn0cQrblKmMpnriBtafYCArqeYCDl7Bzxl/LxCJTiv32mnKmRfM4xAffT
QrQ1Va/Lr/8xiUxEwJcw0Uj5knsILzcJ52dJ25Kqb9wYp5Z+EYGIh90HyqfP
H4yeu4SgNmq7L9UPJ4osZx1TEaxL93hA9Y+fcU1lZBqCkb2F7lR/eX3YHpqX
jvMb9lyU6j+XHxJTc1cQSPiZ3qL60ykttUzhTwQPV5QEUf1rK7cYuCsD5+te
ty3V30a2w8N5mQiOBl/dQPW/TpdHUet1/L1gkdXU+VAL/nj0xw0EpSJOq6jz
o5D1nL3rL9z/9FWbzbEFh9K7f9xG4DQWXGuJvXR66db/7uL6xnTPWGEvrI48
4ERDUM5bMqDO68SOP77l5yHQSA7rssP+clGrw6kQgcW9T8m7qXpuLLwSXYTn
24NhoT3YLY82OhU8wP37W3kmNR/qvvG9/1mC659q9zc1T/KUv70uKEdg1/Zn
4iFsetqLneRjBKqvIy94Ys9xCxvMniDQalK69Ae2Y13UM2YVApUlRpUP9qyz
1EPR57jftAIzqHknV720xbMO59f21MBJbIeNo/dK6vG8K9LeSc1HGvH8rnUj
nreBI1LUPLWP8bh2pgmff5U5J2rehrGsRN+9weejsn42HvuupVr6+hYE53t1
H1DzeVrkv6SKd/i+2K+rloZ9J58WM9SOINbW9hk17xGd7eXCRJAxcfp9OfYm
LXpPbicC04ZHMpVU/W5WHpzsQtCjGxvzlHrfK9E1hYXjDST2NVDrs0p2jQMI
lsyrEunYObLHNVQn8f0lvmlgBPtNwt7S6CkE9rf3siawucOGKs1cBPMmKwkS
27py5eYj0wgENZdXL2BP2Zauz/qJwK2bw16J70+psuuZxDzuZ/l12tR9a7U2
do02D8+zg3Vp4tjZ3U4r2/7F80Ut+LAM9muLHZc2LuL6LUV/l8eeLJTl9/+F
57nN3EEl6nurBOOql/B9lMMZVsG2DJn6d3kZQQnNOk4d+//AAZSH
       "]]},
     Annotation[#, "Charting`Private`Tag$25246#1"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0.5366750419289199, 0.33594779557651844`},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->Small,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->
   NCache[{{Rational[6, 5] + Rational[-1, 5] 11^Rational[1, 2], 1}, {
     0.33594779557651844`, 0.5033685038291639}}, {{0.5366750419289199, 1}, {
     0.33594779557651844`, 0.5033685038291639}}],
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.844677331880434*^9, 3.844678728792799*^9, 
  3.8450392390302*^9},
 CellLabel->"Out[52]=",ExpressionUUID->"dcfc2eb9-b484-434f-8ad9-ad8a7faba396"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", " ", 
  RowBox[{
  "symmetric", " ", "threshold", " ", "equal", " ", "to", " ", "half", " ", 
   "the", " ", "mean", " ", "value"}], " ", "*)"}]], "Input",
 CellChangeTimes->{{3.8370597050282965`*^9, 3.837059764695508*^9}, 
   3.8370600377706337`*^9, {3.8370621259689803`*^9, 3.8370621272524796`*^9}},
 CellLabel->
  "In[552]:=",ExpressionUUID->"f6780ee8-ce19-481b-8b49-4693114f6117"],

Cell[BoxData[
 RowBox[{
  RowBox[{"symthreshold", "[", 
   RowBox[{"\[Eta]0_", ",", "\[Eta]1_", ",", "nS_", ",", "m_", ",", "r_"}], 
   "]"}], ":=", 
  FractionBox[
   RowBox[{
    RowBox[{"zmean", "[", 
     RowBox[{"\[Eta]0", ",", "nS", ",", "m", ",", "r"}], "]"}], "+", 
    RowBox[{"zmean", "[", 
     RowBox[{"\[Eta]1", ",", "nS", ",", "m", ",", "r"}], "]"}]}], 
   "2"]}]], "Input",
 CellChangeTimes->{{3.8370599638961716`*^9, 3.8370600180962067`*^9}},
 CellLabel->"In[53]:=",ExpressionUUID->"ef80fcd8-cdca-46e2-9d02-687bcccd926c"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"tcheck", "=", 
  RowBox[{"symthreshold", "[", 
   RowBox[{
   "\[Eta]0num", ",", "\[Eta]1num", ",", "nSnum", ",", "mnum", ",", "1"}], 
   "]"}]}]], "Input",
 CellChangeTimes->{{3.837060024153881*^9, 3.8370600348932204`*^9}},
 CellLabel->"In[54]:=",ExpressionUUID->"03cd28d6-6217-4e90-89d0-96b83535da5d"],

Cell[BoxData["1"], "Output",
 CellChangeTimes->{3.8370600397628174`*^9, 3.8370630517377853`*^9, 
  3.8370649339923363`*^9, 3.8370650270257654`*^9, 3.8370735382688274`*^9, 
  3.8370737109036617`*^9, 3.8370737712879252`*^9, 3.8370738135215464`*^9, 
  3.837077162371642*^9, 3.837077216308584*^9, 3.837078072862237*^9, 
  3.837517217325396*^9, 3.8446774458007746`*^9, 3.844678732034003*^9, 
  3.845039293810074*^9},
 CellLabel->"Out[54]=",ExpressionUUID->"8c11171c-56d2-483f-be38-abfe9a26aee2"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"pcshom", "[", 
   RowBox[{"m_", ",", "nS_", ",", "nB_", ",", "\[Eta]_"}], "]"}], ":=", 
  RowBox[{
   FractionBox["1", "2"], " ", 
   RowBox[{"Erfc", "[", 
    SqrtBox[
     FractionBox[
      RowBox[{"m", " ", "\[Eta]", " ", "nS"}], 
      RowBox[{
       RowBox[{"4", " ", "nB"}], "+", "2"}]]], "]"}], " ", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{
     "*", "check", " ", "with", " ", "previous", " ", "formula", " ", "for", 
      " ", "CS"}], " ", "+", " ", "hom"}], "**)"}]}]}]], "Input",
 CellChangeTimes->{{3.8186026394946713`*^9, 3.8186027105508776`*^9}, {
  3.8186030156358995`*^9, 3.81860302313389*^9}, {3.8186036655027027`*^9, 
  3.818603665586506*^9}, {3.8370621359356194`*^9, 3.8370621391522865`*^9}, {
  3.8370736637756557`*^9, 3.837073671683937*^9}},
 CellLabel->"In[55]:=",ExpressionUUID->"6a9b9e9f-aec5-4bb2-a529-27b3a01ca9f8"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"N", "[", 
  RowBox[{"pERR", "[", 
   RowBox[{
   "\[Eta]0num", ",", "\[Eta]1num", ",", "nSnum", ",", "nBnum", ",", "mnum", 
    ",", "1", ",", "tcheck"}], "]"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{"pcshom", "[", 
   RowBox[{"mnum", ",", "nSnum", ",", "nBnum", ",", "\[Eta]1num"}], "]"}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.8370596768618636`*^9, 3.837059683761487*^9}, 
   3.8370597180949783`*^9, {3.837078078756166*^9, 3.837078084184339*^9}},
 CellLabel->"In[56]:=",ExpressionUUID->"366bbd8f-ac2e-4fb9-8340-9f73d5ca909e"],

Cell[BoxData["0.3360089048095632`"], "Output",
 CellChangeTimes->{{3.8370596789615903`*^9, 3.837059684061419*^9}, {
   3.8370597191452494`*^9, 3.837059733244935*^9}, 3.8370600408628387`*^9, {
   3.8370629873531923`*^9, 3.8370629985375648`*^9}, {3.8370630316376743`*^9, 
   3.83706305693778*^9}, 3.8370649362494593`*^9, 3.837065029742223*^9, 
   3.837073549852683*^9, 3.837073713770705*^9, 3.837073772604351*^9, 
   3.837073817588029*^9, 3.8370771646417675`*^9, 3.837077218625451*^9, {
   3.837078074978976*^9, 3.8370780844458942`*^9}, 3.8375172192769737`*^9, 
   3.8446774547628956`*^9, 3.8446787366471276`*^9, 3.844678773347666*^9, 
   3.8450393196850677`*^9},
 CellLabel->"Out[56]=",ExpressionUUID->"4311935d-2179-4678-99d5-bfe2c35ea280"],

Cell[BoxData["0.3360089048095632`"], "Output",
 CellChangeTimes->{{3.8370596789615903`*^9, 3.837059684061419*^9}, {
   3.8370597191452494`*^9, 3.837059733244935*^9}, 3.8370600408628387`*^9, {
   3.8370629873531923`*^9, 3.8370629985375648`*^9}, {3.8370630316376743`*^9, 
   3.83706305693778*^9}, 3.8370649362494593`*^9, 3.837065029742223*^9, 
   3.837073549852683*^9, 3.837073713770705*^9, 3.837073772604351*^9, 
   3.837073817588029*^9, 3.8370771646417675`*^9, 3.837077218625451*^9, {
   3.837078074978976*^9, 3.8370780844458942`*^9}, 3.8375172192769737`*^9, 
   3.8446774547628956`*^9, 3.8446787366471276`*^9, 3.844678773347666*^9, 
   3.8450393196850677`*^9},
 CellLabel->"Out[57]=",ExpressionUUID->"e05e109d-43c0-4449-88a7-bf1295099098"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{"*", " ", "as", " ", "a", " ", "lidar"}], " ", "-", " ", 
   RowBox[{"we", " ", "see", " ", "that", " ", "squeezed", " ", "state"}], 
   " ", "+", " ", 
   RowBox[{"hom", " ", "beats", "  ", "coherent", " ", "state"}], " ", "+", 
   " ", "hom"}], " ", "**)"}]], "Input",
 CellChangeTimes->{{3.818684627241459*^9, 3.8186846311917124`*^9}, {
  3.8186852761968765`*^9, 3.818685310643792*^9}, {3.837062775754155*^9, 
  3.837062795634224*^9}},
 CellLabel->
  "In[558]:=",ExpressionUUID->"5b920273-1b60-4d69-af67-369cef529c88"],

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"\[Epsilon]", "=", 
    FractionBox["1", "1000"]}], ";"}], " ", 
  RowBox[{"(*", " ", 
   RowBox[{
   "needed", " ", "to", " ", "avoid", " ", "numerical", " ", "problems", " ", 
    "at", " ", "the", " ", "border"}], " ", "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tmin", " ", "=", "\[Epsilon]"}], ";"}]}], "Input",
 CellChangeTimes->{{3.8370626041352034`*^9, 3.837062607044656*^9}, {
   3.8370627557801037`*^9, 3.8370627713536973`*^9}, 3.8370648225605135`*^9, {
   3.8370652364023046`*^9, 3.837065238225892*^9}, {3.837065309093253*^9, 
   3.8370653477389183`*^9}, {3.8370664736619864`*^9, 3.837066473795397*^9}, {
   3.837078104562523*^9, 3.8370781239629045`*^9}, {3.845039446913294*^9, 
   3.84503944706951*^9}, 3.84503962267616*^9},
 CellLabel->"In[68]:=",ExpressionUUID->"16bf51ef-77ff-4229-9c40-7819728a7a5d"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"N", "[", 
  RowBox[{"zmean", "[", 
   RowBox[{"\[Eta]0num", ",", "nSnum", ",", "mnum", ",", "1"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{"zmean", "[", 
   RowBox[{"\[Eta]1num", ",", "nSnum", ",", "mnum", ",", "1"}], "]"}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.8450394212880807`*^9, 3.845039423080683*^9}, {
  3.845039607363902*^9, 3.845039609956291*^9}},
 CellLabel->"In[66]:=",ExpressionUUID->"862446d5-99f4-404f-9014-da1315d9fb44"],

Cell[BoxData["0.`"], "Output",
 CellChangeTimes->{{3.8450394233542957`*^9, 3.845039448037918*^9}, 
   3.8450396102686176`*^9},
 CellLabel->"Out[66]=",ExpressionUUID->"dacc4add-29cb-489a-bb7d-70f9909b41a8"],

Cell[BoxData["2.`"], "Output",
 CellChangeTimes->{{3.8450394233542957`*^9, 3.845039448037918*^9}, 
   3.8450396102686176`*^9},
 CellLabel->"Out[67]=",ExpressionUUID->"fa8b5b68-46dd-400a-ad98-5a1b2531c51c"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FindMinimum", "[", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"pERR", "[", 
    RowBox[{
    "\[Eta]0num", ",", "\[Eta]1num", ",", "nSnum", ",", "nBnum", ",", "mnum", 
     ",", "r", ",", "t"}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"r", ",", 
     RowBox[{
      RowBox[{"rmin", "[", "nSnum", "]"}], "+", "\[Epsilon]"}], ",", "1"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"t", ",", "tmin", ",", 
     RowBox[{"zmean", "[", 
      RowBox[{"\[Eta]1num", ",", "nSnum", ",", "mnum", ",", "1"}], "]"}]}], 
    "}"}]}], "]"}]], "Input",
 CellChangeTimes->{
  3.844677476380453*^9, {3.8450411053907895`*^9, 
   3.845041107224533*^9}},ExpressionUUID->"d37a629a-e571-4d36-9ce2-\
6aed228b4591"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"0.3359475746274851`", ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"r", "\[Rule]", "0.9824413316737416`"}], ",", 
     RowBox[{"t", "\[Rule]", "0.9959917206805381`"}]}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{
  3.8446774766679153`*^9, 3.8446787784185586`*^9, {3.845039429250107*^9, 
   3.8450394487565413`*^9}, 3.845039627450562*^9, 3.845039744074255*^9},
 CellLabel->"Out[71]=",ExpressionUUID->"22b0674f-642a-4077-a4c3-b6880a304879"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", " ", 
  RowBox[{
  "we", " ", "extract", " ", "the", " ", "various", " ", "components", " ", 
   "below"}], " ", "*)"}]], "Input",
 CellChangeTimes->{{3.845039989839602*^9, 
  3.845040000403154*^9}},ExpressionUUID->"384d47c1-55b0-431f-bd22-\
ea0fae7c7986"],

Cell[BoxData[
 RowBox[{
  RowBox[{"pERRmin", "[", "m_", "]"}], ":=", 
  RowBox[{"FindMinimum", "[", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"pERR", "[", 
     RowBox[{
     "\[Eta]0num", ",", "\[Eta]1num", ",", "nSnum", ",", "nBnum", ",", "m", 
      ",", "r", ",", "t"}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{"r", ",", 
      RowBox[{
       RowBox[{"rmin", "[", "nSnum", "]"}], "+", "\[Epsilon]"}], ",", "1"}], 
     "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"t", ",", "tmin", ",", 
      RowBox[{"zmean", "[", 
       RowBox[{"\[Eta]1num", ",", "nSnum", ",", "m", ",", "1"}], "]"}]}], 
     "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.8450411580751133`*^9, 3.845041171013277*^9}},
 CellLabel->
  "In[136]:=",ExpressionUUID->"541cbd6a-6434-45f1-895e-1f28505d8197"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"pERRradar", "[", "m_", "]"}], ":=", 
  RowBox[{
   RowBox[{"pERRmin", "[", "m", "]"}], "[", 
   RowBox[{"[", "1", "]"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SqueezeVALradar", "[", "m_", "]"}], ":=", 
  RowBox[{
   RowBox[{"pERRmin", "[", "m", "]"}], "[", 
   RowBox[{"[", 
    RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tVALradar", "[", "m_", "]"}], ":=", 
  RowBox[{
   RowBox[{"pERRmin", "[", "m", "]"}], "[", 
   RowBox[{"[", 
    RowBox[{"2", ",", "2", ",", "2"}], "]"}], "]"}]}]}], "Input",
 CellChangeTimes->{
  3.844677492275314*^9, {3.845041194949434*^9, 3.845041238741313*^9}},
 CellLabel->
  "In[127]:=",ExpressionUUID->"95c2b2a0-c33f-4f19-812a-bf5be7bdb6d2"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"pERRmin", "[", "mnum", "]"}], "\[IndentingNewLine]", 
 RowBox[{"pERRradar", "[", "mnum", "]"}], "\[IndentingNewLine]", 
 RowBox[{"SqueezeVALradar", "[", "mnum", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"-", "10"}], " ", 
  RowBox[{"Log10", "[", 
   RowBox[{"SqueezeVALradar", "[", "mnum", "]"}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"tVALradar", "[", "mnum", "]"}], "\[IndentingNewLine]", 
 RowBox[{"symthreshold", "[", 
  RowBox[{"\[Eta]0num", ",", "\[Eta]1num", ",", "nSnum", ",", "mnum", ",", 
   RowBox[{"SqueezeVALradar", "[", "mnum", "]"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.8450411787168417`*^9, 3.845041183004665*^9}, {
  3.8450412422223873`*^9, 3.845041252080899*^9}, {3.845041358002097*^9, 
  3.845041359231863*^9}, {3.8450414128083124`*^9, 3.8450414247941556`*^9}},
 CellLabel->
  "In[152]:=",ExpressionUUID->"9621131a-d273-4190-a642-de1711463782"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"0.3359475746274851`", ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"r", "\[Rule]", "0.9824413316737416`"}], ",", 
     RowBox[{"t", "\[Rule]", "0.9959917206805381`"}]}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.8450411833676505`*^9, 3.8450411987053356`*^9}, {
  3.8450412426441836`*^9, 3.8450412523775735`*^9}, {3.845041359934696*^9, 
  3.845041376811265*^9}, {3.8450414138159213`*^9, 3.8450414251220694`*^9}},
 CellLabel->
  "Out[152]=",ExpressionUUID->"77b258be-391d-40de-9514-af9df8d57c13"],

Cell[BoxData["0.3359475746274851`"], "Output",
 CellChangeTimes->{{3.8450411833676505`*^9, 3.8450411987053356`*^9}, {
  3.8450412426441836`*^9, 3.8450412523775735`*^9}, {3.845041359934696*^9, 
  3.845041376811265*^9}, {3.8450414138159213`*^9, 3.8450414251376915`*^9}},
 CellLabel->
  "Out[153]=",ExpressionUUID->"52e12ccf-5f22-461d-bb41-aa90f5ab747f"],

Cell[BoxData["0.9824413316737416`"], "Output",
 CellChangeTimes->{{3.8450411833676505`*^9, 3.8450411987053356`*^9}, {
  3.8450412426441836`*^9, 3.8450412523775735`*^9}, {3.845041359934696*^9, 
  3.845041376811265*^9}, {3.8450414138159213`*^9, 3.8450414251376915`*^9}},
 CellLabel->
  "Out[154]=",ExpressionUUID->"ad50487d-3d31-4d79-9e4d-a95d1871312b"],

Cell[BoxData["0.07693374887512158`"], "Output",
 CellChangeTimes->{{3.8450411833676505`*^9, 3.8450411987053356`*^9}, {
  3.8450412426441836`*^9, 3.8450412523775735`*^9}, {3.845041359934696*^9, 
  3.845041376811265*^9}, {3.8450414138159213`*^9, 3.8450414251376915`*^9}},
 CellLabel->
  "Out[155]=",ExpressionUUID->"86bdee85-7a06-416b-8bed-7a635d2da916"],

Cell[BoxData["0.9959917206805381`"], "Output",
 CellChangeTimes->{{3.8450411833676505`*^9, 3.8450411987053356`*^9}, {
  3.8450412426441836`*^9, 3.8450412523775735`*^9}, {3.845041359934696*^9, 
  3.845041376811265*^9}, {3.8450414138159213`*^9, 3.8450414251376915`*^9}},
 CellLabel->
  "Out[156]=",ExpressionUUID->"3421f5b4-cac9-48be-b7e5-bece63b14041"],

Cell[BoxData["0.9996076517279663`"], "Output",
 CellChangeTimes->{{3.8450411833676505`*^9, 3.8450411987053356`*^9}, {
  3.8450412426441836`*^9, 3.8450412523775735`*^9}, {3.845041359934696*^9, 
  3.845041376811265*^9}, {3.8450414138159213`*^9, 3.845041425153341*^9}},
 CellLabel->
  "Out[157]=",ExpressionUUID->"f7a1b3d7-5751-4abd-8df7-e553bcc8e6e2"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"pcsHOM", "[", "m_", "]"}], ":=", 
  RowBox[{"pcshom", "[", 
   RowBox[{"m", ",", "nSnum", ",", "nBnum", ",", "\[Eta]1num"}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{"pcsHOM", "[", "mnum", "]"}], "]"}]}], "Input",
 CellChangeTimes->{{3.8370623713174095`*^9, 3.8370623760698385`*^9}, {
  3.837062420696437*^9, 3.837062441254981*^9}, {3.8370628123677044`*^9, 
  3.8370628448502445`*^9}, {3.8370646626916695`*^9, 3.837064682374694*^9}, {
  3.8450414355220766`*^9, 3.8450414356626825`*^9}},
 CellLabel->
  "In[158]:=",ExpressionUUID->"08f8a3b5-2fd2-4b54-a6d7-6b1c56d36a09"],

Cell[BoxData["0.3360089048095632`"], "Output",
 CellChangeTimes->{3.845041436021964*^9},
 CellLabel->
  "Out[159]=",ExpressionUUID->"ae6f1a52-c37a-46c6-a398-36b020945344"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LogPlot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"pcsHOM", "[", "m", "]"}], "-", 
     RowBox[{"pERRradar", "[", "m", "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"m", ",", "1", ",", "3000"}], "}"}], ",", 
   RowBox[{"PlotStyle", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"Black", ",", "Blue"}], "}"}]}], ",", 
   RowBox[{"ImageSize", "\[Rule]", "Small"}], ",", 
   RowBox[{"Frame", "\[Rule]", "True"}], ",", 
   RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.83706292690423*^9, 3.837062955987462*^9}, {
  3.837064697625078*^9, 3.837064710249171*^9}, {3.8370737322495794`*^9, 
  3.83707373447173*^9}, {3.8450400564692774`*^9, 3.8450400795149612`*^9}},
 CellLabel->
  "In[160]:=",ExpressionUUID->"6cc6da6b-499e-4a7d-868a-272b75d09993"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
      LineBox[CompressedData["
1:eJwVlHk0lVsfx4UQUZmjwnOOMUPm2fNDcjMrMk+J23i8pm4aZMpMJ3PqxKHH
kEoi6g33F5UolQqptyJ05SKUktR9n/vHXnt91tpr7d/+Dltpd8SOMF4eHp6L
9Pp37zjsrQU8s+QduRmqJlYZI80upje0/CJDTF8dmnrDxLX/fIs80yIAXDe5
7o5EJv41zFFwkBCDu/7sXhlgYtAINzyxRRwuLQ68jxVlosOzmLaAMGlgCdq5
p40x0KjTXtJMQg5aTAe5wR0MJJrkDkjf2QgWt7tWWlAMTHv2NTiuRRGqljsN
5rIYuOwQnP17LgFlkqeFmmIZGNXZ3eIZxgQ7q1Wv50IYOGGuP2proQK93jL3
Ld0YGNh0XkxPQg3sylIbtwIDX2gKmClOqgOP0vyje7oMdKAiwsTubIa/b0Ul
5DAZiBuH2MvFWpAkNb0hSpaer8imdZKlA88khqPcRRm4S3AgeqpiCyzHLCmu
4WMguzMzIzRXFyJy6jzzvxP48CRZ9ipODzyOZ410zxIoYPGlyT1MHwQtbJK5
EwRaL9b0PHAzgOfiYgEiIwQebwoYJi0M4aHE2/SlIQLnNbtEtCWMoVrps4pl
L4FaH48pUb+MwXjd/m8nugjcS20x3jBpAks/7aI3dRBYGTLulN9vCvwdyddk
2gh8u7F0t/AdM9A6ZxsfepPA9a9cjiReNgf92I+Oy40EehTx5S4WWwArzFDy
TT2BPWKHbn1gWcFye23fnhoCVz5UehLgS0KW3JlRPorActsDUZMEQFSig/hr
LoFtXLufVAlAvcFhk78uEPjqH4X0EDFrmFtfGqV8nsDFgCXxjSnW0D2uK5t/
lkCp1hecl9+tQW/3qRtaxQS6HclodB23gV416bnhPAJZA6FWIn62oLNFJHmB
TWCWgVX3/ae2cOLNySnt0wTW5Ml6JG3bCjEOaSeycgi8Pzv/1rJ1K+yN9Klc
lU3gmEvvvu+6drDzZ8J4dSaBK65Uf2mqtgOJk3dH92QQuEkk6eR/Nm4DQdT0
INMJtNjnL6yZvw2uvfrBY5RGoG+XUeFfQvYgz9Dusk8l8A/ldYqV8fZgfGqh
IPoUgQXJf18K/GIPaueS9t5MIfD6yD1Duf2/QaBfmYsUzU/Jcux/9xswcypC
MpIJnOYcdTzjuR3qDlIPJGgWXvYYcHq4HQ5N2TY3JhGo5qsTImTtAAVc8b17
ad52c9VUZ7MDjOvfUtalOVR67PBJTUe4EOkOojQnxLSvMK9whMnbd9YtJxJ4
4VlJ9lcZJ4hpllr+l1u3RMtcz3GCiDGFfWvo80O5zhWH+JyBN2ewW4/mr1Oq
WupxzlDr+6EwnGZJR96bYzPOMDTk63iJZum22xFpLBd4rVaxYSU9r4xOrKrG
jAtoSa2Oi6RZlqv97tEhV2i6rNI3Q7OcxERRxLQrbLluff44/f7cDjfVDCM3
uG8v7i1H65V7TCvZ97Ab1P9QTu+imT39weznghvkHI6OcKH1Zld1Fj02dIdi
jfO/qdJ+nAkqny+LdQfWoaAhUdqvvD6fSzYL7lDTpVTCm0VgfqaRgKThDjDP
iBdZS/tdYCuxezxmB/gsNaM6nYfCG4/Wp3/ZAVLJTyoT6LwUsWpjfQx2AqFp
p99G56lINbVPI2YnnK/L7OKn81Zylszo/bwTwILxvrGAwNIT1xfFP3vAPhOn
2sxSAs8ZnfYY0/OEu2lukrJ0ns9/OnDtRpQn6HGeZF7lEMgJUd7rPe8Jtboy
9xfK6X7YlQxy5nbB9OwtkYlqArm/YvQjdL2g908X35u1BFa0uJ+GSC8QEWAb
s+vovqqL2I/OekF3Q/cPT7p/VaLxzWqz3rCm+Z+Thi0E1vWHFjbO+EJ9/USd
ygMCm8N0dnb/HQg19ot2a2dovfhGhIJVg+Bre6v7Afp/OcjNa/+6OwiSj77g
75knUOnNgjrzVRC8Y63QyPtG50sjMIHcEwzD35x5nFYw8BqX6VW6IwRMtRRI
PykGprAb+N10QkGVP1+4jGSgNuth0O2JcGDxST3gOcdAyR8tiRpGLIi8li0W
FszEDaM9JgLrokG8viW53V4ZnaWFHjt1HobsHEn/GXUV5ExY9jy6exRSg0yO
31JRxWaG23JJYzxIUmPfiplqaLTrZViATiIc+XCv0ExKHZUm+VdkaSbD7O3g
0KpNGvj64sv9o4KnYFCf+v2rzGZcyi/9NDKUCj9XJZoZiWli7bOXqieep4Ol
1zi/oLwWqpq0a9vWZUKYGdtRWEYbDaYVPlKXssG1zSbLVl0HqwYi2q+W58L3
UBHhYfktGBOtrxtpxgZl1r3N3aVb0J8x7e9jcgYWjzYeGWPq4uXwpU+7lPOA
52NBi3aVLt7tu/c/QiUfOHMrjar19FDMS2jQmiiAogs9Zyda9RAjLpgcFi0E
V15zhoaVPppdm/98ZHURxKdaxhX06KN8Sqn0maUiGOLp6Zt0NkCdqFvblkeL
ga9BWnLksQEKpxc9NRwpAeNKv9O/fA3RWbfrTkrvWYjw/1w988YQvXmbV1f0
lkLjz+wEwYNGWDgtHybefQ5UFVbfbPpmhGYH+5kljech8FKhkdJRY6wWd7aa
auDA9r0eGi2CJnjMSfZPz7ILcDtD7SBftgkmlfs6i6eXQU3Q5sU+UVNUy71S
6mJTDmvF+l4MlppiZ6FXx6ab5cAaEIhL3WSGNg3D0gPGXGhTjNMLumKGsUUS
CrL1XHgbFPv2vZ453hHivcrHrAD96DijgRvmOJf7ZN9ARQX8MRqgsGBrgf1v
tw3pr6+Euquvp+sfWCDHhhN75GwlmOr9zlPmbYnx+vUl4TIXIcUtre37uCVK
zOyPeJd9EXoLOcTMPivMal0ZTa6mQKUnT4j/uxVOPX6/UV6MAt1Bv4X1P6zQ
aeTPB1/XUOBzJeWT6E8rFBM4uumqBAVfMsuDDVaQyHad6d4gT0Fuw5PP11eR
WPR+QHFJnQJSQT0+QY5ErlDN4yZ7CoL8FmOvmZPIK38qjr2dAu/yYwefW5K4
W2s386AjfR8Z2CYFJDJ3bDjKcKWguL7wjcFWEqvOsZXzdlFwxE91+x4nEi9r
xx2PCKNA8Q/lKqMAEls8HDQ0kinw+m4+HB5PopOnzbHlFApC3XOunk4g8b2n
2aPHqRRUFCe9SEkicbWXBis6k4Ka9kzJ0VQSg32Er7eeoUCKmO15k0vigg8v
3+l8CqpkzzJ+sEnM9F3aGVJIgXX4+tHZPBKb/CYXVp6l4MOAorRaMYlCgT2m
ruUUlPlGzCuWkcgJ7MhUqqCgZM37/gYuiXpB/339uZKCpVXGz0MqSewKuq55
n6IAwok1/hSJ/sGXTpRUU8BpfaZ9sZrEueCKx/trKXiq7Zw+WEtiakipgmUd
BX79QuvZdSRWh7xsbKC5X8Z+Bfsyif8H+YXKPw==
       "]]},
     Annotation[#, "Charting`Private`Tag$50948#1"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, -31.674072341782296`},
  CoordinatesToolOptions:>{"DisplayFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& ), "CopiedValueFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& )},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->FrontEndValueCache[{{Quiet[
       Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , 
      Charting`ScaledFrameTicks[{Log, Exp}]}, {
     Automatic, Automatic}}, {{{{-27.631021115928547`, 
        FormBox[
         TemplateBox[{"10", 
           RowBox[{"-", "12"}]}, "Superscript", SyntaxForm -> SuperscriptBox],
          TraditionalForm], {0.01, 0.}}, {-20.72326583694641, 
        FormBox[
         TemplateBox[{"10", 
           RowBox[{"-", "9"}]}, "Superscript", SyntaxForm -> SuperscriptBox], 
         TraditionalForm], {0.01, 0.}}, {-13.815510557964274`, 
        FormBox[
         TemplateBox[{"10", 
           RowBox[{"-", "6"}]}, "Superscript", SyntaxForm -> SuperscriptBox], 
         TraditionalForm], {0.01, 0.}}, {-34.538776394910684`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-32.23619130191664, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-29.933606208922594`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-25.328436022934504`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-23.025850929940457`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-18.420680743952367`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-16.11809565095832, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-11.512925464970229`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-9.210340371976182, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-6.907755278982137, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-6.214608098422191, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.809142990314028, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}}, {{-27.631021115928547`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-20.72326583694641, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-13.815510557964274`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-34.538776394910684`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-32.23619130191664, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-29.933606208922594`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-25.328436022934504`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-23.025850929940457`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-18.420680743952367`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-16.11809565095832, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-11.512925464970229`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-9.210340371976182, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-6.907755278982137, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-6.214608098422191, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.809142990314028, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}, {
     Automatic, Automatic}}],
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->Small,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Quiet[
     Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& }]], "Output",
 CellChangeTimes->{{3.8370629364040985`*^9, 3.8370629568041277`*^9}, 
   3.837063069254711*^9, {3.837064700824951*^9, 3.837064710874084*^9}, 
   3.8370648312919807`*^9, 3.8370649478922577`*^9, 3.8370649891755037`*^9, 
   3.837065038692487*^9, 3.837065356409477*^9, 3.8370736055861483`*^9, {
   3.837073726866602*^9, 3.8370737359543333`*^9}, 3.8370737799878244`*^9, 
   3.8370771774087477`*^9, 3.8370772249255342`*^9, 3.8370781438292656`*^9, 
   3.837078334113274*^9, 3.83751722921904*^9, 3.844677551286078*^9, 
   3.8446787955013103`*^9, {3.845040053194028*^9, 3.845040080623376*^9}, 
   3.8450414515580273`*^9},
 CellLabel->
  "Out[160]=",ExpressionUUID->"16127336-7cad-45a7-b20e-e3bb1fe35c31"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", " ", 
  RowBox[{
  "plot", " ", "of", " ", "the", " ", "optimal", " ", "squeezing", " ", 
   "value", " ", "below"}], " ", "*)"}]], "Input",
 CellChangeTimes->{{3.845040098755509*^9, 
  3.8450401128102446`*^9}},ExpressionUUID->"afb9240e-99ea-4c0d-b3ed-\
5a195fa7d9f7"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LogPlot", "[", 
  RowBox[{
   RowBox[{"Block", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"$MaxExtraPrecision", "=", "1000"}], "}"}], ",", 
     RowBox[{"N", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"-", "10"}], 
        RowBox[{"Log10", "[", 
         RowBox[{"SqueezeVALradar", "[", "m", "]"}], "]"}]}], ",", "50"}], 
      "]"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"m", ",", "1", ",", "600"}], "}"}], ",", 
   RowBox[{"PlotStyle", "\[Rule]", "Black"}], ",", 
   RowBox[{"ImageSize", "\[Rule]", "350"}], ",", 
   RowBox[{"Frame", "\[Rule]", "True"}], ",", "\[IndentingNewLine]", 
   RowBox[{"FrameLabel", "\[Rule]", " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"Style", "[", 
       RowBox[{"\"\<Number of probes\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}], ",", 
      RowBox[{"Style", "[", 
       RowBox[{"\"\<Squeezing (dB)\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}]}], 
     "}"}]}], ",", 
   RowBox[{"PlotPoints", "\[Rule]", "80"}], ",", 
   RowBox[{"AspectRatio", "\[Rule]", 
    RowBox[{"1", "/", "2"}]}], ",", 
   RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.837079954331977*^9, 3.83707996260155*^9}, {
  3.837080006007763*^9, 3.8370800082101383`*^9}, {3.8370800480179405`*^9, 
  3.837080067864641*^9}, {3.845041966107293*^9, 3.845041966279135*^9}},
 CellLabel->
  "In[275]:=",ExpressionUUID->"142d2e24-4875-4d26-83b8-1310c2a24570"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
      LineBox[CompressedData["
1:eJwd2Xc81d8bAPDkZoWyJVRCkpAVWY+917WvESIzIUXc6H5IkVChzCKrkpFS
SbpSmS2jb6EyUpKdHfqd8/vL6/06n3Hu+TzPc4ZdXsfJPhs3bNhwn3HDBvy3
Qpnyh3nDtPbFrhy3REUSvfpg+K8XnTPaMSl8b8c0SPQHainfzhT/0f7P5jDP
eX0S/ZF6WY9q5Lw2sffyfKcpiV6n+aL9j+midqvaGx5RaxL9mXZ/Y4XIsvao
as7bPDsSna6z8Mh/ekV7h26pRJITif5Sb2uFeNOqtt9fy8vTLiR6s4F00beM
de3DFE+bSXcSfWS3mIWF0gZQNfxxLd2TRP8pLtdyR4QBJFyyds8eIdFHJTT0
WJg3wip9IpjrKIk+JmnS4DO9ET4uXpJb9SXRx/c4qDV9ZoSnXvXUJ/4k+oTU
kQc7m0hQZNwSYhVIok/uDZGLKd8E1ic67F8EkejT0mfu9GUwgVhz7Q2BYBJ9
dl+ShFosM0RuEN5DPk6i/5G5djPTjwUulkwrnQwh0ef2F22fs2EFh9QS3rhQ
En1BtjrTRp0NntokLpwJI9GX5Bq4KsU3g9Jlvxy/EyT6inx7MjsnO9xxmX+s
G06irymMEM0DHBB5qPi/dydJ9HXF2TXxNk649G9kJv4Uib5B+V8kUbMFPGoX
DeQiSHQiJ/mRaNNW+OvsL+kXSaIzCvOcfHOQC64MG0ktIcfnZilQy7lga7bF
87OnSfRzeSX3Pmdww8cvR5PPRJHoTKL7Ay+w8YCakkbdLHJCfo3UwVgeCHp9
udArmkS/cIN+K92PF4LF9ssoUkl01p1GnnpfeGHb2eT0dOSkm29EZ234oPiW
0p0Z5OSC3iwrdX5ozHm06cYZEp1DzNNxvZIfOL9pc8wgpxT+5L0nLgCW/Szs
EEOip96aS2XjFASHmb7/upGvFHMmvBrYBh1eMVu/xZLoPJIZeuH2QmDXaDG8
/SyJnl6ynWF3mxAYFLDnOiBnlEpRz9ZsB+98QY3XyPxSlWpyUsLg+9Iz6S9y
Zpny4pdcYTgju9AuSyPRr9/WDVNPEAHhHeca0pC3SbfKja2IwN3W8V105Ow7
VhPXj4uCDQM5bgI5566r34LTDrD2TDXXJ0j0dw7qlZ8ydoKGHGfrMHLnD1sH
wZ6d4NKTGs0eR6J/PBW05si7C/ha5qiKyP2ZeWb/XdkFSn7agzHIYx///exJ
FQODCg5b1ngUf0cFU/neicHCxErbXuTpBXkVe87dUKizbmiCvMjvFd+dvBty
6waGE5BJji93diWKA6/VJeElZOaf/c3creLofj0ennMkOlvEfDCZRQL6BmqW
ZZC5rkk++5AgAWeyZtYPI4v+d8H5fZwkNBXGvWhAVnW0uPLmjBRsHEn/6JtA
oqv/9FHjeCYFh/cGKkUja0XEDJivSgErZ8ihFGSDa5WyHVF7oXv5x/YaZPJ/
XO1tEdIwfpXl2DLyMcePjC2hMtAv4u92+jyJHvJz8g5ztQykBplHXUAOj2Am
G03LwJG6aPlryFHXVG++Dt4P9tYcnTXIF/7L1ngVKAtJhv7lY8gf7lYeGlSQ
h2vN7Y+sL5Dohea8qX7W8rDPQuCcC3L4ROTw1DF5sGdLf3gUWVBON3m9TB4a
Ys3Dqcju97u/bN9xAB5d+t1Vgjz2ePmsw2YF+CphtWseud7ZveeLlALspD29
vo58aeXFXh9DBaj4MpbAnEiiy2skd56gKQD1AquhEHLEc1Hxy4sK8M9we6Am
Mum1XnP7sCKIN7zdeRb549Gy7bYMSmD59r7IBeRSZo6QXlEliM5mZUxDNjX5
KPjLWQmWjozN30BO6/ALYHqvBAM2yavPkEW6LnHo1CvD2Vzp1QVklYH/bGvT
D0LQGYMl1yQS/Wv+ucO3qw9CGMOBh17I59wUA3PfHoQjSm7H/JC7e1MIgkUV
0vPHkk8gh/YYVFtSVWH3xdBticjlbTWcP4+oAXliIew+sm2ip1DvWTWQPr9R
4xHyitEWyTd5atCQzLCtHtnkVYBmzX9qcFh/hHiF/OP5rqBYs0NwIX+35yfk
lJh3EWF+h2BmSSSrH1lZ80ycz7lD0Lc7UWUQOb7uU7bZ80PA6hW9aQx53+mE
Eq3+Q2A88OfgJHLnQaX7B5YPweZ6eDeLvOthaquAojqE22i1riC3nNDsYbNW
B5UNjb7/kEMUfg+sBanDpiNzcYwXSXSBmevj04nqoBHpoauD3FBpuDRcog5D
8ftPGyAfDZ5j/K9JHQwfOsWZIHPsL9zSNqAO1t1iPRbIrnfWJKuENOCwPGO5
PTKj/12FWwc1YD38RpMz8p09zlqZdhogORXc7Ia8XPTAnpqiAT0NUlU+yJk3
AuONN2qCkHrus3BkLfdtaeo7NMHn6ifLSOQR4eYcWQ1NqGncyURFVsoWq+E9
pQm3zfM+Esgf0j8PDvzShGX+1rg0ZPYkI+3TH7QgYQTGbiNnTO84PjCtBXvY
sjTvIYs6LuUbbdWG4rTzWlXIcuK31/mstOFocuyTWmRyA1vD/Q5toOhJFL1A
Nl8+KrpwBOCiezVbL3KajG3t7RMAJl8LAr4g9xzWtnSLA5DPLfk+gOz+WiDm
ZSGAYGsI9Sfy8astX64MAgwI8xnNIV/ZL50nd1gHAt8FSbIno3j34FceDtaB
Dcsaq5zI29M3vsmM0QGvLVNtXMhFK72ra3k6EHvsg7oA8sPmi64d/Trg921j
zy7kT54T2/0pulBVIBGkjCyc8blGOEAXrD/x1xxE9mx5Zfb+tC68l/7HeAh5
TDY/+mCWLjj9lvPQQl79a9m36ZMuVHQoDRki78isyi6014Pe3iF/B+SOeZY/
Jt56oEfV4HNCjrT3NJsJ04O6C4avnJHf83KvaqfpAcm97K8rMnH1hNuXNj1o
MmoVO4Is+6f9YfxnPfh0n/uhN3IvWZxTZlQPjj4r/ueDrMjd0xC1SR8kQ06O
+iF/T1PZKQj6kER3IAcjp02nRD631Ic+6bHM48ia1j/fH3XTB6/Qmf4Q5Mwt
12kPo/ThSnqZwglko5TlIfJDfWCaW/0SgTw3YaO+0qQPv8NT5iKRb1rcuVrQ
qQ8Oi2SWKOQldhf96Sl9OOAzzkZFvnOxvviStAH8EDs2H4vs8Jt3XUnNAO7J
sLWeRWY0O+bQb2QAqzXkThqyK5so8z4fA9CoO06LQ+ZIjPVruWEADRsYLyUg
143+Rz9eYQA72XKOnUc+aiy/TeCZAWTt+br9AnID82CrT68BCJaZRyYiB/iq
iXH8MoAjVqY7kpAFmi9HPVg0gMpLXc+wQxJ09zHyGcJEs3L/Rfy9f2TH3dlt
CLr1ZoHJyK0Gf/psFAyhMM9jBftUsZnSMhhC4uzOq5eQxTYVJd+0MoTTmxR3
pSC/9V79buRuCDe85dKwo17aaU4FGcKXqrm4VGRJ8XsZmdGGkL3hoxN2V9ym
Sc0kQ7jtw7OEfXbYzXDkuiHEPzTan4Yso1ebn1xqCCIqP29hfyrkXFSsNYSL
XqmKl5HjN/pa9b00BFYh9VBsea/npUSXIYTWP8zH/tIosEF6yBCk75WpXUFO
2hXi9GHaEIp2V9liq9BaqiL/GcJuy5F87C4lle2ULUbQMZf/Cztk9NY59R1G
8EJbU/kq/h65XNPCckbw2XaUwL5jFUtZ1zKCf389b2IbMU68/GZpBJuMfkxg
f6+lyDW6G8EfctP2dGRaQEtWYbARvMo4JIktKqpCio8xAv+tMhTspx9uBfuk
GMGU3U5fbKdzXJ8N843AuOhgNva8aqyeVIURPFy8lY59ZXz8HmuDEay5Dd7E
lrtJEfz9xgjCOHbcw+6wbSE6vhiB3UxJA3YAs8rEvQkjcEpfL8BmfnrLMXXN
CFJGSHewi4K5XoRwGEMSh385tq5YrAxZxBgKKirLsL/1jGcq7jeGiYU3CdjU
RAoDn6YxzKTdTcXeptkSuGCOrtdl34tdO6388T9XY0hwfK+FbVt0C54EGQO1
nRDEnnbkuptNNYZNnmos2Jc2x/JRk42B4mf6Go+f9PPxWLdc9LzM1OvYzWGU
Ma1yY5DyY/HA9pZssdtZbwwqzi6S2Ay9ys8ZOoxBor/8Nf5++Zdu7R3uMwYf
hv052Oo6XOkvfxvDbsFJI+xPczHrxX+NoWhfwAiOl5Nl437nN5vA2fRHj7G5
XSldfttN4IPT9//Hm3mTctk+dRNY3qR1Esfjr1O3uDnMTODSzeD/x2+CNNeZ
SYoJhNu/ScNuvDxuUx1lAvvaZ9twPrgbUOqvJJlA86n+y9irS82S4dkmcH0u
YxrnU1a58mX7OyZQNJEUh63iceuvSp0JaAuUCmJ38XAdFWwzgZHj4jdwPoY0
x7xf/mwCZry8Izh/78hSiuuX0f12pq9wfhsNNW/JZzUF+uEKMvb3DOWo2G2m
4F429xTXB9G1rVa6aqaQm/giHdePK+3NS82RpmDwMpoT1xu5WOUjty+YwmWW
ea9zOJ4Ubr1Jum4Kw/sPXI5HZsqOKbR4bAocc2zbcb2K9lM271o0hceHN+vh
+rbxrtGVAGYzqOE/dArXv6QJ508MAmZwTG2uKgY5OyzGW17FDMJLroqewfWN
2ky9FG4Gwz9sXp1GXklzvmc0YwZ18cK/wvB80BX45+sGc2hUtO0MRWbjj1E7
tdUcJEUSJ3H9FsopfFUkZw5uOfc34Pp+qPj3F4Zgc3hM0JUDcT16coazfswc
tvudnvXC/VtNtbNdMYdzCppbsZO0CrPHWC3g1cWFeQ/8/WkPBmjbLKCicnjx
MO5v02vJbXst4InBcqY77u+bLdqnfC3Ahgg6TMH5slXsHEeEBdRneNm7ILeR
ldqLEizgUnpbI57vyBmGXBqZFuD6pnsYz4e9/zk5dhVbgFxNzVs7ZC+hwLyA
hxZgdkbuIRnPr65nhhleWcBv5+3F1shhN1L3ZnVbgOS/u6b2yMuDBcflv1uA
98B7JVtcP8UfPGz+YwHDJyuFbJBZfF//dWe0BJZ0RgYrPP/d/qSzwG0JThr3
1yyQBcfHzl8Ss4SvTeo55ng+k117I65gCe//HCoxQ5YK3cJbr2MJgqTf10yR
q2p2UWxtLEHh1hMXE2TVBcWbYx6WoH7zwpoRns/ZXr8v+mIJKzOH1fF64NCw
vKoi2ECozQmGBbx+exn1ks/YBsbad2/D6xehkpfWS1Y2sP++/7MZ5L9+Tv7P
DtuAbcBC6QRykGnh/A1fGxBaHy34jdy/b5xGHLcB6lgxxxhy/WRstlGsDdC+
x7L9QJZ53yopfd4GBg5s7R5GzqvmqWFPtYHMtky2IWTOq27aU5k2EGTQ+vUb
ckx4afuHfBtg/PlNE98/aT/j+KDEBnT2FLh/x+uvg+rfMyts4IvKjB6+/63g
uZDTtag/O8a34PWZ9srbVZcGG0jdoCD2FVmf61hjvAYZGPWYdVqRH8zWWvjq
k2Hf0t8DLcgS3Rt6TczJ8FFAbEMzXq8+ND0qY0cGPonXs6+Qma6lz3K6ksH6
1XTES+RTkV9jZo6QYeaU5A+8fvzhLLW5O5AM2h+ruRuRHdTDrtWeIINsAqfB
c+Rm4frdWdFk4K/n2PoMWXV9U1V0HBm28KzKP0Uu+2al4X6RDPEiFt+eIAs2
ZrXAVTKYaA52PUK+UDhstzuHDMrqzcZ4/boUt39w0y0y/Ip+x/wA2d8n4tjo
HTIwPVhcxc/vNWxcbruP3ud7T60e2VRqc8K9OjJ8ESXH1iHXsdpzp70gw7M+
vruPkaV/5+eHtZGhwFxuHD9/c4XCo4O9ZKihmPvUIFNTqXpCQ2SQL6b+qEYe
D3n9bvUXGWq3Hl2sRO5QpIw2LpNhskDfphxZg68ovIjBFubCdLbcRb63MLHh
PKstWPm2LJXh9fmng5f8uWzhmXnT/VLklCe0bebbbCG8SO5LMfJ6dnux7C5b
+Dk+5l2EHEzlU+Daawtb2Xj9SpC/uh1u+CNvC+uN1/fg6620b5t+VLWFEG4G
XXz9nMreRwpgC/MsvpK3kK/L3t6damQLZ2UG+QuRB0Rurxo52ML+KQvtm8hh
q2UVT07YwliwiXAucvqTMu68ClsQ2UC1T0f+rFjWe0TcDoy3/x06h+Nzn5QR
fZ8dTF7bfBRbbHdZjbCiHYwJP86IR34tJLXz9CE72O/2KCIOOYC7LLlHxw7K
dftu4v3M6nSpltFhO3ga1soZi8ejorRQOtsOvJ+MnMD7oRfFe7acL7CDV/wx
axF4f5ZXGj1cZgdxS7wK2GwZe0a1q+zgGPc9lVPIlcmldrmP7MD2iNOvk8h2
8XsalxpQ/7L5mbCXokv327+2AwGXNG28/8o9sSe7+o0dFI4yZp9AhsBSJs4e
OxgylQwJQz4iVRows8Uect57yR3D3993+aWUgD3YODOHB+H8KDHb4SFqD7Ir
Qu2ByFUjeaevSdiDZcT9bwHIbeLTXW9l7KH09z1TbIVdaprlJvbw8TrR64u8
Qah9i2+cPdTI7tpxBNcbZ5GA/CR7mJHWVPbC+7/rx1/2XLaHHR7Ts57Ivvy8
p/Vv2oNXVNtPD5zv3G5Du57Zw4snHgnu+PdsnnrQv2APajbUcxTkWlOdLbzr
9sAoM/4C70/fJ171N9vkAF+lBsywx1pGmgh2B6g9FjvohPezLKqidTwOoPOY
Nwdb2CgpckbIASwkyrixVRL6O6XEHIDh596njsjWr2T3e+x1AD6PO/7YASTa
+WvyDkAruOvggByv1zX49qADSL5SPomdT0hoMGk7QJoiQyLePz9ujMjUNHSA
eJYZV+wPG9qmwy0cwPcX+wHsMW1hs3I7B/gA43fskEmxwcXDLg7AqerhiS3a
QP8ndMQBop+8XLHF9WSNm0IOcIB5ne9G2GQNnweJoQ4gdd6EHzso+hFnYyTq
r/LXBDJyQh2r/1KsAwx/7DqIfWPZpUnuvAPctw5ttsH9U60Q8U1xgKzs2x+x
OyM2ROZnOEBpSOJ+7PFacmdPrgPsIRW9sMb1caFIhqPIAcKLK9uwdyovJujf
dYB1A0dm7EPhJoPR9x1gdnPqkBWOz5oc9ZonDiAqpvoQ+9jsRMYY3QFuuPXa
YCccgOldLQ7Q0u330hL5ZsgVU+d36H1geQO7rvJ7UdpHdH9xazx296TKv+Yv
DlDSn9OLzyt+/HfVK3fEAa6x5dzBXqJPvwqZcIBiw1YKNtsdi70G8w4QkHFj
zhx/76t3kretOUB2ZNglbFkq8/QEyRGuL3M9wwYfb9sX7I7Q0cm9bobH17Kx
NpPXEXbZqixg+xwUFQoUdoT0fVld2JE7o89oiztCbd1UHHYS66cBHhlHkNa4
YoNd0Xe5tF7dEV4lprwwRaa/nGS7rOcIYV5PX2F33jML9jFzBBaVc3bY3zPL
PqjZOoKrDqMo9kLsJmVOF0cI+USrxuc1LP5e14e8HOHE16w+bCHy87+1AY6g
ueeqP7aMuvDhi2GOoD/IYYitJX76xeEoRyjImdDFtub4KKFEOMIf/4/R2F4L
CoksSY5gqCXUb4wc/i11vP+yIwTapb3GPt8yblWd5QjKCiYN2NnVJjXnChzh
dHhoB3Z5dgk/5bYj2G+z34fdEMcYJVvtCMfjjwD2+yCPLxufIBuN22EP2T+D
/+iOQNiEq2HPaQkV3W1xhL4zT3mxmaQimM++d4SNf8m7sQW5ugPsPjkC194/
q0Z4/lqRfys14Aj/np/7ga0xfOnA2k9HqBla6MG27BhL/zDlCB43fx/D9nho
tFS86AhVkewEdlh+kUvUP0fYkny6FDv+PMNzS2YnYN00ZY6dGeIutnuLE2Td
nJDDvu389NwivxPwxd4Mxa7XFfzVLuoElnBPG/vtvpPmNyWd4JNoSiD2AG9n
ZbisE7jvEo7Bnl2T5TFRcQLDGLFT2KSfF0+JaDmB78GCRmz+96OfZwycINZV
Oghb6omB5msLJ9j7+o0T9qHCwpvZ9k7Qky+WjW1+8R/jcTcn4G7kzcN2D3f1
1fNxAo/ktjLsELcnbQLHnKC4L+8lNmHILzse7gTlWrcXsNPlTlymU51g6K33
LHaJ4Pu59HgnMP06L4LH+zHDfif/ZCc4Zmgrg90+lvhUM90JXCQuy2F/7foh
yp3rBBcoP4Kwp+v1iB+30O+/3u2LvbHk5kjdXfS+r+fTsXlT14xTa5xgOPX5
CLZkJKX8yFMneOWg8gtb1fPRFtUmJyjKDCzFNjXlPcHe7gQj322+Yrsqhn4c
6HSC752v7HC8FiqQhOR6naA+VkEBe/TANbczg2j8guOdsWUPSBe0jzqBsfOB
TTh/wuWffd827QSzISFDuL1OzlrKb9EJ+gblBXD7BrnhwNp1JzA/7smBbSh7
qpLE5AwltQmp2Jf2s/4hczjDgaO+3Difu2VyVQp4nYFpI+UzbheSkYua2o7a
sxIWsD32vXimudsZJB51kfH1JdL2DMnSzrCjfjgMe3zvqH7vAWe4zB1dh62w
N/qClJozPK231sf1J1KKs+MUOMNUgv427IY9BVteGTkDX4lEEDZpj5Itj5Uz
XH2uyIbrm6lkc6angzO0jS7uxk6ToPRWujnDWKpiDvZH8QmRdW9n8Dy1oQBb
WPysp3mQM/jLXwjB9dRrN09x9gln4Pg4O4/by8RKRkejnEHSrjURt0/tUpM5
SDjDxcC0F9gquzqOn0t0hg/BovexqTsP13SlOcOE9JNx7Bc7Zhd2XXeGz8f+
OOD6zrLj3KGQG6g/55P+X+8tRQVjGkqc4Z6B+Qp2usjdRvYKZ3Af3jyK3Sus
tcnloTN4vwjow94p/MH4dr0zBDdEHcTzy9Ht3smLTc5QkfZOB7tcaPGdQbsz
qA1WfsOe3ZbEk97pDE9CjvZhq24TcRz67AwOcoU5eD6LEazKlh90hpDfOnTs
lwJ6X2NGneH9t4wP2GwCH3e9mXKGubvNQni+tOH399m+6Az5c7ZU7Ot8q2X+
687wevPPQeyvvKnjjzZRYCB9RR/Pv+K8YvJMHBT4nHqaFTuA5+EJO14KXL4/
yY7n8ypu40eF2ylQSb+sj73A1bcyLUYB1jg1VWwNrmAtbWkK3BBT5sTrA2Ir
A3HpAAWKz/u5YLdsSX/Vp0qBP/rvrLE5t+xhlQYK6KqPb8DrDzvOOvNIIwoM
PTrDhJ3NYZH22pICC+OffmMPsA908TpQIFBCkAuvZyTZTwgccaOAW3tyGnbQ
ZiaXam8KpG7PtMLroftsWfn/AinAcnYmEHuJVWbI4gQFNAX7n2JrsT6XyI2i
wBGJpkN4vRXPQvYfo1HAZe/FMew25pFy1UQKlHJ1e+H12lbmyOmENPR72Wo/
YTswbVbquUaBmg/93i7IuZvyI3bfQM+7UUzFHiYdeBpaQgEZmiWfK7JYxVtm
twoKFJhxVWN7OAbZGdei8be7oo3/H5G/ga1AsYECYr7Sl7H7b5dOiL6mQFW5
ZAhejwrZGhxie0uB1uHmHX7IzqtDCfM9FAivybqAfb34bNfAFwo8XxrW9Mf5
Yym6s2ME3d+xaxq38y49DXo0QYGc+aYZ3G5b4PykcJ4Co5qxJ/H694rp4qaU
NQqYxOWsYb//k04+vckFJqp2P8DrZ848hRveHC7Qn3BbG6+vLQzf/7bicwHB
oVBn7OSpY6rqIi4g9eG/YLweb7u++ZykhAuIW2tMYbPo3v7Atd8FVHnEQ4OR
jX4biq4puYBP6ybj48gJ6d8DRjWQmzULsV9qEo+69F3A9bD5yxBcn3/uID03
d4HGzUqD2Dppz6zv2LmARueP+lDks2oueRmuLhAnIhOP9wcNQ0u/znq7AK0y
XRjvH+7L/LDsu4Xu31n9C+9fpnvicl7fdYHNV3fEnr6Iz6t2jVbXuMCPyYmL
UTg/P7jSLjS5wAy71wH8/56SU101ysMuUBqT+y8GxyedLpgm5gpbXoXdxPur
T/7uPtHSrnBapLQsAVmAZ7X6qIIrEL3vrM/jeKnPWrc55Arc+oOZF3D98Dlo
pqnrCp5LZ6UTkTs5e65JmboCV93J00nIXI/DvvOQXeEN217Xi8jWnlsP/HN2
BXGmueVk5BS2ijNjnq5w+VxBxiVkml3OkH6BK1ywMGLMQFYy2Cyy+bYraD/N
lMnE841ytOOHKle4d7+D+RqOV8nfl689dgWPJe+26/j5Ai4dbnRXOCk4/QN7
Z69Q7alv6HkJspF5eP5oS5rW+OkKYrmSJfnIF56uSDNOod/3e0r3Bs7/8gCf
1gVXYBLYPlaAxze390bquivccFw7jfe3RZdMe+2Z3MB1eW803v86xdTxCnO6
QbXOT2G8P2Y/Lm01xOcGUeMsrHi/TT+cnVgm4gZfwq/kY68HZMmzZ7sBeeeB
ffg8Ipp2Labrijuk6K5J4PMXrwuaWTzZ7tB+L14D/7/LNHW4xrbAHSQpV7aN
4vkqM/Ht1TJ3kL6++dQvnE95cr+6Kt2B2tVDw+dDdY+bbbs73EGq/mnoNPLK
1KJUD9NhOBKtFf8Xz2/uTl0fow4D+R4phwef3+Wx8x474AHdOW4VBvi8eeF7
sYuyB8RDMZ8xPu+zfHbQVM0D/m6xvoDPu9hKM1pVNT3AxG/ICp+PRf075rJH
xwPyfxW+wOdn6p7vCgetPUD4iCg/Ps+rF79ywCHEAyY5baTw+WLDXQEr7UoP
2PGQvIPA58NPxJK49nvCRd6moUZk49y/TLMCXuC9ZlxveAnNR8/2Fp/gPwLf
ZhZ7fiJvf3tzjbzVG7RtI+TSUkj0vqJe1+Blb8iSv31NNZVEL63z/yK94AMl
458qF5BnM5967x46CjIMAQGVaST6b0+HktOtvmAU8WO772X0fQMNWUNf+oG4
J98+5StovaKxHFZU4Q+XLG3SF5BJ5gzrkeUBwM/IAK1XSXRdU7Le3eJAOG9n
JHYtnUT/x3k0dVtKEDAGMW51zkDzA/e7VamkY2AQ0W6yLxPV2y8rIeEng+Fg
77OHk8jMmcdviLgeh86BJvK9ayT6pubcRcV9IXBu5/eQiOto/SM5LLZ4IwQ6
Bjd+ks8i0Tkkur8miYaCx913o8vIvOcl8+vTQ+FPI1W8Khutpz3yDuWxhEH5
anv4kRyUn58bfC0TwsC50jdiZy6JfvqhzvW8v2GgyJJKakcWO3Dc+VnUCXii
XbiRlocs3rh4cfEEmJed1VHMR/EXFZ61FBgO4XN6Gh+RpUI625XHwkFq3fMB
cYNE3996mYHL4yRsrQy/InKTRE/MOsmb03USJLvHEqqRA1lJj+etT0Ffcf42
cgFav/X/cZ98dQoMnr22HkFWtkrJfKQfAdsLQxWohSi/1SzuyjVGwKiPMzP3
LRL9RMKxJgPlSLjkxQzpyAdPqAbJ1ETCcf8Vg+1FKL6avAWrpU7Dmy9awunI
r+6r2zOVnQazUJszO4pRfdt28DibRBS4GrFU3kBuHr6aXJ4VBcdqLu7mL0H7
X4ucQzsEo2F6JOtTOrKtEGlcLiUaNq17pZJKSXRvK62x9dRoGHpRd5wJOTw+
cvTN5Wg4sPO1JRvyuSf3f+RejQY766sM7MiZk+PfAzOiYX+d+sXNyL0ver6U
5kbDuf9Kq7mRvQJL3+24Gw1ptcWndiKH1ZvWbGmJhhpJbz9N5LiZ+OqvrdEQ
e2TaFztd8nnlvfZoUOfaNa2FXOyyfI/6JhpSzheUA3JtmmK52bto2M5whdBH
bn517I7QB/S+jpuShsifVkrLfnVGA0Nme5cR8i+5oZLH3dGQQX2cZ4K84i1c
fP5jNOzlZVAyQ96c7XDL4VM0VOVuaDVHFn6XViDRGw2neDT+7/2k9htzfdHQ
y9EQb4mspbYpv+lLNCRuesNnjWwVrJ175Vs0cP69nmKL7HHrdLbnYDRIR3yK
tUcO+VRzXX4Y3f+rlAObxjGZ+e97NDxuPyKMfUVXKuPtj2hgLFVUpCAXRnhd
zRtF/a/sscKuKc+9HDQWDfrqD7ixXw5+TFUfj4Y9toMX3JB7+LlS2Caj4TvZ
yM0T+YeZWfLnKTQe5Ot9XsiLZ88llc1Ew+ot3lRsltrnFyL+RAO/8FuaN3Ka
++WoKQYqfGFwbwxF3qHF+XSEkQqt9p8enESuELn4t28TFS51DMdga64xa3Qy
U6GK2OoXgdzRH09tYaXC3akHwtHILvUMzxo2U+GRWfgSFXksJ2btAQcVok7/
Ez6DfDr6r+bdLVRoPzly9yzuj0tkTAEXFfjqwqkE8rVD8w3XeKiwKNHahNsl
hcL+XeKjgn+J8Oo55IfLk9rxAlTgV3VP8LxNout/DjwbtY0Kh6MMq48gdz0e
pYdsp8KZgIZ5bK/rPgy+IlTQKRx8hT0bMaTjtoMKpkwWn3yRaY6HCdtdVFB+
78QZgLz1YP8Lk91UsM4S7w5EvsnvzAgSVAg4XXbjOLLcQo+eyh4qhG3N+oXd
0EOOl9lLBf26U9OhyCu2hgmbDlBhos/4z2nkRMWm138VqGCQffBUFLIgDzDP
KlHBSFtKJAa5dLbeaFQFPY/e4X0WWaVT7cJXVSrMpz2QI5BfVde2dB+iQiBv
j3I8st1lRdZ2DSqoHQ8NTEAeDqkyadSiQvoD4aQk5DDr/UmPgAr5fLy+ycgM
8nfa7ulSobtQyg47bcuezUX6VDg1EqGRgrxj6pZZtiEV6hjWLNKQK97uTE4z
psKbhA3RV5A1K/I6Ekyp8NtCIjodueOSEMcZcyr0cbldz0QeM+dN8bemguLA
dF42Hm+Tv5e3e1BhPJYv9g6yrW5rVmwsFTymSGVtyCGltmQ7GhUk0laTOpCT
2b+y7Y2jwppsidtb5LJQv6a1eCoM3Lgrif3y42x0ZwIVbl5dF+tEHlA/o1R6
gQpiG9N6epBXbzJPRCdRIdH93Dy2INOVYutk9H0H7Z7+h6wUKOwukYLGiwoH
+5B504+LtedSwcpKnDKG3D3Cd5e/jgqq7yVlme6g+SPRq/7eHBWmPWIbdZG/
Hi85Xn7iDDytyhx4jtzwhnMDZfoM/G7JLlS9S6J/Sfl0tdg7BvotJexLkIkp
88eNQzGgfjrDS7icRPetERuIdoqFoleze88j35oUHvneHgt8l1YtJ5Dvf/fQ
TBU/C3E6Wd6u95AZv7P+dT8LN3UeDT9HPhlWL2qVfxacZtIXpStQfbtioBz2
+SycT/PwTEb+MelRF8RDg9X/ePt+Ij/K/nDeikwD0ZhHhVaVaP5amnVguESD
9Zjcm+XIXzqtn/9Dzu4s3FyBfOVexZ71FBp8Ti+trEQ2vMCetppKg8dPP5dj
//UKWFpJo4GjhRW1GrlKs8Vj+TIN/omo/1eD7C0o2bp4hQbBUxNTD5C3/Yk7
sHCVBttHbsXWIr99M5g1l04DLWknz0fIcWXaG/9k0MCJ+wNnHbJqXF7ATCYN
DrUUkFuRJ9z+dk5do8GQh9W1J8iFqs7qk9dpMJ2VK9OA7Mjz6NZ4Fg0UOtn4
GpHZJ3nZf2fTwPn8TdUXyPSWsPBfOTT4EM/8ELefvPW+/2cuDepHcnvpyNIx
sgY/8tD7JC/RXiJ/dUq+9z2fBi03ApewryqO8Q3foEE+uYThNbIxp3HM4E0a
JG45X96GvDZa/ONbAQ0WtPnnse83MVp9LaTB/cOKZR3Ivvmej/pv0aB6Swbz
O2Th08939BXRoDMl5c4H5A+2Ihc+F9PAjDtHvxM5QTZ6+r8SGtx58qumC/kQ
62enj6U0sJq1M+9BnhpWaewuo8GxFo+k/5CLGtL3dt2mgciA1f5PyE5Zs5c/
3EHjPbNV6DMyR7j1yru7NBAwnv/ci/zCssLrbTkN5GTPaX5FjtjL3t5xjwb0
sYh8bBlSgGJ7BRrP3L7Gb8gDX5tzWitp8EJeUWkQOeOJBKmlCvXnI8lyGNk0
PS7odTUNHpE3/sReDx7sfnmfBlEDXAI/kWtMtDWbamjAyP5Q6Beyn3heceMD
GugIFaeOIYv8W+GgP6SBA/OYLr6+87PTqYZaGlz8Q235jXz+Qe3X+kc0SB6r
ODGJrJHKa/T0MQ1UdMzFppFn/MMqnzyhwcgpzWTsEv33Ao/raEBW9X8/i0zZ
IXu29ikNojkLwueQt6xcHH1QT4MT3zj8cPvL7l/WNc9owE//fnsRObLS6El1
Aw2I65NvlpD3JxXvqnqOfs+3jfp/kYe8GZMq6DSwZfmWhH1N23O2vJEGf5p9
vq8hmws9p9x9QQNLtlOOq8gM88JNt5tooKwc8Qq3176L2lf2kgbp6tty15ED
73y6WvKKhuZXzUBSFdqfnVNZLXpNg59Zb0jY3YfTvW810+Dj8EYW7MRDsx0F
LSjfLPVYmJG1+KyVb7ai7xGTJ82EPDt1Ly+/jQZM569934xc2raZKa8dxWdx
lQorsmuxf3BOB+of2fcNJ/KGVppSxhsacEe2u2xBRsm0kvIWja96RQsXsuHW
+/QL72hwvb3SdCvymGJbAvEe1Y/9lC24PcVxyJz6AX1/gaJ3fMgHole4T3XS
4Ld0xU0B3P987s/Hu2jwTKHXaxty5AvpG/7dNEjobLETQk7/9vvdwX4auP78
JrkHWZWRlHngCw2WVS2SxJH7JIVd931F38ft7kkp5BhTJTGJbzSIba4+g68X
CzYfFR2ggeQR514Z5NeXvSsEB1G+dbl57Ef2f0gN5x6iwetSH355ZPbP6YfY
h2lg/lmbOIBctVq+gek7qj8f9ydi2+189fofstFJm2kF5EW9L8nLIzTYNDkd
ooyc7TtP/vMDve/FczdFPP4XObZN/ET5W0NaOIg8VCHx7ccoDUJDj5sdQj7X
qVk88AuN10nXk9hSC/aBvWM0OEPEy2ogd2wLPtD9mwY81P8MtZFDNBMW34zT
4GVw1TtsHs/8Z80TNNAdzvbRQa6Nr41rnKSBRJ2PqR4ypeytydMpGgw082nr
I6+3/9jycJoG15rfntRFLpha76mYQfl/50qDIbI+j0Bu2SwN0s652hogj6rI
eRX+oYHg05BRU+RkipFU7hwNCjqrzY2R5WIOT2bM02DNKl0Ut3cWRDxIXUD1
X/9amyXyqVepUYmLNGB4LvDIGlnoVynELdHAvimLm4z8jJ3OdGaZBh75GUG2
yB7ynzpOraB60BPsYYdMspu+EvKXBnr28xJKaP9SFsHiHLBKg0jfqn/SyGY5
O3d4r9Eg8yrD9D7kyQbVEbd1GqR8JIRw+5Uh67uO/2iQ8Sat4iCyCpN/qM0G
AhwvvGiRQ/68l3bQjIGApDuUZ/LIVIusNf2NBLDVJ2ceQN4ZWt2kxUiAu4jc
Cr7+ZXproiqJgJ5tVzOUkX0fD1opbCKgfYpyHvePrX+ZT4aJAM/SQWsV5Ip/
XP0SzASoPJ3zwCbvli7cwUKA5sZiHVXkeUNdv22sBJisfX6I268HUGR52AjY
dkUiEfdXIyVsjn0zAfsOZTJrIJeEX16YR+aWq/iCvdWlaukrOwHPHrS1aiJH
6bxbaeYgYJrxa4EW8vc9k6tVnARcSZCL0ka25OT4l7WFgB2KqVP4+sdz+xji
thKwqy9NVxdZrM+UMYiLAOmHHyT0kJMb/TfZcxPwU675M/ZC6QVmLR4CgkIl
1wyQPVJKWffwEpBHBPzCbgt/vXkrHwF8CycJQ2QllxGOZeQTHNNXjZHzdUhb
h/gJcCve6WOFzCK1m7tdgIDDnDYh1shhnLq8DwQJ+D5ob2CG3D/nwZ+3jYAJ
dekd2IZ9sYIJQgT80uwQskSuaswXOr6dAIej4Q3YQmXPhJ2ECfgS+4wRPz8+
pV9UR4QAbd+l0/j5k+F/d0qLEpC7ql5mg+zkIrSbZwcB5448NCQjv9BRk1hF
VtMKDrBFlpFy2jOykwDC70IqBTmTM2Lv210E6P4S5rZD3jCfse+RGAGrv2aF
HJED+h7sv7mbgHx5zmbs7sYuuURxAlh9z+6yR9Yqmz0QJkEAZTSX5oTjOYVL
yUWSgAgOCz38fO6T8ir6ewggD83ZYVNdrFT3SxFAOj5h54b8Qyf4EP9eAt5H
f+c6imwtdUnjH7L3nBD/YeQ6znKtUWl0vzOboSuy+HwbfNhHAP8dkwxP5I4U
Q5OTcgR4HXUz8sH5cNLHzF2egCfCdczYN13iLYwOECDFMtaLzaZ7y0pegYDq
PAduP+RwqRc22xTR857t68YWfqFJeaZCQIeU9uEg5IQyV9eSgwR0z2rsOYY8
nRLtnqpKAOPC+YVgZMrJbI9INRR/kRYzx3E+uTzx8jyExq92aQhbVveTt6k6
AWvV1K8hOB+kFo8qahCw1arGJgx54xZ+f2FNAraYSmSeRA6aVwrcpEXAn8P/
XMORP/bZHptE5hWcEMft8CLs+H/aaLw9kswjkO+UXQ6lAwFHEh3GsXlTq07c
1iHA+a8082nkmJPvTl7RJQBmspsjkUddJiOi9Qi4JvB7PzZZlyPKW5+A/gy7
eCryUykZqoUBAR8Too6dQfb2Dtphaojyn0VIKwaZ82b5C0MjAioj5s+eRX7U
N+6jZ4zizzLUnIbzR2A/K5gQkMO5ywGb1fZYuYYpAclnVcWx76fcs1IzQ/Fx
w5PA97u0TcwqmxNwtIbKnIJMYpLNVLAgoCqC43s88j2dYDU5SwLuthWIpyE7
nKno32eFnu/hw3kB+d/jyVgpawJKWG5/TcTxNye7W8KGAPXiJwtJyDbyx1/v
IhPQ203+fbcX7U8DK/1FbVF9DL52vQL5VukU+3Y7AmS2qvy7j2w+LFclYE9A
qEYM6RHyvGiILa8DARdacjnqkPMpVQtbHQmYvCU4+gzZKHM6i8MJ1RPyvGMj
8vQHeU02ZwKKWCR5niNncYQOMFEI+FzeyteCrGtSHcfoQoBwdsHVduTf8TOS
G1wJOGMd0v0GOZ1+oG0VWZQ7SrATuT9P8fugN4rnoKq4SeRzn0+c/+pDQOyy
IHkaWZbvgXTfUQIkZ39sXUA+m6wU2u1HQOCDffmryOLRyuuvgwhYOdbuw9qH
4svpoGB5OIrvsBtd4shr3Ormp+JRvE2an3FFXtVeCfM+R8ArvfKOw9hBT7LI
CQR8Xd5FPoL9+uBP2QsE/Dv+QNIfeSVKifh5kQC/l4+TTiIvDu1/7HQV1Zex
IaZk5Jn7O8XVCwmYv1/MT0ee/vbNdO8tAjx03Ha0YLPfCBUoImDjoU1P2rDV
3K9vKiaAY/av61vsoyLP/yAri64rvMG+2j8yWELAm3ATajfyFD2H/X0pGp+D
u1X+Q56coCg2lBGQosK/sQ9bSIhSfpuAe5WCcV+QfxM8aSLVKJ8Uxu4uIY9V
dtZuvk+AUY/ssQXs/stflpGbOAnWdWxWG9JoDQEVrWMeDP3IKlv3fXxAwCgr
K5WEPDrG/jrlMQGNP+20ubEFOsapTwiYeV5P5kP+qX+RJ7COgD21G4N4kX+E
mh5yfkqAFmvTiAh2PqunUT0BBScn9USx21vOKz8jYDy8iUEMe+l8xe4GAv4W
p6pJYEsY9XA9J+BkkavSHuQRMtPqP+TxvNbAfcj/Ayc+ct0=
       "]]},
     Annotation[#, "Charting`Private`Tag$74492#1"]& ]}, {}},
  AspectRatio->NCache[
    Rational[1, 2], 0.5],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, -2.6075046940711584`},
  CoordinatesToolOptions:>{"DisplayFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& ), "CopiedValueFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& )},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{
     FormBox[
      StyleBox[
      "\"Squeezing (dB)\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}, {
     FormBox[
      StyleBox[
      "\"Number of probes\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}},
  FrameTicks->FrontEndValueCache[{{Quiet[
       Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , 
      Charting`ScaledFrameTicks[{Log, Exp}]}, {
     Automatic, Automatic}}, {{{{-2.6036901857779675`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.074\"", ShowStringCharacters -> False], 0.074, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 
        0.}}, {-2.577021938695806, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.076\"", ShowStringCharacters -> False], 0.076, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 
        0.}}, {-2.551046452292545, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.078\"", ShowStringCharacters -> False], 0.078, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 
        0.}}, {-2.5257286443082556`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.080\"", ShowStringCharacters -> False], 0.08, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 
        0.}}, {-2.631089159966082, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.624168717121508, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.617295837833746, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.610469872763346, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5969561535966235`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5902671654458267`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.583622622727158, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.570464538149647, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.563949857128453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.557477342622836, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5446566541937745`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5383074265151158`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5319982573218507`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5194980945576195`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.513306124309698, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.50715225873532, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.501036031717884, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}}, {{-2.6036901857779675`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-2.577021938695806, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-2.551046452292545, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-2.5257286443082556`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-2.631089159966082, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.624168717121508, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.617295837833746, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.610469872763346, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5969561535966235`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5902671654458267`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.583622622727158, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.570464538149647, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.563949857128453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.557477342622836, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5446566541937745`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5383074265151158`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5319982573218507`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5194980945576195`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.513306124309698, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.50715225873532, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.501036031717884, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}, {
     Automatic, Automatic}}],
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->350,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Quiet[
     Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& }]], "Output",
 CellChangeTimes->{
  3.837079963384409*^9, 3.8370800085781384`*^9, {3.837080049415187*^9, 
   3.8370800702125*^9}, 3.8446776431138153`*^9, 3.8446788209776335`*^9, 
   3.8450405209519978`*^9, 3.845041499099256*^9, 3.845041967402054*^9},
 CellLabel->
  "Out[275]=",ExpressionUUID->"332097e9-1ac7-445d-9b02-07e4cc5e7a6d"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", " ", 
  RowBox[{
  "version", " ", "more", " ", "stable", " ", "numerically", " ", "below"}], 
  " ", "*)"}]], "Input",
 CellChangeTimes->{{3.8450402324496927`*^9, 
  3.845040247020748*^9}},ExpressionUUID->"d886fefa-b74d-4d44-a660-\
2558e76b4ba9"],

Cell[BoxData[
 RowBox[{
  RowBox[{"SqueezeVALradarSTABLE", "[", "m_", "]"}], ":=", 
  RowBox[{
   RowBox[{"FindMinimum", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Block", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"$MaxExtraPrecision", "=", "1000"}], "}"}], ",", 
       RowBox[{"N", "[", 
        RowBox[{
         RowBox[{"pERR", "[", 
          RowBox[{
          "\[Eta]0num", ",", "\[Eta]1num", ",", "nSnum", ",", "nBnum", ",", 
           "m", ",", "r", ",", "t"}], "]"}], ",", "50"}], "]"}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"r", ",", 
       RowBox[{
        RowBox[{"rmin", "[", "nSnum", "]"}], "+", "\[Epsilon]"}], ",", " ", 
       RowBox[{"rmax", "[", "nSnum", "]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", 
       RowBox[{"zmean", "[", 
        RowBox[{"\[Eta]1num", ",", "nSnum", ",", "m", ",", "1"}], "]"}]}], 
      "}"}]}], "]"}], "[", 
   RowBox[{"[", 
    RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}]}]], "Input",
 CellLabel->
  "In[162]:=",ExpressionUUID->"1ae9ecf6-489f-467a-966b-09bf23a893c4"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LogPlot", "[", 
  RowBox[{
   RowBox[{"Block", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"$MaxExtraPrecision", "=", "1000"}], "}"}], ",", 
     RowBox[{"N", "[", 
      RowBox[{
       RowBox[{"SqueezeVALradarSTABLE", "[", "m", "]"}], ",", "100"}], 
      "]"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"m", ",", "1", ",", "600"}], "}"}], ",", 
   RowBox[{"PlotStyle", "\[Rule]", "Black"}], ",", 
   RowBox[{"ImageSize", "\[Rule]", "350"}], ",", 
   RowBox[{"Frame", "\[Rule]", "True"}], ",", "\[IndentingNewLine]", 
   RowBox[{"FrameLabel", "\[Rule]", " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"Style", "[", 
       RowBox[{"\"\<Number of probes\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}], ",", 
      RowBox[{"Style", "[", 
       RowBox[{"\"\<Squeezing (dB)\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}]}], 
     "}"}]}], ",", 
   RowBox[{"PlotPoints", "\[Rule]", "40"}], ",", 
   RowBox[{"AspectRatio", "\[Rule]", 
    RowBox[{"1", "/", "2"}]}], ",", 
   RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]], "Input",
 CellChangeTimes->{3.845049326683888*^9},
 CellLabel->
  "In[299]:=",ExpressionUUID->"6e0c5225-ace1-41be-87e0-9677840dddec"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
      LineBox[CompressedData["
1:eJwd13k8lN0XAHBLIpXshKREWVNkj0P2NduMYWRJKUqIUFFGUbaaed8QXlHK
WlmyRk8b2ZUkW0IlWVqohNLvPL+/5vP9zDx3nnPPuefeu8nnmOMBDjY2tjx2
Njby0+vOewl+tq+G/z6BhbS3LOLOfkZZVNmcYcROf+aeahbxR1zGYspn3vBT
9qpogSwWYdPZMOwqvGS4P+yhdNAFFpER6x7W1Lhs2NdRU50XySJCs35zZeix
w89lfQ2hQBYhFW79Yq8wJzTX8Wa3+rKIJw4ZWdwzK+CZ43pVZQ8W4a/8ye9B
40rIXu1S30lhEQLc2uph2TyQJ70j0t+BRdSMxi0rhfNCaF3X4WYbFuFV/6pl
zH4NbIlXrnlswSK407ZcubqND4K/cCfom7KI1zU6agVs/FCe6eO10ZhFKMmP
XuGc4Yf44ty3NEMWEf3PhaV9/QLwVbTU8q0+i+hmU/OuaxSE7sWyx9d1WYR8
4OsmkXIhOPvEuTFLm0VEDkYrB2cLQ87VruRGTRbRbiHPak8QAT9+J2+xXSxC
pqpjfmu4KHCnKKRfUsf4ZcM8YveLgfDkGG3LThbRfFnqybC9OJiuG/d9pcYi
jgUEpFzZJgEuidHOUaos4nGf4PevwpJgY7CDI0iFRYia1dFs2KWgR/riw1Bl
nJ8KbyJ/Rgo6gm4WXFRiEQ9kVslxDmwAZSk+rhJFFiGYUpqwr0kanm7b4jak
wCIOLFG/1pZvBD4lfr/16JUBLz1qGmUgTrDyn7KtLKJ0Uz7/uN4mGLn99+sa
tFvfySdC5ZuA09vW9Zg85t90s8Kx7M1gvCvwto0ci3D9/WMwS1gWvKYrNzVu
YREcFS0prQmy0GcSkW6CdpEJ/i4XvgVo178UOMqyiOVek3ynmS1Q80cjfHQz
iyhIFneL2S8HelOPQkLRvxcJYsheHmqCKyUKNrGIvFd8if9s2waybXlUPRkW
YZc0tvtR9jbQH7GXm9jIIn4ZV339LKwAT4IrK9LQ1qUeFCt2RdBnOu1YlmYR
swklm9gHlEDl7bEjHzawiCyjsz2qe5Xh7yD71ptos19O8fQmZagsvBl8EJ1x
YGm6ulwFXL/IzU1LsQgjsKoJTNwOPt/nrdagxShCV5u41OCi/L29LyVZxNok
9t5XpmqQb33kbQZ6Yf6N/fdGNTB85einhu7uSt2zo2kHrFewPXRYAvPNdf4s
rNwJO118unXRD/SON9ib7QSu0UcVa9BF+fZagU074a6tadK99Swi9gyPUnGT
OsRbpaauRZ+s/OlXt1IDBLbP7f0oziKCpt7ntZhpwO2iH94P0XTqI+mJJg3o
EZAuOIHW2H5SUO7ZLjjqfqlkUoxFjA9PLWQ/0wKucwub5kRZxJDwgOYdbm14
KKRxrxfdbdV8vMFcG1SXn1+5jyaq8mYGn2nD+9x7q+LQVdMsxSluHRDYPX/9
CLpkc4zforkOLMt/l3RCp6d4jIo360Dd8cSDm9EpT62lt/HoQuOqDNXV6HOL
Ou5aFrqwmy/Vek4E41Hblm52QRcsvU/efoMOOij6yqVZF8YDBPc/Qx/MWiF4
gEcPHiVEG5Sj6d2zdqEWerCr0d/8P7Qjz2hi7AU90FJJy+JCWxp0NbOa9SCD
7cedr8IsAkIbuK7z6ENk69mjQ2jNomLjMgt9SG+KrWpGbxa9UN/VrA+fLKpe
5qIXZ6B0TctueC8n0+mG/iq7fUZylQEsRDyiW6HHaRsUlSwNoCb01KIO+mXj
wg3LFgOIt4zjlUSX/FeeFtdiCJz65sGjQizi8ilaQjEHwD3dSYletFVBf/M/
MgDKa4/1t6AfsA+Y+tIBKq1+xt9F37o3YMjVA+D022bxBNpr1C165huAWlhJ
wmG0BN9g/at1RrBoye1CR6f4DercsjaCp/G9/cboExJD6uZPjICNqyJWCK1m
Tg/ZPmoExaULDjzoyeNDpWJ/jeCqWJfaH0EWsa9jSGVC1xgObs6LmUCbnX2z
9WK5MZi2fL/8CM122+Ng8HNj0E012FeDrut/k0f7bAxsky0ld9Gq6sObFBX3
QPgKvS/ZaNHxYcm23D2Q27FC5Sz6uaCnWwWxB+hF7rKR6ATDt+mZb/aAz5XN
W0PQy+lvRY6sN4Gj94TkD6BrGj2dnbVMoHO8cJcnOmT2LUvfxQS+C80doaHH
rUfWrWWaAN9HOt0OnRPhZffjjgk469H7LdBuN0eS3rSbgPQOEV4TdOfyyKo7
PKZwPHNTpC76gpK3Raq8KYiMnHbQRBu7jsZFm5hCNF1AeSe6qmyU0/6sKWRP
uHspooOGvY21sk2BZeD8XR6tuHrs7MZ6UxAXuLNPFp3tO/bny7wp/Hd9wGoD
2pXpo98nYgZXJv2uSKAFH4ydfKhuBpMuK3XE0e2TPrUFDmbgYQt1Iug4sXfz
l4+ZgcLhLB4hNJjs14xMNoOc6RljAfRi0LtQ72IzuOBU/nAd+t5/+yssW8zg
XK7yDj50YOu7bzs+msHuWI76Neht8/vVJLjMYfibhM5q9Jjs+0AOWXOwW2u6
gRedtdf39iSYQ+uxOb9VaErU+6nufeaw+P5jOg+Z70a2pS2nzaH+X99lbnTh
mg284VfNYanJIpW0o7PO+pYqc1CVtVpN+nemyzbJHnPo9aD8XIm+9S5Y6+g3
c5iNMZIiv7dXSjEj+CwgoJdJJf0rpMhFQNkCRP2Vc0lfr2vy3W9pAdSGpAbS
NhzvjlcetICP7N+zyff5YfmXwX3OAkq6o1tIZzMlWbRcC6BcaFxFxmPRr5Vb
/MACspItm0jPyjiX/hm0gIsPddeS85F5KIiwX7AA6Zyc0LVok9KkzlxRS7g6
vWuanL/P8wVv5tQtwfbLRQ1+dLph47SpgyU8nRUoJ+ffKH50KS3QEv44h18i
8zPZ+Yd3MtESsve4N5H5+1dUQkK/0BL4vZY2i6EN9mkqpDRZwgNdeux69Meb
jtoj7yyBj+vdmCRad1ci5Zy0FbivbyuQQb8/nX+gV88KunnMb2xGJz99ErqN
ZgXvOy5PyqFHnH6z2v+xgjsv6rcrkfUScrRLeJU1yNZeYGih1eouDh+Ut4ab
5bXOeuh+9lszNXusgfPI810GaGXm8GqPaGtQPailbYruvmtvcXPOGoYaG8AZ
LT2z49GuYRuwCZdaDEM3a9g9j1+ygfiqlJUn0cGn/d/2i9vC9vh4wTNoiadx
n5U0beESm9mZWPTT1Tf+RDnZQlVY+lA8WY9OxJrnQbYgvHFQ7QJaLHNQcnOK
LSjk9wkw0Q/H5hVDi21hdVvVy6tof0Vh3aZmW5BKg5B/0MIhapbi47bw8cDX
tVnohlobV39OO8jpiruVhz7IftivXsYOPHef+lqI5rc8f4LPwA5m3WO2kP2o
9nLueS93OzifMqR4D+3T1/BveYQd/OcxpFeLXiMzcGNFqh0oCqj98wBd6fez
nFJhB9UntE4/QZcO9cxteYl+ZvC7GV3kUKExN2sHk8mK+qTzmphhjwTtIbCU
P+MFWY96QVWXdtqDxzdR2hBZP6V28x6O9rDi3VHND2iWnIq2cog9KIcIcH1F
J2Wsjlxk2oPhbDP3GJnPdZO1zWX20Llm/uMUungw0GuD617wOf3ohBj269Ox
Pn6XKA7AodYXfAq90PAi/sRBB7jPnShxnuz3v6DA44QDOKoreSaj53aWNpvE
OUCdc2xAGjro6MZPSqkOsGZ78eEc9Ex+yiqhWw7wjqqfmIr2H/ujsFjpABLb
ujKuoT9KHbUabXSA1bWGwgVoX+qQf/MrB3C55uNahh5lWife/eAA5UmCGRXo
fe11xak/HGD44kx2LXpwpWJ7FJcjrO1UXH6AdjW6Ou0r4giP9TR/NaJtlSiB
7C6OoP3fIedBtPRLy7DjTk4gHGMVuR33z5OpDR+sfJygq+HSnDr6NW0HZXOw
EzzbDfLa6Msj4lovUpzg6l2pVkBzfP74S7XVCSzldtk6oveVuR9e2e8EW1VD
N1DR90O7+t98dAIe6R8e5H4eulRVl8TlDFF1x07sJ/dznrjTk+AMbqnrR0LQ
xu0L04/snWF8dWRRGPrapaMeV/c5w4n2Ms6TaFdRFwOL085A2aReG4Nuld3C
dqvaGUyMNzhcQt8xeBzrreoCo9f6wwvRvBya37V3u0C1jENiCdqvsdCX38YF
VKhfjO+iZWyYpsRhF8jQ3nymEn16HVdVagQ+by2sV4Pu746QD4x3AQ2uY3F1
5PkldTrVNNUFzngN2jegWTQv7g03XSDHz+37Q/RnqZ7w7xUuENN6+O9jtPWI
+UTbYxewM4rZ1ohe4be95eSIC8RXfnRtQZ8IXU7ok6RAlGT6oW50t1bI0l1F
CtiVu8e8Qm9f+hAQr0OBw0Z5T3vRSQ9oQ/ssKKAgdoDej56I6bDRpFJA+K/o
oQG0ialRw9qDFCg5mUaQ561cnkqVD6EUKLrZpTCMdruUxfcviwLV7e5zo+gq
R/4zAbkUEPHgcHmHFhI998W4lALzacJOH9BB/fOeEgQFrLZwiXxEt2cFPP/W
QYHFjm+8E2gFr7fQMkSBtv2K1p/QcbJOZTlTFGATX1E5iR4bb9oUsUiB71Rx
9mm0YZEuy34VFXivXhScId/33CXJA+upUJ/04t1ntMW+93knFaiQ9iVU/Qva
VltH9bIOFYrXvVP4hnYUTKm+aUkFeaEHp8jzJXV6DO7TqOB95sf2WTS9Sav1
+WEqdPiLa3xHe+ckOY1HUmGkOPgS6YMnR4eWLlLh/olzjaQDnDUPCmRQYXrC
uf4HGa9q4hf5IirIdHCa/yTrlWckQr+OCjO7C+mkI8c0OBxbqaCTWzdLOrr+
YqLfABWYEo/y59GM1GHhqEkq1ISZ3iUdH6SezVqkghNNrJZ0ktWFrQW8ruBc
NHmMNHPLm9IGCVfo33h1+Bc6dXmH7ktFVzgXMaJNOrMv7smEritUOI8eIp1T
PmizbOUK+wSq/z/ezSS1XiF3V+h57jlCuujgeU+FAFdoUZT/QvoODEwYnHIF
u4OfXpOukNge4pzoCjPD9cGka77HLh3OdIXri6sDyXjqO/vOnSl2BY4Qxypy
Ph4VqPBdue8K6rk1PeR8NTEYaUVtrjBXXW9Duo3+WubhoCv8DksbnEM/11Qu
ejXlCv5urANkPl7xx6hPLbnCIBvPStIDk6/q2dbQIPNQDxeZv7dPFc1EpWiw
wW7Al/T77DNdSso08G3gHyLr4VNEj6uRPg2ixntryXr57KgwRrGhgc0P/l1k
Pc0pRwccodPgaJjIb7Lefq18+T3mCA1+Utr6yHpkv3+a+3YSDXKbTq0n63fl
lReXH2fR4I3+N6Nxsj8ck5foK8HxXyyGvkevszx1Y6aeBrbzL7RIC8s+V+bs
oMGPGd+fY+j1f7ZUib+hwQ0Rn52kpV9HGqrO0GBZ8qnRCFq2rLN5zx8aFGhW
fiPX27ZEWUfaWjc4ndG84w1a5UDEYOAGNwiylY8g1+tOww7fcypuUMt6OtGH
1ps7EX7X1g0e2d540UPenzra2Bo93GAu83gv2R9M8mUSBo66wUadCM8XaMuY
MKGvUW5gtlxo24W2c2/N4kpxg8zvRbntaKddG+Uls92gp8qhoZXsn+tC76rd
cYNvDPkTz9Aen5q1zR64wRPB7t3laJ8nGx67d7rBeJuFH9kf/f4LsQ4edoOj
KQaPyP55JPxZT9xnfH/P6XKyv4YpBX8s43MHpY9t1XnoWUFh2mlpd5iPEW8i
73OBi1WtZqruMBVe7HINPTVK0xcwcIfNsR3LmehDLb9vD9q6A+dQpXwGmf/S
axtvebjD9RyHhVRy/aYbM4OOuoPTrNMXFnr4zAcOvSj8fmrTwGWyn/ldCOVK
dgfjfUaXktG9dkrjXVnuwPy7hplAxq/ZSc0ocYf6kfl/4tA2XMJ629vdIXNy
49kzaIMb19hpq+mQXOgSGYSuSzA+LitJB6H44V1H0VohH97PKNKht+JT4SG0
mpFSM8OKDq0t6QGe6NvbOnVs3egQp5QmSkcr8gcXi/nT4UOn1HpX9K15oQ1j
kXQonh+YI/dH2bdVKSUX6dB8SjnHjlzPTTS28Kv4PNfFK+T9VurO72CjQjqk
CCy+NENfvXLt3epaOvQFOvkao0WjjF16m+lwxd3Ieze5//h+aMrpowO7BG8m
uT+vs7mgHTBBh5oButpONI9kpyQbjwdsSv2VK4c+xxGc3CrmAV2PjznLkOtj
Uujvv1s9QHlLz5AEerGGNqZg7gGRh8c41qGnKR8KnOI8YOlzjMkCnhdesH7v
yl+xD3RaikZb0Rm8Snvt2D1B7U+Ymg/658lugVX8niA1NdThjnacinz5RNoT
tlM1BF3QvO3NFB19Tzj94lq4Bfpk8kGPLeGecJ8jNlcZ7c5/3X9x2hNua6Tw
z+F5jC8xydjpiBfU781TOY3W3+N1o/S4F5iK2vqT91f/JfUVfKe8IDxovfER
dFPAYGPzRS94tVb8GB0dbaNoaZDvBUonVFaT5/PPa5vtFca8YJTQy/opgPfT
y5wef6neUHCqteQwem+PeeuSpzeM1wqLeaG7xZK0fvl5A6/9whEq+nW2sOC3
cG+wTTbduQc9UiL3bCzNG5I/lYpIor81m+9oeu0NMeNUsWf82D/Yk7iSqT4w
9011rRSaFix8R4K6H/qkQb6Aj0W8PFr111DjAIxaFNneXs0iTNdLuHPw+IHj
bo7oWB7sv1dzuuM5D8PQD3v9dytYhJJmjZXYG38IF7CRCWDH+smfHT48fATM
32+oyf/DJNY0fz5N6w0EbZbm8t8FJqHO8SBZgRIENA+RHfk/mcQ4r+gUt0sw
ZMuNzUnOMYnLuVUWU8YhYLhWSnbmC5Mgrh/SKDU5Dl2Nr69dnGYS/qeW8p4Y
hYL0RFOi/yccf6xXZEglDIqkne7fGMfxK54I96qcAP9HMpeq3zEJB8EFoVdS
4eAQE7BbdZRJTFmsS9/MHQE/9uWVPBtmEryTmkUOXJGgLPHD2XaISWxan19/
fjYSJkKG8lYNMImG8m0emXMnYVWp+3TvaybxSjaR8ffLKcjnL7lb9YpJvN+s
WXBo8DRwWBo87XvJJCKSZt0rBqLg/II896cXTILz3Pw6zpZouDkacV37Of6f
0xuL3PIzIEukcaZ3Mglrs8l4ftez4GhYtHe4nUmsVUyYcuw8CzfcX+6Rb2MS
Ak92isbZxYBYask5lxb0jb8P9ZpiYKVsWmXFMybR9Vn/TroeA4xHjtLlm5iE
VeN+66LdDFhlqbddBt2UmTBx35ABH6KOGYqjjULKzncYMUA2k5rLj6636Nv8
dg8DLH61l/GitTf+Jb6aMmA+1riNdMUPOQ8OCwaYTIQZcaFV220WhawY4LF8
yXG0kUkUXT+eJmfDgISVNht+oOUjMzS07HB8/6KvH9G59o9eWOxlQCB/2H/k
76XkJwLdHBnwUUAjsg+d/ptvzRFnBtya38vdjRZ+uaswisKAfSsZh1vRlwrp
ZpdcGbDCauRDI5r3bOy7HDeML30g4AE6jlJ0tpzOgG9JCpuq0foPxJzaoxhQ
se7IFSt0zb8GX9+cYcAN1ZLqPWj1gAPJX2IY0OT8tE4HfccoSZH9HMafJDeh
jlYUr3gmGMeAbckzEirom5/7fbdcYICjrNuSPFqmkY1DM4EBL07OqaxFZ2Vu
vWaexAAdReNkCbRYiJ0+LYUBaq5sUSLoWbnzcuPZDOCr7lcbesokAn8XP57P
YcD1czWDPehP3d2eq27g+/mWGXaifQsXfkvcZIDX8P2oJvTIGZkM5XwGlOn+
fvEUTaeYaxkUMuBmx1vOW+jXyoE99sUM4OowaqtHO3JeCfa+zYDfhd/yitGd
/ff5jt9lgH6hl0Y+2qp0rPhcGQOkFnbcuI5ujFtlmVrBAHbDaEhDg4faeH4l
A5ak0thZ6Hp1amxtNQMGv+b9TEBr8UbLtNUyIMPS6HgMunwkr2HoPgM8x6jy
0WjV6ja3zw0MSNUsbQhDFybPzv8lGJAZUZEThP4fOQt4KQ==
       "]]},
     Annotation[#, "Charting`Private`Tag$88798#1"]& ]}, {}},
  AspectRatio->NCache[
    Rational[1, 2], 0.5],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, -0.018431067074007837`},
  CoordinatesToolOptions:>{"DisplayFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& ), "CopiedValueFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& )},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{
     FormBox[
      StyleBox[
      "\"Squeezing (dB)\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}, {
     FormBox[
      StyleBox[
      "\"Number of probes\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}},
  FrameTicks->FrontEndValueCache[{{Quiet[
       Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , 
      Charting`ScaledFrameTicks[{Log, Exp}]}, {
     Automatic, Automatic}}, {{{{-0.01836765735818493, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.9818\"", ShowStringCharacters -> False], 0.9818, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 4}]& ], TraditionalForm], {0.01, 
        0.}}, {-0.01816397062767118, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.9820\"", ShowStringCharacters -> False], 0.982, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 4}]& ], TraditionalForm], {0.01, 
        0.}}, {-0.01796032537699287, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.9822\"", ShowStringCharacters -> False], 0.9822, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 4}]& ], TraditionalForm], {0.01, 
        0.}}, {-0.017756721589258985`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.9824\"", ShowStringCharacters -> False], 0.9824, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 4}]& ], TraditionalForm], {0.01, 
        0.}}, {-0.017553159247589156`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.9826\"", ShowStringCharacters -> False], 0.9826, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 4}]& ], TraditionalForm], {0.01, 
        0.}}, {-0.017349638335112993`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.9828\"", ShowStringCharacters -> False], 0.9828, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 4}]& ], TraditionalForm], {0.01, 
        0.}}, {-0.018571385585435342`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.018520449637379, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.018469516283661322`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.01841858552401804, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.018316731785897808`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.01826580880689254, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.018214888420905018`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.018113055426927007`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.018062142818408518`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.018011232801851774`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.01790942054356795, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017858518301313193`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017807618649964822`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017705827118932205`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.01765493523872071, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.01760404594836089, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017502275136141977`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017451393613755858`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017400514680167335`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.01729876457832946, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.01724789340955339, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017197024828521496`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017146158834970514`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}}, {{-0.01836765735818493, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-0.01816397062767118, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-0.01796032537699287, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-0.017756721589258985`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-0.017553159247589156`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-0.017349638335112993`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-0.018571385585435342`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.018520449637379, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.018469516283661322`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.01841858552401804, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.018316731785897808`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.01826580880689254, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.018214888420905018`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.018113055426927007`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.018062142818408518`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.018011232801851774`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.01790942054356795, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017858518301313193`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017807618649964822`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017705827118932205`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.01765493523872071, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.01760404594836089, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017502275136141977`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017451393613755858`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017400514680167335`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.01729876457832946, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.01724789340955339, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017197024828521496`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.017146158834970514`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}, {
     Automatic, Automatic}}],
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->350,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Quiet[
     Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& }]], "Output",
 CellChangeTimes->{3.845049328385809*^9},
 CellLabel->
  "Out[299]=",ExpressionUUID->"78df8dc8-6885-4be0-8f98-8f96c4a8ce44"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LogPlot", "[", 
  RowBox[{
   RowBox[{"Block", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"$MaxExtraPrecision", "=", "1000"}], "}"}], ",", 
     RowBox[{"N", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"-", "10"}], 
        RowBox[{"Log10", "[", 
         RowBox[{"SqueezeVALradarSTABLE", "[", "m", "]"}], "]"}]}], ",", 
       "100"}], "]"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"m", ",", "1", ",", "600"}], "}"}], ",", 
   RowBox[{"PlotStyle", "\[Rule]", "Black"}], ",", 
   RowBox[{"ImageSize", "\[Rule]", "350"}], ",", 
   RowBox[{"Frame", "\[Rule]", "True"}], ",", "\[IndentingNewLine]", 
   RowBox[{"FrameLabel", "\[Rule]", " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"Style", "[", 
       RowBox[{"\"\<Number of probes\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}], ",", 
      RowBox[{"Style", "[", 
       RowBox[{"\"\<Squeezing (dB)\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}]}], 
     "}"}]}], ",", 
   RowBox[{"PlotPoints", "\[Rule]", "40"}], ",", 
   RowBox[{"AspectRatio", "\[Rule]", 
    RowBox[{"1", "/", "2"}]}], ",", 
   RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.8450405125077925`*^9, 3.845040516529107*^9}, {
  3.845041763541807*^9, 3.845041781959852*^9}, {3.8450418249767838`*^9, 
  3.8450419442235413`*^9}},
 CellLabel->
  "In[274]:=",ExpressionUUID->"4e45cd06-ce46-49f4-919a-b460e7c09638"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
      LineBox[CompressedData["
1:eJwd13c81e8XAHDjipYkIVEivvaI7DjEtcm61+VaISVkrxA3yRaVhLQRkihp
4JaIzBSRkdEQEdGi8Tuf319e79dzfV6fz/Occ55zduw/YuvNxsLCco2VhYX4
6175ToiHZV5PqZW/KkWFxKz0ZNyOvb2oZxl+yP6OIYn5R1DUZGb/Dz1dy/N3
6ftITIuu+lFHvhU9WYun8S8cScz8485hLc1/9XZtuDWv5kZihhb+5sjXZgWy
NtuklheJKRxh/mIfHzsckrA4sfcgidlkk1/IOUsC65Wjx88cJjF95T75NDSv
gqCp/n6nABJzI6eGSlgRF3y6+drsbiCJWTee9Fc2Yg14b3+a/DCYxHR/1Nc2
Yb0OhB+4jcaGkpic53aePS/FDf0Jb5lc4STm6zpNpVIWHpjSPTzjHUFiykqO
n2Wf5YFCiTsThZEkZtzp5BXXwY2QwackVxNFYvayKHk8aOaF91R5t8poElMy
4HXL5upNcMfhb0P2URIzaihOLqiID973N1W4x5CYHSaSOR2pm0Hco7lYJJbE
FK3t/PFfBD/oBbX2tqFDxcNcjnsKgA9/VfyhOBKz9ZRw06i1IKiYHHz+G33k
8OHMs1JCkKbn95gUT2I+GeBdmufbCownuUZH0fzkBzQLVmG4c+z18Ce0b41H
Y8msMJyvMaDbJJCYDaKrJdjfiEDYBsmlajRvZlWqa8s24GZzPsTNIDG9V6jz
96u3Q0Grl4kXetXhly51zaJQ/6+ph+04iVm1o4Tng/YO4GRfcDFHOw1EN22q
3gFrkn1fnkJXGolJHykSA8lC5288iSSm4+9vQ4V84pDaH1dngWaract8nioO
kancB06gHUSDliQidsL57y2C8+i//YYldrM7IW+HzyqxEyRmaYagU4KnBGh4
pYjYon8vNzYOW0tCY+hTwwr0tT7utNNSUvBZ4ae2ZRKJaZU+sedxkRS49EUu
BaF/GtTOz/FJQ3ZCRvhZtHmVC8WMVQaeXajSGkR/Ta3YwfpGFpxnLHY5nCQx
C/XjXynsk4P1N/+eDkKTf9qdpLfIAb34gFEGOt975fO9ann4XtMx+wStD2Z1
AWmKoBxRJy2ZTGIKUDadb+FQgkKnQAc99Pp01v4+IyXgP/bV0BH968eI9VKz
Etz9JWt9Et3bnbtXuUUZBrvP7XmLbuU4EQ+rdoFg/vuXi+gG7ZB6a/IusOKu
2s2VQmKWlVirB7Tsgg1ny2UV0cePccmWt6hAucznH5Ho6LvffR6sUoXxoMWJ
FHTgzLtrbWRVEJH/LViAplMfb5tqUQV5q86qh2hVxWheiWe7YZQ/7cwv9IfR
mV9Fz9TBabphjU8qiTnM90atklMDVAZtLoSge81aQ+qNNUD5zLWCY+jG2muz
Q8804LKni9k5dO3nHJkZTk1Y9ygo6Qq6QizBZ9lYEzxJwz030XmZLuOCrZrQ
S1OjN6Ezn5pvk+LSAuEc+uVOdOKyprO6iRYkLWjvGkBHK0nlkZO1gMSi8mQc
HXiAv8+hVQu+L/gVzaAPFJJ4vbm0YTa97ucSmt771SrURBvybOd0/6JtucbT
jidrw9z6Pqp+GolpqtvdmtOqDUoNu/PN0BBaz3GFSwcKNUNO2aHVysoNbpvo
AE0uwpSOFuNPftTdqgOvyZxx/ujlWaha17YHloKWptPR8+KKs1tX68I6nRzl
M+gPNBEZWVNdSDqRHFSAftn866ppmy78tJMXu4GuuFB9LqlND6w5rS8+QZ86
SkstZwPgCqu9+gxtVjrYeloUwKpXnqcT3cD6xsiLDsBY7r87gC6+80aP4xVA
pJB4/QLafdwpbnYBwMkw8NYPtBD30KO+Dfpg6COY/Aed6TOkWWyuD3+klLu5
0knMcKFhFeMmfRA0q3siglYypgcrjuvDUZMd98TQ0yHDVQL/9EFzl+a1/9Cu
ncPyU1oG8N7+b7sSmhw/8l9KtQGE3YjhMkCz3HQ5ENRjAIoxbUJk9IPBkWu0
OQPQshlfNEUrqIzukJHZCxr33tFt0PwfRre2X94LV/vil13RPbxuTjWNe+Fp
+RrB/ehUvbd5BSN7YevHK4re6L95bzf7bTGEvCK7BV90XbObvb26IZyN9Mjx
Rwd/fZuj42AIDzVGdgSiP5iPbVifbQhbRjo5w9CXIt2tvlUawt37RyIj0E7X
x9JHOgwhlMI4H4Xu+ju2upLLCF6fvdoXi06W9TDJlTSCnV8TKo6hDRzHk+IM
jUCw3ouRgK69Pc5uHW8E3ZWT3xLRgaMeBupFRsBQuBuVhJZZOxG//ZERBNcv
bkhGF3lN/PnywwiiM+qYqWjH7P06A5vJYHOrdjENzdswEc1UIYN2O/lfOrpj
ev/9UhsyzL3iEcpEJwlM/jh1hAyzH9zMs9Bg6KkWlUEGVQlNvlPo5cDJUI9y
MgjrqzUSvnPBs8a0jQynszYHZqMDnk8uKH8kw5E7pptz0FI/PJWEOIxBReQ0
k/CE+LsANnFjUKZq655GF+7zujkNxiC3GJ9JmBL7bqbX1Rgs9shME2ZpZlnZ
GWMMLwezFc6gb6wTWRNx3hg6ZkvphG3tNbe01RpDQadyPuHfBQ5SW18Zg82h
yKuEiyeD1P0XjMF3vjKHsLVsJrmR2wRmr/tFEv4ZXOawUc4EOrr6qYSvPGjx
8jQ1Ac9OsjlhC7bJkLsHTEDgbcxH4n2+mf5jcCaawEf3kleEi7K35tAum0Da
zhEyYZNB9cvlDSYg8c5nkfjer6L2VX+GTICsU7afcMHBwEbrX7humtlE7Jdh
VXrXZX5TmFpnIkJ47kfpyKKKKagFz6YR+5un1/zZyMYUxpQ4Jonz0D85vnIu
wBR0HSo2EJ7u+rNmOs0UKB/u8BHnd4ZfSEjnhimMSLtGZ6B1XdWkM1tMIX+F
y58474/XbTXGJk0hMprPnYgHrd1plMRtZuAnLb43Bf0upsS7X9sMuPZP7yfi
KeNpU6gUzQzET9C/EPE2Zvc7p+O0GcgZbc4n4jEp2L+bb7U5rBOOkCDiV+lB
yugBSXPIEvYPJeJ7kLV4tm6vOaR4b1eIQctlj651iTMHhT+PNxH50HvL2uT6
ojlEBm70C0Zvm1V+vHvUAuTCjOI80a2qVj0nVyygtySixgMdFOP7dlDQEtwd
MiLc0EJPk+Zk1Sxh+cF2hgv66dqrf2LtLKEWkk47E/Fo17iuJ9ASVG9rBhAW
KBjaKpZpCd4t3PFUNHPih0xouSV4Xqi4aIf2leHTamm1hEuZ9cEUNF+wkqng
B0soO2Nw1RZdf9/C0ZfdCkyKpPqs0AdYD/k8ErWCrPqXsRZoHtMT4dy6VqBa
p6pkhr5/6vIJd2crsLHt/G6M3j9Qf6Y60go4EqrqjNDrRN9cJeVaQThLiPNe
9F2f79WUGivY38ylqI+uGn61uPOlFdyJbG3URZfZ1KgufrUCYd4uPj30tZbs
sMe81vCV2+eLFhGP2oG1Wbus4eG2O/JqRPxUWf1wsbUGdgVN/V3oHAl5Dblg
a/gmcCVSHp2evzZqOdsapFW6b6gQ57lh+n7rbWtwu9hkpoguHwpwF3HcB++W
1diF0THH9/tkUWzgzlOupi9Y73/VvzgZfsAGljWqYmbQ4T+h1CXcBgQWv7z8
iF7cVdVqmGQD9fIMj0l0oP/2T7K5NmCzcOPAW/RsSebqTcU2EDvb9JRY9534
I7181wa8d6o9IdY/CvubjTfbgPntrWzDaC/qsG9rnw3YN1lNvUaPZ5un3Xpv
A3WZxVP9aNeOB+W532yAx7BB9xV6aJVMRyyHLdye2DH6Au2of/6z12ZbaHW7
/6wLbSlLCWB1sIVwtl67ZvS2l6ZhIXZ2kDnFELiEjs6tf2+23w7cR4yFi9Cv
acoUsSA7WOB+AIXEfTomqP4i0w7mn/zyz0OzzX38qfDcDloWNCpPEe9z2/nQ
qkE7+JTzPT0T/TC0e3Dkox0UZ+YKZ6BDV2ofpHPYQ4nfXv4U4j7nSoqZBnuQ
3+xmyEAbdPz6/NjaHgwTyVwJ6ItZ/i7nXe2hvaF66zHie/gddE1i7EHvRUT1
UfRz8Z0sxffsoZhaUxmGrtR9ctxDwQHWrz4u7Itew6a2pLHHAZ6O8TMPon2a
b3jxWDjA3/NW6T5oUYtso8ZDDrDnHvdzL3TMBo7a3EgHWHpDP+OJHuyNlAw4
6QDJijGn9hP9S+7nXKNcB/jG+8reA51Dc+cUue4A3Ea6dW7oOeFXEUs1DvAh
pafHFW0+ZjzV/gT/32bLsAua5KPYFj3mAE/uX2Al+p/w0L+pA1spYPaO/I+K
7lUPXrklQ4EvvScuUdCKK+8Pn9SkQNxszEbC6Q20YVcTCphe7pmxR08ldFqo
USmwWtA9jLChkX79+gMU4Ajb4Uf0W5e57sq/D6XAtruj7bZop6xC7jM5FGDd
83GbDbrWlufY4csUoKoeYexDb+JP/GJQRQE11yeXrIn4HfzhJtRIgVLXqkEr
dEfh4Z6FTgoc/zvuR1ja/S20DVMg/aTqW0t0krjd7UszFJBjE9YjPPGhZUfk
MgXYUxUrLNB6ZVo51qupMBevqkLYMDFrq/cWKkhr0LzN0Sau765FS1Phk5iI
AWFLDU2FU5pUMLDr9ST6SVvezHvXTalgFj5aRZj6eQIe0qgQZvj2iyma3qL+
vOcQFYaUE9cS9riUbvchigr7OrZMmqAPRI8Pr6RQgWoh3074sL3agY35VICI
ZRfCgQppXyTLqHD9TZEo4VCusUidB1TgkFgrQDhqQpXN9jkVgjYVvzJGxz1K
SfN5Q4VLdzMTCTNyR/lip6ngv087gfDJQJWinGUqWAlMxhBON0v+r3SNI1iT
9l4gnL1zpKpeyBECuzhXyOjcv8paL2UcwaqNZkisFwwkNU1pOYJCj7Ai4UvV
QxZ/zRxByr/w/8+7nq7Uv8nZEVrbEw4TLjtwwk36sCNcc/npRbgS3kzpHnUE
PVM4QrhGSDHYPs0RGpmhhYTrlo6vHCpwBPI/2gbi+x51DSQeK3eERzuuuhN+
XCrPffahIygbhzwl3MJgnCtrdwTvXRdYiP1tp78WZQ45grRbxS7CPWpyZX0z
jqD2RXKAcB9PgsrMiiNkb/djI87rzXTfI5Z1NPh8afV7wm+fypD5hWnwnePf
A8Lvio51y8rRQMH12UHi/D9FvnLU18H1fYqfCM/ZSk9QLGhQJKR8loifRbm4
w350GmQWlG0n4u3nqpdLCX400NuRdokw68MYzpvpNHB6WfuaiNdVZ1+celJI
g/WTm9SJ+F5zRFJooIIG7X6r2In432B69OrsIxokFm3eRphPvEeOvRPX75pX
EN7yZ2et4AgNGttJ7ET+bHsdpacwS4P8qfpRwuK3u1r3/qHBbKB/CJFvUmni
trT1TuCRWKBJ5KO8d+RQgIgTbOczCiDydZdep1eivBOkSf/a5oDWXgyPuGXp
BAsfDeeIfIfOdpZmFyeQbyvvIuqDYYlo6ht/J/CJOxPqSMxbCWGb5mOd4Hbq
H1ca2sr5eSFHphPY2F/McELb7d4uubXICUrfzHg6E/VzQ+gtpUon2DGy+zVR
f1w+tWqQG5zAV7pJ6wB6f5PIE+cuJ7Cy04wh6qPPhWDzoFF8fopWKVE//SKe
vUqacwLzF25sRH0Nkw36eJvbGVyystX80F95+Wgx25zhe/76RGKeC1iufU5W
cAa555S8APTMOE1no64zjAfm8gaiD7b9vjlk6Qwd85GThN9VXdxe7OIMtSQ3
82Aif/MMsgP9nXG/xvlC0aPH3rNpxzqD+N5OFqLeO/kkh3JkOEPBr8awcHS/
leyH7kJn6OFsaY0gvl+ti5pf4QzLYqfTo9AWHHzaih3O0CRkVBmD1r16kZW2
lg6aT7zsj6MfpBqEiG+lw/4E3pZEtHrw+3ezMnRIvSHUloRW0pdtZZjRYV2t
zFgq+qZUl6alEx1KuwtpxLwqwxNULuBLh9tQIELcf8U/NolMRNFhvddRL+J+
FH9bm1mRQgf3hotWOUQ+t9BYIs7TQXhfsCAx3wpX/g7Sv0GHjz1zj8+iz5+9
OLn2Ph3+dofWnUPzxxo49Lfi+3Koz58n7h+v9y2XBuhwRm7deuJ+3mCRrHF4
io71fH6SuL+5tnZtZeFyActM++Br6ES2oIznAi4w9Gx9ezGRH9Ob/p35zwV+
TXurEfPzch1tQtrYBTIZP0Ir0Z8p70vtklxAiqbGV4d+kfN7dwnJFVISdAs6
0PlrZPdZsbpBRVLk/DL6e3TvxtU8bvDi3XQTMR/bzkS9bNrmBg9XtzWwYD+1
pqOVoqnjBjz0fttV6OiMAy47I9zgjHX/NV60M88V3+XPbnB6uHC7HJo7Ld3A
zs8dnn1PbHRH6+x1v1oV4g4cbh83EvOr74oKifuoO2TFX2/3QbccHmpuTXGH
1ZlfOgLQcRYyprol7gB7fp8h+vO59a3W0hPusAz3xwqI+fQUu8s/qgckTtSS
36D3vTJ+vuLmATerJE+MEv26QLr6Tx8P+DhCdp5Avy7i412I8IDOX9b7Zoj5
oELi2cQ5DyiNld30B73Qaqzc8toDvDmbDMUysH6wpnNkUPdDNp2PFICmBfFV
ClE9QcL16GPeTBLzpX/tPz1VbxgzFe7zyiIxjbYIObNx+cDmgd3f209h/T1/
qfck+yE4qdk/45NDYsqq1ZkJjPiChtOIy9fTGD8lX0cPjfrBN0vlc0Vnsb9u
nYuh9QfAxvDkAd1zJKYKW0OGNCUQJLwFTB7lYb+1hn+G0yEIpIp9o/blYz93
udZkxiAYIpfyHz8sIDEbrxxUrTIMAasMWrfuBdzfoyvXmvRDYdfMwbNXi/D5
E/2bh+XDwL1T7b/xi/j8mia+fvlwyOlZdVHxMolpw/trU59wBDBefdtoewXz
3WRDnhhnJMyTJLZ7X8Xzn1Yrs+GIglWlJPmEayTmji0lj058jYK04FXvEq/j
vFEt5VKwGA3X+xiiCcV4f4inMf59OQrv6jOUw0qwPoiplR4cigGjOK4L5qUk
ZmT6V+eaN7GwxDuwTeYGicme+GMDe1scHBrqM/qMXmM3YnK5+hhEcKkcKinD
fow8fZLHMR64stgm/ctJzPUyqTO2XfFQcdKsWqWCxNzYtIs/ySoBHsZZVZFu
oq/+Y2q3JEC0Asd1Jrp7TqcyT5sBwjM+YSGVJKZZs6d52R4GOA8K7glHtxSk
Tj3UY4CebkF3FFo/+PaJTn0GFE457olFPzIZEHu7lwHTbRafjqE1tv9rnDdi
gLbq6xHCNd8kXNhMGMAWyEJnoBU6LJY3mTFgy2BWcg667ErIOQkLBuTzfbmY
gpaMyldVt2LA0Ce2zCz0ZevHL0z2MWDzlcEDxO+FJacCnGwZIN4NibnovN/c
6/zsGRC365PveTTfy903YikMMDp9eqAQnXWDTs5yZMBeaBorQq+JPz55yYkB
irL2ulfQSZSy+Go6A7445CVdR+s0CNh1xDJgwuiYZz+67ozu/MgxBsRc6Iwe
RKsc9s74ksCAhF/jv0bQlfrpMqyJDDDjWsgbQ8sI1jzjTWJAsHRv6ST6+tyg
185kBiQqJPt+QIs2s7CppTJgKYLM9RVdWPDfReN0BqjLbWH/jBYIttKhZeJ5
qFWYzaG/SpyQ+FDEAJ/WIH6uW3j//C5/8uMSA4q6czzXoj/19rqtvsqAOyWu
Ltxorxu/fgtdZ4DOUMLQRvTYMdF8uRIGSPQJFPKi6RRjdd0bDHh2/V60KPq1
XMAr63IGiGmpaPKjbdnPBnncxP39MrEggu4afMgdcosBlMkLC9vRZlUT5Ym3
GXCxgYtFDN2ctNo0twaf/9JV9D80uCh9KLnLgL8W7LHS6Ecq1OP37zFAza69
VA6tviZOtP0+A0ofUBeU0NVj1+qHHzJgKqTZfxda4V6701w9vs/SKnU19I2M
rz/+NTIg6bhvogb6fxzWA3Q=
       "]]},
     Annotation[#, "Charting`Private`Tag$74000#1"]& ]}, {}},
  AspectRatio->NCache[
    Rational[1, 2], 0.5],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, -2.585557016850035},
  CoordinatesToolOptions:>{"DisplayFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& ), "CopiedValueFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& )},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{
     FormBox[
      StyleBox[
      "\"Squeezing (dB)\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}, {
     FormBox[
      StyleBox[
      "\"Number of probes\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}},
  FrameTicks->FrontEndValueCache[{{Quiet[
       Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , 
      Charting`ScaledFrameTicks[{Log, Exp}]}, {
     Automatic, Automatic}}, {{{{-2.577021938695806, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.076\"", ShowStringCharacters -> False], 0.076, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 
        0.}}, {-2.563949857128453, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.077\"", ShowStringCharacters -> False], 0.077, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 
        0.}}, {-2.551046452292545, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.078\"", ShowStringCharacters -> False], 0.078, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 
        0.}}, {-2.5383074265151158`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.079\"", ShowStringCharacters -> False], 0.079, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 
        0.}}, {-2.5257286443082556`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.080\"", ShowStringCharacters -> False], 0.08, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 
        0.}}, {-2.5902671654458267`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5876040480263427`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.584948003968227, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.58229899579665, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.579656986333811, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5743938162895366`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5717725828096625`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.569158202235591, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.566550638828511, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5613558219514063`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.558768498386456, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.556187851792964, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.553613847797791, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5484856314308715`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.545931351625775, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.543383579546976, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.540842282118304, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5357789801617567`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.533256910729047, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5307411861317997`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.528231774526374, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5232317641096684`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.520741102797216, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5182566294695543`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5157783134550873`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.513306124309698, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}}, {{-2.577021938695806, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-2.563949857128453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-2.551046452292545, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-2.5383074265151158`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-2.5257286443082556`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-2.5902671654458267`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5876040480263427`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.584948003968227, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.58229899579665, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.579656986333811, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5743938162895366`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5717725828096625`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.569158202235591, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.566550638828511, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5613558219514063`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.558768498386456, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.556187851792964, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.553613847797791, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5484856314308715`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.545931351625775, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.543383579546976, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.540842282118304, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5357789801617567`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.533256910729047, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5307411861317997`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.528231774526374, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5232317641096684`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.520741102797216, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5182566294695543`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5157783134550873`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.513306124309698, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}, {
     Automatic, Automatic}}],
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->350,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Quiet[
     Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& }]], "Output",
 CellChangeTimes->{
  3.8450405242015*^9, 3.8450415057170935`*^9, {3.8450417696238127`*^9, 
   3.845041784766517*^9}, {3.8450418293247547`*^9, 3.845041944886814*^9}},
 CellLabel->
  "Out[274]=",ExpressionUUID->"778abd9e-3d90-4fbc-b3ec-0601c57d9381"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", " ", 
  RowBox[{
  "still", " ", "numerical", " ", "instabilities", " ", "after", " ", "600", 
   " ", "points"}], " ", "*)"}]], "Input",
 CellChangeTimes->{{3.845041996106221*^9, 
  3.845042013157025*^9}},ExpressionUUID->"ffa15cea-2e54-41a7-b5fa-\
c68e3d2ad741"],

Cell[BoxData[
 RowBox[{"(*", " ", 
  RowBox[{
   RowBox[{"check", " ", "of", " ", "non"}], "-", 
   RowBox[{
   "monotonic", " ", "behaviour", " ", "in", " ", "the", " ", "number", " ", 
    "of", " ", "probes"}]}], " ", "*)"}]], "Input",
 CellChangeTimes->{{3.8446776887404037`*^9, 3.844677695180015*^9}, {
  3.844678944159881*^9, 3.8446789571333075`*^9}, {3.8450420187651606`*^9, 
  3.845042021366104*^9}},ExpressionUUID->"746132ee-c7af-41b9-99e6-\
a0f605e5d3c4"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"N", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"-", "10"}], 
    RowBox[{"Log10", "[", 
     RowBox[{"SqueezeVALradar", "[", "100", "]"}], "]"}]}], ",", "50"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"-", "10"}], 
    RowBox[{"Log10", "[", 
     RowBox[{"SqueezeVALradar", "[", "400", "]"}], "]"}]}], ",", "50"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"-", "10"}], 
    RowBox[{"Log10", "[", 
     RowBox[{"SqueezeVALradar", "[", "1300", "]"}], "]"}]}], ",", "50"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"-", "10"}], 
    RowBox[{"Log10", "[", 
     RowBox[{"SqueezeVALradar", "[", "2700", "]"}], "]"}]}], ",", "50"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"-", "10"}], 
    RowBox[{"Log10", "[", 
     RowBox[{"SqueezeVALradarSTABLE", "[", "3100", "]"}], "]"}]}], ",", 
   "50"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"-", "10"}], 
    RowBox[{"Log10", "[", 
     RowBox[{"SqueezeVALradarSTABLE", "[", "3300", "]"}], "]"}]}], ",", 
   "50"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"-", "10"}], 
    RowBox[{"Log10", "[", 
     RowBox[{"SqueezeVALradarSTABLE", "[", "3400", "]"}], "]"}]}], ",", 
   "50"}], "]"}]}], "Input",
 CellChangeTimes->{{3.8446777253872585`*^9, 3.8446777421874933`*^9}, {
  3.844678839712572*^9, 3.8446789285196533`*^9}, {3.8450416713785205`*^9, 
  3.8450417244841137`*^9}, {3.84504203376534*^9, 3.845042034160591*^9}, {
  3.845048208971021*^9, 3.8450482090438566`*^9}},
 CellLabel->
  "In[283]:=",ExpressionUUID->"9339b5cd-8ff1-4470-ac49-e11756db210c"],

Cell[BoxData["0.07668775626510577`"], "Output",
 CellChangeTimes->{{3.8446777262793837`*^9, 3.8446777423123274`*^9}, {
   3.84467883155508*^9, 3.844678928691348*^9}, {3.8450416777776403`*^9, 
   3.845041724827671*^9}, 3.845042034304644*^9, 3.845048209244291*^9},
 CellLabel->
  "Out[283]=",ExpressionUUID->"fa9ed8dc-375d-4351-b64d-3579fcb06c69"],

Cell[BoxData["0.07575189274059836`"], "Output",
 CellChangeTimes->{{3.8446777262793837`*^9, 3.8446777423123274`*^9}, {
   3.84467883155508*^9, 3.844678928691348*^9}, {3.8450416777776403`*^9, 
   3.845041724827671*^9}, 3.845042034304644*^9, 3.8450482092572556`*^9},
 CellLabel->
  "Out[284]=",ExpressionUUID->"038779d5-ef04-47fb-997b-7d678c45ce11"],

Cell[BoxData["0.07660553694848746`"], "Output",
 CellChangeTimes->{{3.8446777262793837`*^9, 3.8446777423123274`*^9}, {
   3.84467883155508*^9, 3.844678928691348*^9}, {3.8450416777776403`*^9, 
   3.845041724827671*^9}, 3.845042034304644*^9, 3.8450482092662325`*^9},
 CellLabel->
  "Out[285]=",ExpressionUUID->"ce70aa29-722e-4113-bc37-7fd61024be31"],

Cell[BoxData["0.075481801920951`"], "Output",
 CellChangeTimes->{{3.8446777262793837`*^9, 3.8446777423123274`*^9}, {
   3.84467883155508*^9, 3.844678928691348*^9}, {3.8450416777776403`*^9, 
   3.845041724827671*^9}, 3.845042034304644*^9, 3.8450482092732162`*^9},
 CellLabel->
  "Out[286]=",ExpressionUUID->"510d50d0-5aae-4f1e-af18-83d74917dad8"],

Cell[BoxData["0.08114388410874476`"], "Output",
 CellChangeTimes->{{3.8446777262793837`*^9, 3.8446777423123274`*^9}, {
   3.84467883155508*^9, 3.844678928691348*^9}, {3.8450416777776403`*^9, 
   3.845041724827671*^9}, 3.845042034304644*^9, 3.8450482092801943`*^9},
 CellLabel->
  "Out[287]=",ExpressionUUID->"1d332236-a4c1-4ae0-8390-0607a4114be9"],

Cell[BoxData["0.076565722757921`"], "Output",
 CellChangeTimes->{{3.8446777262793837`*^9, 3.8446777423123274`*^9}, {
   3.84467883155508*^9, 3.844678928691348*^9}, {3.8450416777776403`*^9, 
   3.845041724827671*^9}, 3.845042034304644*^9, 3.8450482092881737`*^9},
 CellLabel->
  "Out[288]=",ExpressionUUID->"7cab98d5-66c1-4390-9b19-d4bcfe8553e3"],

Cell[BoxData["0.08433240584537109`"], "Output",
 CellChangeTimes->{{3.8446777262793837`*^9, 3.8446777423123274`*^9}, {
   3.84467883155508*^9, 3.844678928691348*^9}, {3.8450416777776403`*^9, 
   3.845041724827671*^9}, 3.845042034304644*^9, 3.8450482092941895`*^9},
 CellLabel->
  "Out[289]=",ExpressionUUID->"0792063d-2ce6-46b0-b9d3-a89547130599"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LogPlot", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"tVALradar", "[", "m", "]"}], "-", 
    RowBox[{"symthreshold", "[", 
     RowBox[{"\[Eta]0num", ",", "\[Eta]1num", ",", "nSnum", ",", "m", ",", 
      RowBox[{"SqueezeVALradar", "[", "m", "]"}]}], "]"}]}], ",", 
   RowBox[{"{", 
    RowBox[{"m", ",", "1", ",", "600"}], "}"}], ",", 
   RowBox[{"PlotStyle", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"Black", ",", "Blue"}], "}"}]}], ",", 
   RowBox[{"ImageSize", "\[Rule]", "350"}], ",", 
   RowBox[{"Frame", "\[Rule]", "True"}], ",", "\[IndentingNewLine]", 
   RowBox[{"FrameLabel", "\[Rule]", " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"Style", "[", 
       RowBox[{"\"\<Number of probes\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}], ",", 
      RowBox[{"Style", "[", 
       RowBox[{"\"\<Threshold value\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}]}], 
     "}"}]}], ",", 
   RowBox[{"PlotPoints", "\[Rule]", "80"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.837078486080593*^9, 3.8370784944971604`*^9}, {
  3.837078549998501*^9, 3.8370785502475314`*^9}, {3.8370786098308*^9, 
  3.8370786468477592`*^9}, {3.8370790240234065`*^9, 3.837079037125924*^9}, {
  3.845048590040456*^9, 3.8450486034191628`*^9}},
 CellLabel->
  "In[295]:=",ExpressionUUID->"5b71fe71-7374-4393-af44-82c0e33ba0e0"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
      LineBox[CompressedData["
1:eJwV03k4VG8UB/BRmq6xL82MrQ1FtAghLUcLoTLWChWSQnYSM5Z7s6REJLu0
oiypJESddkuppE2oUEkSKpHtd39/3efzPPd9z/t+z3nnufpa753GYDCUhBiM
/7+j/xLyIN4S5k74Rbx6p4yVq6/P1kiwhF1x82qHW5SxsFhbrTzLEgZAIP77
gTJmKJZprr1kCS4fK3ITbihjyGixgd0jSzj6R+a2droyuu/XXPuxxRJOKPfc
X3VEGe3fXNro1WUJjKENnNxQZcx2sLkEDB6gwtk7ujuVkW/Aq7BX5sHNwlD2
4gXK+Ms3yTBHlQc2Ta/vf+Yqo1dBU80nTR7kp51cf11UGbs6xGGhDg/8JNXj
2iaV0JG95f6BlTwoy7y80+arEr7ckmByzZgHdWw59betSmgR01j/dxMPuuM9
fx1uUkKj32bPqW08EOKrMPZUKOE1zXibul08eCL5NGzfZSVctKfutbg7D4Ze
XO98eVoJFZpN2jOCeBC0vPfM+Tgl/HdlfW9pMg+0+C03JRyVsNprtfD7Rh6M
Xr8z2CmkhCu7lhnogBXIfi9gyLsr4uUHYQ9mbbKCsb/6Y31OiqiQ/4A3YmkF
5e+LdtfbKOLY/u0etbut4KHFR6ciY0Ws6Y/MMo20gqn4mWOHZyvi2n9N4463
aat+n3rzRgE3SHvfjV5lDXoTQs+XOyhg+VDFln0baE9JTb2zVkC1Fkar2WZr
iNK92HrMQgGZ6alDEk7WEP1jR4nMagV8rFSjksm3Bm6e5ofxeQpori4aW1Jt
DUo/h7fn9Mij5dpL5q8NbEDndN5HhVh5/L1C4+ZysIER6fhTx6LkMWPJJZUk
UxsQZxhXCfPl8aPypXFTexs4zPZbLucnjwHjhaVVgTag6K1lHuMgj6lVhTK5
pTZQGK2j37BMHt/pFLbuUbWFdezgTVs7uRihqW6KmrbQWTS86kw7F+erFF5X
0rEFS9clzF9vuegpU5jwytgW3PlJC84/4+L4QMEa0922oC2vlmBRy8XZpQXn
FmXZgvydjNu5mVzco17gOShpB24SQxvH7bgo2Df6QJ1jB71yw6/HrbiYlm8x
x3m2HaiUBP2ZtpWLDaoDL5u07OBMV7Uq24SLy+cZri42swPwvv88cAUXGQqN
kvsO20F30uXJHg4Xc0R/lrcN24HLllNX49s52NK/Yupxuz20z6hYbR7AwS9v
TrrmfLaHCz4XrN/7cHAEBx76/bCH998Knnt7cVDp5OUE+Ql7IKdDbZYbB/fq
z1bwUtoG6y00Hyhv4+Bw5Aw9CcdtYP+0y79kFQe50i2etm+3wQWGi9MbEQ46
6fi//ti8HRZ5PhLzKmLjueXCCktbt8OpmtbzTwrZ2KOdvjP803b4FGXvvSyf
jUHLarvlB7aDe6q3yugZNh5fLPLLWnwHyFy9++V8GhtvLzwr+dB0B9w4oL/T
jGLjXKUXmy7V7ICL44F1No5s7BLWvuWf7wAGfh89NsuwkbTN7txw1gkc59ka
N0XOQj6ZHvEyZResNeiQ9Z42C6tzxeS8tZ3h5yG1HKksObxbNf+o9GIXKM06
wbDTkcNNOWPMIY4rzIyW87J+L4uttRoXA9l7gO00U3rRYVlUbDozYS3lBifM
hRKrl8vi+wutTj6jbjAmyJyw6pPBgmqP9kXDeyHLQMvf/YIMDqXdclPpdIcw
4wzRdjcZ/O5inx9avw8SM+aUn9GQwQEvExH/B/tB5Mfphzv6pDFo1WjAhVIP
qA+XKbh7QxqFNwtNHir2BN8nP5mK4dK4ztx6fdFFLzDe9G1vu6k0Tkm4J8kn
HoC0yeP+s7jSWCfzbFz9qDeszl7qpPlFCqXa//kFBfuAquGLf1AlhTPTfPOU
nXzhqOKFsOJEKZzxOOevjqYf5AVrPpvmKoUmC7rm/83zg50aE9xbhlIortbS
cXS2P3R7GpjulJRCubgFp2tS/aHheLzL3GZJDHDOXZlLBMDVRrlK2XhJtH93
e9/WWNptSWJzVkli6A3jjNyxAFAedeGGDkvgfG3fHbVhgSBx3+OaWAlt1bt/
j/0NhD3wl/3cXQJdw4IyR7yC4H7B5BWhhRKo7tfcqNcbBOLMTyPZXeK4uD5Z
SNo5GI6TTMopXxzjM4Plsl8GQ4pscspjL3H0EhGu/MM7CHaxUbVpi8XxeNuv
Xf0PD4JeiHRl128x1LNMTLu5IQQY6+YkSVWJoa7hlqKld0NA8OB2DhUphoGx
3vc36h2ChWqeP9ZbiKF+oMEBreuHYGx+R90fWTE0uu/GvaoeCjONXq9N+SSK
D68Z2TELQ+Fllm36uSJRzJfX92WphcGB6HvzuYdE8XHXyYTizDBYcqo94+sm
UfTekr1yDpcPRmT2zmtsUbRREO5bmsgHon5lSW8PC90s1/ROJvHhSV5OjD7t
oOhDPU+T+fBqS7te0FcWpvX3dXud4gN5aV/W/C8sbL33qr0ghw8R2rHg0MVC
V6+CZ3OK+KDzrOZlUzsLA2rMr0vW8cFhm9Gbq80sPDwYfbWjng+qcRPGMrRT
F9y5UtLIh65V4aGuL1hYcUKn2OIZH643dH3sf8bCf25KF+Ne8+FdXJm/1lMW
kuL9aVPdfPjWU8bueMzClHXqp5q+8GELazJqOu1zIa4nc3v4sO2sG8/9EQsf
fHqdZNRHn2dQpWDmQxYSFXeOhPziQ4puELnlHgtP7EoO+ykkgGBGZfCzGhbO
WSNx6/N0ATSxSxoYtEuVj429nyEApbkefXa3WPikLVpQJyKAKZbK8NMqFjrW
CNXeFhXAkZ9nPonS7s2OmCgXF4CjsZHy3kq6nuOhiLPSAtj/NrSnuYKF6Sv/
3E6XFcBFHrlsLe0FCgFTx2cJQCP1stnOGyy8Mdq/NpojALwz0iN7loUb3nlF
hckLQPrjONieYeHLyh70UxRA+UZOVEEenXfGXqF9yvR++vkNDNpDIZ3GO+cI
YH2YPGfRaTqvbbspm3kCyCgyP+mVy0Ip/bZ7ZioC8OP43S7JYeEZ9o7poCaA
8bppjPZsFt5+ZR2tpSGAZTE/5QKz6PxtTGJnaAtA+1KM0cF0up+8xUdvggDc
plWWeiezUGjZ5YaSdQJ49yNGu/4EnafkQtELG+j/RUqDCNqlTXMTTmwSgNNC
5xuJiXQ+m+USPXgCKHqcdSP9GH1+s7FkRWcB6D+xjSyJYaHNuvrMyEgBvJHw
jusIZaFfgY21LSkAlzC7SW3aCWIdLI3DAnjR/fx69CG6v6+H+M2xAvCgZJfN
DWGhrpfSLrVEOj9T11vWQSyUS/Wd35gjAGbqscpXPixs+TyriF0tAEFET/dM
Nxbax7vWlPym12sttrTcysIO33zf4sBw8Kl2mxCeS+fxVILhMBAOCRqq7LBf
Itie+PbkRbcIaIzwsi1tEEHq5+bKu50RYLD8V7R+ngjuuz7/I397JCSb+6m7
hojg+X6lz92NkQCXOUOSViJ4rdt5dZJqFDyULTKZpU57erfI2K4oCJCeIBOn
iWBwQM1sy9NR8Hfv+eSUVgLfpmzUC3gXBXsWsRZ9ukHgl37n6gOyJJSxemLT
Uwi8mfUiztKahMIBr883DxCoPjJkL3SchOcvSnWFzAlsb+bdmaKtMe3KLw8z
AlNKShdOJpJg9vbbm5ZNBI65eo78O0FCSK/VujJTApuefsr8nUqv90x2cN1I
YPD5521fc0gwEAtY0wkE3tta6tpUTAJX5FOrjz6BIRpijU9KSKjun/2kcwWB
WsKeOo2lJHA2DlRso32qSk24rowE5WP2wpp6BO5Xzb14t5yE9+u+6DQvJ1Dy
37Ge8hoSvvWZlLstIdDpoodP9hMS+mTmtYioEcioJ3VPPSXB2Q3TD6sSeL4v
819iEwkPCrZye1QINJG6hkeekdBWph8UQbtXpyGWek6C6dKOxYPzCTx0b1Ge
Rwt9funqTcfnEpj64fsz/TYS3q54/0JKiUCD6cJp2u0kfPeculeqSOD7BUpO
mh0ksA3P3hxTIHC+z+ae2R9JiIu8X98kT2DZeDGD2U1C4oB76jkOgU/kfbRb
vpOgM3pZdJYsgX6rY/8+7aP3i833S5IhUNbldO3jHySs73FIn0nbobDJ7NZP
EupfJwz2SRE42fhF8sYACTPe5c8Pp3325+Sr0kESGG739jVLErhBlpNTOETC
pz0qR/bR7lmx1PXcLxJiOialLksQmOBgqp7zm4TTRnsM19FeGrG7/9Qf+vza
De43xAlsPhtSnjRM5/Fa0leY9sGHSWHxf0m4sGTNgJ8YgQrfCuDwCAlp4us3
9YgSWCuGzPBREnKZrz7uoO287O2Tg/9I4PnJ2tazCBS2HUjxGyMh70cwTh0n
sDCE2OE5Tvf7T2HJN9oW2XPnuE2QMFshZZoj7f7bBp93TpLQOHj99GACPX+d
vKJtU3RePQtcPhwjcAXTw9+KQcH6gcuxNbTfaZD6FkIU9DQtKV5OW7Alc2LD
NAquNlMvC48SONf/6v010ylQ22D/3JD2qsSA32KiFLTafP2AMQTmByUP/6HN
2HxHy5i2lGPZSIcYBT6fDT9gNIHdC/vHyyQoeBn+hnv3MJ3fXY8ZdjIUxD/c
fO4mSWDbb2d2rjwFdeEurhhO13e0NFisTsGDAd2/54Lp92fss5KtQUFYgt9k
XRCBPPXjq6Zoq9+tNztHW/VPA7zQpGCJmpRLViA9H4kmZsFLKZDZqDtyzp9A
pXurHWpXUJDSetiyzJvA2EInp3x9CvqtHKuX0R5I5O9KMqBgPyXDuEi/5weO
Va4uKynYVMF5W+FF4IE/ul4z1lDgW2kbXOZB4C11LcGWjRRoZmhqFu8l0M3t
wBxzEwp2epscUqUtcab4nokpBSv62VpJbnQ/OYtFwIyCRNVHhkf2EChi4128
ypyCFqPcQXHa1xJLLA0tKChcfn5dqiuBjg0/hvQ2U3Dty2BSuAvdf+aStOVb
KHCpqND1pF1i7GO4dCsF2eK2VfudCbQPL23TtKSA9Bwb2Up7qrI/Up1HQSdX
Qf3mbnpefi9RUbOiwGL1Yjkd2lbLfB/Ns6bAxB1+Xj3JxH9eVzxm21DwNVDc
aBHt8wU/xRRtKUjmlO7ISWHi5q6lZRw7Cr5ohdycQ/vPbD8bOXsKChT7d6Qn
M/G0Q9mw1DY6X9sjprNoD7xYtpq1g4KRC9nz5p1gYipqN4w7URBZLkROHGdi
W65O9yc3Chx6xxNexjMx5l1gXMdeul5/uMF22ktmlS96707BaMwAvDnCxKgE
Xf+W/RRUtY8LP4xjoipfb/LRAQqKTs/UqYph4oHt+tziIAq2G6+MyCCZOCFj
tPlgNAWKh8W9DoYycXztvwC3GArcdYyEhg/RPlCVaR1LQThRczX8fz/S/7rk
CAUldmdjk0LoPMJ0qa/HKPgd8rn4XDAT/3Yurtx+koLvi9ZnD/kzcfDaXFWj
cxTotQxe2e5J3/fDB3ON8xQI4+fqxx60xfL8ORfo+8t3Cpn8b8NdGTMu0vPZ
6bT12X7a7sp3ftE+/0gq25d2v4KCQ/ElCk6ur5wb4c7E75TsCeWrFNz88za0
1JWJvVeaK0Sv0fPY6+pj/7/bkttHaYeSsi3oQnuFlObrcgpS1SPmvXJmYk+v
2KPESgqmgq8HDe2izXnSJ6ii35f9QteDtL9uOCbrVU1BcE7bPS7tL6dFXExr
6P4uGRvn7qTdWBenV0tBjq74RJ4T7ZG4UpXbdP3KbWvU/7ea6SvpOxQYGO3b
esORiZ+tmeNTtL9vnDBYSfs/b/VP2g==
       "]]},
     Annotation[#, "Charting`Private`Tag$86481#1"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, -7.4627284771407005`},
  CoordinatesToolOptions:>{"DisplayFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& ), "CopiedValueFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& )},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{
     FormBox[
      StyleBox[
      "\"Threshold value\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}, {
     FormBox[
      StyleBox[
      "\"Number of probes\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}},
  FrameTicks->FrontEndValueCache[{{Quiet[
       Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , 
      Charting`ScaledFrameTicks[{Log, Exp}]}, {
     Automatic, Automatic}}, {{{{-7.600902459542082, 
        FormBox[
         TemplateBox[{"\[Times]", "\"\[Times]\"", "5.`", 
           TemplateBox[{"10", 
             RowBox[{"-", "4"}]}, "Superscript", SyntaxForm -> 
            SuperscriptBox]}, "RowWithSeparators"], TraditionalForm], {0.01, 
        0.}}, {-6.907755278982137, 
        FormBox["0.001`", TraditionalForm], {0.01, 0.}}, {-5.298317366548036, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.005\"", ShowStringCharacters -> False], 0.005, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 
        0.}}, {-4.605170185988091, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.010\"", ShowStringCharacters -> False], 0.01, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 
        0.}}, {-2.995732273553991, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.050\"", ShowStringCharacters -> False], 0.05, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 
        0.}}, {-7.418580902748128, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.264430222920869, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.1308988302963465`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.013115794639964, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-6.214608098422191, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.809142990314028, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.521460917862246, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.115995809754082, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.961845129926823, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.8283137373023015`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.710530701645918, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.912023005428146, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.506557897319982, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.2188758248682006`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.8134107167600364`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.659260036932778, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5257286443082556`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.4079456086518722`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.3025850929940455`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.2072749131897207`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.120263536200091, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.0402208285265546`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-1.9661128563728327`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}}, {{-7.600902459542082, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-6.907755278982137, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-5.298317366548036, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-4.605170185988091, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-2.995732273553991, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-7.418580902748128, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.264430222920869, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.1308988302963465`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.013115794639964, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-6.214608098422191, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.809142990314028, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.521460917862246, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.115995809754082, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.961845129926823, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.8283137373023015`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.710530701645918, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.912023005428146, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.506557897319982, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.2188758248682006`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.8134107167600364`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.659260036932778, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5257286443082556`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.4079456086518722`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.3025850929940455`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.2072749131897207`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.120263536200091, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.0402208285265546`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-1.9661128563728327`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}, {
     Automatic, Automatic}}],
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->350,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None},
  PlotRange->{{1, 600}, {-7.4627284771407005`, -2.7945446445744344`}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Quiet[
     Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& }]], "Output",
 CellChangeTimes->{
  3.837078494980671*^9, {3.837078542764211*^9, 3.837078551047617*^9}, 
   3.8370786484309425`*^9, {3.8370790280063057`*^9, 3.837079039032484*^9}, 
   3.8375172360908356`*^9, 3.8446789652331467`*^9, 3.8450485367062593`*^9, {
   3.845048594278923*^9, 3.845048604617861*^9}},
 CellLabel->
  "Out[295]=",ExpressionUUID->"5e762346-1cc1-4599-86ca-479834cdc2f9"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LogPlot", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"zmean", "[", 
     RowBox[{"\[Eta]1num", ",", "nSnum", ",", "m", ",", "1"}], "]"}], "-", 
    RowBox[{"tVALradar", "[", "m", "]"}]}], ",", 
   RowBox[{"{", 
    RowBox[{"m", ",", "1", ",", "600"}], "}"}], ",", 
   RowBox[{"PlotStyle", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"Black", ",", "Blue"}], "}"}]}], ",", 
   RowBox[{"ImageSize", "\[Rule]", "350"}], ",", 
   RowBox[{"Frame", "\[Rule]", "True"}], ",", "\[IndentingNewLine]", 
   RowBox[{"FrameLabel", "\[Rule]", " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"Style", "[", 
       RowBox[{"\"\<Number of probes\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}], ",", 
      RowBox[{"Style", "[", 
       RowBox[{"\"\<Threshold value\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}]}], 
     "}"}]}], ",", 
   RowBox[{"PlotPoints", "\[Rule]", "80"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.8450486575992393`*^9, 3.845048692626341*^9}},
 CellLabel->
  "In[298]:=",ExpressionUUID->"83d64007-a73b-4fae-9c03-a054442357ce"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
      LineBox[CompressedData["
1:eJwtz3kw1fsbB3BkXw+pyFLJXqIQpfq8JSkRkZNkS1L2tTgofLsUclD9lBYi
tBNSsl6j4qBuZanbJa7l6BfpULZsv2Pm98w8857XPPP+41njEWh3nI+Hhyed
u4tJT0qd6uGsBc//h//Qy9WtiaqQj0g2n9TJJkKDnQ0yLFUI9ge4PSjKJ6Lh
4wF2wmpwitR2ny97SKSvqle/T1BD47XHTrdflxLljxcOvzunDs8wX5/bxrXE
+JD1pTdnNOHxpZ/hfKiJmAwe3yJRrYn8uhmGfHYz2RF+tsdqVhMx/wgUXe1r
IeZXiza0RGoBrlKlcsf+InYfpZubwrXB9ylzy5DyB+J/qGNJY/B6JHZJjag+
7yDvHxZt/XeTHoQLb8tICXSTXCvZ1JO2ehjoO6vNw+gmYd8j+n746+Fpzsb6
1cPdRE5358X5e3rIyU79Mneih7iWtHUprNqIHOejMfoW/5Jv5dOxdLFNqNDs
XND61Uv4X5s1NPfp46mDg4M0jU06vO4p2PMaQCHMrdaBsMldIYmgz8oGSA3I
rz4YwCaWezvk/nvYAAdi1a/FN7NJWstJH8F3Bphtlt/VSA0SpdYUCdMqQ1h4
rSsMHvhKNvd8tH92xQhqptqtDTFD5EtWvNv9YiOIfcixZhcMkXgXfd+bb41w
e12rbvubIdL2mUlRwsZ4XH18Xk1hmAS3mxfvjzaGBiOmLLt0mDxqKpUcPLYF
fMW3/7Xt/E7WlKWyVuibQFTO4HyeEIc0hm5vF7U1wdNAvYUbchwStGmoZ87P
BKyvzOQ4LQ6pKdo91Vdggsu9PkbL9nGI84M59Scrt6GT9x/HoBQOycj2/WMP
33YMXwm4wic1SsSTLAjj/Q609F0oDRccI//hrArs4ezAmXTzTc+XjxHlQ1NZ
FjQC6s9uXbb6GNFVvT+/zIZgVngbY6nFGLGrEa0paSFwbP90ojBhjFhNeylP
HAO6H+5O41nyk1zS0b6l62YKTvZD6S7OT7Iq48n1XAczOBa2670sGCct48I/
93qaISTvmn1nyTiJcDi6bzTEDCJHgg4P1YyTd7IysyTNDNpmDWSkY5xQl0Nd
uprM8DFg5+wFwQnSn7Z5tRx2wXpGPl3Jc4I8SK7KT9E2R/MCM1VOfpJsjmt8
ErGwGxnyrKkSvykSddLQqnXSEg7e7+bcpn6TCNHX7/K69uNc03Xe7tVzZGuf
nrE+DkBxp+Xo/a/zxIbct+wwtkevgnsy6wAPjmne9RmVcoBhUP3x7+K8aBvZ
vNDQRUecwLlVGmW8cNYP7uj54IihyTQVSxc+9PFvrAwucEJRmRotZ4QPcQdv
9O7KccYdyUdt9nFLEBV39WzrJVeYWNnvaxbiR8UtcVn/je5w9Nj3quwMP+pe
qCRJ6xyFxBrmEZcJfuy5OSM4tsIDCUHNG766C+BztVZ+6PJjaNBwSPV9KwCF
t7fn7Gie+PzCsiLBQBD/5H12Dpj2hHD8r5VeqYK4W+HdpT1xHLSKjOn074IY
y6j0XNvrBSE1pdpaUyEMHaUXMFgnMONRUC2WLgSO726R4JcnUdvOnqzsE0LY
tumQvEJvJFwcj1/QEQa/Fe98xCMfLFS+OM2MEsZOSzuzh/m+oDf9lTX6UhgL
kl6p8kw/qHqXdcsLiaBR5q9ZzSR/aFQdMKOsREDr+h0UdioA5WNi23cki0Ao
IzBbyTkQj3t6zUZei0Cg4eak/rogMIZ9K1kCotit3qcymR2EPreT52p2iEJC
re1LknIw9OO1qmsjRSF7Xj2r6kowilIfkG3Foghxv7X1lnAIZpZ+09gzIAr6
3zUn9ieEoOTtnlwLRTEwykyv3ZoJgcyYXJjNfjGobAw8XB0ZCm+7N84bznGt
WjeZPBmKZ6tUZpvKxOARGZY55RuGZ1nFFoN9YtAM+tBs+C0MLuF00zpZceiw
0nml3U+Btd+K4WAqjsTMU7I3Wk/BoLjYSMlPHL4i/OXjtqdh65bAn5QpjpTO
n64jr04jTIBlKVIvDkMbZsbzXeFw9T3CXvZDHAZbrB/q1oWjtq7G2l9eAqEJ
/vXmhhFQMmnJVYUEjEKN/daXRuCVmPROO28JmNR7yhVrMvDEWt5eMFUCr0pM
HATvMcCOmbiq8FwCBfJGgaJqkbhiy4h61iWBhr7LFx9lRsL8umHOMl5J+Fvf
2LpKLgqzNC+9OnVJ2K/kH9ZlRsHjzwYZ272SSHNNj/zBGw1pjntdrg/3vpOV
GRMTjWaLwnktpiToiR5Vj39F4+Vo3N+sQkl8CSwIfBR6BmC+CU9/L4maN5I8
Tpwz4BTJjav9lEQX89PlfM+z0Mh7TJ+RlgL1w6q8rvcs+N1M89mbpHCiVKUn
yjEG4mvPOWkdkMKdEcWB/uYYCPg/We4VIIWSfvftqaqxWD5/0fheCtdL+kVm
XGNx09RH0euBFE6FVCnbZMVCh3+bogJLCp8umRuG/B2L3SeT2K4DUmCPuFf4
LY1D1XmZe048NDy//v68jV0cvrewRqYladCcGqPzpsShkt9ENUiRBud874Ab
LXHwOLFDpE2bhm3MkF/iYhQMtx+J+mBMQ6Xm+mhrcwqKt+jL75rTMCdjYnX6
D4r779deDXsaZsnvEM94CtdLL9scWbTfi0y7BAq5b4srmIt+bTS44QKFBJcb
ieNc/440oAaTKWj5bxGsP0jDZK9OueNlCpZ3XBJd6DSMlqxWNcnl9o2drqcd
poHT3W2pdYeCQda6kvpFi2cHr8ijMCA7zJpYtJdS7c98ClRi/6SzEw0jK1c6
PbpPwWN+yzqtIzQMUUvTlIop+M6Vr6xzpuFb0YdnYiUUCma0ZX4tujO9a5pr
1lmVeXUXrjfT1nU8pdB9KeXjRa6/fhN/zSynkJ/o5+PoyvWKluHoFxToV732
JHM9uCt5qW8F12v0NGu4ZmeJHLWoohAaq9mx1o3r5sbzhtUU2oSdH9AXPXW+
cG0NheLVJDpx0WoW7dK1FGZzD1tVcT1gJzi7wLX3l3tyP7j+H0QRF7Y=
       "]]},
     Annotation[#, "Charting`Private`Tag$88251#1"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0.},
  CoordinatesToolOptions:>{"DisplayFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& ), "CopiedValueFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& )},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{
     FormBox[
      StyleBox[
      "\"Threshold value\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}, {
     FormBox[
      StyleBox[
      "\"Number of probes\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}},
  FrameTicks->FrontEndValueCache[{{Quiet[
       Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , 
      Charting`ScaledFrameTicks[{Log, Exp}]}, {Automatic, Automatic}}, {{{{0., 
        FormBox["1", TraditionalForm], {0.01, 0.}}, {1.6094379124341003`, 
        FormBox["5", TraditionalForm], {0.01, 0.}}, {2.302585092994046, 
        FormBox["10", TraditionalForm], {0.01, 0.}}, {3.912023005428146, 
        FormBox["50", TraditionalForm], {0.01, 0.}}, {-0.6931471805599453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.5108256237659907, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.35667494393873245`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.2231435513142097, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.10536051565782628`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.6931471805599453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.0986122886681098`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.3862943611198906`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.791759469228055, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.9459101490553132`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.0794415416798357`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.1972245773362196`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.995732273553991, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       3.4011973816621555`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       3.6888794541139363`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.0943445622221, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.248495242049359, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.382026634673881, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.499809670330265, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.605170185988092, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.700480365792417, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.787491742782046, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.867534450455582, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.941642422609304, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}, {{
       0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {
       1.6094379124341003`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {
       2.302585092994046, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {
       3.912023005428146, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-0.6931471805599453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.5108256237659907, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.35667494393873245`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.2231435513142097, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.10536051565782628`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.6931471805599453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.0986122886681098`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.3862943611198906`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.791759469228055, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.9459101490553132`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.0794415416798357`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.1972245773362196`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.995732273553991, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       3.4011973816621555`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       3.6888794541139363`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.0943445622221, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.248495242049359, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.382026634673881, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.499809670330265, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.605170185988092, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.700480365792417, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.787491742782046, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.867534450455582, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.941642422609304, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}, {
     Automatic, Automatic}}],
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->350,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None},
  PlotRange->{{1, 600}, {0., 4.09368551760381}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Quiet[
     Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& }]], "Output",
 CellChangeTimes->{{3.845048662268804*^9, 3.8450486931178985`*^9}},
 CellLabel->
  "Out[298]=",ExpressionUUID->"e3abe084-ebea-43eb-bbb6-bd6ac3f0d0fb"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LogPlot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"Block", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"$MaxExtraPrecision", "=", "1000"}], "}"}], ",", 
       RowBox[{"N", "[", 
        RowBox[{
         RowBox[{"SqueezeVALradar", "[", "m", "]"}], ",", "50"}], "]"}]}], 
      "]"}], ",", 
     RowBox[{"rmin", "[", "nSnum", "]"}], ",", "1"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"m", ",", "1", ",", "1000"}], "}"}], ",", 
   RowBox[{"PlotStyle", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"Black", ",", 
      RowBox[{"{", 
       RowBox[{"Blue", ",", "Dashed"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"Blue", ",", "Dashed"}], "}"}]}], "}"}]}], ",", 
   RowBox[{"ImageSize", "\[Rule]", "Small"}], ",", 
   RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.844679009592079*^9, 3.844679010342201*^9}},
 CellLabel->
  "In[292]:=",ExpressionUUID->"36a654f1-7e96-486e-b92f-617e721ba41e"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
      LineBox[CompressedData["
1:eJwd2nc81e8XAHAKISRFJQllZJQQQhx77y3ZDdIyyi7CHe693CslSlQkScsq
6VJSJAkhktFXSZKEMtLvfH5/9Xq/zufzued5nvOsSjrgmNP+ZRwcHDPLOTiI
P19+eOUnyjFpYLloPH5hgMWuPvjl6Kov0wYvgCpvdJvFLp5aFs/XOmfg3nZ+
+jqDxc6Ol0xbXrFk8MJuw+6BaBbbhOtyy9JrTphWun3sbwiL/bippCPWkAtq
lA7Ev/BlsTXSq3v/lPOA/jBpK5c7i13q0jgUqcAH4b0neJbsWewt4p2jU7kr
Yf6sf4COFYudMzD049gqIQjfdDw92JTFprSfij1pKAx7Ap4XuBiy2KYVS0sa
savhfHbW3Y49LDZndkrSr3IR+NnYVfBSh8WujRHguT+xBjSivFdIabPY0fsy
KccVRCHQPyPn+S4WexeIC+4IEAMjeemBe+os9k+Zgozvueug+aXk0fadmB+3
wtrSd+tB/5rveRlVFvvQaNmFkFXikPbuY2DudhZ766tdG7dZboT3PqFbtFRY
7MHbj/O+JEmAWPixrEklFvtShrFM0eNNUHjNtbJRkcX2CG8uDJqVBLleofEH
2/B7EqFdk+VSIPB8sKRZnsVupO9Y3+YoDXdW8Dn9kMPv/5vyvDMhDY378mRl
0IND0f1HFLbAwcTLHXe2stj6zns22z7fAqX7G6u40ZcaOPyVA7bCia9dbQe2
4O/dIP03lisLWcL3jhnJsNiV663lmrXlYLUwZ0GNNIu9lip06OY7ObBXsjmv
i24Lzfp2cJUChLVpvrSVYrG3f/RQMS9VgAXR0y4Dm1lsmr3EMTnLbZD3fXdd
BNpC7drUf0mKoD1u5FAmyWIXXTug0bBZCdb+6bRzQHOJKp689lgJVJT2V81u
YrHrft+d859VBq7dhkxbtHbtE46B4B3gUkT3kpBgsa3XGUr7LlcF3RpJ/a6N
LPb8G5mnrY6q4DaW5ctEexh+Xl42oQq7vz+oWYVeu/UIKVRBDQ51/DsuI85i
P/tgp/DhpBrsFFZ9/W0Dix2Wpdpk/VwNBK4/5KlEt/FM8ysFqMN/xhUb7dC0
rzGMr7ka0Nb1rSJ9PYutUlOjPDWpAZdu383xRbfSFpvnTXfBhcPtCapoYdWE
FQKTu8AAzne+W8diZ51MPLPdRAtenX3gvAOtafFUUuuiFkj1Osrxons2LK81
mNACcuDdpmExFlu8NnnOIVsbKKSG0znovOXksPDx3fAu4maqKNrg3UvhOEMd
6BN63jMriuNdxHcn+bwO7Lob+a0HnRhlZUv/pgP781+7PEbLWKV9ywJdKN2U
fvIK+tnGFkpeli7ce5cCy9BB3wUUbozpwpPa4PHPa1lsHrZt4x0DPfDacfnQ
K/SNDEZQ9Tk9GO5iz99DWwS8WVb/VQ9urHdtzUaPqQsXNOnvgd0pnUNn0Mrd
zP7e0T2w6BjLdkLf3ZTl9lfPAKxNLOkcaMcf76a5WQYwQSqImVjDYk/ViWUK
fTGAPA/NhT60uFrLl3QLgG07kpYeosdyxjXXhgOQZTfqFqJrlgumZl8GeNtl
V5iB9n5nu7VgCuDQgndhMFpZ/2i47CZDoM7JK7qj/xYxnt40NwQFA9aoCTov
6o3f/UuGkPTXJk8GPbTR8fIzMyMQYzTU/ifCYt9PPjFufsIIiresvtaFTvrO
1G3JNYJ5V6vfL9Fb2e3vOyeNoHDZFs876Gn5XwqeG42B3bJB+Br6ecaaqH5T
YzjIwUW9gD4Q4CL2OccYuvWaeJLQmq8i9oc8Nwb6SMPaKPQKjazyiR/GkHl7
28Gj6GLuLqffJibw+2XnOW901NHZgthjJiDlYx7sgrbsFvv576IJbE7RPmeD
Hit2T+f9YQLazcd89dEZlueyasRMQTk9JU0brTXWlntU3xQedN1YpY7+SBW8
Kn3AFHoyDY6poJOVrIo76abQMCFRroBWakktI1WYQsCjr/+2oNtDn5Xr9JsC
ZzRn42YiH0GOmu9cZuA8IC0pgd5cplefr2wGtq8eXlqPbrSLfuHsYgbjG9ps
RNGhPype88SZwYBtx14R9JqMqY6H18xgrccpFWH0I9UdvaGvzECBRq0VRPu9
PTy4+ZcZrCi/ObaS6J+w4s/t4ubw8fzOo/zoMpGR8RQjc4hoCPfmQ7s8kP6l
HWIOT5bdubgCPe/sM/eNaQ5OlNsihAumc/7lPTQHS+HL/IQtsrq5nYbMQfu9
3B0e9MSutQLcfBagM92wQDiry0GkWtUC2JwDEcTzeqfo6w97WICITNBTwsPr
miUlz1jAV4uvnbxoSjWP7NsbFhCcbtpF5KPqaayU/MYCPj8O0yLy75o7vVPr
twVc+rBhE9G++JzHWmOSltAS5VwjRNST7tyey2aWUBktmUv0R3PfLhOHo5ZQ
mzgmugZ9Ii7Mavl5S3DIfVhJ9OeT2m9uwSOWkKUvG7ARHeSjsE9C0AoOiC1r
lUSv/BcU+EbDCkwszEVl0B7w8diuZCt4L+Khtg39b1D85OgtK/DJ2WlPjH9R
ontcbocV+IcPH9yJ/vW0jcy5xRqGl15+243OCRRML7eyhrneuJtEfQGXVdbB
MGuIu1QyaYRmmD4reF1vDY9W5G+1RSu8rHh00c8GXOXDIwPQrYem6mzINtAe
k+JyCB3Jt+PFvzs2oCVxSYao96dWxR37/9mAQ4+pdQx63+uc8Z15tpCmqPXp
HJrraPfUf89twbNa9XM+ukRo7dyF77aQsnjy1mW04x2Hf1aidnBINvTQDfQf
ezr3kp4dmEksv3IbnTfZtPJekB0Iwa5j5WhTJo9IEM0Ontx4BzVoVvtpyeY+
O3g69P5iExF/wddUscwertQuMlqI79Vkhhdss4dv3I0ZPejSu5sk6Q72cLyu
VJhYL3wLb7yMOmUP0Snvq36gRXJ2hgfl2UP6O1LzCDEfGDWbHJ7bw2+RVQOT
6Oizpi91x+3hx64T5YtosccHH2byOcDrR45OfLgeDTPSA40KHSDmH6nFFB2j
MVB15YMjxO5W+fwA3bl9K1100hG+/rVSrkKrbAsOSFvuBPJWRi9r0albyrQ4
1zlB5w0J0efowU2/BE4pOoFr9cYDr9A667WHx/c4AWXHysR2dKZIfFWAI3pt
3qUe9LjAU1pPkBPE8hg7DqPNVqwIsItyAkHl8wPf0PmcNloNaU4wf3hmYgY9
t5AhoHPFCQZPL4z+QzvNvhu6c98JfHJfGfxAl06KV8k2OgG5yPTKHJrnmy8t
970TaBv3ayzH/cB35Lr/6u9OcPt88WZBdPXAV00ShzPY3V5auQ4t0rtd4O8a
Zyh6lHl4Mzq0M3woTN4ZPp3pvSmFft5aXTmq4wxfv/QekENLNv1N87FzhpQv
mh3K6KhnRv6d/s4gdU08RB39sdSt8tYdZzCta/toiS45neDnZe0CEp+66yLQ
ABsjT/q5wNXND4ei0V0c1RRWpAvI2pztTkAvS/p5v/mKCwhdPxBKQXslB3Hr
TrvAYkxg/yX0pAmnuDufK+ypX3u/AJ3Knbc9XNIVHr+RmCxE30/tdr9l4QqF
XHZ7y9ArKVYlGy+7gmNDWnct+qrllyda913hd3X8Qh1amz+5w/mFK5w/1Vfy
HN3aLDV67IMr8IfnNjehg9JqF9N+ukKn0iXxFvS8tdfqYh43kNpcFfwGnSHw
W7ZhoxvwZNN12tGP6ar2i6ZucPpAz7lutJPd68D1e91gv21CYy96VCgkSuO4
G+iekJLrRye84aE7pLjB67XRqgPotRnXCkJz3GC545zqMNF/DlBJvuMG9qX7
p/8j+m91f/P1Bjc4UR/BIM4TXW+jB+reu4GHl2PVKDF+LLHpDxNu4Nd79/VX
oj+dH/DOLXeHsPf28uPo7DUOm0Q3uENEstux7+jtneM7d253h9y0up8T6IZz
FDNbY3f4aVXQ8IPof1e5vcEe7vC0juPGFNH/os+OpRxxB97LI8m/iP7v8k0u
SHIHaZlL09NoiQuL2bUX3AGm63hniPFwv3j7fak7WDxPmCNssV7z6Uy9O8TY
l/vNEvXS0961utsdhlTNJH6jIy4e+6Yy7g5uftOviDi/lwCHFacHMKJuuBLx
fPGbaw+I4aobWL/hD1qzz3RbkpIHBLuMXybiLbnDe/LAA755ZEURDvA+7fTI
1QN4bZ8ZEP4jIXGwK8QD7we0K4QZ/dWxU6c9YG/Df3bE723Nc80QyvIAzd37
xQg/8pm6rljiAdeP668i8nfYnP7QDFf9L8+/FBDt/Tyg1BrQ6QEv9PV4Ccfl
vxxO+OoBf+Za9hP9JeK//3fOkgdErlPI/Ykull4mULXGE5TlljVOovWH86Q6
FDzh15eD94j+77yqu+vHHk8wvSQ8SoxPSGCP5UpnT1CTFnX5hubYGukjf8gT
GKTgOmK8z/+3Otw43hNgkaP6C1qlsIzky/IEgS+77xL1UZb4/rdIkSd4aZ6e
JOpH1YfrUONDT0gKNHAnfE9nR0/0a0/I2xd9eQitts7LQmXIE5SUh0mD6Ae/
kqsHpz3h0eZBIOpTo+2OwjleL5BSOuJP1G9FaW+2uYQXWJx/O0zUtyaFm29h
hxfQFnxWvUdX7VeNLjP2Ala/ZG4XMd+M9n71d/cCtaGRvk70Q8lUT9HDXqD3
/akKMX90Fu42vUzwgoH42SPE/Krp7tsdx/KC3oIaZ2L+6ZXzlOwowu8P4saA
rs3YKf7poRdQBRpziPmrf8Sbev61F/S7lZcT859tSZq3HPKC0kJ711Ji/sjd
D/k77QVGDD/zYrTRwArrIIm98DFGpJtYT8wdH6xUO7wXbE9teMFCv1T5GDuS
sBcoVwfT09FW/Hzj2ay90Gc19pmGfvVZ3dumaC+kWZ2xIaNtnvm0/Hu4F15G
mD9NIuplFz/9Na83JFC4nh1Hv1296+8ZCW9QVopTDSXWhwnfIxqq3rCC/1Hh
QXRHM7X/i7E3sAQdFv3RLjcqbHPdvcHoi98Jb/S7s4O1doe94Wrt96/uaDe/
lduXnfaGbSWlQY7obj3NvAqWNyyzaH5ljfbY4C8UXOQNGYO1Z8zR72fSEiQe
eYN+kpuLITG/2ysn3rz2Bg5OI2ddtHeawBvNGW/wq8ov2472/1uVzmWyDx5f
nHRejR5+P/yvyn0fLH2Pt+Qj1sdKweOHD+8Dzfo3pcR+c+BYoEM7ax8EicXJ
z+J+FDIktDp/aB+Er+jL7EaHPd/P0j3tA85csswctOqhUcOscz5wIP0rPwv9
nf/wz4mbPnDIIu0HGX3I4bjD1U4fYPa6l0WgfftihPgUfeFzdWeyA9rmZzq1
q9MXdkrUZnMQ+63QvnrtLD+IKyNZOOD+P+UreXHkih/UzOwTMEY73Bs4zirx
g085PNqa6DvLCiwMKvxgv9vZACW0kEuA1DjbD+KL1GOl0dSLB09fGfMDQR2W
0PfVLPaZrWF7eMAfYlcKjpDRR3RIDzvG/MGgKGPZXWHcPwb3PrKb8YcnVyy/
XEWrklRrmv75Q4bRsYlz6OmO94/ZawOgde6VTjQ67ohy3S39ACg5FLdggKbl
v208ywqAG0G1I02rcP3nkehU1wmEz9fDz3cLsdhf2u9OZFKCwOi6161mATzf
jV7OMlg4AO2Fyum5vLieN56Vf1AQDKaFtUk1y1nsBSkVJZGNoZC4Qv3Fxn9M
NuPxrfAF0lFou/glkDHPZPemM527zh2H8ms5vE0zTPYmjh1FW9+cgHtkF89T
P5nsbZ0WE11bwiG+SuMG13cmO9vitYddWATsSX0i+nmUya6OVY/TLYmEw3eK
v5iMMNn5ImJZtMWT4MOYG784xGTvPtR7wFk7CmKXTF55fWSyc6Q3bk9gRMPB
H0f2qPYx2Zxv6r/XZkYDj4vRqY3oQ3GHbv/Njgb7yMin69Bvtq06sicvGgoW
B2RWoDW7K5Tjr+HzbX46s71M9uVk7/HHxdGgQJIJn0BzqS0vXbwdDdK3OniG
0YcHbh7WexANhXwtH96h22kOSnHV0RAnvyunCb3yT4pCzHA0TPlr5B1Ex7VO
ypzUjAH3dZ0SRe+Z7E+xF4YrdGOgSMWsPgtttU3/6gzEwPVPu9ro6PXJadKR
1jHQlxHUcQJdvltOKsIvBlycvhYbob9f37spjBoDa099m/vSw2T7xDauO/ox
Boqr+ONU0HV3HMqcP8UA/VjyZxm0zH+9JrtH8ffMor3Xo5PX7++T/B4DK//8
vSKIHrH5cYJrKgYiKdm+S91MtlliNO/YbAzoF0bz/kEXVyy/8mYhBszf9gt8
RfOP0XdVcMRCmG7Y6Gt0qOT6lhzuWPizhST3AR1bH3zmhXIsGGZ+3ZiA/jDz
S+z2zlhw1djw4BRaXzHhNkszFt6qaPAeQef78JpE6cYCX+DmGB/0skxW7z6I
Ba+f0SHOaGpQjca0cyzk515P34bOXiH4VSo2FhImFG6+62Ky53UvnOY5Ewuy
bvHfWtHex6XFxpNjgfv0/MEy9JPrt0rfUmIBBI58e4KWer/LuIoRC/oSpQrl
6CTBuveXMmPhQOtMfAH6P0Or40nZsdBG/m8+B212spPn0OVYeMZ9UpOJvlHi
c9n2aiz8LvnxjormHRhVV78RC94h1npx6JA14c3rS2PBLyM77wS6xfyv39Ld
WGD+uX/0IHp7HOn3p4pYuEvrUvJEZ9xdzWh6FAsyvo6Gzuip/3K33mHHgq3j
vTILtMsGuZpzDbEgrmbBr4+utL3rGNMUCzFu/2bU0euTdEZ9W2Nhqqzvy1Z0
TGVDgmlHLCga1cZvRn8YsxNV6omFUxXrRFaj92x+f0u4PxZSI9IlVqDznAON
ZodiocY+6SoHmoP8vafvcyysEoads++Y7IDHp47Vf4sFZxmX1ZPohklOnhuT
mB/NsmIILSdLu0SbiYWhpXtV3Wiyp5h62HwstP+9dfs1eoye3+T+LxYKy57t
eIm2earot4crDm6ZyGk/RJfNls/K8MVBZ+dAZQlaWMmAzisUB22aB+eL0WG+
TVsmROLgBcTKnUd3ZDo/6lgXB89lQ3iOvMV8Hj4YlNkUB+sWG8qD0OUDa1aE
ycRBWJLMfg90IXeESr18HPik5hvYoM8rdToLq8TBxoUEki7a65nLdxujOPit
s+IgP3p4ylWqMTQOiio7O2+34Xg4eqRW18fBpkSN29/fYH7C+5wuH46HgjWi
SmGtTPaSlcW1D8UJIMT2NW17xWTby+WJDQ2cBnGhbJZvE+ajVs2+nn0GTmnR
dQcameyLO1ltazQTwUjypGZBA9Yrq87liXYiJPiEfbiAlvo10XNINxF+Xv18
hoEuKrceqoVE0Lw/0xiLvq/FPXXQOhGCrh6JckW37Ila89gPPWPXwI9esvRx
C0pLhDsis9/jnjHZ9SW0XiFGIkgGd/wIQSevrPF5mJEIUhc5bh5Gm4d+HQ7M
TIQrTcfMPdH8r9cdFDqfCOkJ7XMe6NcqZt+qsxPhR8p+CTt0BiPiWGBuIky6
Z6iZol1+XP0lmJcIxW4dZ3eh1zm8PVWdnwiM1+8bFNGqbiYXBSoTQWJtZc6n
p0z2r8qwTVXViWCl9vVlD7pyXUGBf00iXAgM7e5GR0e9kRV4gs/3HW9uROu9
/3uzsi4R2kaLTNhoS++qR36vEmFl1q3SC+iAAMUP5YOJYGo+cNQBfSD78pjT
J3z/244vSuiQVuG5yZFE6HA08TVEH+VKXpE+mghUOkNGEx2m81tU5VsivFr7
gqmBPnk8ZOur74kwlHX09xZ0TFG/WvBkIlSHdt3YiE744GC44lciTIR7DIqj
k0Qa7AtnEiGg4faIMDrVQsvH+E8i8ArI13GgqQkloUPz2N4mcd4/9bhflm+K
Pf03EaZtaIf4+pls1lgGZRNHErQc+ndnOfq8FFd2zbIkiA4717jwAfc3t1NF
ntxJsOpc0ORvdMHTfc+y+JOAfWdxfAx9/U/bW3XBJOgXbPMYQRdvNxl8uyoJ
IpoO7+tHlwZVTRwTSYJSaenCbvTdHMW/gqJJIGm60/Mdurzt8srSdUnwa8eU
cRu6mme1uJV4ElDKM01L0Y/1khVGJZKgMv+k1iN0XdhvzdTNSTCy2be1Ej0o
wyw5qZEE567ydiSh//PgerhWKwkej/y0iEWPMk69uL87CTp2zsj7oMcbxt45
6CVBGrW55Qh6cn7ffxP6SZCg2PnQAT2t+naKZpgE9pVFmQHoPwdMOJVMkqDX
q+StK3rxUtWqJrMk0IpIS/ZC/2tXlDxomQTPV3lM26CX8eUpc9skAc/62n2m
aB6D1brX7JJgoa/MyQDNH5lsaeiYBLc4V5EXgphsoVu/3Qeck+BT7dT8f2iR
oZAD8W5JMPYnntSPFlv3MWKjZxIkLkhm1KElzzYw3X1wPN7vP3UFLfNQK3/G
D9v7fgODgZb7UVKWGZgE2uyDOlFoRVnJ2p0HkoArI2ifN3r7XuarN4eSoDPu
l6kFWl/dh9siHMdv/deffwKZ7H2ffkdpk5MAvm8ND0B//PAh7CY1CTK1jXZa
oP266kPF6UkwWOjeoYMOaErzW2QmwSGXWpdV6EN3NlvU5SaBc2upekMA1nes
+TqLO0lwvc5uaAc6dc2FCveuJJCpXRLl88d6MNacOrn1LAiXdq6s9cHxeqd2
4MvrsyC2I7L4hSeTHWWeXykSmgx1gpnnd7ri+YvPOFtqRQoY2Hm0Njkw2QOL
1yL87qRAmqa7P68Nk93/JlJlr00q/JWY7nhpzmSzO7mHSLOpYFUqY0IzZrId
ekxPL59LBb3zv7xj0YN9KZtOL6QC/6o+3xD0sk/cXic5SPDjzb5IS7TZT+6O
IH4SaJ+9uSSA7p42PTEoQILEWOWhRSNs75+UVd6rSBDAd/POb/TcwvPb3atJ
wO+pINyPpv7jtnFeS4J+/oUrXeiNy83GWsVI8ODemfh6dClPKtlqAwmO1X6l
P0Hv4W+Ua9yI3zs1Jl+CbhXkeW4oSYJN973KL6F9V5sF1kqRgLKbg5OMnlyb
yrl7Cwle5OUFxKET1zdeKZclgdLq4Z3H0CISPPqqCiToOp152B19bbPZh1uK
JOhbZzLoiNbYkhojr0IC37eb0wDtqshTJalGgqGBcRl59GcVM9ccDRJEWEyq
rkGf3Jn6S1SLBPumt20QQq/Y1chk7iaBxavBmDlDPB9p86gK6pGA56jxkZfo
bXpmrWR9Eij09aZ/QD8ySA3lMiRBw07d+51oa+NG/jPGJJjKNImvQn8w47m5
YEqCFaMuExnoI1Zm5qcsSNDb+GnxBnrJNnVkyooEwyVHZIl4umPj2aO2JHC4
lXA4BS3lyiMzZk8CgfnxSnf0PQ+zuv1O2P8MMdYRtJF3qs+QCwkuD9d1+aPb
fRsXvd1J4D0RbaWKDgzkye3xJEH4K7dIc/T0AbPdLt4kqPjXL6KNTg5J7X7j
QwKWWoO8LFr0aGOktT8JUpIrNTahi07wrH0RSIK3z12dVqPHTvPQK46QIKTH
+sh7wPqo5jlxLIsEIpor365ANzPTLn68gO3/Eijy14DJvhQi/NQ2B/M3D539
gT5qnDX2+BIJmvotBD6iQUJ8jfIVEiTZGMZ3o0Vm8nRzC0gwCDPiL9GfXm8J
4r9OAtddPlHl6PKiYlp0EX7vJuP9XXTqaZWK0WISGKnknr2A9vC43+9+iwSH
W2/LpaMVd2rxvLiN9dju+5OEXuR7vF3zLgnyy947ktGvh8G98D4JUsfv5dui
82qen15bQQITPye9IPTxc1bFZ6tI8Hj0zCEntNGRN21TD0lQxclON0OvNXOZ
839MgkNzyZX66B0dBYkun0ggN76wN1Ufz3+lciXPRkgQ03b95hl0e/KtdrVR
nE/VvlMn0df3qS4UjJHg2R65TcfQJzUrtqz+jvWiQe3aj7ZYpWNz5gcJ2hqt
bu9Cbxh9EvHjJwl4m76XOKHH6owv+0zj/PKTzgT044svn7+eJcGvFu03OmhG
mO2E3hwJcj81f9yO9rNuFytdIIETY3L9ZrTaVneDjUskCM5ZniyCXv637yCV
gwyt3EftV6M73/llzC0jAz33ffnfPVgPZSPVh7jJcLFW+9cSOooUMtS9ggzX
+9T5vqGt/H7wmfOTYerxKo96tMTuCLVKATKElZyR6UVPrJ7zkl1FhqCaKOpb
dN1Y/Nlzq8lgI9vI34RmPltWunwtGepjE6fr0AGXSJ1hYmQwO9WYfxetESnw
d2g9GazN9a0L0Tx2TFnHjWQ4vjXK/jK6R07Mrm4TGW61HhZMQ5f8yzm5Q4oM
SfNTFfvRsT2br+TJkGH/03xWJNrm3vUXgrKYr83R6XC0JHXbZJw85jOgZhaC
ngwoWz++jQzydc2jPuinuuqGe5XJcPvspdl96HNrq4Obt2N8tPa7PXr/dz3W
7p1kGAj6mySPXnpSmtSvToYNIrZW69HZGRLhiZrYfz82pu9B7wygBcruxt8L
iNm2Et2svujcpEuGwLid2pLoQO5QkyP6ZMjZbvRRBr3Y1aex2pAMV+ylxPjQ
54utZSuMycD9jkuUB70jpkbU04wMJcdquQf1cH7y6FyM2kuG5Mseby+hWT03
KRI+ZGhe8YpSjFYu2RBT54fjI7qUkIR+HksJCQokw1DVFbFraB/bOS/eA2T4
3XXl2Dn0b8lg69JDZHAs2rQiBZ0x2aPrcJgMD7z/CUSgFZ9aKE8fIYN5vurv
U+hnmdUS2cfJkFpwuS8E7b1fQVAvnAz5RS9DzNGzmtl/ByLJEHrkgYYbOp2X
d+JsFBnaezPX+qAVek99lI8lw6CG8zU7dP2tL62v4slwvyuJ2xTtFe/OPnaG
DKukL+zYgp62e3FnzVnMN2sFRRdNl9LKr0ohQ394XpIcWm6qKGMvmQyPexQE
t6Lrnokl/qOSwf88w1UZ7ZmVeuIanQxWAdnyUuipA7P+5hlYH+L8D/jQadoH
nL6xyPBc7eSQEHorf5dRehYZePmy/UZ18X7cZ6qunk2GxugLVZwYd79dsaU7
hwyqL1PKFjEuraNxY/YOGT5uz9d+hX608vqFnPtkcDvgc6oZ7dK/hqxfQYaF
wK1zt9Hfy85GDVdh/u4JDjno1DO/DqU+IoOObNn9W+jNToGeirVkkBysT61C
V2/psGxlk0Hcf3cv8b7TjJFO2FMy6LctlhHvf2u8ryj2nAxiBhzKhJOzZTY+
ekEGp5jN3RfQkiGslT7NZMjYKnH6DLpKd9ki52synFJ2UiXiDoJh44VvyGB4
RLQxDf3149AHy3bM58EFxwR00l3H1987sf4KhD4moyWS6muZ3WR4O9XVsB9d
4byzbFcvGXwVqqrD0S2jItTSD2TQEtFbF4kejp/ev2UAvSvvfSB6TqTLMGeI
DLvGLlgT7wsXV21a/R8ZKtfP5oai5fZcnCN9JkNBx0h1EHpPe8y7pVEylJP4
NQ8Q/XnQ+17kNzL8+G0Y548OWdxDH/9OBlaOeu9edCJzc3DgJBme5TaWG6Cz
5ThNe6fIEPH6UrgbuqxmWMpxhgx91mxzR/Rzh4bFF7/JcCdvUMEV/WGksEd/
ngxKytI6DuipGFJ5xSLWV1fesz1oPuHgDOV/ZMjy+sywREsVWoVe46TAlYmb
lYDW1FG2EOeiwNA9rxlTtO0bwa1MHgq4Z/5XaoUOCvrxbwUfBezecGmZo2Pm
2voSVlLgxYmbKbvQTMb9qhlBCuSJ+4jtRBdvOZcZKkyBY8WRXEZEPVZHHvsk
QoGB2JFJwu9s3a29RCnQevzR2R3o8WFt+bfrKKBzZjx6M3pZlPhyC3H0Nq1Z
Iv8Ngosfn0hQYOzjXOJ2tOrV/ke7NlNgdSpbXQNtpsU+XyqN+Wfe/SmL3teS
H7ZlKwW2qqd+1UFH+CfZ5chRwOBhxX4tNHU2UHH1NgrIKP5MV0fnp5nykJUo
MMxLe6lL1JuU/PCSCgW6hqwtJdCtFbxPIlUpoKW831MT/Z/V2MVxNQroNew7
IopeGHgVGbiLAoM2fQWqaJHI2469WhTYcGk5dTdagT9dxVGHAjWuh0LWow2u
HOd7qUcBe//9jVJoNw2nEX0DClzW/rGGyCe0Sb2+wpACEo77LBTQZ31ELyub
UEBsRm0X8fs5v2ajrplRgCZ7L0gPfZfc4yJuSYGZ8X+2RP4vNj1SZVpT4Ljo
JjFiPD/ezxXgtaNAyrU+MpHPtHn8aIID9q9Z/i1i/Pj7fRpmnLD9zDt/jIn1
IQzyQ10xn5NdOsTz2itk4j65U0DqqVmSIdru0nIPLy9836TfnOjP/TtH1N96
U0Czqk2ZeD+usXGVhS8Fom5uvU6MN2tv8bcn/hSof+oiQozfzUnKi11BFLjl
a2FHPF+Xcvha6QEK3Dl93oOo7y5x29Nbgikw2vz1jBOx/tzZvjfnMAUavaJb
CXOZCmutPkoBbX/tHUT9i/f+FCEfp0BphloAMV92HuuYWArD9nc/CXZHW3BV
NEdGUiDrq/Q1T7TPxfNF46co0C1oauqF1pMPtMqOocDp+cIVh4jvVeyYMI6n
gLm9+hM/9B+jReaP0xQQd+b6FYDubnu5KzeJAiP8EirEelDpk/XeLIUCslW7
1U+hz437x0+RKHCWW/JtCDosZrt0HpUCy8mqo3HE+sW70GBJp8DHy2HrMtHb
z784NJNOgabJJq6zaIGt5wQKWNi/nyw+pqDH7vndtcmigNtsQmQW+qWBisuf
CxR4ue9aZh666PXc72s5FHj/obXvKrGe7m3Mtb9MgcdrZROI5wO+sgwWrlBg
z9UPnY/Rhqd8PxVdpUDZ3lOtxPtS3Mokp0IKvKPwtpajl1h/FJduUMA/WU+s
jlhfpJ633iyhwGQuaZFYzx+VMcNcb1NAXSiMVE2sV3o+Ypx3KZBe2hVYiz7Z
rPio9D4FFHPftbwj1j+P3/s8Kijw/Mh4dh9a7fMzTq5qCoQe3iI/jN7qqiDl
/xrHi9aTt12PuC9OPxNoo8CfQr9WTfTg8fqD1e0U4K6890Qd/WSJvjLoHQVM
jlTSiP37Ms3rzqoefF930OEgOk5c3rmmF+upOeFpDLE/F/+aPdBPgenwc5bR
aG3NuhyRQQqUxzsPRqHFGmj6T4axf75GMYjzxLSj53DwCK5/YamO+ej2AdlU
0VEKhCzlqxDxu0emttWPYXtlSTJXifPCwpPXod+xPd17T1Sij1LSTqyfxPn5
dSS7DW2zzkO0YYoCcws/3tUR55PCrQ+PzVCgPd/drBnNq/7Te+MfCtSmMC51
oT/X1XK8mKeAylDuZuI81mBHvR72lwK64QcSxzF+9YObhSQHFfYKSf8Ux3hi
yJbxpmVU2OZZ6aKK9vvzIz2SmwpKITIVy9H6qY/VpXmpcP2vJK8ccR5eS+lu
4afCpUF/SzP0fIFrbJQgFVQkZBSI8+Q34UcX38ng+7JZm9rQ/BGvXkTIUqH2
bstx4rys0P1hZo0CFa7+eC81gTbXmdjyQJEKZnnft/5EH7j8z9FJhQpxUaBM
nN9TOFaf+bmDCg5DH2TEiftGoExZhhoVllmNZkijnzWqf9ixiwrWReaO6ujh
bab8b7SosLZ18Jc1mpPupn1UB9t7fZjfFS01efCA4B4qXPS41RKMNnCOPldq
QAWdm3c1YtA+ldSn1kZUsNx5KYuF7jVqi3lpQ4XXHb8lP6DnCoeKD9pT4R6N
e+Azej3fry4eJyoctvwdz4H3J61QLu4iFyqMrZM2FEO7vRFVN3Wngu3O3gIV
dKSavP9/nlQw5uVM2oM+l6WdftabCiKfumuI+9mDP5a1Mr5UkFk2f+ggun3v
3m/1/lT4FCDkE4H++SR0g38QFZylVp3PRAvLJJhzHKTCs5wDH58Q97eU9Mgr
wVQQ8Nx+sB1tN5p/TT+UCiP14V/b0M0Rn/fWnKSCdvGvHZp43/3a/ZviFU2F
Vh29sxZoXl2+6rlYKoSdcFXch5bPE/+cnUCFmXMtm2PQZpzKa7UTqfDqaJ5n
Ovop/URLeRoVFKa9Y6fRj4oW9cryqXCthfWoBe/bN3tEJAuaqZD/kdRVRPz9
zb8srTWvqVBYE+zfih6W3eCY8oYKct3vucfQ4uGbk4M7qbDm8UYfBRMmmyao
PLbzIxX8bAuHr6GPGplWPv2J+aZnRFeYYn0Fv3yjMU2F33r+0e/QN9KtvxbN
UuFBt637PHrwg6NE2gIVvordajExY7IdT/kkOXOnwfrbu1tb0Bqlp+z+W58G
lUvtw7/Mmey29vmDbhvTIFm4fpWyBZN9ZC4+8eWmNDiurf3UFc0vxZmrI5UG
P2nep4+gi8ySy0tl0uBvWztvEXrdUIZ4pHIazPDtqTK0xPkhWvKZG9Jg9k3P
LZoV7lenPyTIH8Tfy/p0I8EW168rVn6twWmg2wFnstHkJ9WGkaFpIBA5W9KL
Hu+X2yJxLA06zrmIzaId/p7jenYiDaLN2re72jHZ5RLLPwdHpAHnYcX4s+j1
eideCJ/C/HwWlR6g4/YOFFdFp0HukdmJHvRgjC3VJy4Nru+O1xa2Z7JNcmoO
c59OgyHmp8D96OKH22xLEzG/KsbPDLTA+wvbnZPTYNxZSuoL+vgfbuH51DTo
4fopu4D+F/kkK4uZBs+vyU0sOOB6EZpfuvxxGlzk/HL0rwuuN2lCjJInaXB6
iEfF1RXvu7fijjnWp0EmVS7bER3SPObw51kaHIo/kVWGbv3qoXalMQ0eN+vs
5nTD89jB1dU6b9PgXcYMh5g7ticg6dmJz9jeIU11d08mu8YjqHdAmAbr1Oyn
Nvkw2Zd0TW54rqGBCWWgJRadILk1okOUBswN7maWaF9OLkPb9TRYk6E+9xUN
/30SfCFOg7e3I67s9WWyG48FGpZtpcGY2omBAj+sJydjIQV5GojcU7tfhibv
2tJXsI0GdV86Lkn5Y/7rlxdvVKYB9Zy16EW09cJwRNZ2Gggbp82/Qit/fGq4
aicNBnu3x0kFMNlC9VeFKOo0MKtwKXdG/7iW1LdMkwZea/+NFKHbUgOK47Rp
oDHTZvEX/V+538kNfjS4KMS++uQQnt8vgHFmAA10Cy/8bUIXxUgJC+6nAefK
maOOwZjfPo7+1IM02HnB10YPHQyDNzlCaLCh0LcoA221pe5kTCgNdAyT421C
MD+efOPpozTY/PjSFVe04NfTwkdP0GBleufHCvTEK9/+L+E0sMw1SQo9jOvf
sI9JJYkGmu/vzgYfxfas3ififIcGwzzkkbwIPF83JQbX3aNBzy5pg5WReH9L
LKpTKafBWcWOPxHoiN2v1uVW4vM3EtoH0ed//jjK+5AGO7wqiiRO4v3v5trG
yBoaBD/xcLiI7vXfvelTLQ38Hi1PVjrFZC9u8IlwqKPB1bnAQxui8L7XnvSq
9ikN7lmU5nZiHKg3ZJSe02D5TaVcY4wHGLVEZ7+gwfVu+opKdPL8ZBt3Mw1u
Nupe3xKN/XdfVCG8hQYfxJYk7qJfhuicHmylwTOPgMG36DEZ3y7btzS4NqRZ
uj8G50PfWZWaDhrIRnPlfkDvyCxOVujC8alZ3RCEdrJ+3ZfVQ4NfncY9tFhs
7/IpteV9NDiftaZNMA7bWyNGPd5Pg9TpjT8y0HiJHOofoEHp8eHcenSvkp+2
9TANTJue8Z+Ix/Z+Sk6v/g/7K+Bu6x205KWbn2W/YH638/o3J2B7XVr3ZH6l
QeMzxqdsdIDAr3Mc4zieVcsuC57G9jasGz8yQYO8TZOTNuiiOD3jvkkaHIDr
Ci/QLzX8cyx+Yb2HfPHSO4PtHU/5WTFDg/Wym1aVowUKSyy2/KGBsZLjsf2J
eN7c9+ZKxjzW38VzDxqTcD0SnZ79u0iDVSVvRoXRYa/X2x3+RwOHpZPTD9Dn
UvYU9nDSgcdPt2pPMp539wQsmnLR4Vr3vovuZ5nsnplU5wc8dMjYfManE+Pz
t2+VSPHRQeS9/QkKWuJAGydjJR0SnRSDDqbg+iI547EgSIfoF7QCo1Qm279r
w91DwnQIvWH4cxM6maG/okuEDpViO+bMUon1OdDHWJQOqTYn/93E918ukSru
rqPD3IqSICMStreyVEBSnA59D3WWqGTM/4JBcMcWOvzdF1V0nor52wfVgRwd
hpxJHa/RlSso68oU6NCuGsuXmIb5s28f3ahEB4Wt8Zyr0POn2p+TVeggzDdy
IpSG+av+lpjdQYd04+jAcLT+6MaIQDU62EsGszai/fLhVZsGHdTM/3UMoZM8
9svoa9GByadAdqfjeUeYGn1rNx3e7Xtpms7A9ellWdt6PczfV6rOI53JHj3T
IZ+qT4d7j36nS2fg/rT7T8IvoEOJW+apeIxnbkjrK7aiw/q5QmkfJq6fzTnz
VrZ0YHByOVWw8LwVW7Lhuz0dtsfz3CChdfqb3He60kHv+sim8kzcL/J5Ox/6
0uGImffYsywcf4XUluYIOlRsWf85Lgf7UzOxdjyPDq7VPyqcCpns+18yPjAK
6LBxfXt+ynUmOzc7f0H1Oh2+pBaanyjC8bG8K95RRAe75PL4jhu4n8+zd0fe
xPbwsaqa0R633nisK8X+8lz+O7yY+PeBgVMPy+jQfeL0ROBNXK8Ef5zfe48O
z5xvpPajRZ8sVfx9gONnzaSN4/NLR4XeXamkg7de9339W9g/myWnDR/Sgd8i
RtugFM9TbSpr/quhw2JFhmsU+nHiHrXUJ3Q4lnW/R/021ouaraNCPR3oJLPk
GnT6J+/jzc9wPEdoR53KmOyoc6HpoY10iBd4MqqI8QDTuDKhJjrc2nn/6ZM7
eF6fTXt99xUdCtP+kz9wn8nedSN33KmVDifKLixtfIDz1+PWypk2OrCFEja1
4vO8fDWKFzrooG1tLxOIz089bLbc3UUHs8jl09vw+Q8hvYf6eujg5ddQ8Q7d
uHGMFN+H7ZV+7mVUzmTfaZkr2vyRDir7nh/lwnh2PF9j/SAdAnPTRJsrsJ62
bxgJ/ESHKkOl1MxKJjt0QIGL5zMdTv7oc2RV4fk0Q3tL8SgdXhfrJF9Dg6GF
kdU3Onzllb2WU81kb5ty9x//Tof9Om0OGg+ZbJFrB88wJukgbW/pM4pedD51
RfUXti/x6evTj5jswJd/bhbO0GEgyP2mSQ2eN/ViysX/YD3rkjZUonfeW3iS
Pk+Htfb60gmPMV/Z+Cauv3SwkUkvkKvF88TFpY7of3TY+/H8pQ70AaEzHyc4
GXAs4eJ0yBMm+3US59dALga49+Tlb2Pj+e130q8eHgb4jngInEHnHuZasuVj
QFX787ROfH/ZYArvs5UMIIcF7giox/3QZcUabSEG7OC7kJOPbntJ3nRbmAGG
51iXRtBae/gVZNYwYPLIw4Ncz5jsvHtpahdEGWCX5D6WuZrF5pYT3COwngF5
TqoGTHRoDsM8UZwBs2uV6ujoDiFhp1kJBrx5VZ+ehtY5y/Q+vJkBauIv0on/
z1fwW+TgoDQDmjJSyYlo3tBzJ1y3MsCpUH3hLPrYoGhcsxwDgiU+Vp1Bd7lc
SDXYxoDhQgH5BPT1PTm527YzgGR42TsKvfL+xqI8VQY8/G1sdxIdJnf57hp1
BnRMXzsThn6fI1lD3sWA6PG8i8fRsCr/+V8tbL9WrFco+sZZ6bYwHQbwPs96
HoIW+nO194se9u8Fsd2H0JGhW0e8DbA9KbOi+9EfBgt/vDVkQMCJBe8Vwiy2
sav8vJkJA2RkPb7zoEuairkemzFgreUmChFfra+4aqclA6ReyaoQjrp/a0OR
NQNuNvm8ITwgp7J1ox0DjgtKahE2yy3bnuHAgBiSFxC+vUp1N7czA65lfyET
Xpt8zzjGlQGvvpAUCcf+UbP74c6AO/fGLhEeDi33CPJiwHeDyC7ClkO7At97
4/jd+2JO+K5r1RE7XwasECk6SXhds3bUM3+sjwOq//+9BP1HSdpBDDgs/UyG
8Mh9XfrtAwzw4uz/TLTPRr72gkwwA/bvadYl4g9y9a9eOIzjJe04RMTFhetK
BY4ywOLtRR0inphsWJV4nAERNYN9RHz0z9P62TAGNMDnZCJuf8Sk5XAkA1oW
YpwJVw497xo8xQCDtzf+31+b3MyHXGMY8I5WcJd4P7n55bfmOByPP4r3CX/T
t5o1OM2AEt6UeMJOD15xVCQyIK7k4xThh/K2KxWTGbAlsUSV+J7UpVbRK6k4
Hvpy4YRJwg5SaykMqCnr+UY8P5H8VpGSxoCUxoCnhN3mnHYt0RlQ1B9eT7j2
SKdBeAYDmtXkHxCWMj9T+CML23O0p4RwkpTyytBcBuwVfl9EWENwmb5iHgNC
/Uz/378jc93HR/MZUG4+akT4/Ofb14quMYAzLvL/cYuOs11BRQxIf+b+mnh/
ju3Jt+Um5u/4vOv/9VW6Q2/oFgNut+2vJOx9kfvYlTIGPPN7wCIsmNpXsO8e
zpfa6pXE956E3evcWM6A1sNdHET8uC9pRW8lA+RnedIJS9vs08l+iPNTMaya
cLu2+hG3xwzQ2DBq8f/+luXLX8tmgPj8n3xu9C6Rgfb2egbUklrHiO9/Xirn
ZjYwoFtcoZ14PvsbVdv+BQPC5vn6CVv2+B0WbGaAz57R/7dnvkEz71ULA5YH
UFsIl94TeEt5wwBha8X/98e+vOHlFu0MiNV+d4+IC6VVa/K8w3qo4/UnXHeK
EdzQzQDdiaM/CZ8ICrqU1MsALu6PLwnLOOq8gX4GnIta6UW4c4/wsn8DDGB+
+StMfD9F8bNG7TADAq1Hw4i45rrHB2NHGNCfdsDg//W5nJWze5QB0sVhfwiH
BRvuVFrC+Xk76//18bd18oXE2nSQOLtpmHBZTeN8r1g6JLIynAn7FV9Subgh
HQL6RwMJr84K83OXSIfkWPE7hJ8mWmSKbk6H+rNbF4n+jDgq2dghnQ7jJvrK
RFx27/Qf5tZ02K9mvZ9wl3mzkoN8OmitBBvCZI18HyFFjN/y2UR4t/RJZoty
OqRc3PeK+N6YoE0DdUc6NH49qUPEL81L/7ZQw3iqxG8ibvvl97YVu9JBluOM
HxFf6njt/VwrHfIL+VcRvlt3Lf2sTjo4M0mdxPP+t6OfGu5Jh2UrjLcScZEc
+5l/BulgTNmbTPh/IyvRPA==
       "]]},
     Annotation[#, "Charting`Private`Tag$79371#1"]& ], 
    TagBox[
     {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
      Dashing[{Small, Small}], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQfeLO6QRRhg/2945+O5Ly6vH+iOXtT17NVnWA8Xte
VvW9nG0C579aEd7P8d4Fzp90qV7u1G0/OH9VfV1ClHcInK+7dF17/KRIOL/o
aOok6/o4OD/Xqn3n5VeJcP7zSxveTe5MgfMPvZg71f53Gpyvd6xZffPCTDj/
t4KutpB0Dpzft2d18e/2PDj/Vv/E4GtTCuB8WQb9ZSrnC+F8zSse764pF8P5
MzzORvgVlcD5O6qNa6xXlcL5C4TEpvb8KYPzLTNupQVbVMD5sxSl9er6KuH8
uOpj4nn3quD8y5ODd10Wr4HzBQRig+Zm18L5/7w8Ft9ZUQfn+6vNE3t4vx7O
32K0Y/+SGQ1w/kzDSReEzRrh/KQkrTtbHiD4sY+/V1h0NMH5G5zNPpWpNMP5
L64apT0/i+BXuC/YJpTTgvAfp/MMBfZWOP/+n8UlCesR/LvnS3Wjfdrg/P1X
WB+2f0Pwf+5gK8yf2g7np761mWRp2AHnbw02XGd6C8GPmzlt2ZvyTjj/tcCu
mVeVuuD8lTeE5BaeQvAP1N+pU0/vhvN3R6Tcui/QA+fzCcYKBa9H8CdLdt9e
4dUL5/8JLp9v8BnB35t7xb54Qh8ifJgnzbJ8geALzfL/+t++H84HAHaWEBw=

       "]]},
     Annotation[#, "Charting`Private`Tag$79371#2"]& ], 
    TagBox[
     {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
      Dashing[{Small, Small}], LineBox[CompressedData["
1:eJxFz3lI03EYBvBfdphItlYqZtk8SjymzSunyRIDh3mAizLLNcVpks6c97Wp
q+bVplsL57IU05bhAZksNRRJC3MabkrMmUnB5sojrcS0dUC93wceHj5/PvYJ
6dFMEwzDIv70777SvmZYYisU7F8UyTrWXt1XsHzVpNhsfAN8ekfDmFG57dR/
Ox5U61dl5uAvDk01izJrcMxD/keD7Ci4eqFAsCDzARvk54W7l0+DRZNcu9GZ
SHAbl8OIPXMWTGzp4F8WXQCzh5miQC4dnBbAf6YyxIN1k11L4opE8JC+QULZ
TAJ7jPCcnzSlgDcJRDe8bSpY0P84c5PPAmuEtbTp29fAhzHPVqeJDLCLmro0
7ZgJrqMqYyLZWWBFoXdRYFs2uBFvJaneygGTr2iSaP554Hp7Ww+OIB9MLxyx
Zr0rAKvEtF6VdREYh4uLbrhaDDaGUZu1cg446tg9q/k5LrjbSzHwoK4ELCWJ
3uz3KwUnJLhqu98jx31Yz/MvLwN3hfit5jjxwPoprySdEjkvtLEHn3od/TML
qSOY3gDPbTVnMTqRZyeyiRfDb4IH1Dvn+d+RNxS7MtIlfDBz8aSITCoHP6WR
Onw1yHTpndbPuRXgT7he6ZRDJfjRW7xd0yjyIFfLcU6uAvfFJGrmcNVgi31x
eFonstimakYedgu8Rcu9f3wN+XmampJZIwCzYtvYJDEyIbSkZVmCXEZwN0+V
IVNVvOnEVuRJf++0c/3I+u2ierIeWbqSrFw3IIfNBmE9i8jtPQtMrzVkdkow
yc2I/HN85eWhA0JwR9/ID40VMkN+lyi1QR4qpYotjyCX+zTSLVyRyfY5tWPu
yIY94S8qPZEjdOsupr7IRpXy0vAJ5K7BZiEvADm+PX8oOAgZXx/17RcF+TeY
9ik1
       "]]},
     Annotation[#, "Charting`Private`Tag$79371#3"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, -0.6223625037147789},
  CoordinatesToolOptions:>{"DisplayFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& ), "CopiedValueFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& )},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->FrontEndValueCache[{{Quiet[
       Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , 
      Charting`ScaledFrameTicks[{Log, Exp}]}, {
     Automatic, Automatic}}, {{{{-0.5108256237659907, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.6\"", ShowStringCharacters -> False], 0.6, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 
        0.}}, {-0.35667494393873245`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.7\"", ShowStringCharacters -> False], 0.7, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 
        0.}}, {-0.2231435513142097, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.8\"", ShowStringCharacters -> False], 0.8, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 
        0.}}, {-0.10536051565782628`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.9\"", ShowStringCharacters -> False], 0.9, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 0.}}, {0., 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"1.0\"", ShowStringCharacters -> False], 1., AutoDelete -> 
           True], NumberForm[#, {
            DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 
        0.}}, {-0.6931471805599453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.6539264674066639, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.616186139423817, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.579818495252942, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.5447271754416722, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.4780358009429998, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.4462871026284195, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.4155154439616658, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.3856624808119846, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.3285040669720361, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.3011050927839216, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.2744368457017603, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.2484613592984996, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.19845093872383832`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.1743533871447778, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.15082288973458366`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.12783337150988489`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.08338160893905101, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.06187540371808753, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.040821994520255166`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.020202707317519466`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.01980262729617973, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.03922071315328133, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.058268908123975824`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.0769610411361284, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.09531017980432493, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}}, {{-0.5108256237659907, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-0.35667494393873245`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-0.2231435513142097, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-0.10536051565782628`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-0.6931471805599453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.6539264674066639, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.616186139423817, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.579818495252942, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.5447271754416722, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.4780358009429998, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.4462871026284195, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.4155154439616658, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.3856624808119846, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.3285040669720361, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.3011050927839216, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.2744368457017603, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.2484613592984996, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.19845093872383832`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.1743533871447778, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.15082288973458366`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.12783337150988489`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.08338160893905101, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.06187540371808753, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.040821994520255166`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.020202707317519466`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.01980262729617973, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.03922071315328133, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.058268908123975824`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.0769610411361284, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.09531017980432493, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}, {
     Automatic, Automatic}}],
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->Small,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None},
  PlotRange->{{1, 1000}, {-0.6223625037147789, 0.}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Quiet[
     Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& }]], "Output",
 CellChangeTimes->{
  3.8446790123775125`*^9, {3.845048551512694*^9, 3.8450485560470953`*^9}},
 CellLabel->
  "Out[292]=",ExpressionUUID->"83755bcf-5c7a-4eaa-83a9-d7074da099a7"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{"**", "**"}], "*", " ", "Quantum", " ", "reading"}], "  ", 
  "*****)"}]], "Input",
 CellChangeTimes->{{3.8370816126404295`*^9, 3.837081616475875*^9}, {
  3.8450526707611017`*^9, 
  3.845052673396287*^9}},ExpressionUUID->"666afd86-6a33-49d8-8332-\
bb77972bcf97"],

Cell[BoxData[
 RowBox[{
  RowBox[{"mnum", "=", "1000"}], ";", " ", 
  RowBox[{"(*", " ", 
   RowBox[{
   "redefine", " ", "this", " ", "parameter", " ", "here", " ", "to", " ", 
    "higher", " ", "number"}], " ", "*)"}]}]], "Input",
 CellChangeTimes->{{3.844679340922202*^9, 3.844679342609346*^9}, {
  3.8446794163722925`*^9, 3.844679431187853*^9}},
 CellLabel->
  "In[235]:=",ExpressionUUID->"da927998-d4d0-486d-ad0c-ad661085a991"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"\[Eta]0num2", "=", 
   RowBox[{"90", "/", "100"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Eta]1num2", "=", 
   RowBox[{"98", "/", "100"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"nBnum2", "=", "nback"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"nSnum2", "=", "1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{"rmin", "[", "nSnum2", "]"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{"rmax", "[", "nSnum2", "]"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tmin2", "[", "m_", "]"}], ":=", 
  RowBox[{
   RowBox[{"zmean", "[", 
    RowBox[{"\[Eta]0num2", ",", "nSnum2", ",", "m", ",", "1"}], "]"}], "+", 
   "\[Epsilon]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tmax2", "[", "m_", "]"}], ":=", 
  RowBox[{
   RowBox[{"zmean", "[", 
    RowBox[{"\[Eta]1num2", ",", "nSnum2", ",", "m", ",", "1"}], "]"}], "-", 
   "\[Epsilon]"}]}]}], "Input",
 CellChangeTimes->{{3.8186815588523483`*^9, 3.8186815589853907`*^9}, {
   3.8186816637024593`*^9, 3.8186816915940084`*^9}, {3.818681930769251*^9, 
   3.8186819583529224`*^9}, 3.818682094224122*^9, 3.8186821408567176`*^9, {
   3.8186823004866576`*^9, 3.818682338819521*^9}, {3.818682439936885*^9, 
   3.8186824404699945`*^9}, {3.81868247112008*^9, 3.81868249072827*^9}, {
   3.81868254935408*^9, 3.818682562020193*^9}, {3.8186832150877123`*^9, 
   3.818683216504274*^9}, {3.8186832785685897`*^9, 3.818683278637718*^9}, {
   3.8186833392861404`*^9, 3.8186833399374433`*^9}, {3.818683411918638*^9, 
   3.8186834446544285`*^9}, {3.8186834852044363`*^9, 
   3.8186834996044645`*^9}, {3.8186835442044764`*^9, 3.818683544971234*^9}, {
   3.8186836249936857`*^9, 3.8186836250879006`*^9}, 3.818683664509138*^9, {
   3.8186838914393063`*^9, 3.8186839163691993`*^9}, {3.818684401524216*^9, 
   3.8186844036235094`*^9}, {3.8186844578578405`*^9, 
   3.8186844581077003`*^9}, {3.8186844932509127`*^9, 3.818684493591188*^9}, {
   3.8186845420110836`*^9, 3.8186845422747626`*^9}, {3.818684654223792*^9, 
   3.818684659174927*^9}, {3.8186847031252527`*^9, 3.8186847145103073`*^9}, {
   3.818684776764863*^9, 3.8186847772089753`*^9}, {3.81868518505982*^9, 
   3.8186852070601654`*^9}, {3.81868554464819*^9, 3.8186855449274874`*^9}, {
   3.818685580110166*^9, 3.818685598272501*^9}, {3.818685699378088*^9, 
   3.8186856995476456`*^9}, {3.818685740085248*^9, 3.8186857912139797`*^9}, {
   3.818685847225772*^9, 3.818685848775016*^9}, {3.8186858845620728`*^9, 
   3.8186858859097157`*^9}, {3.8186859254038258`*^9, 3.818685928328814*^9}, {
   3.818686372363207*^9, 3.8186863731797943`*^9}, {3.836982469928975*^9, 
   3.836982473907359*^9}, {3.8369825113094916`*^9, 3.8369825578752284`*^9}, {
   3.8369826012987266`*^9, 3.836982601540039*^9}, {3.8370645796579647`*^9, 
   3.8370645912592793`*^9}, {3.8370651564924283`*^9, 
   3.8370651573948703`*^9}, {3.837065363776665*^9, 3.8370653683932924`*^9}, {
   3.83706551126935*^9, 3.837065541276723*^9}, {3.8370660677942677`*^9, 
   3.8370660818884783`*^9}, {3.8370661620448093`*^9, 3.837066165520613*^9}, {
   3.8370772575972767`*^9, 3.837077258375798*^9}, {3.8375198464968915`*^9, 
   3.8375198760132904`*^9}, {3.837520044951041*^9, 3.83752004518436*^9}, {
   3.837520080742684*^9, 3.837520081379854*^9}},
 CellLabel->
  "In[315]:=",ExpressionUUID->"0b8afa5e-8a63-49fe-91a5-bcffdd564cd4"],

Cell[BoxData["0.1715728752538097`"], "Output",
 CellChangeTimes->{{3.837066073694477*^9, 3.8370660822614737`*^9}, {
   3.837066163828313*^9, 3.837066165828053*^9}, 3.837066479178624*^9, 
   3.8370772644913926`*^9, 3.83751726598481*^9, {3.8375198511298494`*^9, 
   3.8375198762967854`*^9}, 3.8375200454011765`*^9, 3.8375200817852106`*^9, 
   3.844679103874914*^9, 3.8446793435426407`*^9, 3.8446794321689415`*^9, 
   3.8450528832199984`*^9, 3.845053048430642*^9},
 CellLabel->
  "Out[319]=",ExpressionUUID->"df561c87-8b1a-47e8-999f-2713e491f396"],

Cell[BoxData["5.82842712474619`"], "Output",
 CellChangeTimes->{{3.837066073694477*^9, 3.8370660822614737`*^9}, {
   3.837066163828313*^9, 3.837066165828053*^9}, 3.837066479178624*^9, 
   3.8370772644913926`*^9, 3.83751726598481*^9, {3.8375198511298494`*^9, 
   3.8375198762967854`*^9}, 3.8375200454011765`*^9, 3.8375200817852106`*^9, 
   3.844679103874914*^9, 3.8446793435426407`*^9, 3.8446794321689415`*^9, 
   3.8450528832199984`*^9, 3.845053048430642*^9},
 CellLabel->
  "Out[320]=",ExpressionUUID->"2acd293b-155a-4a6e-9aab-a3c79556fb12"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", " ", 
  RowBox[{
   RowBox[{
   "below", " ", "we", " ", "use", " ", "the", " ", "more", " ", "stable", 
    " ", "version", " ", "where", " ", "we", " ", "extend", " ", "the", " ", 
    "upper", " ", "bound", " ", "from", " ", "1", " ", "to", " ", "rmax"}], 
   ";", " ", 
   RowBox[{
   "later", " ", "we", " ", "check", " ", "that", " ", "the", " ", "optimal", 
    " ", "is", " ", "below", " ", "1", " ", "anyway"}]}], " ", 
  "*)"}]], "Input",
 CellChangeTimes->{{3.8450539343559265`*^9, 
  3.8450539651814127`*^9}},ExpressionUUID->"bc36cbc3-ca4c-470f-9f14-\
4efa7bbf67af"],

Cell[BoxData[
 RowBox[{
  RowBox[{"pERRvalueMIN", "[", "m_", "]"}], ":=", 
  RowBox[{"FindMinimum", "[", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"pERR", "[", 
     RowBox[{
     "\[Eta]0num2", ",", "\[Eta]1num2", ",", "nSnum2", ",", "nBnum2", ",", 
      "m", ",", "r", ",", "t"}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{"r", ",", 
      RowBox[{
       RowBox[{"rmin", "[", "nSnum2", "]"}], "+", "\[Epsilon]"}], ",", 
      RowBox[{"rmax", "[", "nSnum2", "]"}]}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"t", ",", 
      RowBox[{"tmin2", "[", "m", "]"}], ",", 
      RowBox[{"tmax2", "[", "m", "]"}]}], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.845052926478239*^9, 3.8450529370075216`*^9}, {
   3.845052985119187*^9, 3.8450529878823338`*^9}, 3.8450530684637556`*^9},
 CellLabel->
  "In[330]:=",ExpressionUUID->"47d40802-16d6-4ba2-9d9c-c42528eaadc3"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"pERRscanner", "[", "m_", "]"}], ":=", 
  RowBox[{
   RowBox[{"pERRvalueMIN", "[", "m", "]"}], "[", 
   RowBox[{"[", "1", "]"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SqueezeVALscanner", "[", "m_", "]"}], ":=", 
  RowBox[{
   RowBox[{"pERRvalueMIN", "[", "m", "]"}], "[", 
   RowBox[{"[", 
    RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}]}]}], "Input",
 CellChangeTimes->{{3.8370646461581326`*^9, 3.8370646495580606`*^9}, 
   3.837065206615903*^9, {3.837065370776445*^9, 3.837065388610032*^9}, {
   3.8370654816564274`*^9, 3.8370654820102143`*^9}, {3.837065546976544*^9, 
   3.8370655515271187`*^9}, 3.8446791175068717`*^9, {3.8446791778180356`*^9, 
   3.8446791803345594`*^9}, {3.844679555382056*^9, 3.8446795554915504`*^9}, {
   3.8446795856148167`*^9, 3.84467960733788*^9}, {3.84505291928901*^9, 
   3.845052943165856*^9}, 3.8450529922059493`*^9, {3.8450531550361443`*^9, 
   3.8450531551922297`*^9}},
 CellLabel->
  "In[331]:=",ExpressionUUID->"77679712-3869-4e27-828b-7450babb7171"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"pERRvalueMIN", "[", "mnum", "]"}], "\[IndentingNewLine]", 
 RowBox[{"pERRscanner", "[", "mnum", "]"}], "\[IndentingNewLine]", 
 RowBox[{"SqueezeVALscanner", "[", "mnum", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"-", "10"}], " ", 
  RowBox[{"Log10", "[", 
   RowBox[{"SqueezeVALscanner", "[", "mnum", "]"}], "]"}]}]}], "Input",
 CellChangeTimes->{{3.845053149971305*^9, 3.8450531688562546`*^9}, {
  3.8450532364714265`*^9, 3.8450532366218843`*^9}},
 CellLabel->
  "In[337]:=",ExpressionUUID->"a112dc04-e4af-4ded-844d-798faa1c3fd3"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"0.4379043415652364`", ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"r", "\[Rule]", "0.3856737542258295`"}], ",", 
     RowBox[{"t", "\[Rule]", "11.682743576898208`"}]}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{3.8450530959033375`*^9, 3.8450531932176704`*^9, 
  3.8450532369920244`*^9},
 CellLabel->
  "Out[337]=",ExpressionUUID->"594689c8-2e2e-4ccd-a995-8423288c4f7f"],

Cell[BoxData["0.4379043415652364`"], "Output",
 CellChangeTimes->{3.8450530959033375`*^9, 3.8450531932176704`*^9, 
  3.8450532369920244`*^9},
 CellLabel->
  "Out[338]=",ExpressionUUID->"5a21ce80-1dc3-4165-833d-9e0e165d4017"],

Cell[BoxData["0.3856737542258295`"], "Output",
 CellChangeTimes->{3.8450530959033375`*^9, 3.8450531932176704`*^9, 
  3.8450532369920244`*^9},
 CellLabel->
  "Out[339]=",ExpressionUUID->"3a91ffb5-7898-4448-add6-624daf40ecf0"],

Cell[BoxData["4.137799146281948`"], "Output",
 CellChangeTimes->{3.8450530959033375`*^9, 3.8450531932176704`*^9, 
  3.8450532369920244`*^9},
 CellLabel->
  "Out[340]=",ExpressionUUID->"d249c097-5ed9-4224-a470-476607626401"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"pERRscannerCS", "[", "m_", "]"}], ":=", 
  RowBox[{
   RowBox[{"FindMinimum", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"pERR", "[", 
      RowBox[{
      "\[Eta]0num2", ",", "\[Eta]1num2", ",", "nSnum2", ",", "nBnum2", ",", 
       "m", ",", "1", ",", "t"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{"tmin2", "[", "m", "]"}], ",", 
       RowBox[{"tmax2", "[", "m", "]"}]}], "}"}]}], "]"}], "[", 
   RowBox[{"[", "1", "]"}], "]"}]}]], "Input",
 CellChangeTimes->{{3.8370651702250824`*^9, 3.8370651774187517`*^9}, 
   3.837065208526224*^9, {3.8370654678598213`*^9, 3.8370654869432535`*^9}, 
   3.8370655583936954`*^9},
 CellLabel->
  "In[336]:=",ExpressionUUID->"45c01752-11ff-4e65-8a9d-c2bec707df6c"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"pERRscannerCS", "[", "mnum", "]"}]], "Input",
 CellChangeTimes->{{3.8370651944780226`*^9, 3.837065194959303*^9}, {
  3.8370655712038603`*^9, 3.8370655784426875`*^9}, {3.837517276188753*^9, 
  3.8375172838502417`*^9}, {3.84505323470785*^9, 3.8450532425978003`*^9}},
 CellLabel->
  "In[341]:=",ExpressionUUID->"da897468-e80b-4c0d-94d2-343cb298759d"],

Cell[BoxData["0.45083947044680106`"], "Output",
 CellChangeTimes->{
  3.8370651951762238`*^9, 3.837065492826544*^9, {3.8370655635599604`*^9, 
   3.837065578810314*^9}, 3.8370661683782935`*^9, 3.8370664837784777`*^9, 
   3.8370772713254557`*^9, 3.8375172843843975`*^9, {3.8375198587953863`*^9, 
   3.837519881496811*^9}, 3.837520048767931*^9, 3.8375200889190655`*^9, 
   3.844679141645219*^9, 3.8446791875445356`*^9, 3.8446793466982393`*^9, 
   3.8446794370177665`*^9, {3.8446795636313334`*^9, 3.8446795908034253`*^9}, 
   3.8446796212402067`*^9, 3.8450532431530037`*^9},
 CellLabel->
  "Out[341]=",ExpressionUUID->"ce74ffa0-4f67-4ffb-8975-b464a3d995bb"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LogPlot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"pERRscanner", "[", "m", "]"}], ",", 
     RowBox[{"pERRscannerCS", "[", "m", "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"m", ",", "1", ",", "10000"}], "}"}], ",", 
   RowBox[{"PlotStyle", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"Black", ",", 
      RowBox[{"{", 
       RowBox[{"Black", ",", "Dashed"}], "}"}]}], "}"}]}], ",", 
   RowBox[{"ImageSize", "\[Rule]", "350"}], ",", 
   RowBox[{"Frame", "\[Rule]", "True"}], ",", "\[IndentingNewLine]", 
   RowBox[{"FrameLabel", "\[Rule]", " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"Style", "[", 
       RowBox[{"\"\<Number of probes\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}], ",", 
      RowBox[{"Style", "[", 
       RowBox[{"\"\<Error probability\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}]}], 
     "}"}]}], ",", 
   RowBox[{"AspectRatio", "\[Rule]", 
    RowBox[{"1", "/", "2"}]}]}], "]"}]], "Input",
 CellChangeTimes->{{3.837065611160088*^9, 3.8370656214935865`*^9}, {
   3.8370656606783295`*^9, 3.837065666209646*^9}, {3.837066574646344*^9, 
   3.8370666028626175`*^9}, {3.8370666500955057`*^9, 
   3.8370666817121964`*^9}, {3.8370841359650764`*^9, 
   3.8370841615669165`*^9}, {3.8375174835933123`*^9, 3.837517486442952*^9}, {
   3.8375198969300327`*^9, 3.8375198972298856`*^9}, {3.8375199441168747`*^9, 
   3.83751994456085*^9}, {3.837520058434544*^9, 3.83752005876822*^9}, {
   3.844679456441162*^9, 3.84467945661302*^9}, {3.8450533706815243`*^9, 
   3.845053373571571*^9}, 3.8450534409902444`*^9},
 CellLabel->
  "In[348]:=",ExpressionUUID->"264221d8-a73d-4c35-8037-76e8c218c657"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
      LineBox[CompressedData["
1:eJwVlHs41Pkex2kVPXZVEiYyyHX8OqdWxCIfwgrLQbqMcwglxq2LR7qwudRx
SzjYTRqslmEtuWRIfD/8lmNVYliXtE5usWMxRmtmSZ32j/fz+vP1+uutExjl
dXaTjIxM4Mf9xR+zHf78RUZku0Xp3OMj92fJe6dqi6sO24ERqcFX+t8cyQpV
XGlL0YSTwfVXDpLfyA6nhqGEYD2Qj55+O3BZSNjDk6YPUljwxtF1qIAxT7wa
UpyDfPbD4bBDU/JV82T1HfNydLApsJifF1iZ/k5sM90H81MsQZ6S/Z5tvECm
h2Y28e5aw7lrlNXBewskhRl3oLnSFpa0F1oPKSyS0BGf/0a8sQfn/sQVn6FF
UhearJelcBSEJUAFG4qInFJfi3q2C1ButhY53iJyvE7Du4ThBi5si+6eeBFZ
X6tLqGN5wBc2QWrVAhHR7TofxSnzAkeP5N3jF5ZJ2ImiZxndJ+FMZnFqYb6Y
5Bo7qvdnnIKsYVct72YxaVsXBu3yZMP1XuezNWNisr3YfP3+qC8k3Aj7IYS5
QhrmnhvXCP1gPEXG0qZ0hXywjqdDbgVCfBsvu4v7ljj3Vmmn80KAQyakYxdW
yYCyDmdRORRG5tpP6WetEr8TefWecaEgvamy5ly9SqJfxzmpe3GA9+xck65w
lRSL3cO/Xw+D9VSTQIvTEiJVXeYT9yhosLiRnuskJYM1BYZX1y6CZNw6Wkdm
jdyUjrdVF18BVYlTb5nVBpmcUc9r25wEmztfly6ckcWC7/hfSjVS4WfWRn/G
0ifYrBp+0KHxDnyYH+/bnL0Fp3/p8J9YygF7RuFwiUgBmdfZHRVO+eDGjn9y
8aIivnkaHjR2+y70bMuO4I59hvpVtd5lhYXwoZFvvGPrdlQLkQ24ulAETfYx
E7oWO9DuZfv4SmIJzO4QzL/yUEYbH6D85UvB57iddqr/TlQ+7KDwouoBlMam
eQ4nqaBu1ES6onkZDEsyJTk5u/BTJTmu2+ty8Cj/SWtPoyo+kT3j0ZFYAck8
keSeQA15Nv/iyW39AfadZObfeamOkbNjd1wfVoFn+E3TBAkDz4+uaPlbVUO9
DE55y2igq2W29eXZGvCVCGqMtDRRsvro3UTnQ9iojdAkZnsw+I+l6sXUWjgq
PmzcZKmFHZXhvDi/OogI/k9rpxcTreUa/xDr1cMMHI82p7RRXYGbkzhbD+XX
t20yqNLGiY7umNzHDSC25psUmOtgtw5WZ3z9CJ72MNTS+DpYeGhtn7xPIxgL
edNSe10ckAje3TPgg1XZBif3qS4a/TOWqSbkA/v2lD7tshc5l0+nqrQ1Qd6+
Ts2Lg3uxx3zXl9KkZuCbG/l3HNPD28Uhx1YdH0Pog+d9vgI9tGl/z4tRb4Em
uyK5S2x9VLwV4Pnrqxb4Tnb/kO2oPnbJytt11T4BE2Nm5q1AAyzSuZKcF9sK
onyze+mTBjg2n6r2tVUbZMyXW/7mb4hyEb8uC5UI5Ct2pbXOGqJrzgbTZpAA
+XSE4R9shLaHHvYo+CDMJrXmXFoywvS1/ftk2hDyO1VSlKKN8c22b5uFzHaY
PsBQ/3zZGPk3ikNV09rhmatH7GAsC785cueI2UI7hO4NO/tKysIK368cA9w7
QOUtr6cy2gQPvKji9PI7IDMgYHZkzQS7c8XNf9tNQ0sKxbIModBNUfR+RoOG
Zm6cSxCHwr6EhSP399AwyhlRzgyncDRy7rmiDg0q9i705HkKhc7jE3OGNCjX
rc2kXaHws42ft5aa0VBRbFf0Ko1Cr7Mlp9Q8abib9rQy/kcKh8a43F4vGrK8
WyoraihkexVO3TxGw4Cvp/5ALYVBtt9EvD1Bw6m0lTKDRgqjGbcT+v0+9kUU
sV60UZj/PLYiPZyGWo3wL/b0UbjbIWbRPpKGGJNH5s4CCrmPL5muRdHgt+XR
tQuDFJaXR7aGXKLhnOti0k8jFDYlnOl3vErDsqa8X/gEhdbSANWNazQo7Cxu
ypuisD3S37chjoYLiYrlOENhjy97RjeBhsnTf3ffKaTQXXCC9TKRhunT9co2
v1MocPaJyk7+6LtR4xO8SOHxj4/tfIuGT466c7NEFI6Z/ePPD/+mwTNOIt8i
pvD/bgEc+w==
       "]]},
     Annotation[#, "Charting`Private`Tag$95813#1"]& ], 
    TagBox[
     {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
      Dashing[{Small, Small}], LineBox[CompressedData["
1:eJwV1Ps/1PkewHGKk9gQuSWm8bXHZg+tbdXaWO9yX5ekhrC5VY6ZxqWTkKVy
yRC5tEaJQSqXmjOT+63m8zFfa21naSuXNLpMyDSu45ZF7J4fXo/nf/CihkR6
ndogJycX8nf/97959n/2yc3YdsR+fe62xRhac+R9G2+vDu7tMsOsAxKUS1eZ
E6TvgJtRLlnr8xK01bG+PynUGN4ZGwoX0z4gv4F3e+6km0KZbMvAJ0Up8qpP
dz5B+wqKk/gURpwULa5SYqND90Co95WU+2Ipss326C1It4IPezoGmWXjaKR/
dENVoTXk2jfsOLo0jtIpiRYt92xBrVIz2tNtAtFf0H4Nf38QKk47rN6VTqBa
eqpxrpILnAvy1ApVnkIKqn+06eb9AMwPXSyu+xTyrtU/ckvPDZSN62vpOVNo
Zbk2qdb0EMy3M5U7VKeRUWdUJKPCC77XdLtZuD6NTvuU/p7VdQxMWr0vTopm
UP4uB92nWb7g/cKkeGJhBglWpCe0DvtBeIdCTbmaDKmX7V3hDPrDtLejPxyU
oXpJ9y6+NACMfpvxzb4jQ+vWF8iwtBCgPp7mHgucRc493J2ZVWGQL6VYtTXN
oecaVMaUBh0CR/s4C91zKMCHXXc4kQ4rca6uW0fmUPTbREddLwawzhelTavN
o7JZD+bdldMwtDFls3/oPFrSljUhj0igRfPXzqkuoF7+TZP45f/AwkBnv8Kh
RXR56bWAV3YeppQvF14vX0LvRnXZAsUUiL9bGn2AvYpuljc5LelnQF72ypkf
NeVwizbzG/vGHPBld3g2jMnjkT5hoHj6GuzuTNDUz9yIKQl+wmrHAtAT9DYx
7BTx+/8xT4iuFoLd/MljhZJ/4M+5NUcqiosh9Bvb5Gy6EtYJkw+OnywFy1j9
f49tVMYHXra/nku+Be6cOMmpRBVsQ4N/BW66DbM7ZvLXpZ9hje/tlZ5w74DB
BoNQ37Oq2ChSnKmytwL6cwYaR16p4c9UFUrc3lZCmdn26Ic16vih/MlDwuRq
CPnhnmtk5FZcZXO8SmHzffhOkKpBpWjgiDFRjusDLnAHNS8kDmngqME5w8D9
PEhhW+nuy9LErlZ51rFjfLAYlqvhuGzDHxcbVsW/PIC+KDqrfIMWDl2Y5k1l
1IAiX3bjPE8LC+8xqxIDamFc+vUZhTBtbK3QuDBrXAfHX0alsrfpYF2lkmvJ
Y3VQaTzhY/5IB4uFXTH5rfUgv/5LcPxZXdxFxbysiw1gOrxVrG6gh4v3LZtt
ojVCi2Js3ZFePfz847PVon82wfGPPw+1srbjL36Mo+hIm8BdlPB5ubk+ZsQG
ZWwTNAP/1xF5i2F9/HivltNSSgts7uwO883cga+WhR1ddGgFQ9eI8MHdBtim
fa0qRrcNGEwl2xWxAVZJCz78aqgNKqT8npcsQ9wpv+lAZ81D6MutsqLtp+BS
6vlUdtwj8O6bY5W+o2DReIbOxf0CWMlk1Zjb7cQK4a9kUlUEgQUS5RdFO7Hr
tU8Um14El1af8GKmdmLbfQ8eK9Ew1DdXcIacqDhz+SszOQEG1Y8DrpdKqfi9
2o0WKaUdIojdQmMZFTddKqNrX2mHn4d5BVddjPB1uxw7y8l2cDJ3Eq8WGeFq
f3eHYA8hsFgcWsOEEbZ4wmX0NAmht7slaLc9gbvyZ1vMt5Ogf+MBu5lNYDeV
mbVRfRLmndZjjK8T+I+kSTuOAQnbJkq8c28QeDBC0q1CJeGt2TP1sCICS51f
iyUmJCQHqZ/RuUXgLZ9+23zbkoRXwbvE57gE9jp1y1fnMAl3MlqSLEgC94tK
Snq8SKj15ZtxOgjs51U8fPkoCaNv1gaUOgl8wvZ6+LwPCS6mXJO3XQSO1rua
9DSAhEVLp7rsHgIXdMdVZzJJyPyy7afxQQJvt4+ZOhhBwuv7zC0+IgKXtJ7d
sxxJgueXCRzhEIErKyMehZ0lQd6msbnwDYGbk04+dYgnIWVjichplMDWS8Ha
n34iwXfCMajuPYHbIwL96xNJuDt/aNhQQuDH/n6jRkkkJDBSRhakBPZ45mP6
MpkEuwBeSPAEgZ850yLzUkm4cuG7N79PEtj772M7p5FQrfKF37fTBBZZev65
ziKB5hL7/PYMgf8CCZsmgg==
       "]]},
     Annotation[#, "Charting`Private`Tag$95813#2"]& ]}, {}},
  AspectRatio->NCache[
    Rational[1, 2], 0.5],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, -14.474083184205172`},
  CoordinatesToolOptions:>{"DisplayFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& ), "CopiedValueFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& )},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{
     FormBox[
      StyleBox[
      "\"Error probability\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}, {
     FormBox[
      StyleBox[
      "\"Number of probes\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}},
  FrameTicks->FrontEndValueCache[{{Quiet[
       Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , 
      Charting`ScaledFrameTicks[{Log, Exp}]}, {
     Automatic, Automatic}}, {{{{-13.815510557964274`, 
        FormBox[
         TemplateBox[{"10", 
           RowBox[{"-", "6"}]}, "Superscript", SyntaxForm -> SuperscriptBox], 
         TraditionalForm], {0.01, 0.}}, {-11.512925464970229`, 
        FormBox[
         TemplateBox[{"10", 
           RowBox[{"-", "5"}]}, "Superscript", SyntaxForm -> SuperscriptBox], 
         TraditionalForm], {0.01, 0.}}, {-9.210340371976182, 
        FormBox[
         TemplateBox[{"10", 
           RowBox[{"-", "4"}]}, "Superscript", SyntaxForm -> SuperscriptBox], 
         TraditionalForm], {0.01, 0.}}, {-6.907755278982137, 
        FormBox["0.001`", TraditionalForm], {0.01, 0.}}, {-4.605170185988091, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.010\"", ShowStringCharacters -> False], 0.01, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 
        0.}}, {-2.3025850929940455`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.100\"", ShowStringCharacters -> False], 0.1, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 0.}}, {0., 
        FormBox["1", TraditionalForm], {0.01, 0.}}, {-16.11809565095832, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-15.424948470398375`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-15.01948336229021, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-14.73180128983843, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-14.508657738524219`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-14.326336181730264`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-14.172185501903007`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-14.038654109278484`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-13.9208710736221, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-13.122363377404328`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-12.716898269296165`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-12.429216196844383`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-12.206072645530174`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-12.02375108873622, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-11.86960040890896, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-11.736069016284437`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-11.618285980628055`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-10.819778284410283`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-10.41431317630212, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-10.126631103850338`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-9.903487552536127, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-9.721165995742174, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-9.567015315914915, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-9.433483923290392, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-9.315700887634009, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-8.517193191416238, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-8.111728083308073, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.824046010856292, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.600902459542082, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.418580902748128, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.264430222920869, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.1308988302963465`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.013115794639964, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-6.214608098422191, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.809142990314028, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.521460917862246, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.298317366548036, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.115995809754082, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.961845129926823, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.8283137373023015`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.710530701645918, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.912023005428146, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.506557897319982, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.2188758248682006`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.995732273553991, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.8134107167600364`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.659260036932778, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5257286443082556`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.4079456086518722`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-1.6094379124341003`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-1.2039728043259361`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.916290731874155, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.6931471805599453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.5108256237659907, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.35667494393873245`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.2231435513142097, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.10536051565782628`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.6931471805599453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.0986122886681098`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.3862943611198906`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6094379124341003`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.791759469228055, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.9459101490553132`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.0794415416798357`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.1972245773362196`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.302585092994046, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.70805020110221, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.995732273553991, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}}, {{-13.815510557964274`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-11.512925464970229`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-9.210340371976182, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-6.907755278982137, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-4.605170185988091, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-2.3025850929940455`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-16.11809565095832, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-15.424948470398375`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-15.01948336229021, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-14.73180128983843, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-14.508657738524219`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-14.326336181730264`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-14.172185501903007`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-14.038654109278484`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-13.9208710736221, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-13.122363377404328`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-12.716898269296165`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-12.429216196844383`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-12.206072645530174`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-12.02375108873622, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-11.86960040890896, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-11.736069016284437`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-11.618285980628055`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-10.819778284410283`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-10.41431317630212, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-10.126631103850338`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-9.903487552536127, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-9.721165995742174, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-9.567015315914915, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-9.433483923290392, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-9.315700887634009, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-8.517193191416238, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-8.111728083308073, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.824046010856292, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.600902459542082, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.418580902748128, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.264430222920869, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.1308988302963465`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-7.013115794639964, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-6.214608098422191, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.809142990314028, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.521460917862246, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.298317366548036, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.115995809754082, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.961845129926823, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.8283137373023015`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.710530701645918, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.912023005428146, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.506557897319982, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.2188758248682006`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.995732273553991, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.8134107167600364`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.659260036932778, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5257286443082556`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.4079456086518722`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-1.6094379124341003`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-1.2039728043259361`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.916290731874155, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.6931471805599453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.5108256237659907, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.35667494393873245`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.2231435513142097, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.10536051565782628`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.6931471805599453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.0986122886681098`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.3862943611198906`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6094379124341003`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.791759469228055, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.9459101490553132`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.0794415416798357`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.1972245773362196`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.302585092994046, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.70805020110221, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.995732273553991, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}, {
     Automatic, Automatic}}],
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->350,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None},
  PlotRange->{{1, 10000}, {-14.474083184205172`, 0.}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Quiet[
     Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& }]], "Output",
 CellChangeTimes->{
  3.8446794748765626`*^9, {3.844679566687684*^9, 3.844679592129451*^9}, 
   3.844679623841572*^9, 3.8450532646338654`*^9, {3.8450533713844953`*^9, 
   3.8450533742120523`*^9}, 3.8450534456665688`*^9},
 CellLabel->
  "Out[348]=",ExpressionUUID->"6fcee853-9f8d-46ec-b263-b5eb494ef009"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", " ", 
  RowBox[{
   RowBox[{
    RowBox[{
    "below", " ", "we", " ", "check", " ", "that", " ", "the", " ", 
     "squeezing", " ", "is"}], " ", "<", "1"}], ",", " ", 
   RowBox[{"i", ".", "e", "."}], ",", " ", 
   RowBox[{">", 
    RowBox[{"0", " ", "in", " ", "decibels"}]}]}], " ", "*)"}]], "Input",
 CellChangeTimes->{{3.8450534663789062`*^9, 
  3.845053484018746*^9}},ExpressionUUID->"721051eb-dd93-4563-8101-\
1a87ec9bee86"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"LogPlot", "[", 
  RowBox[{
   RowBox[{"Block", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"$MaxExtraPrecision", "=", "1000"}], "}"}], ",", 
     RowBox[{"N", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"-", "10"}], " ", 
        RowBox[{"Log10", "[", 
         RowBox[{"SqueezeVALscanner", "[", "m", "]"}], "]"}]}], ",", "50"}], 
      "]"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"m", ",", "1", ",", "10000"}], "}"}], ",", 
   RowBox[{"PlotStyle", "\[Rule]", 
    RowBox[{"{", "Black", "}"}]}], ",", 
   RowBox[{"ImageSize", "\[Rule]", "350"}], ",", 
   RowBox[{"Frame", "\[Rule]", "True"}], ",", 
   RowBox[{"FrameLabel", "\[Rule]", " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"Style", "[", 
       RowBox[{"\"\<Number of probes\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}], ",", 
      RowBox[{"Style", "[", 
       RowBox[{"\"\<Squeezing (dB)\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}]}], 
     "}"}]}], ",", 
   RowBox[{"PlotPoints", "\[Rule]", "40"}], ",", 
   RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
   RowBox[{"AspectRatio", "\[Rule]", 
    RowBox[{"1", "/", "2"}]}]}], "]"}]], "Input",
 CellChangeTimes->{
  3.8370657101106186`*^9, {3.8370657618204885`*^9, 3.837065798194036*^9}, {
   3.837066113494692*^9, 3.8370661149612803`*^9}, {3.8370661893946857`*^9, 
   3.8370661977730236`*^9}, {3.837066697730511*^9, 3.8370667516657543`*^9}, {
   3.8375172947598457`*^9, 3.8375173283893385`*^9}, {3.8375173770378237`*^9, 
   3.8375174516520824`*^9}, {3.837517489735274*^9, 3.8375174910063477`*^9}, {
   3.837519925380952*^9, 3.837519925714241*^9}, {3.837519981701226*^9, 
   3.8375199949311223`*^9}, {3.8375200677663383`*^9, 3.837520068035055*^9}, {
   3.837520128603284*^9, 3.837520137208918*^9}, {3.844679513980157*^9, 
   3.844679514108738*^9}, {3.8450533215941806`*^9, 3.8450533313867054`*^9}, 
   3.8450534374571657`*^9},
 CellLabel->
  "In[349]:=",ExpressionUUID->"bb73951e-6113-4e1a-a2c8-fc82f50a1970"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
      LineBox[CompressedData["
1:eJwc23c8Vt8fAHAlJdmVFSkhScqmyMcom8yIZGZEIiujrz3L3mSTvefDg8eI
kJYGUpIkEpKZ8Tvn91ev9+vePGefzz2fe09aOOlY7yUjI/u+j4wM//sso+k9
9Z5FWcvmFJWTwZuyCX6e5gS7wxDvdNkyXH1N9p9DzrMUu5MgaazcwTy0KluW
GmKid/wMfKGlsH6fvip7/pvYRqjdBehfsYib8luVDXvA1/1dQRSufttIYL23
KjtBdyxa4bgkbI2mamVZrcpKFdLcyFm/BGdl3p3pMF6VjZMm49l9Iws5h41u
/tNflXW32/CoeC8HkElGQ6G9Kptb53JzvEsBFHT+XKXQWJUd2p2Tp66+AnVR
KgYElVXZTVVrvkuZSiDDOia9fnVVljfpM419pAr0mSUsZSuuyup+vb6c4qkG
qhkhNE/kV2X9BF5/7LXWgDgW8Z5PgOrjodq2qqMF6zf2B+nKrso6fP36mjH7
Gqyxy7msyazK7g3NVCxJ0oall3W1JOlV2RQB40a5xzqg8jf3feklVP83zPwj
gbpgTyy6VH1xVfaZx3DGPS89+LVIHB+SWpU14Yilo3TWhzf+J3d3JVdl/3Rq
BGTZGECQeLWgAnKYLdWKuOl14InY05oosSp7nLbXZkjPEIoN7ij/FV+VrasN
HLVWMwKK+7SLFsiqRqCxLXcDhGlC5UbFUPvubLUnSBrDVCydgjGye36zsMB5
EwjcyV6ZEl2VpVZ1L+jiuQmUE6bu7shSiQsRfxhvAe3hL/PlIquythzvd7r3
mUHE68QOHWSRe6JN9H5mwJbj2L8lvCr7/OgSf5G7OTQ+pnxtipxgqzW1vGQO
xZ2EH0eRb7WUP5F1tAAGdy6zt0Krsitm9vQfLC0hd+YhmS5yR23fc64vlnBn
rusYC/Kj/acD796wAnLm3/smLqzKcpV9W6HQtoZzPNvP3ZDnd+QqtQetocEl
NfAKcpN2tu0TpdtgrPFWjhlZc81kTPSyDRhpJg63n1+VZVVtSfBrtgGexZzq
JOSpDFbNQVFbuDQzP+CE7CX/vsPyrB3YG/mHcyMXPtYqjGO5AxG7ypJZgquy
zhPltz7H34HzOVZDfsjSItSs/HQO0NBrec8S+c3HvkgShSMU7LopnUV+cvb0
FRp/R3Cb7vpBi2z7MHjHcMsRAl1+NC6eW5UVff2tMd/jLuQ2tGUMIe+eknde
/HMXqt4p6hQiqxt95Ur3dILD+mZHnZFTovyGr+w4wR2h74kJyH++0imsy90D
QvHd3z74us+X9BdB92DOWSrTGvkyc+Xf3N57EDlbqayFPFX9UMOTyhnSa79l
SSFf+MGxyxXjDDkTAvsZkN/7z19ff+MMR95GzW8LrMr6sBOrXhx1gZVPfaaz
yH3aJhae6S5wQHZ/WQ+yeWtaz4vC+6BxfulgADLldfvjeT/vgyCHlbwLcsWS
lIengCu46/EvWCBv8o7wnapxhYRhI7sryHGxzI88iW7Qlf/zCS2ypMCPKQ0y
d/gYujm1B/nzswaZUwruMDCeLrhydlWWf0t/4UWfO5yokFIYR+66naBzatgD
/gXpNVUi2++xKl1n8oQLU8vr+cj0GSL7how8wUrW1DMN2eT1m3rPL55wfKea
MwT57yUG1qHZB/D+QMH7W8hp7yec8855wa/LnQQDZHCu6ve85wUUFJsvNZAf
FWr5nFr1givHfwRJI3MzRH3x3OMD1N+Wlo4h95felNRU9IFHv9T5jiDfu3ou
9lSoD/x6vR5EjdzqPSg/RO0L/d5eGdv8q7L601SFp1gewnqktctX5C2/0Z31
Gw+hclWtZhQ591jJ9aEnD+GNvRbtMPLvayoHH5z6D8yM/dl6kRPmWCw0byMH
B/d2IF8MmSGcKv4PLFNOxBOQJ040Hd6Y+w/my7Qf1CF3jSuI2zD7wZOPEm9L
kekfa/9LE/cDjd/hw4XIptK3Oob0/cDybSdlLvJmmpeqeIIf1NQ6FaQgCxtW
m1Iw+ENHhyFNCC7fm+OheVQBEKww/OEW8qK/gPqHMwEwadN10AT5stBFhkMq
AXDwpezv68iPJpTeX7YNgLH+iIP6yKPR+ukuoQFQv9XAo43MJ2tpVlgYAOrW
MYqayO6/7/GM9gSAZbhp4xXk7icPZ2m+B8D+isoyOWQGjUeVcvsC4cA2W70M
sl/vxocv24Hw8LCKKSfykPuBJ4c5guBe/uGXx5DZeY9aKEkHgUixnCoLclPQ
hV8VXkEgw69uwIC8IGdD9nAtCBqnLsyT4/ZoHeZjXwoGPs/mf7Nn0Pp/Z3Je
iz4EMtYPUM0gb7It1gSeDwGeoi/c35GTHhySmXMMgZaG+2ZfkIfE5bUJsyFg
lyFCMYwsU135wHAqFGSvae5tR26tC4la2BsGXZx3/iMiSzfdzAs5GQb3m55z
tODrLaJNHBAGH/iZB5rw9fZDL+pMw8D6XK17A/YLmxMMI2Fg1cnsVY79k7P3
+Ytw6AvjS85Avngy5silxkh4vWA45oVM4LY58+ZdJHwQ2Nr3AF/nu3zZ7m8k
fDs17u6Bff6XTbLQI2jMK35+H1tGuWW59BH8o3dMccD/HzhfRfQ/AvU250l7
fF1xderkz0egTHtJ1A5bLZ/2Gu9j0Cp+OmqNLGVEZlGW/Rj+XhNWuoXcZPLB
XaH9MTAsMgXdRJY0q4gcHX8M5aPnXhlj25jUUx6LgmTOD1cN8f32Iv1ZUlFw
XH7OxgBfv0v1RdwwCswDl+31sN2aKK0To+Dg3r/XruH7PaM5tmqjwMn0tZom
vu5zWzj+TRSMGTf+VsMOPGJCoosGYvWT9av4/pC5e4aC0fA8SV9ZEV+P6Axe
UI+GlxM/XOSwY+9VckREA/+KmeolZMMX1wPUS6NhVCukWALZ86CsvvdgNExI
j70QQf7UEeLrcCAGbm+6up9F/mW6OU3OEgO/ji7M8yJvbTleS+eLgRFDNQEu
ZA4p/VP9KjHwWk5hmhlZ8EPfI/MbMZAyb2rBiHzZTXp13T4G9HXS8qmRTatP
PT/9KAZeqBTeJEPOPPPnbvBQDFT6v1if4kPrba/1R/YvMXBPxCxwHLnNekSu
biEGmP2uzb5DHiLXKFUji4VWqmfrL5A/53Qc+UYfCy1PTcieIf+WFX3odTIW
WJ5cKiYi74w//cEgHAtvLuYZnUa/R+tzTLtYPhYUPH0ncX2Os0UTQDcWaKiP
UfPg8jft5f5oGQsdGfv7T+HyG7g/dnKNhddlLx/g+prG3TTLTIwFrVcfdzmR
s6gE9m99iAW3wMKPbMhVRVlO8TOxQPtfaSYrcsfVwyP8G7HAfjouiAV5ImCz
1IgtDppzHBeOIp/416fdaBIHTJG2+gzI2XPWT1y+xsHroB5TSuTcwSzRn7Px
ID379uE6qk+V8W1+68142LEtL19DJs4KnPh6MAGe8++bXUX+SEk4NMKXABLL
q9dWkGmvDE/23U6A3QWm6iVkLyJlbNFkAlTLJonPIYepvwzh/pMADhwhrL+Q
E8cSfbL3JMJ25OdEfD3X3sSFnSERPh/hXZ7Fv7/BZZtyIhH4OM1+/MT9E/bz
5pELieDr3mqEPcBcpRsjmwiJ+66OzODyFLqrUGslQi677bsfyNNiMrJhpomQ
xPuGGvtvN7nYvruJwDz2fuw78h69fn4/30ToYng+hccDu8t1Js+MRJh0aB6Y
RObfc5z6b2kisAW8rvmKLBEztedeSyI4Sj4rm0BW5Cxdm+tPhKWexy1fkHUq
nOdtRhOBlNo4/xnZTEby27efiXBQoACwHQd3Pt7aSASbg/8c8XgLm43svs6S
BF0uOZ/H+PB6qEN4ezoJ5Lc4T2LnUbJWaUkkwbsvxWqjuP68helKBkkgk2wf
/hF5sN4htss6CRgqBfo/II8oioTKuiXBb5YjVNjTbzd8WoKSwD+RTu89rr9F
h4tEQhIUzn3+M4y890+IbW1eEoRG7MTi8U7nr2F6vjYJDE0++bzF7UF/RK+0
MwnUhsq28HzizxpVOf0mCV6+lvMZRNclBXNk874mwavu1ZM+yFeINmKcS0kg
5k9T+RK3h7rg2XSyZKjsrYh6jdtj7O8JZvpkePtkJgTPp7v2LUzxnMlAeeaJ
FLb3hj813flkeLcst9aP2ydMeW/k5WTIecp0pw+3DzPd+n7NZOCp4wjoQc4v
fDcfcDMZmOf9eTuRq8Uyvu04JEMC59F7bbi9ui1GvHyS4c6XkRsE3F66Z16u
RiaD9zv6b/XIo5ML3S7pySCUMMxSjTzj3ED4XYLK01dAXoZMHqNQOP08GSq4
xHezcfkvMXpXjCaDvPOzwjT896cntNznkuHR4BxrAh7vMg83KGhS4MhJpagQ
PB5n1IdecKRAw1Jk1H/IYgnH8hIFU2Dh5P4kT+Q42VmPm7IpMHjPvMwZeXG2
SZ3nWgpsSB6vsUfWTAo9OW+WAuN/fXpx/crkDFbrnFMg8cBbVmyqee4Bn4AU
KLAYv0dCtklZzlKMTwFfDpvhDuRuhU5X6vwUkOM3PIvNtRCjMlyXAobhVj7t
eD27Irhs+T4Fzi0dvoDbS3ppq/fsjxRQeC8TjNez1IyBjOW1FKhe9p9sRdZb
tr0ayJoK2xdii1vw/MvOS801SYVX+Ys8zchN/1jg62QqSBjredYhMz39caR4
ORV4HMLGapFddRp+3tuXBuderqliny/WjSfjTQMGt1rhGuRCg6hpTrs08DXe
S12FHF9N/th0IQ2WPPa3leLxYvN7ZOxfOtjmJ/XmIU+15hjoU2eA1rL+LWxj
Rv23Q+wZ0MeUPJaLrExsGSTJZIDwl/+2c5BPHQ5vf/pfBsz9+8GP+/Nj26mC
++RPwLmU0jkDWevIh5Pzh5+AAc84E/Yzu4jM29xPIDKgKCgdufbIUrLRlSfQ
Te6Yi/s/yr4tQjb0CYTRHm5PQVZgMrp36FAmHOt7cCsRmXCHej7oWCaoidl9
xOPjAqndbudsJjy7KGSHfdyB13JJPRMqfhTHxyOvk5b1P0RlwoNb3b9ikZ2Y
n765lpUJZE3VYdjTDje0+iszoae2+AT2W2aSMvFVJrA3N2nHIKs6uvaIf80E
XdOwX9HIHZ2n5auWMsH9x+FebAmWsbYze7Ngf3IMNXaFY9SlPMYscHf94xeF
zN0l18R+Kgvy0hmaHiOns6yIJolkwcczP49jM94tqqZTzAIWvcj8R3h+dhkL
hutlQfLbDUXsXRa60r3WWWC/e/FrJLL73c7TPm5ZENjKW4/9q8stfyU4Cziz
d+5jW7KeOemUhK6r5FzFHr376clMYRZ8eMzLin2tO5rNojEL+t2Y/0Qg97Iq
JI/1ZkF29WQP9mWn1cP6H7PARMdTF7uuuzhmaCYL7gzfo8I+y3aTRnkjC6wl
rn7A4/O1BGXPxL5s0GKO4K9AfjRpHshBkw28f/yS8Ph4RvE9dPBINpg275XH
/Ud2xvaRN3s2SL1q1AlDvqg+F8PPnQ0SFHervfB4drqbOHI2G9gvv7B3wO0Z
t5QaJpINJIrBwJt4Pal3zZS4lA1LXjJrGnj+jazlTstnA1eOzBW8PphseT1N
VM0Gg42z88F4fePcKVXUyQZ1NvZk7Ffy/lXLRtkQyn9dHlsxPLRZ2y4bArhG
EoKQzzElDNCEZcPlKjcIRLaVYn7VGp0Nu7YafwPwfmqSNnwnORta//HlYzPl
ZY8/L8yGt7riZNg758sXgnuygebJYqUf8pDKs8M7e3Mg+HPtlYfIlI4qLOVU
OZDHnrDsiywfM8huwpgD3Fu9NdgN79/wEE7mQKhqPz12puUXCXfIgb1K+SPe
eL76rhv/9s0BsXL9kAfIRdneZk+Cc0CuYlkSe7Jrx0r9cQ7cOqohgduT/Ye/
3b+EHKgeYd6PbUBFcbckIwdKzTxe4vtjzoW5GOXnQKLZXCJ2/7VDHpRlOTDf
yHcd+3Iyg9/tlhy4HFv3Bq+vnoSEoKNdOaCjTxaJXTPOHN7dnwPaVBKA/Yss
/fH9NzkwYrf9zwOZl/t4HNdoDhx7rlyMbaaUk/T6aw40WwlrY6fZc6f7/cwB
TZdQd1fk4cdPs84v5cC3d6Ma2HTV/Pmf13PgXnSjILbLpFCKyJ5ciHaQWr2P
7z8s9SjsYC5kW9L3Yqe4K7kKs+UChTGzFfYJaSvFkEu5IDKd4eWCHOB4R3JM
IRe8ddiksacyXQQuqOcCv7o1A/bVVw9OBOvlwrx1Uh/eP4r2+B8ZNcmF8tuV
PtgXep9MnXuYCyrEHN17eD8ep+fxJc+Dv5GezHi81tGysL45lAdpf1wn7uDx
AZw0p4/kgcUxUytsT2fePT7seaD9X7MA9mjuuZVX3HlQeXONBlt6WPQnz7k8
yNo0zMT7VSaF9LiXWB4Ynwz1wba0Ve3hvpoHTKy3Nu3w/ErVbn6gmQev4voW
sPkGDMuHDPLgwyWHMOxf52wSPW3y4GuhODO25q274S+c8uDOSOmYLXJVjJsv
l2cetAbHV2C7LgdaD4blgbTMVSns99yRRidj8+CEeeSmDbKkQZyGeyoqv85P
InZaaKrcQE4eTPveYMPeasoWO1GSBwErV8dvI5vOPj3jVoPKZxmdgt1xrJKj
n5AHzoI3bmAHPyRSuA7kAavN4og1nt+V3Rt9b/OgwoqpHlv168A8x6c8kM2Z
MMKmVRx91/srDyL7LUat8Pw+uFZwjDYfFsbOz1kie9Senpg8mg8mWTx12IY3
DdlKOPJBeUncHlvyQLieM08+JPR5SWOzVjdHSZ7LB0vx5VkL5M0bs327ovlg
v5zRgz267xh5r3Q+FMvzfzZHbqlQk4lSzIfeH4NO2BmGPh766vkgSe6/a4bs
u7e8ml0vHxoKXMKxTcvG574Z58Mzj83ft5BlDWh5Sy3zoWKy+jr2CTJZM5c7
+UCZUZ5mirynxClN6n4+MPM9nMTr3aRu9jCZdz6Q357cj925/Yq2LyAf2GZu
c5kg5z3doxIdkQ+eR5mZjZGDtIUDDeLyge9R/KoRstU/CyJHWj641oR3GCJf
KYhfm8rJByX/e3ev4/mp1S1UVpwP9BshG/rIBzb+3rlfnQ+Xut6a6+H+yOUp
vNicD4X63aU6yCWrIWzP+/Jh4JlQlyZyZHajXsyrfPg80Z2ijuygOhN1/WM+
HJ/sVldFVv/L8vz4BKpv+X+flPD6mqlCPv0jH2Sc7gtewf2p7CVTvpAPZZv+
hvLIv5dKPFzXUPsKtQnL4vF5hfrX3gMF0O+87SOJHLsgzdtPWwCDVEkzong9
SHU0i2UqgKWvuzRCyKLzQ8OcvOj6/qVGPuSjybu0P84VwPwnj4vcyKtwQaVC
rAC6QhtiOJEbE2KJ0lcKgC1iw/MoXj8ud66RaxRAiVAYHT2erzN/hAb0CoCM
meYBFd6vpPUKjawK4ITmhYCd0yhe/cYU7R5YACdz489PIWc9VnouE1kAtO37
Cj8h+0l4klPEF8DoLVvBd8hykSMe8bkF8ONNU1APcrdwhlkVqQBKE0dE8pAL
Pg2meTwvgE42Kd805JCQ7eHLrwvguUGATCyy8qipyouJAtCcyZz0RR7wPyk8
u4v+PuU8kz5yk58iRBwohKNLY2aqyIX/2Wjy0xXCgrM5NeDy+Jbb2x8vhGGm
xZwzyOIPpPJmpQsh+ANE/ONFz6/3tI/MPSiENLK6uSRk91v+q3PLhUC7dDG4
gQetP6b5+x79KwTyNTnOIuRrN3sZBcifgqUfh28q8lljmvMOjE9h+ie7mzfy
hEGqza8LT+H6bXEeWWQ1zeqPvxyfwvd0kloPN5qPGsPTj9yewuujLzfrkXnV
1/4K+D6FT2su3YXIZKoyDI6PngIX70vDMOSGK89V5kueArPjf+FqyCdkvhLm
fzwFT4Hfyu9OofqohjWJLD4FCT4Fzx5ktevnGx6sPwXGC6Et9cjuzr7VFAeL
IEaMOi8JOfIhd6UaQxHcOmh/IxQ5O3KgLJa1CKaGmhY9kAcKWIs4+Itg+u/Y
NyPkiZqOAkvhIuB6wEGjhrzabpNXfLEIPjgKhEojH3pBm7MgXwTV85K2gsgn
RuszxdSKINzvbwEnLt8Pkwxv3SJY1L0Ww4DL95c8jWRcBB5aSoXkyGZ7SpMP
WBUB2bl+Rjz/3Gl1EjUcikD84tJHXRxfHduIi3ctgjXuCynYOXzZMSM+RXBb
0cwEu0FMKYozuAhE5M9TYQ/K/460flwEHMlWLXj+TmolhpcmFgFF88Y97DUT
6dClJ0VgXVXAhc3lERHgW1EEL9SfeWvj9TJIyK+roQje/3Q/g60R+9H3YHsR
CNUMdV3D86OU90HiyyLY87WUDvvFl06n8sUiULABB7w+TP6yc1xeR+0XIr+L
47X1Dfo7UnuKYbjSLvH/8duRW7d7GIqBlvttK14/PJX/mYwLF0PL0vVJvH5w
V4uo0rgVw+Bnal28flxsG1XS9S2Gb+S/x64iaw34X0kNLoa5pBf22F7fXwJP
EnKskD9eX16yOkjINBbD/JblsgLe73kPiwW2F8Ov0dk47E0RgvDz3mIo9SYX
wubWpBTU/1gMI65/A/F6dNG48mz6RDF0F0pJYGvZGpz5OlMMPY0jk3L49wLy
uR03iuE2zW9NbFpKN1uePSVwYlyUATv38ZWyccoSyPITeAnI4oeZFhPpS8BF
Ozceuz9lWkSTpQTuvPcyxTY93uix/0QJrJirC2P/yQttaTtdAs7tp/dhh5wx
3HU/XwKDRd/e4/XxWCWfwnmJEjh590Xx/9dL0Y2QH5dLQCWbKRBbkfC8P+tq
CcSb7L+L/VE2jdZQswQUIjlVsB167HXoDUogNujWOWwytUtJfTdLwNx3kgU7
4dWhUT/rEmg8lUaOzWfwiUPKsQTG/E/8uYzcOlZmvuRaAr2Hi0axr5n7FhT7
lIBrS+E49tS0xk/zoBJQJDzpxfZ0OH6O7RFqn76TGdjUf37fexNfAmcZ7lZh
Z3u010Wkl8A84/5ybNHt6HX5vBIIKTuch90XYCb9r6QEnAY/Z2LfpBTyq60p
gYDpW3HYfx7v6b5DKAEmZu1H2CGH3xzg7iyBatNaN2y21Fy1T89LQFD75QPs
iuP3oxNel8CiUdpdbPl8hbfqIyWQse1rhf3+zBFmiq8lEDZ7Tg/bvnLqBnGm
BKqcteWxd0TrM90W0e8pj0hhxxGCJ8+tlwCXTN1pbF4w4J3eLYG1Ih46bEIP
r33mgVI4bC29LoPjMbW1cgO6Unh3K+YL9uSr3iVa5lK4saeChO1ukCLWe7wU
xKwlCrGpPtk++I+3FAbsyB9jZ5lLESUES+HtW21HbNEfB/csipVCYZeJEnaf
w6hikUwpDDeRn8Fe9PAeZNEohUuxVdPSyBBFHNu4Uwri9wpuYg8fjuKsuV8K
jyuW5LBtU00t7b1LQTr7Bid2TP7u7GhEKdz/XDJ9CfkrQW6zpbgUdsxtXLAD
fvSwPPxRCh4PKMMuIl/2ZlP/tFAKR4+t38XepHX67+J6KbDfT9bAvi/OMr1K
WQYR0zmU2Bf6HVj1Gcrgg33aohTyr5sk9VrWMthQ4OjCtgq2r3XiLwOB14Xe
2CdY26dfCJfB3Ld5E+xPZYfZBC6VwWduc1HsFLDViFAoA3XWHnpsveFWvxm1
MiDrIM7jeILelqHuql4ZSH4Qay48g9bLf9Y/8k3K4HHXjTvZyGHRBDZy6zKY
7N/pT0G+copO09yxDHxFSIwxyHsbLf3b3crgpYkiUwhym2pTHcfDMnD5EsDs
jez1mXrGO6QMvmYd+HsXWdzF/NhoVBksayu1myP/oWjQlEwug4wCnmpd5IpU
qoCkrDKoPrPthfMBvKTaGZ2qMlDSjHiAz7Mn9SjZq5vKIJnC1x+fN2fOmGjR
kcqAzYK1bAfVh5l+f8PA6zLgSSwdwOeTlLcMAxWXy8BJuCgPP392/ylryP1X
BvS/++pw/O0XsmeWbF85dNEzcOH1eqO85BrxSDkEEHKm2JBnt7Y4xMXLgSqi
2bMcxxMx2toJl8thYb3vZQyyBXdh0J+r5UCuTpdwH3lUTWuu4no5eKhElkvg
+CQtp+n0g3JQ7ZwXIqB4IkxwdS7YvxyYy1sd0pAVO1U5p8LL4alBlZUHcuvP
5eDstHI4yXXVQwzZ01e5eSe3HKz/E3p3GFmU4ckvk9Jy+HxkUG0JxRNlkld1
WVvLwflmh2gpsu1gWohHdzmkdV9qDkXmNltofjdYDoVrpiWWOB5ZVpgXeVcO
OiLq/+F45Eloyom48XJIfeY9cA7V98axed3F7+UQR22wF5upUi5U83c5fOM+
KyKAHPV+dp5qtxzC83uM+ZGvtwutyB2ogJCU34Zn8Hgs8tzypKsAjRVXVRx/
zsS0k1cxV0C/sZjEaeTqB/sP/eCsgC/ad+l58f5hocF4nK8CZMjf9OL4VF4t
gVX/QgVMxvi4ncLzkZ2Lrwsq4HXP49ITyBkUduc3lSvg9J+Tx3H8av27UlxI
uwIuB72O58DxbbvMlSzzCsjc3abA/cdqaWThHVABE+PaZxjx+qKWbVcTUQGH
Z2dW6HA8L/rj3s+4CpCIY6mmQZbe7/bf9bwKND9+j1Ei71toCYkqrYCTBU8l
9+P9/cPeqJ7aCmAu9Q4kx/tVcUyGSHcFhEcqvN9G/X067kOe/WAFPFoPWd1E
XvQ6XpozXAE0Dj7da8j+6mXNdN8rYJmC4vIScv5C7/s5ikpgW7AkTSI7fqT9
zEVbCSfJmD99xvEpSf+7EVMl2F6lfz2K3Bv3bbmXtxLqV4y93yDPiu3S5ytV
Qqdv/skO5JrjV1nGtCqhj9uBtwXZ+8BjTkbDSrBut2JrQKYeYRP0s62EL32v
80qRz/uIq5mEV0I5tSRbIvK6la9OfGwliF89xBKN3KHRbdSfWgksw/VU4cg6
nDq2kiWV8KLa5poPsmunY/CRgUqwv9Sra458M+jNrdv7q6D4VHMyNzJZfcT+
S1RV8OI0ZQ07ru93+XI62ioQfPf53xHkX1drN5uOVoFVPOHdPmSvgwmJh3iq
4GLqszvfePH7FvoDVQpVkL+mr4rni3Q7jUuwUhVY7phExiBPLPSw3FCrgusM
T2tCkE9ri98m160CD9/9zi7IDYeZ9xhYVMF/h7aIysjDKR/F//lVwZyJjNEC
Gv+ez2PGXwZVQSJLZuA3ZPZN5aD8sCp4LfLz0wcc7xs3v9aIqYIb0rfy25H/
cKQ5ZGdVgSOhhyUKmS7POPdKWxXs1V+c5EZWLf9ME/OvCrKPlc5Jo/h873fD
ssbdKuBbe3RcAJnA/lb1C3k1PPhdKHoM+cyj3lBB6mooPVPBsIHiX8o7VXte
sFfDhQ0VoVrkZ3wBKwcvV0OtrkHZSeSHZlvxQvLV0MjfuUGL4+kUd2Gjq+g6
Zbn4Fhd6fjpwx6lIsxpcxVz53yMHTev+vHqrGizrR4hhyNLHh0LvWlaDgdY7
Hjfkv/rKvEk21bD/dLOOObJlj7Tld6dq0Pujmi7FheMBnvFAv2pQ26SumTmJ
9q+xLO/SoGrwpt44PYxcc5iN7W1YNfT/SEhsR7ZXS2jafFQNVK+5+0uQTwbS
XueKrQaj0aiNROSPhLAVlcRqOHGkkwKfF8f82ZvgnFoNH5pF7fF5szK/r3Dq
k2qI4NrzDp9Hk1msverIqQbPtW5JfJ7dlOrsNFNQDXfpy8rwefe913M09CXV
oNj3/EwS8heYUL1VUw0iG9Wr+Py8jfN593ZnNVT7kd5k4njiuoIlT281DEvJ
aeHzesFo4h6NgWqIpAjowue1T3aqL2e8rYYXb7cH8pF9xtOaLk5Vw7fWo60l
yFLpDmUeFDVgY/GmqQHv19H/HA0P1kD7+TtcTTg+DIw4L0VTA1zPCsPx+TDT
naKazSM1cCWhShHnO/5cnGry5a4BRq7pRpxfKRk17glUqIH9t+fYcf4rZ2g2
xEqpBuzeNZjj/FVK5wPlK2o18PDA79QhHM+VJA/s10X3617afoVs6fX2dbhF
DXjK+WTgfNuNuxbx9rdrQJJZsAPvfzoWS3pq9jUwIHeuF+fvQJXuI7VLDbTU
CH0YQWZnU/sc7V8DnOEM5Th/eJh2NOteMLLOQijOL1LttTPXDq8BH30KO5yP
XP8ZMsUYi+or5fAX5ysXxo8WLifUgJFpNAHnM6df59sMp9SAbaqyGc53fu4R
OVOfUQOFjMss35DfNXfOJmbXAD9DYCf2YLl2mXt+DTQT1TVxvrQ7Z8LxelEN
dLQ8HMVuSXQ6L1lWA7+/N1nh/GpN+M4iS1UNmBRmv8Eu9n1cs1FbA7n9haLT
OH52ZncdbayBc8HfsrCTrUvFWlpqYLTUehk7yujiWnp7DTjEZkvg/G2wxvMm
n64a6Gbov4/tI2fodbO3Bv69XkrHvi/249LlgRqQcn3bjG1/xn37+Msa2HN1
cwjbnIOiffdNDchdVNrANmRI8Jt4XwMnokx6sbUoTsmTRmvA4sqdSuyrG9Xk
uZ9roCE8PgxbZh56AiZrIF2XqIUt+vVliOV0DQieFdiLffadqbLibA0o+WWW
4vJzPZ8/yPO7Bg4OCyhisxJ9Bij+1MAUz6s+3B701YceT6/UwCOqXmVsyoI0
zd6NGhDh+lCO23M35Qx90XYN3LCL28TtT5Xg9XxsTy3ssB4VxGaKHgig218L
vyW0FHD/nYxgl1agqoU07QV13L8CwY4r7rS1QMtCLon7X8KvraKEsRbu3/Y6
jseHvDed7WemWqAyEvqJx5OGu9lJxmO18Jbhgt8n3D7O1aNXOGsh+joDM85H
WzrsTXhwqhY8OscT8Hi8a6OrUX66FszqRtbxeA26udJ+5EItfJxmuYfzy9GG
Vx8oi9aCp/eb8DfIabrJwj6StXBSeS4Uz4dqFamCb1AL2/dDJPF8alWMMGW+
UgvvPYemnuPnAdkxZjWVWkhl5zDpxeNTzDeiRrsWph0dVXH+8+eFIYVp/VoI
X5oOwvnMv2c5t1lv1MLUsm4xnr9UXCQnf4taeF7Ono7n/1EOxjP1t2vhO+GM
Nc4/nmCxnJyxr4VykR98ON8oTkuhf+1+LZCJdLEU4/puKl/kDKqF1tnggVRc
35XUZZ2wWvhvx9UP54e8FmfLQh7VQmgPszle/2KmH3H+TqiF+UVHA5wvan3z
ah+xoBas+2L53JB7X5xsWyyuBR7XFGp8Hv+mz8WDu6IW9jCzteLz8pm2I7OR
Dej+LwY/8Hnr0VLDlzd6a4F4McJNGZe3sDgsaqAW+JVMTPDzvUDOplzny1rQ
PiUtiJ935JMz6s58rIXHGgNc53F5AydS12dqQdPc0vIw/n1jW6skqjp4LCRx
8z3avw39a0IbaOtgtT1TbQjHJ4VbJe8Z6+CiKS31Mxx//IlZYjpWBwazAeb1
OJ4Ia36YfLYOmK4eZYxDHq+jSk1Rr4OtqYEPV5Dvjuq1Nl2rg++GWaRLOJ4g
y/ryUa8O5ikaEoSQudREeFlv1kHX+31vcXxh+9W4NtWxDvguVo4vof1+mab8
RVpUHdAe36uMz/OCRNYWCXF1sC8rTiMCmclI7shYUh0o8TaLPESWzH9341hW
Hbxo3yi1Ru5/zvnwUl4d+Kc6mBohGy/Y5Rg/rYNza3rN6sgPL+78SK+sg0QN
fX0RZHoz5UOttXXAHy7sxoucExwn+KmxDtgLE/xYkYVLP2lvtdRB2U9lG2rk
7le8buwddZDlW3dlF8UP+qv3UqS76+D+9Kd5HN9PH2tpMemrg08zT/KmcLwi
R/HFZ7AOdM7Vn/+A6nvQRmvvk1d1wMll/mYYOe1RKg9xuA5O0ylb4fhQoOab
8vjHOuhQfLv0Ellz2yOa42sdCPRkkQ0gJ8Rns2cu1YFl6GoYjh85O5bEsxjr
IdCWRrYYx68513w9mepBV+SEWyGOBwMru7TZ6mFhzt4Gn9daKDle28dVD96h
Mo+f4PhuaMbOTqgenqt1rOHnI/7xLxki1+rB5dsvRnfkf22Xv1Hr1YOm5P50
F+TB7Cdnpq/Xg43Vs4W7OP61Mm5IuVUP07befTbIVXPvX27frQdTt2vVhjge
3nyxt+9xPVQxr1NIIR/4JKCSE1sPNMeYZkWRPxIjo70S62HDyLjhAvIDfxX2
c0/qQdBwlI4PuZWyRyyurB6WeoQnmZAfz57yuVNVD+lTQzcYkU0HAzoV6+rB
VurHAg3ybjRorbWg/78T8RHHp/LMrbYmA/VgZnzG7g/qv8MbbJViL+vh9t9x
wjzy1OiDFdq39dBO5Cb/iVzX+vHSzPt6EOt3+4Xj2eBMiQDSaD3Yv6Z3+4Js
4JfUl/a5HoxWOCJGkXktVmhdJ1H7aAnHvUNeU9DT15iuhxe/nIpeIffx1Kbz
ztaD/8IphxRUntQDjJO786g9ongIOH63/3mPb2SpHgzC337E8+lQuWB95EY9
ZCkEMT7G/S9aMrRI2QBaq3HS/sgiHAPUHDQNQLt3cxufp7Ps/6WqwtAAwU5W
yV7IXz+c681hbQBzmbYP+PnW1bu6XYe/AYIq9Wqt8XjrbKqqU2sAV24xXmXk
H9d64zyjGmCljm9kP+5fqZlX+XENcGs5KGwv7k+ug3SvkxrAcolGeAfVx+uv
auSZrAa4a9ByawWZNmUocLSyAXTLX7vi9hL98s5V+nUDTB8QS25D9nOcMiA7
0ghL8k2l95DzGdmavjM3wpav7tc7uH0atVgHjjXCBS5Pfhs8H/e2jCWeaoRV
/vcDN/F8TIo1OyvSCB8aKDNUkTvbL9sb6DSCI9WX+VPI+xhTfctiGsGioFJu
GM23sAaNfEOaJrh+t6ZSGFk4xMeJn6EJ6KgCc88hj+uXXtw60gTCr1qy+PD1
FcrXWexNYMTTXXQceUyke3v6bBNE/3d0hgpZsPridTfVJnA68l/UNxT/D5ee
pooLbYIX3TOXk5Afehu8s4xsgqY1u+RY/HygFpwtFt0Ebp2NA4/w9dlJ8ZGk
JmBIr70aiHz6TKblicImiJiZSb6H7FV4hFjR3QQVZ8aC/58fyNlzb2BPM1h/
Yl/Zh/zZ44/wIkUz+BKC+3bR88MTzW8rR6iawbzA3v8fMttWt7cpYzPE8dZp
/0E+cj0sdImrGRLJX3NPIB+goctiVmwG3usnZdvw88m3XXNp5WY4s2o+34wc
RFjkNldvhtNOFUScbyCzfVNSotcMxYkCz8uRNzsTG2Ssm2HAMYIpE/m3J/uQ
ZUgzZFu22v6HXKZFExsW0QwmMnaMPsh3eHd0y6OaAV6+svBEnnn7ZWQ1qRle
uEvqOiN/Fcz7Hv60GW7ZzfxnifMXFAlFFaXN0KilwGGGbPop6M7bymZQHb8d
b4I8Gn57ib2pGV5xVGgYIA9Pndmu7GuG1fgoFlXkuBa2juFB1B73SqevImvH
HQrceNUMsSxKPxWQh2TnKRVGmkFhU+vEZeS+tKoj7382g/ND9WwR5BDnnA+b
881gNUe/cgH5inJcGuefZhj5fZEO50P2cQbeVFxF5Q2fPSKA3Lly/4TdZjP8
yNK1P4Pcck1CYIuKAPe+LQueQG76Js04SksAicQwxuPIDe7y642MBKgy15Zm
R67J0Oi+z0aA339cG1iQq87rlmgfJ4D33MQnJuSKTsOY81wEuKvYUXAEt6++
qTsNLwHUyLR3GZFLZixN5s4QICvhriHOxxR528k/P0eAdwrf3tIhF9I68T0V
IgA1VcRbGuT8HFfaYDECNI/1xlIj54h6/bWQIsDfs1srVMiZvf+NggwBWF6u
KB5EzrgR3HFcDpV3Z16WEjnFL+bRqDIBBtWnaiiQkw4nuTSpEyCM1f/sPuSE
wnTDpGsE6AhNNcb5oDipnMuuegTgyWz8vAc5erCQW8eQAE7jD4KxH90qo7pg
QgANW8PNXfS8GvGnepHGDF2PCvPFDgtufD9nSYDZB4d6d5BDWIitz20I0GDo
ar6Nn49LO3Of3iHA9nxPHn5+DrjcFxbshP4e99vVf8h+r1/ctbxPADO2L97Y
vlZv9eQ8CEA2M2WD7bX28SKnNwF6f6VPbCJ7Rnw+sf0QXTdjKsd255jaPxZA
AIZDuuHYrlU/fzWFECCNIo20geyisPAmKYIAL7bbJ7Hvvf/b5BqF+j87KAT7
rt1mpk4cAaBv1wb7ztZu0IUkVP77aTnYttEUd2jTCLCTxiyPfZvrkPavJwQw
Ha2pxLaqp5foz0H9cYoYjW2hzMRRVIDaO33o/79nNnaMPKSYAH2ZSydx+Uzv
nvxpWU6AfRXuPbh+JntOv5SrRu3ppfsY2yhBoJ6zngAtZK/4cHsZnBZO324i
gNYo+VHcnnoECf+xVjQenGWLsXU0ZGyaOwiwleFBg9v/2oS8RnI3Ab6/c6PC
/aN5X1nErQ+1F7l/CBnqT/X9mqy6gwSYlPOkx/2rmqq7e+EVAZZmC1b3IisJ
GH2nHSZAwUphIh4fiu2mA78+EGA4/uAWHk/yOlbV/WMEeKXFTXcAGb7bJRd9
IcCvzR9OePxd9nTyDflGgPj9fJt4fEofcrO0+kGAuup6zkPIFzO9VOTnkIs6
H+PxLinkd/7EAgEyJ6zu4vkg3h18dOcPATzcRnTwfBG9HvlvbJUAlydEeg8j
C8/GfG3eJIBuoSnvUeQLvkm9yTsEoDi2PseMfI4+o9xtbwsEEsIfsuHylFhG
Fu5vgeIYSXIO5GuKZ+0+ULWA0mEpNZwvtfj85yolXQu8GPhowIXs6kngljrc
An48Sgy8eL1hDNhrz9wCQoOF/Hj9SClTmUg71gLnjp51wutL68TH9K1TLVBf
kP4fXp+GvLIfnONrgcfZZ8bFcT73iO11U4EWyKP979dF5D8V58WiL7TA0yCN
e3h9I1dZY+wQbQGPnIwIebwffGtbXJRsgcaFFDclZF7fkKGTMi1w08moAueD
VauPRgReaQEy7uNs+sgmauM2dSot4OM7Q43zx3e/51/5rtEC7Bp/aG4hx7KK
7lEyaIF35Neu2yF/9NfxpLJpgcEDLzP8kGePsRlcuoPK0/VONAR5q/6riINT
C3iXFe99jPPLs/cWXni0QP7dhzRpyDY60bdjw1qA53D2JN5/PH8ZKHY+aoHr
p3Ro8H4VEXKcazmmBYxfOb/C+fEKQvm4XmoLmF9i0MH581WuQT2WkhY4u/W5
YR2fxxHjhVUqWoBwpVRpD9o/2a4b03vVtMDlG+0Gh5BlImcHxggt0FLik3kc
OWiZUiFroAWY9Zx4lZGTHr868eplCzS/YGDSRS46nbJDNtwC38dGtEyRB4xP
Eyw+tYCFwb9gV2TG7itCvPMtkL6mafwUOSchgLOcthXi6ZaVmFD8cNFIwaaf
sRXk9az38CC/4dhX+YOpFXx0V81Fkfc+Db7MxdkKp78rJusgWzSH3Uw+3woV
ac3z8chcn6PS/a+1goUqkfs4incIuVrfMvVagTjyiUsIWceG/myrYSsEd3en
KiAHLMYSVs1aofWuPdNt5Mm9iSN3nFuhuSnuSR1y3ul0ZoO4VhgS3P18FcV3
0r+Mb91PaoXRkFEaI+ThKvanMWmt4DVvKGOPvO9ipvhAbitouJjTPkK2Us/R
h9pWmNqpUsLPi1v0Fk9uNraC1Se2IHz+nfCO67tXSyuU/yZWz+P3RUzzXeu7
WuHa7ckOavT8ye38NJ5/uBXu/1CJxc+vrWK2Y0ofW+GiVn+GFs53bfKdsv7U
Cu359yXx+0NBgSU1WVOtUKb++Sl+n45d+c5m6wyq/66kBc4P1VELyI/+aoW2
4PFH+H3PqcTy10dWWkH58/6xJ/h86MZdVuGNVnDtoV97inyE87y51nYruLmd
CsDveysWVS2GUxChucafogv5k4Oz5NODRNi+Q9mA3z93FRL266YhQmHyhRF8
flFAqKXbPUqE2yO+n/F5is+lcK93rES4yJhih89/9FpNv5dyEOEskwTTPPLe
toMthjxEUMmvksTfU4xe/sJz/gwRcpv5H27j84/2uhiKc0Qgrjh+3IvzdxDx
b+wCEZSUypb3I5uRbt2uESXCQIb2MhX+vkZe7HWYJBEoL/mR0yHTdVFJ35Im
wrLD9djDyNMKE4ViQIRUfakHTDi/113PQK1IhFlQssLfiyRdifSZVCIC3Sex
aA5kx2dmP5rUiHD0wzTjCWRFJXGdaC0iTNFKf8Dfn7D3HSJa6xJB++zGMP5e
5a/y19PS14kgZFwXhb9vGXjeEMdoTIR6maOBZ/D3I6qPtmdMiWBO2f0Of8/j
NWBu225BBN/X4ennkLXVJd4m3iYClZXTP0FkvhfUlx3siXA3eXX3PDKZ5mSR
/F0iXO+vihFC/jDUeJjVhQgLX1nmsCu0Hj9ccEPtk5PLjb8fCnll8bPnAfp7
Hbv22De1JfUyfIlwqXl5HVv0DU27iz8RJNzvu4siU+t+O6MSTIQHtZ+VsL+9
bUrgDCdC7RiXITZBL2p35REqz4XuZvz/495Z2g/GEGH9XHshtr2B1LvcBCLc
WtgexZb7QAsPUoiQKNF6FpvFcKpEK4MIPu28J3B5Fz82H+XNJgKTSb3zBeQ+
o2i/rTwiVBYq6eP6Zo1azb15SoRp7m/ncHu4G180KC4lgtoNG2EBZM1PdKT/
KonQzV8ogduT9+b3swa1qLzbHRm4vbfHCUkCjai9T1y7y4c8bBqzh7wF/V6w
tCL+3qjsi7XDSBvqz5+2ctzIgWaXPlR2EkHUryUU9++Nr/TyIc+I0PUldQ5/
X3TwWwuzyBAR5P4Uih3D3w9ZxgYcfEOElP9iWPD3RU1Tt+e/vCPCuWbHKfw9
UbS1tGHDCBGCc5jX8fi7Pc3Q9WicCIzuyh/okbt/2tyd/kVE8eCrvH3IGfYy
I62LRIh6/0xiD/L9OUbF+L9EMI2pdMX5YFWHmQq7dSIInzsQsYnPT+eJrLCF
xvM53Q38vdGmY3wQE1kb8FtoSy0jv/5tu/CLvA2i3e9b/0Yucrp8o+tAG8Qm
Wmjj74n8Fg/3pB5qA5XQUhH8vZCDZ+npLro2aPh7n4DPT6+TKUT8OtwGWTaG
X/B5qCC9i5YsexucNKCawufzn86/GpkSQL/nvsuP1wcJp0e/z2u2wR0XrX/J
uHxrp7SNdNogM03wdBwy7X8ttQEGbfCzKGELvw8/FTXr+c60DaYCno3g96vj
KpTJvZ3awGmGnQy/r/p7fh/Ls5g24JE6GyeG1we3DK+FhDaw8xH/hM/verZF
xllS28Cm8mQuzsdm0Fjm3slpA6/cBrVjuL3OkQQYatqANl3bC7/fV+jgK2fy
tg0C9w8HduH83tyK/Z+j7SBZeFQZn8+Fnc9dHGZth5OFfxsu4/zjfU33Ro52
uCLytlYcn+c1bv5LPdkO7Mf/Op5Hptwq9PfhaYfJC1PsPKfxemuYsl+sHYRp
AjkPIFMJEnrY9NpBM8rm9jO0vzTde3hCIa4dfAs9LQD5Wx1/IU9SOxyh4YoS
x+cFG+/PUqa1Q7H3AxpBfH4nE1g9+6QdcumaAnmQLf3PS7zIaYfAOGtVTnx/
3ITG9ep2gOe3kjfQfmhdK+9951U70BaFxNchH/Qmn1M50AExMhkcnHj/FH5v
IXSwA7TJxW/h/Zfws2iU5VAH3PeLnaRBdjDU7P9B2wG1E8oPt9B+PSSWWhzM
1AG//E0fvEOOWxS0JfF0AOfySHM48uzTPRNFpzuAjov+fACywq3h6zFnOsDz
eNMJd+S/Lx4o3TrXAUb1LbWWyAal3bzboh3gbxd+8DKOP27f+C6p2AFq0d3+
iyg+ceE4d/PE1Q4Y+7zJ+AO/rze8O3xAuQNmM1zXx5F9FAq636t1wIAhk0M/
ft7d9JBu0+iAydaO0E4cj9ao1hVoITeEajbieNKOQ+CxdgecCHirUon8+cRi
nqtuB5zns5Z9iuPfj53HTPQ7gFqYszYFP49FJ8YrXO+A3zeFB2Px8/lV20Nn
jTpAZ51ZJhLH3zsXAxmNOyAnQN3FF8en9TT/Nkw64LuEeu595CWHCZevph2w
VZqU5DqxIqvKXTvbZ9YBUTruFyyRc8eCLaosOqDG4f1RTeTNOMPRZKsOEO1q
W5ZA1lU9q/Pf7Q44+dH30inksj07z2/bdqD5Fa9yBHlf8ys5TfsO6NfjvUCO
fDvp2Mlfzh3Qo1x6rPXLiuxZ7eovp/07gOOYuDw3Mi219VvJwA54+b7x+SHk
xWcsvSrBHfB+f3XUPuS3/oOEG6EdkOuf8e775xXZBmm/ijvhHdCpd/H+O2Tg
0/KtjO0AxZ2MoShkvd1fbBK5HfCC6kX+8viKrE85n8HVrg6w7Er3evZpRdbU
9pPK9Z4OiHQMnK5HljsVI2Pb2wGjCg9+5CNzf1YQevC8A7r6u3vjkPenrnFH
DHSAbTXZDR/kGd1SlvQXHXDsKIqBkAdob1GXveyA13w9tTbIFc8ZyYivO+DO
04x8LeSYoGfLL952wMVsn3xZ5AJjq1j9qQ64mTCo3jS2Ijt0MHvQioIEYupt
UDu6IvuK67O2zgESqDcvPi1AfnOJ/YPsQRKIOy8pRiMP690wOXeIBA+s4tke
IX9wTPnKRkMCkRcuwg+RJ17HrL46QgLG6wFeV5D/pPqfkOEmQU6/X9nYyIrs
35r2An5eEhQM54gMI68ObPOz8JFg4onAqzbk9alLVRT8JPD7OCBUg/xv+4HY
8lkSbA2t0j1B3mFqIkycI4HQnujmXGSyC2gOnifBTCFNfgjyXhXRnhYhEpyQ
rPd/hLzPwkW1WIQES1FhjQnI+72rXiaJkaD9lANtADJlwm+9IAkSDKyeNrBG
pioXGHWWIkHb9WPhN5BpntnfunWJBAdLEtY0kem/FE2py5Cgag/VU21kxvVp
u4uyqP3erJdeRj7CwLNwWo4Etps37kogM/Fbuh5VIEG9rnQDOzKLQs7G3isk
ECxemudCZjP58nDxKgm+PQzQOoLM7sax77MyCWQ+ByVtf1yR5YwyDh9QJYHh
0Ao7C7rO9TSVtlmdBF8Hyu+RIXN3fIgv1CTBqzjysd/oft6Ro6wJ10jwyH3O
7BMy3x/dTH8dEqza1bybROY/FHfKSY8ET3LyYt8jC3C/KjIxIAHPDttKJ7Kg
DK2gqiEJdLv8igaRhQzUayVukGBzredsM7KoU4QkjwkJqI/r1zYgi4f1ERlN
SYB69HQxsmTOfgUyMxJkKEaZNSJfJCj2zZuTgB4Uw2uRpd8GaIxZkkCYt079
KfLlXx1v+qxJkCz+rzoUGSh2rzfYkABizTwSkRWOy4zn2ZGglqZfMRL5qoS3
RewdEpQobdRHIytfa/7x0BH1N/uzdy7IqnZrDg5OJJhKvHHQG1k9QOyPkTMa
P+HsjK7Imun3PZTuk2C54tNF7Gt11Vuibqi9lp0/OSDrvFjw5/IgwfN3t3zd
kPWmzx2gf0CCx7Zj/M7IBrt3Hm17ofGdMihkj2zIUsIw50OC3iDWQXPkG0Iz
SR8fovHuonzfGvmmKi/7Mz8SZF4YZ9VFnr19hWM8AI1HZ504fWT3QKvjf4NI
oLprUHwbeW92IOehUBLInfpVr4Mc1Zp7giucBE3nXDxuIbONkE5KRZLAf9Ct
RA+5cGWC69pjEvwsz2PE14UZybhtotH4No6/ZYfcLsjJ8zAWzSf2/J8BuD3U
LvMmxqPxzq9Ahsv70ebm6bJEEjjrvZqwQbYK8uHrSiYBDevZQF/kxez0M6Op
JPhbmyuM28uHSOBfSifBePaeNtz+lKMjZykzSdA8cYgZt1/C6roAZzb6/dY3
etnIJw+zCIrnksCLNcq5ALnivMR5jXwSnFGi24N9Ud3gglUhCXw/kD+CPauy
z2zdhLyLSNC9lJrCgawTnCAcV0KC8mmx5TUy/P18rUhxGRrvq4JNQ8j2bW9E
OypIUMz5vKUCOXCNXuJ3DQlW3g/G2iLTH7kgSVGPfOF802XkjAtaUuyNJJgO
Tr/NjMyncfeiSDPypJjn2u6KbJ3d40uqLSRoOHBw8x3y97GDUNhFAoqPc/yy
yC7rfHLEHjQ/HBtZ2ZF3jijLD/eSoC4jRWJ9B813zRDFvYMkCPP0UC9CVurY
q2I6TIIvvip7WZCL8/9pM30ngaR6/oHvWyuyjo7zliH7O8FD0ks5eROtDzNJ
qw8oO0FI7usfO+RuCwh3pOqE5vTaaGPke+M/j5lTd8JZf9rjUsjshvEVerSd
EO/wnfYA8qC81AYXUyfs/KRw9ttA85slOKqdpxNmPgyUOq6j8dfJ3ryu2AkL
1M9ZRVZXZJNknqn9utoJtRdSGY8jyzc5ff6i3AlGZI5VqysrsmnlneS96p0g
XvTseyOyaoqtZqJeJ1Bc/TNxHrnYse6bkFUnjJ64eYP274qsLYs67Z3ATrhn
Dl2zSyuy1/n+vNML7gSbpNT4IeSrkilPLod2wrWSiLYUZDHly9Z84Z0Q6uEe
FonMbTglwBjZCZEl9h4myBPJPmrNcZ1A02jx8uPiiqwRc3nYgdxO+NdHvfh8
Ac3/07rXlvI6YdD8gmA5sqTEBvNYQSfIKB50DUVmun7laUVxJ/ilNKwqIL9J
Gu/Rr+4EwfGvQq2/UX2YaMnzOzrhil64Zun8iqwUb13/485OqFE9ypyEzCd+
I86juxO4RvSlbZGZr5LdMH/WCSuhJQpXkPcbFJ5U6+uE3z+UH/+vwbqPhTqO
4wBuhevBWB5ySh5marlKZdy60u+TEjrVGtJa2jxNaWk9LKphnGI3C825dOYo
3CpcuCj8oe83xS0dOV24JTnl4ShXP0qu+vz5+uP9x+ef9/vDQxPJXjBpCBwJ
5S+WGlmmodrA0fcReFeT90eErngq1nT2E1gx7Ww6hS7o3C5VDhAQb2x3DERn
DLw/Xaoj0MPqJxzQAqcL6TBCoEjxrVA8zTKbvZ2CfUYJHLbdIr2I5vq32TiO
EXg8d0cRheYEx2rNBgJ612TVDvR8JKfs6xcCbnkcwUr0eEJdfN8EAevUJw6T
U7jnVyJ4bVMENM0foxLdWYbm/DZVGQmIJMPXhejGYnnr7VkC2bUfEtzQlVXB
2WnfCbwaXcwwu+F/oZoOizMRiOrYL9OiM18WrQn/SaCEv1X7Ap2i5Q/6zxNo
8c3rvYvmOfYu6M0EfNXlHfZoy10akZUFBVLW2Dy+gWX0MW/tti2jUKKutWpH
q7J7ZMctKaQHPIosR+cr3mzKtKYw437iWBp6RtAd7WlHgbvPdd2QK8soY0lL
ogcFfn2YWLKeZfyUqtTZIAoHbPs9AlxYxkbbtNw5mEKrt3v3arThV2MBE0Kh
OzAndJKL/RXUoCgUUijOHVyQotmBOt3OSArCGd+/ZmeWaVmq4acmUlAbawXq
tXi/Zw2VJ2H+pEdyJfrMweqjXWcpdD3UNWShuYUPklxSKJiq8+/7oa95VUjb
rlLgPRP2SJ1wb0LlXoY0CjZzz/dcRvucL1fa3KCgW5QLw9FDzWWvYzIpRDuF
xK1CNw7LIm5lURirWdJ8cmQZsYVspF5EwTjbldiEjvO+d053k0La5x9eEvTu
Q6UL/3Ip5MbbV11C/wfNqVPH
       "]]},
     Annotation[#, "Charting`Private`Tag$96606#1"]& ]}, {}},
  AspectRatio->NCache[
    Rational[1, 2], 0.5],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 1.3174921425872712`},
  CoordinatesToolOptions:>{"DisplayFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& ), "CopiedValueFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& )},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{
     FormBox[
      StyleBox[
      "\"Squeezing (dB)\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}, {
     FormBox[
      StyleBox[
      "\"Number of probes\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}},
  FrameTicks->FrontEndValueCache[{{Quiet[
       Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , 
      Charting`ScaledFrameTicks[{Log, Exp}]}, {
     Automatic, Automatic}}, {{{{1.3217558399823195`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"3.75\"", ShowStringCharacters -> False], 3.75, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 2}]& ], TraditionalForm], {0.01, 0.}}, {
       1.3862943611198906`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"4.00\"", ShowStringCharacters -> False], 4., 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 2}]& ], TraditionalForm], {0.01, 0.}}, {
       1.4469189829363254`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"4.25\"", ShowStringCharacters -> False], 4.25, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 2}]& ], TraditionalForm], {0.01, 0.}}, {
       1.5040773967762742`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"4.50\"", ShowStringCharacters -> False], 4.5, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 2}]& ], TraditionalForm], {0.01, 0.}}, {
       1.55814461804655, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"4.75\"", ShowStringCharacters -> False], 4.75, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 2}]& ], TraditionalForm], {0.01, 0.}}, {
       1.6094379124341003`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"5.00\"", ShowStringCharacters -> False], 5., 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 2}]& ], TraditionalForm], {0.01, 0.}}, {
       1.6582280766035324`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"5.25\"", ShowStringCharacters -> False], 5.25, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 2}]& ], TraditionalForm], {0.01, 0.}}, {
       1.252762968495368, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.2669476034873244`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.2809338454620642`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.2947271675944, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.308332819650179, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.33500106673234, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.3480731482996928`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.3609765531356006`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.3737155789130306`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.3987168811184478`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.410986973710262, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.423108334242607, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.4350845252893227`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.4586150226995167`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.4701758451005926`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.4816045409242156`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.4929040961781488`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.5151272329628591`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.5260563034950492`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.536867219599265, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.547562508716013, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.5686159179138452`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.5789787049493917`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.589235205116581, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.599387576580599, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6193882432872684`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.62924053973028, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6389967146756448`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6486586255873816`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.667706820558076, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6770965609079151`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6863989535702288`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6956156086751528`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.7047480922384253`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}, {{
       1.3217558399823195`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {
       1.3862943611198906`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {
       1.4469189829363254`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {
       1.5040773967762742`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {
       1.55814461804655, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {
       1.6094379124341003`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {
       1.6582280766035324`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {
       1.252762968495368, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.2669476034873244`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.2809338454620642`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.2947271675944, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.308332819650179, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.33500106673234, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.3480731482996928`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.3609765531356006`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.3737155789130306`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.3987168811184478`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.410986973710262, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.423108334242607, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.4350845252893227`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.4586150226995167`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.4701758451005926`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.4816045409242156`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.4929040961781488`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.5151272329628591`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.5260563034950492`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.536867219599265, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.547562508716013, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.5686159179138452`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.5789787049493917`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.589235205116581, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.599387576580599, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6193882432872684`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.62924053973028, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6389967146756448`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6486586255873816`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.667706820558076, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6770965609079151`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6863989535702288`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6956156086751528`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.7047480922384253`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}, {
     Automatic, Automatic}}],
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->350,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Quiet[
     Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& }]], "Output",
 CellChangeTimes->{
  3.837065712543857*^9, {3.8370657869937315`*^9, 3.8370658004105997`*^9}, 
   3.837066118111289*^9, {3.837066174044899*^9, 3.8370661999947577`*^9}, {
   3.8370667169813333`*^9, 3.837066753816109*^9}, 3.8370772814245296`*^9, {
   3.837517323640794*^9, 3.837517331559158*^9}, {3.8375173861966023`*^9, 
   3.837517404536974*^9}, {3.8375174387481723`*^9, 3.8375174558144097`*^9}, 
   3.837517495639386*^9, {3.8375199228578653`*^9, 3.837519931480854*^9}, {
   3.837519972709042*^9, 3.837519999306775*^9}, {3.8375200731885333`*^9, 
   3.837520100835993*^9}, {3.837520134480884*^9, 3.837520142337168*^9}, 
   3.8446795190346394`*^9, {3.844679574125749*^9, 3.844679601703246*^9}, 
   3.8446796323330784`*^9, 3.8450532856492605`*^9, {3.8450533260898385`*^9, 
   3.8450533358030744`*^9}, 3.8450534512715836`*^9},
 CellLabel->
  "Out[349]=",ExpressionUUID->"74bc65ff-a946-40b3-ba0a-17d0ba7f1e9b"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"**", " ", "ROC"}], " ", "***)"}]], "Input",
 CellChangeTimes->{{3.8370830954957547`*^9, 
  3.8370830991792507`*^9}},ExpressionUUID->"cba2f6c6-cc61-4abc-8bc8-\
b4a2d3a31f09"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FullSimplify", "[", 
  RowBox[{"Solve", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"pFA", "[", 
      RowBox[{"\[Eta]0", ",", "nS", ",", "nB", ",", "m", ",", "r", ",", "t"}],
       "]"}], "\[Equal]", "pf"}], ",", "t"}], "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.837082718709784*^9, 3.8370827199794536`*^9}, {
   3.837082794410163*^9, 3.8370827956085167`*^9}, 3.8370828342269135`*^9},
 CellLabel->
  "In[800]:=",ExpressionUUID->"cf7d7762-9fb2-462c-9780-7187c4070fdb"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{"t", "\[Rule]", 
    RowBox[{
     FractionBox[
      RowBox[{"m", " ", 
       SqrtBox[
        RowBox[{
         RowBox[{"(", 
          RowBox[{"2", "+", 
           RowBox[{"4", " ", "nS"}], "-", 
           FractionBox["1", "r"], "-", "r"}], ")"}], " ", "\[Eta]0"}]]}], 
      SqrtBox["2"]], "+", 
     RowBox[{
      SqrtBox[
       RowBox[{"m", " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"2", " ", "nB"}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "r"}], ")"}], " ", "\[Eta]0"}]}], 
         ")"}]}]], " ", 
      RowBox[{"InverseErf", "[", 
       RowBox[{"1", "-", 
        RowBox[{"2", " ", "pf"}]}], "]"}]}]}]}], "}"}], "}"}]], "Output",
 CellChangeTimes->{3.8370827205600114`*^9, 3.8370827961098337`*^9, 
  3.837082835010146*^9},
 CellLabel->
  "Out[800]=",ExpressionUUID->"c7520f9c-e5e2-46e8-9682-e8cefd4cb25d"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"ROC", "[", 
   RowBox[{
   "\[Eta]0_", ",", "\[Eta]1_", ",", "nS_", ",", "nB_", ",", "m_", ",", "r_", 
    ",", "pf_"}], "]"}], ":=", 
  RowBox[{"pMD", "[", 
   RowBox[{"\[Eta]1", ",", "nS", ",", "nB", ",", "m", ",", "r", ",", 
    RowBox[{
     FractionBox[
      RowBox[{"m", " ", 
       SqrtBox[
        RowBox[{
         RowBox[{"(", 
          RowBox[{"2", "+", 
           RowBox[{"4", " ", "nS"}], "-", 
           FractionBox["1", "r"], "-", "r"}], ")"}], " ", "\[Eta]0"}]]}], 
      SqrtBox["2"]], "+", 
     RowBox[{
      SqrtBox[
       RowBox[{"m", " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"2", " ", "nB"}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "r"}], ")"}], " ", "\[Eta]0"}]}], 
         ")"}]}]], " ", 
      RowBox[{"InverseErf", "[", 
       RowBox[{"1", "-", 
        RowBox[{"2", " ", "pf"}]}], "]"}]}]}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.837082745439056*^9, 3.837082852754399*^9}},
 CellLabel->
  "In[350]:=",ExpressionUUID->"2aa17858-c45d-44f1-8e4a-a3588ffb454b"],

Cell[BoxData[
 RowBox[{
  RowBox[{"mnum2", "=", "500"}], ";"}]], "Input",
 CellChangeTimes->{{3.837083976105181*^9, 3.83708407394628*^9}, {
  3.8375201906607213`*^9, 3.8375202057386446`*^9}},
 CellLabel->
  "In[351]:=",ExpressionUUID->"4b181087-e374-41ae-a7d1-d819d20fafd6"],

Cell[BoxData[
 RowBox[{
  RowBox[{"ROCscan", "[", 
   RowBox[{"m_", ",", "r_", ",", "pf_"}], "]"}], ":=", 
  RowBox[{"ROC", "[", 
   RowBox[{
   "\[Eta]0num2", ",", "\[Eta]1num2", ",", "nSnum2", ",", "nBnum2", ",", "m", 
    ",", "r", ",", "pf"}], "]"}]}]], "Input",
 CellChangeTimes->{{3.837082863384033*^9, 3.8370828840604753`*^9}, {
  3.8370837946924677`*^9, 3.8370838024054103`*^9}, {3.837083851073738*^9, 
  3.8370838543062143`*^9}},
 CellLabel->
  "In[352]:=",ExpressionUUID->"07b7271e-c0bb-4971-979b-99f049b0a9b2"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ROCscan", "[", 
  RowBox[{"mnum2", ",", "1", ",", "0.4"}], "]"}]], "Input",
 CellChangeTimes->{{3.837082886073057*^9, 3.8370828928739653`*^9}, {
   3.837083857271838*^9, 3.837083862540604*^9}, 3.837083984559498*^9},
 CellLabel->
  "In[353]:=",ExpressionUUID->"5c60aa38-6ebf-487b-83d7-a5fac654903a"],

Cell[BoxData["0.06761625894643997`"], "Output",
 CellChangeTimes->{
  3.837082893127183*^9, {3.837083859540271*^9, 3.837083863073765*^9}, 
   3.8370839289925385`*^9, {3.8370839847447624`*^9, 3.837084074714079*^9}, {
   3.837520181671533*^9, 3.837520206721861*^9}, {3.8375215095046053`*^9, 
   3.8375215183713274`*^9}, 3.84467966970288*^9, 3.845053895927046*^9},
 CellLabel->
  "Out[353]=",ExpressionUUID->"d1a62724-1de8-4bf2-93de-61effcc55f8a"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"ROCscanOPT", "[", 
   RowBox[{"m_", ",", "pf_"}], "]"}], ":=", 
  RowBox[{
   RowBox[{"FindMinimum", "[", 
    RowBox[{
     RowBox[{"ROCscan", "[", 
      RowBox[{"m", ",", "r", ",", "pf"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"r", ",", 
       RowBox[{
        RowBox[{"rmin", "[", "nSnum2", "]"}], "+", "\[Epsilon]"}], ",", "1"}],
       "}"}]}], "]"}], "[", 
   RowBox[{"[", "1", "]"}], "]"}]}]], "Input",
 CellChangeTimes->{{3.8370830120355654`*^9, 3.8370830449098196`*^9}, {
   3.8370838731577287`*^9, 3.837083912575753*^9}, 3.8446796748087635`*^9},
 CellLabel->
  "In[354]:=",ExpressionUUID->"9317d9ed-f649-4308-bf3d-4f2753224ff2"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ROCscanOPT", "[", 
  RowBox[{"mnum2", ",", "0.4"}], "]"}]], "Input",
 CellChangeTimes->{{3.8370830367156715`*^9, 3.837083038494285*^9}, {
   3.8370838959414434`*^9, 3.8370838980253024`*^9}, {3.837083935327552*^9, 
   3.8370839356712694`*^9}, 3.837083989227807*^9},
 CellLabel->
  "In[355]:=",ExpressionUUID->"70162c4b-9b90-447c-89ff-91e3390542c8"],

Cell[BoxData["0.02426683780089678`"], "Output",
 CellChangeTimes->{{3.8370830386762843`*^9, 3.8370830457442164`*^9}, {
   3.8370838984768014`*^9, 3.8370839359418707`*^9}, {3.83708398966156*^9, 
   3.837084075347224*^9}, {3.8375201828215647`*^9, 3.837520209088887*^9}, {
   3.8375215123370967`*^9, 3.8375215209712543`*^9}, 3.84467968238634*^9, 
   3.8450539111407843`*^9},
 CellLabel->
  "Out[355]=",ExpressionUUID->"f3d2717d-1ac1-4dcf-81ac-f2f5648c7e3b"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"ROCscanOPT", "[", 
      RowBox[{"mnum2", ",", "pf"}], "]"}], ",", 
     RowBox[{"ROCscan", "[", 
      RowBox[{"mnum2", ",", "1", ",", "pf"}], "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"pf", ",", "0", ",", "1"}], "}"}], ",", 
   RowBox[{"PlotStyle", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"Black", ",", 
      RowBox[{"{", 
       RowBox[{"Black", ",", "Dashed"}], "}"}]}], "}"}]}], ",", 
   RowBox[{"Frame", "\[Rule]", "True"}], ",", 
   RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
   RowBox[{"FrameLabel", "\[Rule]", " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"Style", "[", 
       RowBox[{"\"\<False alarm\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}], ",", 
      RowBox[{"Style", "[", 
       RowBox[{"\"\<Mis-detection\>\"", ",", 
        RowBox[{"FontSize", "\[Rule]", "12"}], ",", 
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}]}], "]"}]}], 
     "}"}]}], ",", 
   RowBox[{"ImageSize", "\[Rule]", "350"}], ",", 
   RowBox[{"AspectRatio", "\[Rule]", 
    RowBox[{"1", "/", "2"}]}]}], "]"}]], "Input",
 CellChangeTimes->{{3.83708289900438*^9, 3.8370829685241127`*^9}, {
  3.8370830498048553`*^9, 3.8370830631838474`*^9}, {3.8370839407597675`*^9, 
  3.8370840016117444`*^9}, {3.837084087181444*^9, 3.8370841204823027`*^9}},
 CellLabel->
  "In[356]:=",ExpressionUUID->"503d015b-19a3-4782-a70e-8bfa50d331ef"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
      LineBox[CompressedData["
1:eJwd1nc4VX8cB/BbZDTsTZkpslJI43wo4yKysjIjSmYhkfmjlBESQjaJjLi2
uHGtQjIi41o32aOMkvI7x/nnPK/n/fl8vt/v85znOV/B6676N/bicDixPTgc
9ta8MfOZOHsV+TFsqjnzdxmoL/G4jXGfhhXTeH0S1yKcSktMKeNWAZ8iN5fB
6Xmg8IkE3RPVAU/xIKrjNPOg1TlQ+pLbEOK7j616X5kDkYjDOTv8pmAe2XbK
p2wWtjVtE2xELWGr+2CFtvgszIX0kWzibUDfQUkCXzwDxnab72K57cDbiSrM
GmaAdImnsinFHlTHjmU+GPwOMsIXStb4b0G8NvNv9vvfgW4yONNI1AUG+OZ6
bndMQ814T2eToRtcSiRMR/tNg5uunaZ5vDusPIx6QZGdhlHpR5ciuT2AIdhB
RSfvG8SlcRGPXvMElyUnrkKHb6DJmH++PsULNGNM3pLEvkHFUofcMv99qHcx
PnWynAJOlpalj2x8wEk446WQPwWEupalBLJ8gXpDVIlKgwJRhSzH9UT9gVd2
bmcfZQpUD2dnzzoEgNzKrPN82RT4tyQxvTcMBGVu/2zV0Ck4LS8RaRofBKNv
BOf/npiCdPYrD59wh4DxntjT7o8mwbczgWRUEwKsxLU9ZOtJMAod3yt8LRR0
VkIm5c9NwsF194DalIdwzJTlSOCPCfDui/Ne4H8M6kp0DNcdJ8AgYrSiivgY
CBtX5Hk0J0BKRXQ9xOYJHEj36/MSnwBKWaX74axwiOZh+ES1OA56z4YcdUSj
4GSAYnan9zhIaAm/5mmNgoWHqxdpLcaBjsrp+7TDUyC3ZNXUKI+DVfW/tw2G
0cBrO7o/4OA4sItFS5nEx4Br7BSjlM4YBNGVHXvMHQde/OFjb4dHQVw9JqzU
LQ5ubgpPvX4zCj2hrrPDrXGQpUzrpe8/CiJUEgVSXs+h/T5/VYbwKLT8zZbq
64kHHY7bQzWeI3DwZ7wcf8QLSOeK0vU8PQzlJz3j8VMvYI6QcDGMYRgs3Qw2
3c8mod8Nux/T7BAULzJWk2aS4IvhoI5X2hDoz4Sdd1RNAf7q9736zEOQOOpz
qfxfKqRyW5Fu0X4FZT7TbPLVNDhdKr3Y8H0Q5swU9tEVpkE+TKzdahuEIwv3
bQsl04Eljceg7MkguN6SP4obSYeiFOOUVZZBYLErzss5kwkI9WOfZZkBMDHN
KF5ZzQaLuz8HJZL7YXnYcH8mTw4cPHggUyy0Hx5a0t0wuJQDEQwr5nqu/VBm
68pTEZcDeKVMM36VfmBwuRDqq5ALg0YyWznLfdAc/NWMxu8VCO7zJ8xp94Hs
G2YaPrp8MKz66XlSpBfapZqtO2XyITfFauIlSy9Yv/Wu9TfNB44fBJVje3oh
smLMbSI/H+JmfhU8JffADLFwOFe7AFoKGa8WJfVAar/G25PP3sCI6cbYBGcP
HNgJMlc/Ugw0oYmqeiKfIfGWsaWEGupJyQo+js8g0idhzexSDCKKHjLbtJ8B
eT1gO/yuGGxoKSEb891Q/Tq+vFKqBKQVirN7Cd2waLBQp9VVAgkZ3B70mt1w
NS/h491DpVC0zRCftPcTpFgEX7YXLAXDZkPJ2LkumGRx7jSRKwUfrqfceT1d
4Op38dMFi1JQwf9el8zqgsf6iz20haUgciviQLJqF7zbvjiUfLkMlB57W7Q+
7YSjekszTeEE4Bi0LltW6ACeAPWzDhkE6EjgLA4V7ACmwvTw/ZUEIHWQohQO
dMAWnYGU3iQBJMr28S6RP0I3sfIu+Uw5bKS7uac/+gg+MkH/fn0rB5GUVauF
0Q/QxcjGJqVUCdMPpQ26U9qh6YLzjc9XK8GcrJge9Lgdqm63VHjcroQSk/Jp
vFc7ZLV6m9bGV0Kwwo1GLt128A4YTcUvVoJATK5vNXU7CC3nitkmVcGvkxQn
snsb3OtShMS1ahjPtbhNMmsFBqnyb+10NdCDv3aPQasVsiNlIv7w1UDX3cg1
h3Ot8Pnysa+WqjWQWfiCgudrhRMf2e4eja+BdJV2NiK5BcZal3NLFWoBp8Ep
7GbfAurvcxg6feqgW5H9y6XAZuAkMJP37GkAhvZnh3K+NoF5xB9DCkcD1HC9
MxfuaIJMu28fWyQawFyL3r6ovgkk2Kurw00agMbriNVcVhNc9LJ+zl7SABHC
r/5sujSBfIpxbpw0Ef7N1/ea0TaBjWWuRR6ZCPayXtadSo1QMXmp49P5RsiL
I28o9BLhCz5oNVK9ET7gxRVethFho6ie47J+I9hRH1c/UE8EBV9FmzaHRniQ
9qpgz2siVLFKbxBjG0GEkm9tFECEahUegdKZRmDII/8XL0mEutyVu3FxTfCg
oIVoJtAAjY4veU0XSECMvWYdNlAHZbO3b1tukCC61uuzXmsdZN88W2uLa4YR
D1ybaGUdhNoPmLmwNUPgV3bOn/F1gL/OnPTf+WYQUe3YZjWug0+moVxFEc3g
LaHB4fy1FkbwzuxUki3Q/c+E++R0DayLXmAsdG4FD5bItJ7D1bD3dwET79EP
4P2Vp4alqhzkd6wrDIo64HJHUBILbRl0hJzuahH/BHVCHZ0M70uAP3r+9+ul
btAV3zn7AAphfnOM3C/TA97BhPXajteQPVf7gSGqF+iM7cNFwnOB4fCrZQql
D5joa0rtGrMg4la5fbrIFygZMGoS9MmADaUCys2AAVipNvnWl5AKHrIkAkfT
IIzL7L9ThUuGsSJS+GfBIWCSnaMXjkmAP459yWI+wxCdqjKpmxgHJ5Rp/9nX
jgCxPpayIxQL6pmCDm85ySAQ++PXSPhTuHfYSmjCfAzSLfyzXDPDQWLh6oEB
7XHA7TuUH6MQBqyMK3SkrXEgipj9d2AxBKgbkouFUyZAQN1bk/d0MNw+XfuV
XmsSlG6dI9JKB0CBxvX0+o1JCGwO8zxU4APr8zxM0/FToJTWzsX6wwvKDdSp
4lQooJQcn7d1/S4E4EPTCNMUwJWUO5XfcwPBUc3BrNBvgPM944yn3IazCiFx
3Og9AHc5STqZxwHMj3z6vad3GgLXjpaKKdjC+ofISbeg74Czcmj9LmgFidSW
HvoiM4DjNmr6rGoKrOTyzL0k1ELkHdarhrDPL8hQ0X0WcMR2N4XoK0BYXfjd
cBf19h9uWfcrYGdvkqbmhboiNV9Z/wqQrkjPGfii5qCzTGO7AiFCowEuoag9
ppgMk3SAuu1MQdYL1BflOpNea8Ne1pU9DI2oJy/4WQ1oAe61ZfEkyxzgxO/8
JjvjoWVhwCWNHXWU51C6Hh4iZPSkzLlQ+6jXecvhgbPqUmH/YdSGyiaOf9VB
qvV4Qdtx1DQDHw2i1MH824/cIgQ1eT1QnqAG1YKPUn0cUasFL/5gVIU7ScWR
LI2ohXKaWfZdhMrtpEeNJNTpdkOuS8qwbfkw6E4r6pb6qrEBZXgkbOHZ04F6
iapoM18ZUt7st4gdwPzJj1ZfGZrrb0iwLKJ24+xPzVICrinej8xc84Cj3lQe
yUPg3YkwOmYXzHbzOv2KIN/H2Rnrhtr8qqVhmSKUPHgVw3YX9YxhvVeMImR2
tvBweaPuzmNk0VGEMNd9kvzBqA2JARltZ0C/LFhPMh51XB+Fs0kBvp/1S9Ko
R11ncJimUw6spw5afSRi/ZxuT4vkYCg8RVi7CXWVE/3paDnoGKl9o9uGGs86
0mUgB6X+W/XGPagTlRM1Rk7Dg8Z7UzfQezBO5ZcM/scpYNa8IxHMsIDWO3xn
kpWF9PeMB84yo6bufpTBJgsyioWzq6yo3QSv6W6eBJ3jM7k23KitBa7RvTsJ
T2gsBZVFUD8QpRnXOAnUTRocuLOoKXOpArdkYOOcIM7/BmrdjcBlH0kILasn
y91Endc8aq0uCWwnzN8tOqI+Y1e/n00STvEk+Fi4oZ65F0NbJAFuvw6un/dF
HY2TyqScgFnCr9k/0agFtgaVzMVhRLK7934d6pXAAn2PY5A2z+xH1YD1b85E
ax6D668NRCPfoyb+J/5X4BjMigx4p7egTmwxs+oShQ1e8uHWbtTe6wPqJ0SB
ef+CA9s31HTuyXGLIqA2TbtddGgRcIH5lvefCQF9tkbOGSbUJSaxmq5C0GET
rtPIgprLlaymJQQGowwZ/ZyovbntiFRCYN3HrrYtiJquKJvgJQi+jcLRGvKo
dTfpo+wEoCQV/RVYou5+pNVRzwc/fX7S2tigJjp8YA3mA3njV/OjtqjTlQh5
qnxQy8hYNnATtUCnYE0nL7QEkpU/3kGNu9DvNcEDw9f9rEofYvNw+FOc3EBz
rDYpsAjzk68JNeygQeXq/7cEs1Dc+UfsEDEmdN2nDLPyczFDdmBOfCLmUYVa
6WT78BIb8NGbVTk0Yud/F5FyjA1k53/163zB9vdMwymXBSyK5ZkP/0M9Lhlm
WsIIFWa/GLpxS+h+BAInDBiBgabm4H9UqAVaB2l/MQDR/ALdLB3q8QweqYsM
ILRfZYfAijqwc65/9CBM2+ktXhbDrGZxTnY/IEys8zsnUBM7g33G6CGhtm+m
VAqbF9ypF0kPeBYTCtdpLK9Va52jg/wGy2EKgs23/9P4hhZceJzaHxhi3tJ+
dXkftDRLtkobo1bieH6Wah/wuy+TJk2x9SJGrGqoobv1DhFvhTodP20pTg2y
nvcr2Ryx+rYLIsxUsPnpYc6bAOx8dTT3fuMgMDQjaCQf84de2RtbyKF7tJo2
hVi90rm+7d9I0k1nlulizLlrls9/I2VailnLBMxrPyTbfyHTzJ9Jexuw/ifn
Ms5tIlqpODqx3t15akZaa8jgU/vuwn7sfFYxKqs/EbugjkTZQczSMSyJPxF/
u0Sx86OYGbW1Zn4gJeIyWle+Yx6g4n+2inBUWkV5/sHmCbrHCS8hWXnNRlt/
Mbv2DD5ZRGSSTvAH4JZRbya3/1xANPw2i8P2oQ78UVTwYR55cOnp52RGzAZ9
uhGzyOSnerZGYax+aZrT8hvi+l5kVE0Uy0nZz8coyHbpk5yPxzHrUxdepyDs
8Uby/ZJYvREu23kKwZsvGc8oYLmtbWz8BFI4cziZ4TKWtxsM248gYS9Drck6
mMfGokKGETv9xaNFepir15hyhxC+uroSbWPMynQea4PIk6fXWiKuY/awsqjv
R+xVmsLNb2B+UyKx1Ydc/C2uJ3ETM7XxW8U+5Pf1reGPzpjPSHc19SA35V+s
7r+Puc9lh6obUZnHVQ75Yh6/p1rThfCn33yQ74+5zbv5bifyhf4MrWYIZnKo
6fYHRHX0C9/jp5hLqRDbFkQgFpk0icUc+zdXpxnZVst9dfz57nxaHmUSQijx
lG1Lwkxypj3XiAiFsOFpczHneTZTv0P+nXlwaCBvN9f6p1mLfF2c6sktwOyt
+DO1Gok2LrNQe4vZMGbGtQJxOsgrzEHAvHaif4GA4N8Hz3yrwMx22eheGbIj
rn83tA7zTO4qoQQZGqs+c7UBMxPn+qcipCJO8J9II2Zd4pzuG8Tl30oYqRUz
Xlst6xWiWWaiE/dht/9GjEcOcvQmkdWuc3e/R8Kts5CRz09TqXoxpxt+ZEpD
qh5u2vb2Y7a+fycsGYk7ZyWWNYiZqHdJLhFxW2lZujO8u/4DhPM5opUjRbhI
xty94igVi4iaxd9nmcAc+Ld6PQrZy/gPmZzatenCn8cIuekGdek0ZgFeB6dQ
pMa7sz1odjdfxKsGIfGSck/1FnbX8w1h90XcJ1MMBZcx47TdfD2QywnUPKur
u/5a7OeMHL/sNEZc2+1/ldFii1Dv6cuO3tzND+RVGSPj5eccrbd27eiMqCN1
jlnSMn93rcu7cgJJ4D+wvrOza/Qhnf8fztioXg==
       "]]},
     Annotation[#, "Charting`Private`Tag$97952#1"]& ], 
    TagBox[
     {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
      Dashing[{Small, Small}], LineBox[CompressedData["
1:eJwd0Ak01N0bB/ApyUTZkiKZNySE1CulNF9rtjZMiZCtyL+FaJftRRTyRki2
soQSsi8xWVPIFmUZDAbZK0sq/r957zn33PM593m+zz13q+1l47MrSSRSN7HZ
p8HZkWb66AlqwtVwGSxPYZWWqHOviDLcCrzOc/lM4u/4qJgcEW1ocxzw39Qw
gUExKe/r0kexwDszsKgxAcOGjtexIjTwL8ibazWMQypoS/IyxQxyKlEikg7j
+G1gF2kjbQV7/pcp3jzj+OrbVmUTYYNoC7Iaq2AMpvbzbx6K2OPSabWETKcx
VGmJFlTGnMNuE27DIokxKEkezPpBOY+G4Jfx8r1fQWb6PDspfQl/PKI7hm2/
orivpaGS5owTL1MyDWS/wvm4vYFFhAuUhyg0tW+j6Nl5VytYxA28mWba1fdG
ER6/ib7t9FW08P24+81sFAZ86WplMddwrSL/f+1yo8ifrN8zRbmJpPWsEJXm
EYRkCMoYSXvA2UZ1yVZhBDpbkpJGHTzBXf/UToZrBB410fxvaV4IE1EWGugf
hrKKfLBZhDdMe7FAih5GwoZj/vdEfNEVnWvyZP0wbjdEVp0s9kXSoy2Tpd9Z
OOnXt1LytB+CbgZqe7axsHbWxbMkxh86TcIzdZEs3GgLvzFOCUSbdHHZBykW
jMI6nY5Kh0Dz+eQ2PdoQ5A0l00RrQ8AK7ZWcPjAEMseFYZbDAzwyPxcyJTmE
M0VL2eW0UFSUlS+N/hjEBtlQxVMR/6KHMzYsMHoQ3uSc7YEi4UC3b3L6twHI
6f4b8No5HL+mIqQ29Qygxe/yaFdtOJITBmNqawcgxSH/QvHaI7jcufhuKHYA
NX+SFNtaImDlqvb5++EBrP0esYcS9Bh2sbepO/KYyNt1NUJv4DEEOxzIvIlM
WDmbzLvsj0a9+0tN8X+ZyJzgK6oaicZYHMeJyotMGI8EqDnpxIClfCGNS5aJ
qJ5bWnlLceg4xL+mPqUfGmJmSYwT8Wj4a6hYKrIfX833cpIz4jGTcH067m4/
xMdv2mUoJICpMho769iPy+dVtpG6EyCpENkpptAPQfvM1OR9z/DNPr9zsLgP
p8yeZk7PJMG0jCPvZ0svprpo3M9EkxF45fbD8ZJe+FuRz5poJYOnPDuMI7kX
OXaXRfPDk3FX308z5noveC8d9Lu9NwWONuEhF8R7Ue3zxXz1nedId3spuOsK
A7tfCqwWI6djoeU9F3NnD+oUq60blNIxm9Gc+0ysB9bZN0o8zNJh/Tqx0n1N
D4Lze53709MhrD3O6T7QjRF6RlfKkRd4Qok+mhDVjbhP+tm7wl7C2tPZ/TBX
N3iWvS10xTMhFbuat+JHJ6LOm1rJH8rELGXW/9FgJ6Ta5K0FLmWiNLpy5+22
TlDTOuy63mTie83CdffcThSlReQVKGZBzyu20fhqJyZMxksNG7NAu53tunPx
C06kRn5wXfcapvoRqtV8X7DNaHKk8n4uWOqutfb2HRD11N3v8DQXIX/piFef
7AB/RsJ97oJcNM7nDezW78Ai2UTRiJmLlMDw0yqKHWiiF7gy9uWBOUu52rnQ
jltK3ksLQ3mYGQup+Se0HY18QkKK6gXwuzwn/P7dJ1xvVEXUjyI8nNuwsN+s
DbyKeUN15GLITbrUCB9rQ1KwUtAvsWLkv3l1eVG7Dc2Ht3+x0ilGi86EzBel
Nuz4IOS6LaIY7cW8wt/JbeitnUp5vbcE4cddRUOLW6H7Npm34VYpHJM18+Ql
W7ExV4CxYkU5GpNCx4TJLbAI+kUbFC4Hf5dm2MRSM57ZD32okS+HxwyT9GG2
GfIbiorunyqHnmLS2uiBZmhes360IascDJcgUkB5M1RiTFPCd9KxduO4ZcyN
ZthYpVimMujQ4tky7TLVhHymVv1HtQrYb1aVTuz+iAqn2M1m41WgT+XJnras
x6z0Qb6Mi7XI2nGc5XmvDit/vuDfvO09/EtOMXf01EBl2Trf5FU99Aoa6xLT
qlDvq9xYI/cRvvvnzwu/qQAldOxn2mQTaH79phm9dIzN9zI+KbWgMMZCwDmh
DElfS97zhrSCpsajKfWoBLxbnk8NDrZh3C2t68lgIYLO551LkGrHO8clbu+4
fMypvxh09OzAqeyLdqI2uXDbXZUrXPkZZBfOPZdvvUbvq6r7zVs7cTzJXeZU
dBZ+ObU9kb3VhRH1rPUdXRnYocG1dK6kG/zlXBYJK15A99lWh+yNDGzi4eTa
pZiK61vOSPRb9OLGJGv7xupkyI+f4Ok40ofpV2kS5OhErOebJlct9mHk74bm
da5Psar8SaZkTD+anAuKF1Tj8T/lki9rDJkIDbiUpRv5BC/0bRPK5pggKc8f
LTCNwuyYKD8rYgDHhYod8sMeIc9ElyNcexDOxqser/38EJ56fvG5LMJHk8OU
/UOxtcfgc6LfENSrm8zVh4Owf69vuMhuFvp+WscotAbAQvzjzxWtLHi9FK/u
t/XD7PtgprP3MKytPP2ruHwQtcrKzVhqBKRGzkMtLh5Yz8h7trJqBHSO/OH9
PjfBecebpuoyCpJRYZc53Q2kNKtMpuBXeF2pi5/55Iwr0ZnBghWE9foOCmk4
4c2OALLApTF4hW9mOfy2g0rbxoaHzoSvHSG3s+yQ5f78XyFXwvU+GkbNdnjW
UCO66QbhT8/GL6XYIeAypwLFZwykxykfDxnZwTjHx0ghgrDiCrFzabYY3n8n
Wr+MqFd1Sj5iZwMBgyvyPrzjIFXP/KWyaImEt3w8+wUIj+xSPdliCSXVjNGZ
9YS5JazC0i1xVGYkxUaEsOjzbPvTlri32mqrhhThF4JFtmUWWFWpL0zaT5j0
R6Im8DTmDmwleZwlHM858HOPGboVmlpvlhKeinoQw6QhfkzgDkc5Ya80mflK
GmzTTKSD3xIePhd/PpmGUamOGwk1hCuzBSIcaZjbzNhS20R4Tbb72mkTCHCP
OwgNEV6+w/c/DhMcYnH9frVuAqQfY8z6A0bIioPUoBXh8QuWewcN8f3Wdy4b
G8Ltw3sDcwyhYvp8rMeObUbu6n8MUcLHl9PhSLjx3jVfCUPUeDE0PlwhzHtb
7Z6dAbps75x57U9Y7iK5cEIPq7eXRHu9IswUHXWQOAR9jssef7IIly7oUuZ1
ENQrYXsrh7BxsPmKeh0IRN2TdSskXKPiqXNNB2JrzAsdKghPC3I11Gtj99jC
p6PthAVVlFu9tWCZqSKwZYlwS5LsAx4N5Jsv8DaRJkFqi10yZaqDd3Xx2n84
CFO/yRgXqYNucZA8SiZ8Q9ym00EdEtzay7nrCcfkqbiGACx7o4nDsoQXXiWY
ix/EJdELde40tvcw3e/uQ021Qu1OU8KDnD8MNPaB4jJVxTQj/Fep0q1fe9FU
e4Wud4bwKfvVv533YvfVmwVCToRHXisGWatg/qN/8ktPwm5//DqMlOHl99S7
O51wUonylLsS1l3nMrDJIJxlzMg9pIRox4uCrEzC5N2BjfxKyDFUTZzKJay0
mf7LcCdYAs1VK8sJB+RsfpyqAMM4Elm2lT3vvv0Jbzl8fnCuKeMT4XfNNjYU
Odh710ft/kw4tDR4Q5ksPOyjZNV62HkJD6/9kUGWnJLhsWHCqRw2Yr7bIVxw
JuTqL8IydMrKbCkkplafXPzD/j8DjwgzKShF76B4kqZAcn401rpSCvp35jMD
OAnvy9Y3MJWEu9aD5id8hNXdsreTJcD8WCZUIUk44fmL2+spyBjZ8oT3MOGm
vGu1osIIiPWzZhxle8OXK3c3wN54YtsrI8Kh4gtNs0IQKy3NOmLKzqt6ldqx
HvcenK4JsmXPj8lnZArgnHblfYuzhLPee++TE4DmTzkjeUf2PF33wyn8+Gm7
2PXhIuG+wvmjunxwVHk8w32T7bTAyHM80B4jFXTeZtc303dd5wYlwdE93eO/
987S7q9B+5p9XAa+hEnMIc0yLuj0tIsFPmD3zy2IHVsFCV8hPa4UwnQGV4X6
b+rSPvd1Halst2qUtS9Sv0wMtKS8IOylJW7p9pMaappjeSibfW+1vbhmjros
Z+zqV8rOT015XjdD7ewt2neinF2fWegUN03ND9+6JFXB9gbW67lJ6qWl6YCq
Wra1uxRjvlK7mx/EcbSyLdWnkMukFvrP27V+YufxmNmw+qjhB87IJn5mO9KP
foJBNUxWzNVksL2G4fe5gyptHnFTsJ/tD2rr2tqoK/mWqMwBtlUE8uebqcU3
Guq8R9lOaee+WUeNUNjzwGic7VN/x76torowY2hbp9gmxx1zoFMPR64SnZlh
+93ZFEYhVebwhV76j//uC5ro2dRVK9qSQuf/6796ku85tS/vgJP1ItvWc/MH
HlNLnRJ3Kv1hu88hTM2HGknhmV1eZptYrscP/h/GEZWa
       "]]},
     Annotation[#, "Charting`Private`Tag$97952#2"]& ]}, {}},
  AspectRatio->NCache[
    Rational[1, 2], 0.5],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{
     FormBox[
      StyleBox[
      "\"Mis-detection\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}, {
     FormBox[
      StyleBox[
      "\"False alarm\"", FontSize -> 12, FontFamily -> "Helvetica", 
       StripOnInput -> False], TraditionalForm], None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->350,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.837082911693433*^9, 3.8370829257104588`*^9}, {
   3.837082965994028*^9, 3.837082968760396*^9}, {3.837083053327676*^9, 
   3.8370830639782023`*^9}, {3.8370839662606955`*^9, 
   3.8370841210153723`*^9}, {3.8375201852216883`*^9, 3.837520210105647*^9}, {
   3.8375215128213716`*^9, 3.837521521654476*^9}, 3.8446796863505154`*^9, 
   3.8450539172400465`*^9},
 CellLabel->
  "Out[356]=",ExpressionUUID->"fea27600-8a82-4d3f-95a5-a91614ef7eba"]
}, Open  ]]
},
WindowSize->{1920, 997},
WindowMargins->{{-8, Automatic}, {Automatic, -8}},
TaggingRules->{
 "WelcomeScreenSettings" -> {"FEStarting" -> False}, "TryRealOnly" -> False},
Magnification:>1.5 Inherited,
FrontEndVersion->"12.1 for Microsoft Windows (64-bit) (June 19, 2020)",
StyleDefinitions->"Default.nb",
ExpressionUUID->"51936843-6184-4ded-8759-9a3fb95ef726"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[558, 20, 1394, 24, 387, "Text",ExpressionUUID->"36718b04-584e-42ac-aec3-53b40f67a816"],
Cell[1955, 46, 178, 3, 47, "Item",ExpressionUUID->"26819ba0-a3c5-4d93-a597-112a298d5edc"],
Cell[2136, 51, 198, 3, 43, "Input",ExpressionUUID->"6f8c1c38-ef3b-4d36-bc46-44fd34e1f5af"],
Cell[2337, 56, 302, 8, 43, "Input",ExpressionUUID->"a8e8d6c4-bdec-4a4f-9232-8c2b771b7411"],
Cell[2642, 66, 793, 21, 84, "Input",ExpressionUUID->"025b1c15-87df-404e-9233-3bf63fcfba3b"],
Cell[CellGroupData[{
Cell[3460, 91, 767, 16, 68, "Input",ExpressionUUID->"cfd87186-d4ae-4ea9-b033-d49d7c886d7b"],
Cell[4230, 109, 599, 15, 77, "Output",ExpressionUUID->"514667d8-8283-4ad8-b1ce-50fc94182914"]
}, Open  ]],
Cell[CellGroupData[{
Cell[4866, 129, 540, 13, 68, "Input",ExpressionUUID->"e78f4f88-2b0c-4f3e-989e-3d762d40a5b3"],
Cell[5409, 144, 397, 11, 77, "Output",ExpressionUUID->"b830c0ef-7e88-4362-a156-34c9b77d1cc7"]
}, Open  ]],
Cell[CellGroupData[{
Cell[5843, 160, 276, 6, 43, "Input",ExpressionUUID->"9ec0b9c9-33a6-4879-a0be-f9bf6cc9238e"],
Cell[6122, 168, 172, 2, 49, "Output",ExpressionUUID->"bc68f168-34e0-4657-96a0-cf2e28da29b3"]
}, Open  ]],
Cell[6309, 173, 250, 6, 43, "Input",ExpressionUUID->"d47985b5-48a1-456e-bd3a-8f160be15efc"],
Cell[6562, 181, 984, 27, 131, "Input",ExpressionUUID->"314d41f4-1f8e-4ff0-856c-9fa08e574aa3"],
Cell[7549, 210, 234, 6, 43, "Input",ExpressionUUID->"15143ef7-26cc-491a-a986-bb039f0dc123"],
Cell[CellGroupData[{
Cell[7808, 220, 256, 5, 101, "Input",ExpressionUUID->"060e3d7c-fce4-494e-89ff-1d2d458b1a36"],
Cell[8067, 227, 285, 4, 49, "Output",ExpressionUUID->"d046b895-da20-4fcf-8b86-78b9b41b07a5"]
}, Open  ]],
Cell[8367, 234, 660, 16, 71, "Input",ExpressionUUID->"1357aec1-5d79-4e0b-97a4-c8f1b0ad3fd3"],
Cell[CellGroupData[{
Cell[9052, 254, 286, 6, 48, "Input",ExpressionUUID->"c0ce421c-9323-478b-86d1-fcb5ca7f2e89"],
Cell[9341, 262, 392, 5, 48, "Output",ExpressionUUID->"c670d49e-208b-4e11-beec-065f82550acb"]
}, Open  ]],
Cell[CellGroupData[{
Cell[9770, 272, 1769, 50, 195, "Input",ExpressionUUID->"16e5eb05-57de-425d-8be3-a21d487bb430"],
Cell[11542, 324, 412, 6, 48, "Output",ExpressionUUID->"af0f919a-97c4-47c7-9928-b2a0f274f771"],
Cell[11957, 332, 414, 6, 48, "Output",ExpressionUUID->"6ad87842-7452-422f-a11e-86de9fd7d5bd"]
}, Open  ]],
Cell[CellGroupData[{
Cell[12408, 343, 242, 4, 42, "Input",ExpressionUUID->"ca8745a2-589a-465b-8228-05be9b96b1e4"],
Cell[12653, 349, 392, 6, 48, "Output",ExpressionUUID->"e991a586-6d5b-46e8-852b-f76ab2426eb7"]
}, Open  ]],
Cell[CellGroupData[{
Cell[13082, 360, 253, 5, 82, "Input",ExpressionUUID->"f214d981-783a-4037-b0aa-e8487b2645ab"],
Cell[13338, 367, 212, 3, 67, "Output",ExpressionUUID->"2051dfa0-829f-4e4b-b1b1-018777849c5d"]
}, Open  ]],
Cell[13565, 373, 221, 5, 42, "Input",ExpressionUUID->"b15fd94a-c7e1-4332-a2b4-439b04ec5f90"],
Cell[13789, 380, 330, 8, 87, "Input",ExpressionUUID->"d06f9d04-0f80-4f6e-845f-0d0b9703f567"],
Cell[CellGroupData[{
Cell[14144, 392, 319, 8, 62, "Input",ExpressionUUID->"6655856f-5e9f-45b5-b474-6c328d9fcdd2"],
Cell[14466, 402, 765, 22, 80, "Output",ExpressionUUID->"ce98276c-eba0-440b-97aa-22b16809d6b8"]
}, Open  ]],
Cell[15246, 427, 671, 19, 105, "Input",ExpressionUUID->"59e6ea32-0d4e-4bf6-a324-7bfc4470f7e5"],
Cell[CellGroupData[{
Cell[15942, 450, 410, 10, 62, "Input",ExpressionUUID->"ab89428c-7f6e-4ce3-97fc-57d995c6d100"],
Cell[16355, 462, 7214, 139, 382, "Output",ExpressionUUID->"c68bb147-9e0d-41fa-ab2a-23c0fd03bfd4"]
}, Open  ]],
Cell[23584, 604, 944, 28, 107, "Input",ExpressionUUID->"7ffe6a70-fc6b-4b35-a7bd-845c05a9bd26"],
Cell[24531, 634, 934, 26, 137, "Input",ExpressionUUID->"d83f4a33-cb39-4578-a56b-b14265e5badb"],
Cell[25468, 662, 651, 16, 114, "Input",ExpressionUUID->"fe470852-4364-4086-b583-d2e193baa3ba"],
Cell[26122, 680, 501, 12, 68, "Input",ExpressionUUID->"4c5b6fe9-3cfe-4108-9d4e-9440ad5437b9"],
Cell[26626, 694, 391, 9, 61, "Input",ExpressionUUID->"f989a53b-b3e4-4301-ab83-c62657a28c4c"],
Cell[CellGroupData[{
Cell[27042, 707, 2752, 57, 333, "Input",ExpressionUUID->"3f9825e1-ffe3-48ca-9782-1944865784fb"],
Cell[29797, 766, 193, 2, 68, "Output",ExpressionUUID->"be1a1823-1c81-451a-85e7-2bf81cd087fa"],
Cell[29993, 770, 191, 2, 68, "Output",ExpressionUUID->"71d9ad87-147f-4cee-b24a-4b7870c7074f"],
Cell[30187, 774, 193, 2, 68, "Output",ExpressionUUID->"9cafd59f-940a-4a6d-9553-42180ddc4cf7"]
}, Open  ]],
Cell[CellGroupData[{
Cell[30417, 781, 451, 9, 62, "Input",ExpressionUUID->"753eb2d4-eff1-4641-ba49-e232618601d4"],
Cell[30871, 792, 694, 10, 68, "Output",ExpressionUUID->"a2946d09-dbd5-49d9-b58a-31e225b7cfb7"]
}, Open  ]],
Cell[CellGroupData[{
Cell[31602, 807, 547, 13, 92, "Input",ExpressionUUID->"1bf26b71-e124-4b42-9075-fa27c5e2493b"],
Cell[32152, 822, 7237, 138, 210, "Output",ExpressionUUID->"dcfc2eb9-b484-434f-8ad9-ad8a7faba396"]
}, Open  ]],
Cell[39404, 963, 413, 8, 61, "Input",ExpressionUUID->"f6780ee8-ce19-481b-8b49-4693114f6117"],
Cell[39820, 973, 537, 13, 83, "Input",ExpressionUUID->"ef80fcd8-cdca-46e2-9d02-687bcccd926c"],
Cell[CellGroupData[{
Cell[40382, 990, 327, 7, 62, "Input",ExpressionUUID->"03cd28d6-6217-4e90-89d0-96b83535da5d"],
Cell[40712, 999, 490, 7, 68, "Output",ExpressionUUID->"8c11171c-56d2-483f-be38-abfe9a26aee2"]
}, Open  ]],
Cell[41217, 1009, 884, 21, 132, "Input",ExpressionUUID->"6a9b9e9f-aec5-4bb2-a529-27b3a01ca9f8"],
Cell[CellGroupData[{
Cell[42126, 1034, 580, 12, 92, "Input",ExpressionUUID->"366bbd8f-ac2e-4fb9-8340-9f73d5ca909e"],
Cell[42709, 1048, 740, 10, 68, "Output",ExpressionUUID->"4311935d-2179-4678-99d5-bfe2c35ea280"],
Cell[43452, 1060, 740, 10, 68, "Output",ExpressionUUID->"e05e109d-43c0-4449-88a7-bf1295099098"]
}, Open  ]],
Cell[44207, 1073, 573, 12, 91, "Input",ExpressionUUID->"5b920273-1b60-4d69-af67-369cef529c88"],
Cell[44783, 1087, 873, 17, 115, "Input",ExpressionUUID->"16bf51ef-77ff-4229-9c40-7819728a7a5d"],
Cell[CellGroupData[{
Cell[45681, 1108, 497, 11, 92, "Input",ExpressionUUID->"862446d5-99f4-404f-9014-da1315d9fb44"],
Cell[46181, 1121, 205, 3, 68, "Output",ExpressionUUID->"dacc4add-29cb-489a-bb7d-70f9909b41a8"],
Cell[46389, 1126, 205, 3, 68, "Output",ExpressionUUID->"fa8b5b68-46dd-400a-ad98-5a1b2531c51c"]
}, Open  ]],
Cell[CellGroupData[{
Cell[46631, 1134, 724, 20, 102, "Input",ExpressionUUID->"d37a629a-e571-4d36-9ce2-6aed228b4591"],
Cell[47358, 1156, 489, 11, 68, "Output",ExpressionUUID->"22b0674f-642a-4077-a4c3-b6880a304879"]
}, Open  ]],
Cell[47862, 1170, 285, 7, 42, "Input",ExpressionUUID->"384d47c1-55b0-431f-bd22-ea0fae7c7986"],
Cell[48150, 1179, 789, 21, 121, "Input",ExpressionUUID->"541cbd6a-6434-45f1-895e-1f28505d8197"],
Cell[48942, 1202, 776, 21, 121, "Input",ExpressionUUID->"95c2b2a0-c33f-4f19-812a-bf5be7bdb6d2"],
Cell[CellGroupData[{
Cell[49743, 1227, 911, 17, 210, "Input",ExpressionUUID->"9621131a-d273-4190-a642-de1711463782"],
Cell[50657, 1246, 548, 12, 68, "Output",ExpressionUUID->"77b258be-391d-40de-9514-af9df8d57c13"],
Cell[51208, 1260, 351, 5, 68, "Output",ExpressionUUID->"52e12ccf-5f22-461d-bb41-aa90f5ab747f"],
Cell[51562, 1267, 351, 5, 68, "Output",ExpressionUUID->"ad50487d-3d31-4d79-9e4d-a95d1871312b"],
Cell[51916, 1274, 352, 5, 68, "Output",ExpressionUUID->"86bdee85-7a06-416b-8bed-7a635d2da916"],
Cell[52271, 1281, 351, 5, 68, "Output",ExpressionUUID->"3421f5b4-cac9-48be-b7e5-bece63b14041"],
Cell[52625, 1288, 349, 5, 68, "Output",ExpressionUUID->"f7a1b3d7-5751-4abd-8df7-e553bcc8e6e2"]
}, Open  ]],
Cell[CellGroupData[{
Cell[53011, 1298, 631, 13, 92, "Input",ExpressionUUID->"08f8a3b5-2fd2-4b54-a6d7-6b1c56d36a09"],
Cell[53645, 1313, 171, 3, 68, "Output",ExpressionUUID->"ae6f1a52-c37a-46c6-a398-36b020945344"]
}, Open  ]],
Cell[CellGroupData[{
Cell[53853, 1321, 821, 19, 92, "Input",ExpressionUUID->"6cc6da6b-499e-4a7d-868a-272b75d09993"],
Cell[54677, 1342, 9775, 209, 203, "Output",ExpressionUUID->"16127336-7cad-45a7-b20e-e3bb1fe35c31"]
}, Open  ]],
Cell[64467, 1554, 297, 7, 42, "Input",ExpressionUUID->"afb9240e-99ea-4c0d-b3ed-5a195fa7d9f7"],
Cell[CellGroupData[{
Cell[64789, 1565, 1628, 39, 239, "Input",ExpressionUUID->"142d2e24-4875-4d26-83b8-1310c2a24570"],
Cell[66420, 1606, 25769, 494, 320, "Output",ExpressionUUID->"332097e9-1ac7-445d-9b02-07e4cc5e7a6d"]
}, Open  ]],
Cell[92204, 2103, 276, 7, 42, "Input",ExpressionUUID->"d886fefa-b74d-4d44-a660-2558e76b4ba9"],
Cell[92483, 2112, 1091, 29, 180, "Input",ExpressionUUID->"1ae9ecf6-489f-467a-966b-09bf23a893c4"],
Cell[CellGroupData[{
Cell[93599, 2145, 1376, 34, 210, "Input",ExpressionUUID->"6e0c5225-ace1-41be-87e0-9677840dddec"],
Cell[94978, 2181, 18520, 391, 316, "Output",ExpressionUUID->"78df8dc8-6885-4be0-8f98-8f96c4a8ce44"]
}, Open  ]],
Cell[CellGroupData[{
Cell[113535, 2577, 1593, 39, 239, "Input",ExpressionUUID->"4e45cd06-ce46-49f4-919a-b460e7c09638"],
Cell[115131, 2618, 18739, 400, 320, "Output",ExpressionUUID->"778abd9e-3d90-4fbc-b3ec-0601c57d9381"]
}, Open  ]],
Cell[133885, 3021, 292, 7, 42, "Input",ExpressionUUID->"ffa15cea-2e54-41a7-b5fa-c68e3d2ad741"],
Cell[134180, 3030, 465, 10, 42, "Input",ExpressionUUID->"746132ee-c7af-41b9-99e6-a0f605e5d3c4"],
Cell[CellGroupData[{
Cell[134670, 3044, 1801, 55, 239, "Input",ExpressionUUID->"9339b5cd-8ff1-4470-ac49-e11756db210c"],
Cell[136474, 3101, 345, 5, 68, "Output",ExpressionUUID->"fa9ed8dc-375d-4351-b64d-3579fcb06c69"],
Cell[136822, 3108, 347, 5, 68, "Output",ExpressionUUID->"038779d5-ef04-47fb-997b-7d678c45ce11"],
Cell[137172, 3115, 347, 5, 68, "Output",ExpressionUUID->"ce70aa29-722e-4113-bc37-7fd61024be31"],
Cell[137522, 3122, 345, 5, 68, "Output",ExpressionUUID->"510d50d0-5aae-4f1e-af18-83d74917dad8"],
Cell[137870, 3129, 347, 5, 68, "Output",ExpressionUUID->"1d332236-a4c1-4ae0-8390-0607a4114be9"],
Cell[138220, 3136, 345, 5, 68, "Output",ExpressionUUID->"7cab98d5-66c1-4390-9b19-d4bcfe8553e3"],
Cell[138568, 3143, 347, 5, 68, "Output",ExpressionUUID->"0792063d-2ce6-46b0-b9d3-a89547130599"]
}, Open  ]],
Cell[CellGroupData[{
Cell[138952, 3153, 1507, 33, 210, "Input",ExpressionUUID->"5b71fe71-7374-4393-af44-82c0e33ba0e0"],
Cell[140462, 3188, 15783, 340, 360, "Output",ExpressionUUID->"5e762346-1cc1-4599-86ca-479834cdc2f9"]
}, Open  ]],
Cell[CellGroupData[{
Cell[156282, 3533, 1236, 29, 210, "Input",ExpressionUUID->"83d64007-a73b-4fae-9c03-a054442357ce"],
Cell[157521, 3564, 11820, 268, 385, "Output",ExpressionUUID->"e3abe084-ebea-43eb-bbb6-bd6ac3f0d0fb"]
}, Open  ]],
Cell[CellGroupData[{
Cell[169378, 3837, 987, 27, 151, "Input",ExpressionUUID->"36a654f1-7e96-486e-b92f-617e721ba41e"],
Cell[170368, 3866, 31600, 610, 212, "Output",ExpressionUUID->"83755bcf-5c7a-4eaa-83a9-d7074da099a7"]
}, Open  ]],
Cell[201983, 4479, 314, 8, 42, "Input",ExpressionUUID->"666afd86-6a33-49d8-8332-bb77972bcf97"],
Cell[202300, 4489, 433, 10, 61, "Input",ExpressionUUID->"da927998-d4d0-486d-ad0c-ad661085a991"],
Cell[CellGroupData[{
Cell[202758, 4503, 3381, 60, 268, "Input",ExpressionUUID->"0b8afa5e-8a63-49fe-91a5-bcffdd564cd4"],
Cell[206142, 4565, 544, 8, 68, "Output",ExpressionUUID->"df561c87-8b1a-47e8-999f-2713e491f396"],
Cell[206689, 4575, 542, 8, 68, "Output",ExpressionUUID->"2acd293b-155a-4a6e-9aab-a3c79556fb12"]
}, Open  ]],
Cell[207246, 4586, 607, 14, 102, "Input",ExpressionUUID->"bc36cbc3-ca4c-470f-9f14-4efa7bbf67af"],
Cell[207856, 4602, 875, 21, 121, "Input",ExpressionUUID->"47d40802-16d6-4ba2-9d9c-c42528eaadc3"],
Cell[208734, 4625, 1041, 21, 92, "Input",ExpressionUUID->"77679712-3869-4e27-828b-7450babb7171"],
Cell[CellGroupData[{
Cell[209800, 4650, 565, 11, 151, "Input",ExpressionUUID->"a112dc04-e4af-4ded-844d-798faa1c3fd3"],
Cell[210368, 4663, 421, 11, 68, "Output",ExpressionUUID->"594689c8-2e2e-4ccd-a995-8423288c4f7f"],
Cell[210792, 4676, 224, 4, 68, "Output",ExpressionUUID->"5a21ce80-1dc3-4165-833d-9e0e165d4017"],
Cell[211019, 4682, 224, 4, 68, "Output",ExpressionUUID->"3a91ffb5-7898-4448-add6-624daf40ecf0"],
Cell[211246, 4688, 223, 4, 68, "Output",ExpressionUUID->"d249c097-5ed9-4224-a470-476607626401"]
}, Open  ]],
Cell[211484, 4695, 780, 19, 92, "Input",ExpressionUUID->"45c01752-11ff-4e65-8a9d-c2bec707df6c"],
Cell[CellGroupData[{
Cell[212289, 4718, 371, 6, 62, "Input",ExpressionUUID->"da897468-e80b-4c0d-94d2-343cb298759d"],
Cell[212663, 4726, 653, 10, 68, "Output",ExpressionUUID->"ce74ffa0-4f67-4ffb-8975-b464a3d995bb"]
}, Open  ]],
Cell[CellGroupData[{
Cell[213353, 4741, 1839, 40, 210, "Input",ExpressionUUID->"264221d8-a73d-4c35-8037-76e8c218c657"],
Cell[215195, 4783, 25736, 595, 316, "Output",ExpressionUUID->"6fcee853-9f8d-46ec-b263-b5eb494ef009"]
}, Open  ]],
Cell[240946, 5381, 461, 12, 72, "Input",ExpressionUUID->"721051eb-dd93-4563-8101-1a87ec9bee86"],
Cell[CellGroupData[{
Cell[241432, 5397, 2159, 48, 239, "Input",ExpressionUUID->"bb73951e-6113-4e1a-a2c8-fc82f50a1970"],
Cell[243594, 5447, 37730, 734, 320, "Output",ExpressionUUID->"74bc65ff-a946-40b3-ba0a-17d0ba7f1e9b"]
}, Open  ]],
Cell[281339, 6184, 214, 5, 42, "Input",ExpressionUUID->"cba2f6c6-cc61-4abc-8bc8-b4a2d3a31f09"],
Cell[CellGroupData[{
Cell[281578, 6193, 496, 11, 61, "Input",ExpressionUUID->"cf7d7762-9fb2-462c-9780-7187c4070fdb"],
Cell[282077, 6206, 978, 31, 102, "Output",ExpressionUUID->"c7520f9c-e5e2-46e8-9682-e8cefd4cb25d"]
}, Open  ]],
Cell[283070, 6240, 1135, 34, 191, "Input",ExpressionUUID->"2aa17858-c45d-44f1-8e4a-a3588ffb454b"],
Cell[284208, 6276, 274, 6, 62, "Input",ExpressionUUID->"4b181087-e374-41ae-a7d1-d819d20fafd6"],
Cell[284485, 6284, 521, 12, 62, "Input",ExpressionUUID->"07b7271e-c0bb-4971-979b-99f049b0a9b2"],
Cell[CellGroupData[{
Cell[285031, 6300, 322, 6, 62, "Input",ExpressionUUID->"5c60aa38-6ebf-487b-83d7-a5fac654903a"],
Cell[285356, 6308, 444, 7, 68, "Output",ExpressionUUID->"d1a62724-1de8-4bf2-93de-61effcc55f8a"]
}, Open  ]],
Cell[285815, 6318, 683, 18, 92, "Input",ExpressionUUID->"9317d9ed-f649-4308-bf3d-4f2753224ff2"],
Cell[CellGroupData[{
Cell[286523, 6340, 371, 7, 62, "Input",ExpressionUUID->"70162c4b-9b90-447c-89ff-91e3390542c8"],
Cell[286897, 6349, 454, 7, 68, "Output",ExpressionUUID->"f3d2717d-1ac1-4dcf-81ac-f2f5648c7e3b"]
}, Open  ]],
Cell[CellGroupData[{
Cell[287388, 6361, 1536, 37, 180, "Input",ExpressionUUID->"503d015b-19a3-4782-a70e-8bfa50d331ef"],
Cell[288927, 6400, 12849, 238, 330, "Output",ExpressionUUID->"fea27600-8a82-4d3f-95a5-a91614ef7eba"]
}, Open  ]]
}
]
*)