GeomComp_Plotting.nb

(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 12.1' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[    176220,       3606]
NotebookOptionsPosition[    169938,       3498]
NotebookOutlinePosition[    170365,       3515]
CellTagsIndexPosition[    170322,       3512]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["Plot results of GeomComp_Compute.nb", "Chapter",
 CellChangeTimes->{{3.817324209740572*^9, 3.8173242232716637`*^9}, {
  3.8208870668253*^9, 
  3.8208870710817127`*^9}},ExpressionUUID->"7282a4e2-e405-46c9-8993-\
7cd191e25542"],

Cell[CellGroupData[{

Cell["Preliminaries", "Section",
 CellChangeTimes->{{3.817324230204371*^9, 
  3.81732423319531*^9}},ExpressionUUID->"7f7c2a79-7cbe-4a15-8122-\
e16ce1ee1f77"],

Cell[BoxData[
 RowBox[{
  RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}], " "}]], "Input",
 CellChangeTimes->{{3.824594680599511*^9, 3.8245946825669518`*^9}, {
  3.824687417267387*^9, 3.824687419226223*^9}},
 CellLabel->
  "In[898]:=",ExpressionUUID->"f361dc58-05aa-44fc-aea2-59cce461e788"],

Cell[CellGroupData[{

Cell["Specify \"GoldenRatio\" or \"Arithmetic\"", "Subsubsection",
 CellChangeTimes->{{3.821271309043584*^9, 
  3.8212713140251207`*^9}},ExpressionUUID->"ce7805b8-b297-4c34-ba41-\
b5a805b98bea"],

Cell[BoxData[
 RowBox[{
  RowBox[{"AbundSeries", "=", "\"\<GoldenRatio\>\""}], ";"}]], "Input",
 CellChangeTimes->{{3.8212713047303743`*^9, 3.8212713050340557`*^9}, {
   3.821283759293893*^9, 3.8212837704770403`*^9}, {3.8218387011392527`*^9, 
   3.8218387252182426`*^9}, 3.828091238049741*^9, 3.828091300590775*^9, 
   3.8285408418193274`*^9, 3.828540961877577*^9, 3.8285417012413673`*^9, 
   3.828541737199408*^9, 3.828720934268303*^9, 3.828734150649364*^9, {
   3.828962513176929*^9, 3.8289625140594187`*^9}, 3.8289625540998497`*^9, {
   3.829005448267043*^9, 3.8290054569685307`*^9}, {3.82907053133185*^9, 
   3.8290705398910103`*^9}, {3.829080235973919*^9, 3.829080244877302*^9}, {
   3.8293302587005157`*^9, 3.8293302797503147`*^9}, {3.829937340078326*^9, 
   3.829937346957959*^9}, {3.834173122400419*^9, 3.834173132005831*^9}, {
   3.834199569392289*^9, 3.834199578533309*^9}, {3.834693672641858*^9, 
   3.8346936834305897`*^9}, {3.913822546147348*^9, 3.913822547915121*^9}, 
   3.913827444197576*^9},ExpressionUUID->"20e4ffb9-574c-48f0-b77e-\
8fa56001dd85"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Load results and set export directory", "Subsubsection",
 CellChangeTimes->{{3.821271329681814*^9, 3.82127133637904*^9}, {
  3.8212740360713367`*^9, 
  3.8212740400949183`*^9}},ExpressionUUID->"bc8af848-b53e-4060-b020-\
85a7beeb6c15"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"Which", "[", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"AbundSeries", "\[Equal]", "\"\<GoldenRatio\>\""}], ",", 
    "\[IndentingNewLine]", "  ", 
    RowBox[{"SetDirectory", "[", 
     RowBox[{"FileNameJoin", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"NotebookDirectory", "[", "]"}], ",", 
        "\"\<../results/GoldenRatio/\>\""}], "}"}], "]"}], "]"}], " ", ",", 
    "\[IndentingNewLine]", 
    RowBox[{"AbundSeries", "\[Equal]", "\"\<Arithmetic\>\""}], ",", 
    "\[IndentingNewLine]", "  ", 
    RowBox[{"SetDirectory", "[", 
     RowBox[{"FileNameJoin", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"NotebookDirectory", "[", "]"}], ",", 
        "\"\<../results/Arithmetic/\>\""}], "}"}], "]"}], "]"}]}], " ", 
   "\[IndentingNewLine]", "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"files", "=", 
   RowBox[{"FileNames", "[", "\"\<k*.txt\>\"", "]"}]}], " ", 
  RowBox[{"(*", " ", 
   RowBox[{
   "Get", " ", "list", " ", "of", " ", "all", " ", "result", " ", "files"}], 
   " ", "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"Get", "[", "#", "]"}], "&"}], "/@", "files"}], ";"}], " ", 
  RowBox[{"(*", " ", 
   RowBox[{"Load", " ", "all", " ", "their", " ", "contents", " ", 
    RowBox[{"(", 
     RowBox[{"variable", " ", "definitions"}], ")"}]}], " ", "*)"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"Which", "[", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"AbundSeries", "\[Equal]", "\"\<GoldenRatio\>\""}], ",", 
   "\[IndentingNewLine]", "  ", 
   RowBox[{"SetDirectory", "[", 
    RowBox[{"FileNameJoin", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"NotebookDirectory", "[", "]"}], ",", 
       "\"\<../figs/GoldenRatio/\>\""}], "}"}], "]"}], "]"}], "  ", ",", 
   "\[IndentingNewLine]", 
   RowBox[{"AbundSeries", "\[Equal]", "\"\<Arithmetic\>\""}], ",", 
   "\[IndentingNewLine]", "  ", 
   RowBox[{"SetDirectory", "[", 
    RowBox[{"FileNameJoin", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"NotebookDirectory", "[", "]"}], ",", 
       "\"\<../figs/Arithmetic/\>\""}], "}"}], "]"}], "]"}]}], " ", " ", 
  "\[IndentingNewLine]", "]"}]}], "Input",
 CellChangeTimes->{{3.815845773761799*^9, 3.815845794792083*^9}, 
   3.815845828336257*^9, {3.815845919164629*^9, 3.815845969217094*^9}, {
   3.8158463140365267`*^9, 3.815846322763195*^9}, {3.815846600891632*^9, 
   3.815846601136841*^9}, {3.815859554452115*^9, 3.815859555346654*^9}, {
   3.8158596260911903`*^9, 3.8158596315359783`*^9}, {3.8167245449586353`*^9, 
   3.816724545445325*^9}, {3.819159023252349*^9, 3.8191590701353292`*^9}, {
   3.819159123605939*^9, 3.819159129446034*^9}, {3.8191591637014837`*^9, 
   3.8191591673886347`*^9}, {3.819159481394524*^9, 3.8191594995206137`*^9}, {
   3.819159785910326*^9, 3.819159791557094*^9}, {3.819159878970512*^9, 
   3.819159892730278*^9}, {3.819160223133183*^9, 3.8191602238770533`*^9}, {
   3.8191602625077143`*^9, 3.819160263474534*^9}, {3.8192429647992563`*^9, 
   3.819242965366139*^9}, 3.820337765434568*^9, {3.8212692607490664`*^9, 
   3.8212692672232*^9}, {3.8212712748754873`*^9, 3.8212713166977987`*^9}, {
   3.821274016632907*^9, 3.821274020287862*^9}, {3.821274056839178*^9, 
   3.8212740570623093`*^9}, {3.821276946095888*^9, 3.821276946894959*^9}, {
   3.821305809039938*^9, 3.821305811772867*^9}, {3.821310616110869*^9, 
   3.8213106162546186`*^9}, 3.821356814505258*^9, {3.821356949970146*^9, 
   3.8213569519297657`*^9}, {3.821358056106718*^9, 3.8213580914701443`*^9}, 
   3.8216475030242643`*^9, {3.8217078503386374`*^9, 3.8217078689861*^9}, {
   3.821707921073057*^9, 3.8217079224407797`*^9}, {3.821736472522406*^9, 
   3.821736472657517*^9}, {3.82173667169103*^9, 3.8217367122083693`*^9}, {
   3.821736744495926*^9, 3.821736746758956*^9}, {3.8280533726365147`*^9, 
   3.828053379213958*^9}, {3.828053415223789*^9, 3.82805344450725*^9}, {
   3.828540968077846*^9, 3.828540976475685*^9}, {3.8285410114953203`*^9, 
   3.82854102495527*^9}, {3.828962275835258*^9, 3.828962280849587*^9}, {
   3.828962342832528*^9, 3.828962354406781*^9}, {3.8289623888784113`*^9, 
   3.8289623890696697`*^9}, {3.828962423189495*^9, 3.828962428675982*^9}, {
   3.828962467587946*^9, 3.828962509846354*^9}, {3.8289684539649687`*^9, 
   3.828968454116087*^9}, {3.828968488188654*^9, 3.828968498579129*^9}, {
   3.8289685836088543`*^9, 3.828968584319419*^9}, {3.8290040397382727`*^9, 
   3.829004039896686*^9}, {3.829005471363661*^9, 3.829005524998588*^9}, {
   3.8290705450269547`*^9, 3.8290705755586033`*^9}, {3.829070620264841*^9, 
   3.829070624866104*^9}, {3.8290802495055943`*^9, 3.829080317211588*^9}, {
   3.829330284120459*^9, 3.829330334956232*^9}, {3.829937358524796*^9, 
   3.829937404047503*^9}, {3.8341731449104853`*^9, 3.834173195069927*^9}, {
   3.834199582647949*^9, 3.83419965064032*^9}, {3.83469369146611*^9, 
   3.834693751271549*^9}, {3.834777315247904*^9, 3.8347773174709167`*^9}},
 CellLabel->
  "In[900]:=",ExpressionUUID->"6befdeee-d891-4598-9329-a7a3d2489bf3"],

Cell[BoxData["\<\"/Users/novakm/Git/GeometricComplexity/results/Arithmetic\"\>\
"], "Output",
 CellChangeTimes->{
  3.821283717913576*^9, 3.821283761793239*^9, 3.821358062749962*^9, 
   3.821473683265218*^9, 3.821489431458932*^9, 3.8217364428092422`*^9, 
   3.82173667533838*^9, {3.821736718943734*^9, 3.8217367480254097`*^9}, 
   3.821837713022696*^9, 3.821837764670711*^9, {3.821838674578001*^9, 
   3.821838702580845*^9}, 3.821838777596634*^9, 3.821838811284667*^9, 
   3.821838892168049*^9, 3.821839229490798*^9, 3.821839289903377*^9, 
   3.821839989855959*^9, 3.821840139350628*^9, 3.824426325246872*^9, 
   3.824552939975606*^9, 3.824553047058134*^9, 3.824553113476007*^9, {
   3.824553918211269*^9, 3.824553941929109*^9}, 3.8245713598982143`*^9, 
   3.824571615148594*^9, 3.824571733459551*^9, 3.824571821294758*^9, 
   3.824594572671687*^9, 3.824594656903871*^9, {3.824594692966066*^9, 
   3.824594736933958*^9}, 3.8245951236617002`*^9, {3.824595224013135*^9, 
   3.8245952436828127`*^9}, 3.824595320142049*^9, 3.824595373029558*^9, 
   3.824596827147439*^9, 3.824599290512032*^9, 3.8245993479112787`*^9, 
   3.824599392494898*^9, 3.8245994578752537`*^9, 3.824600459191856*^9, 
   3.824600556353489*^9, 3.8246723401942863`*^9, 3.824672449129015*^9, 
   3.824672492906993*^9, 3.824687181053759*^9, 3.824944073355034*^9, 
   3.8249441430130463`*^9, 3.824944196475874*^9, 3.824946231609867*^9, 
   3.8249978418052597`*^9, 3.825029725198988*^9, 3.825030812695064*^9, 
   3.825031082573687*^9, 3.825032037560668*^9, 3.8250322838822603`*^9, 
   3.825032433665989*^9, 3.825158737629599*^9, 3.825166101730838*^9, 
   3.825426069045907*^9, 3.82542663794422*^9, 3.8254279870785513`*^9, 
   3.825436397726921*^9, 3.8254385292151747`*^9, 3.825441763248808*^9, 
   3.8254493692769213`*^9, 3.8254638846260242`*^9, 3.825523336301756*^9, 
   3.825523463837887*^9, 3.82552351289047*^9, 3.8255525455054483`*^9, 
   3.825552578658648*^9, 3.82555282138538*^9, 3.825552890925305*^9, 
   3.825552968608398*^9, 3.8255530018323603`*^9, {3.8255531889818583`*^9, 
   3.825553217282958*^9}, 3.825553265179111*^9, 3.8255535357470512`*^9, 
   3.8255538214862413`*^9, 3.82555388736963*^9, 3.825553953269692*^9, 
   3.825638719999401*^9, {3.825638878849853*^9, 3.825638907989851*^9}, 
   3.825638964364759*^9, 3.8256392585852213`*^9, 3.825639649953084*^9, 
   3.825639750144898*^9, 3.825639856808455*^9, 3.825639910461055*^9, 
   3.825640024502027*^9, 3.825640067559943*^9, {3.8256401798490353`*^9, 
   3.825640254466804*^9}, 3.828053020101777*^9, 3.828053140119223*^9, 
   3.828053281226755*^9, 3.828053381358287*^9, 3.828053419567129*^9, 
   3.8280912400055847`*^9, 3.828534012437327*^9, 3.828539949615505*^9, 
   3.8285404943655024`*^9, 3.828540564644112*^9, 3.8285406739927692`*^9, 
   3.828540979819414*^9, 3.828541016050722*^9, 3.828541702426591*^9, 
   3.828607837717664*^9, 3.828608451065131*^9, 3.828608633022655*^9, 
   3.828613038842651*^9, 3.82861409090543*^9, 3.828616859686411*^9, 
   3.8286219892580147`*^9, 3.828623485712482*^9, 3.828625478358981*^9, {
   3.828641035870944*^9, 3.8286410599056683`*^9}, 3.828647641596143*^9, 
   3.8286600601587954`*^9, 3.82866055836465*^9, 3.828661685203168*^9, {
   3.8286617692386293`*^9, 3.828661794450316*^9}, 3.82866264308572*^9, 
   3.8286630417960033`*^9, 3.828663679995862*^9, 3.8286639881715*^9, 
   3.828664492389189*^9, 3.828664868663672*^9, 3.828665167716435*^9, 
   3.8286654573151217`*^9, 3.82866554451665*^9, 3.828694601409953*^9, 
   3.828697340810833*^9, 3.828697373096623*^9, 3.828699157368094*^9, 
   3.8287000695629597`*^9, 3.828700421284803*^9, 3.828711298523411*^9, 
   3.8287209356236477`*^9, 3.828908660398972*^9, 3.828908755441113*^9, 
   3.828911040701927*^9, 3.828911386756925*^9, 3.828911470373048*^9, 
   3.828911557388294*^9, 3.828911977696866*^9, 3.828912173274919*^9, 
   3.828912269849279*^9, 3.828912475299453*^9, 3.8289126339228983`*^9, 
   3.8289573630558434`*^9, 3.8289622857786617`*^9, 3.8289623564263487`*^9, 
   3.828962391680706*^9, 3.828962434410884*^9, 3.828962471659651*^9, {
   3.828962502104456*^9, 3.8289625314554234`*^9}, 3.8289684573200417`*^9, 
   3.828968491695799*^9, 3.82896853516324*^9, 3.8289686001823606`*^9, 
   3.829003856614623*^9, 3.8290040433813868`*^9, 3.829004245475973*^9, 
   3.829005449939274*^9, 3.829005483801612*^9, 3.8290055140404663`*^9, 
   3.829068479441791*^9, 3.829070145358726*^9, {3.829070234311528*^9, 
   3.829070244766986*^9}, 3.829070291055995*^9, 3.8290704063721247`*^9, 
   3.829070532607337*^9, 3.829070564848271*^9, 3.829070596010833*^9, 
   3.82908016804676*^9, 3.829080237315843*^9, {3.829080280590684*^9, 
   3.8290803397708263`*^9}, 3.8290806559485083`*^9, 3.829084703370414*^9, 
   3.829084767784116*^9, 3.829084851508293*^9, {3.8290848833707857`*^9, 
   3.829084911888357*^9}, 3.8290850357742767`*^9, 3.82908512314226*^9, 
   3.829091000845223*^9, 3.829091394445816*^9, 3.8290921262562723`*^9, 
   3.829092182281989*^9, {3.829330242578782*^9, 3.829330325725052*^9}, 
   3.829936861065497*^9, 3.829936989625111*^9, 3.829937085785881*^9, 
   3.829937230686879*^9, 3.829937311263938*^9, {3.82993734157338*^9, 
   3.829937396200919*^9}, 3.834173007240198*^9, {3.834173094341731*^9, 
   3.834173124145454*^9}, {3.8341731575209627`*^9, 3.834173186309477*^9}, 
   3.8341994548244753`*^9, 3.8341995712915077`*^9, 3.834199607978443*^9, 
   3.8341996410317173`*^9, 3.834693633823764*^9, 3.8346936747555933`*^9, {
   3.834693711132259*^9, 3.834693738941004*^9}, 3.9138221720745907`*^9, 
   3.91382698471629*^9},
 CellLabel->
  "Out[900]=",ExpressionUUID->"b1c18577-a0f0-42b7-bc70-636252b45054"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"\<\"k1fixBWL1.txt\"\>", ",", "\<\"k1fixH1.txt\"\>", 
   ",", "\<\"k1fixLR.txt\"\>", ",", "\<\"k1varBWL1.txt\"\>", 
   ",", "\<\"k1varH1.txt\"\>", ",", "\<\"k1varLR.txt\"\>", 
   ",", "\<\"k2fixA0.txt\"\>", ",", "\<\"k2fixA1.txt\"\>", 
   ",", "\<\"k2fixA3.txt\"\>", ",", "\<\"k2fixAGK.txt\"\>", 
   ",", "\<\"k2fixAG.txt\"\>", ",", "\<\"k2fixCDAO.txt\"\>", 
   ",", "\<\"k2fixGB.txt\"\>", ",", "\<\"k2fixGIA.txt\"\>", 
   ",", "\<\"k2fixGI.txt\"\>", ",", "\<\"k2fixH2.txt\"\>", 
   ",", "\<\"k2fixH3.txt\"\>", ",", "\<\"k2fixHTb.txt\"\>", 
   ",", "\<\"k2fixHT.txt\"\>", ",", "\<\"k2fixHV.txt\"\>", 
   ",", "\<\"k2fixMM.txt\"\>", ",", "\<\"k2fixR.txt\"\>", 
   ",", "\<\"k2fixSHb.txt\"\>", ",", "\<\"k2fixSH.txt\"\>", 
   ",", "\<\"k2varA0.txt\"\>", ",", "\<\"k2varA1.txt\"\>", 
   ",", "\<\"k2varA3.txt\"\>", ",", "\<\"k2varAGK.txt\"\>", 
   ",", "\<\"k2varAG.txt\"\>", ",", "\<\"k2varCDAO.txt\"\>", 
   ",", "\<\"k2varGB.txt\"\>", ",", "\<\"k2varGIA.txt\"\>", 
   ",", "\<\"k2varGI.txt\"\>", ",", "\<\"k2varH2.txt\"\>", 
   ",", "\<\"k2varH3.txt\"\>", ",", "\<\"k2varHTb.txt\"\>", 
   ",", "\<\"k2varHT.txt\"\>", ",", "\<\"k2varHV.txt\"\>", 
   ",", "\<\"k2varMM.txt\"\>", ",", "\<\"k2varR.txt\"\>", 
   ",", "\<\"k2varSHb.txt\"\>", ",", "\<\"k2varSH.txt\"\>", 
   ",", "\<\"k3fixA2.txt\"\>", ",", "\<\"k3fixAA.txt\"\>", 
   ",", "\<\"k3fixBD.txt\"\>", ",", "\<\"k3fixBWL2.txt\"\>", 
   ",", "\<\"k3fixCM.txt\"\>", ",", "\<\"k3fixFHM.txt\"\>", 
   ",", "\<\"k3fixH3R.txt\"\>", ",", "\<\"k3fixHLBb.txt\"\>", 
   ",", "\<\"k3fixHLB.txt\"\>", ",", "\<\"k3fixMHb.txt\"\>", 
   ",", "\<\"k3fixMHc.txt\"\>", ",", "\<\"k3fixMH.txt\"\>", 
   ",", "\<\"k3fixRGD.txt\"\>", ",", "\<\"k3fixS3b.txt\"\>", 
   ",", "\<\"k3fixS3.txt\"\>", ",", "\<\"k3fixSBB.txt\"\>", 
   ",", "\<\"k3fixSSS.txt\"\>", ",", "\<\"k3fixTTA.txt\"\>", 
   ",", "\<\"k3fixT.txt\"\>", ",", "\<\"k3fixW.txt\"\>", 
   ",", "\<\"k3varA2.txt\"\>", ",", "\<\"k3varAA.txt\"\>", 
   ",", "\<\"k3varBD.txt\"\>", ",", "\<\"k3varBWL2.txt\"\>", 
   ",", "\<\"k3varCM.txt\"\>", ",", "\<\"k3varFHM.txt\"\>", 
   ",", "\<\"k3varH3R.txt\"\>", ",", "\<\"k3varHLBb.txt\"\>", 
   ",", "\<\"k3varHLB.txt\"\>", ",", "\<\"k3varMHb.txt\"\>", 
   ",", "\<\"k3varMHc.txt\"\>", ",", "\<\"k3varMH.txt\"\>", 
   ",", "\<\"k3varRGD.txt\"\>", ",", "\<\"k3varS3b.txt\"\>", 
   ",", "\<\"k3varS3.txt\"\>", ",", "\<\"k3varSBB.txt\"\>", 
   ",", "\<\"k3varSSS.txt\"\>", ",", "\<\"k3varTTA.txt\"\>", 
   ",", "\<\"k3varT.txt\"\>", ",", "\<\"k3varW.txt\"\>", 
   ",", "\<\"k4fixAAOR.txt\"\>", ",", "\<\"k4fixBDOR.txt\"\>", 
   ",", "\<\"k4fixCMOR.txt\"\>", ",", "\<\"k4fixSN1.txt\"\>", 
   ",", "\<\"k4fixSN2.txt\"\>", ",", "\<\"k4varAAOR.txt\"\>", 
   ",", "\<\"k4varBDOR.txt\"\>", ",", "\<\"k4varCMOR.txt\"\>", 
   ",", "\<\"k4varSN1.txt\"\>", ",", "\<\"k4varSN2.txt\"\>"}], 
  "}"}]], "Output",
 CellChangeTimes->{
  3.821283717913576*^9, 3.821283761793239*^9, 3.821358062749962*^9, 
   3.821473683265218*^9, 3.821489431458932*^9, 3.8217364428092422`*^9, 
   3.82173667533838*^9, {3.821736718943734*^9, 3.8217367480254097`*^9}, 
   3.821837713022696*^9, 3.821837764670711*^9, {3.821838674578001*^9, 
   3.821838702580845*^9}, 3.821838777596634*^9, 3.821838811284667*^9, 
   3.821838892168049*^9, 3.821839229490798*^9, 3.821839289903377*^9, 
   3.821839989855959*^9, 3.821840139350628*^9, 3.824426325246872*^9, 
   3.824552939975606*^9, 3.824553047058134*^9, 3.824553113476007*^9, {
   3.824553918211269*^9, 3.824553941929109*^9}, 3.8245713598982143`*^9, 
   3.824571615148594*^9, 3.824571733459551*^9, 3.824571821294758*^9, 
   3.824594572671687*^9, 3.824594656903871*^9, {3.824594692966066*^9, 
   3.824594736933958*^9}, 3.8245951236617002`*^9, {3.824595224013135*^9, 
   3.8245952436828127`*^9}, 3.824595320142049*^9, 3.824595373029558*^9, 
   3.824596827147439*^9, 3.824599290512032*^9, 3.8245993479112787`*^9, 
   3.824599392494898*^9, 3.8245994578752537`*^9, 3.824600459191856*^9, 
   3.824600556353489*^9, 3.8246723401942863`*^9, 3.824672449129015*^9, 
   3.824672492906993*^9, 3.824687181053759*^9, 3.824944073355034*^9, 
   3.8249441430130463`*^9, 3.824944196475874*^9, 3.824946231609867*^9, 
   3.8249978418052597`*^9, 3.825029725198988*^9, 3.825030812695064*^9, 
   3.825031082573687*^9, 3.825032037560668*^9, 3.8250322838822603`*^9, 
   3.825032433665989*^9, 3.825158737629599*^9, 3.825166101730838*^9, 
   3.825426069045907*^9, 3.82542663794422*^9, 3.8254279870785513`*^9, 
   3.825436397726921*^9, 3.8254385292151747`*^9, 3.825441763248808*^9, 
   3.8254493692769213`*^9, 3.8254638846260242`*^9, 3.825523336301756*^9, 
   3.825523463837887*^9, 3.82552351289047*^9, 3.8255525455054483`*^9, 
   3.825552578658648*^9, 3.82555282138538*^9, 3.825552890925305*^9, 
   3.825552968608398*^9, 3.8255530018323603`*^9, {3.8255531889818583`*^9, 
   3.825553217282958*^9}, 3.825553265179111*^9, 3.8255535357470512`*^9, 
   3.8255538214862413`*^9, 3.82555388736963*^9, 3.825553953269692*^9, 
   3.825638719999401*^9, {3.825638878849853*^9, 3.825638907989851*^9}, 
   3.825638964364759*^9, 3.8256392585852213`*^9, 3.825639649953084*^9, 
   3.825639750144898*^9, 3.825639856808455*^9, 3.825639910461055*^9, 
   3.825640024502027*^9, 3.825640067559943*^9, {3.8256401798490353`*^9, 
   3.825640254466804*^9}, 3.828053020101777*^9, 3.828053140119223*^9, 
   3.828053281226755*^9, 3.828053381358287*^9, 3.828053419567129*^9, 
   3.8280912400055847`*^9, 3.828534012437327*^9, 3.828539949615505*^9, 
   3.8285404943655024`*^9, 3.828540564644112*^9, 3.8285406739927692`*^9, 
   3.828540979819414*^9, 3.828541016050722*^9, 3.828541702426591*^9, 
   3.828607837717664*^9, 3.828608451065131*^9, 3.828608633022655*^9, 
   3.828613038842651*^9, 3.82861409090543*^9, 3.828616859686411*^9, 
   3.8286219892580147`*^9, 3.828623485712482*^9, 3.828625478358981*^9, {
   3.828641035870944*^9, 3.8286410599056683`*^9}, 3.828647641596143*^9, 
   3.8286600601587954`*^9, 3.82866055836465*^9, 3.828661685203168*^9, {
   3.8286617692386293`*^9, 3.828661794450316*^9}, 3.82866264308572*^9, 
   3.8286630417960033`*^9, 3.828663679995862*^9, 3.8286639881715*^9, 
   3.828664492389189*^9, 3.828664868663672*^9, 3.828665167716435*^9, 
   3.8286654573151217`*^9, 3.82866554451665*^9, 3.828694601409953*^9, 
   3.828697340810833*^9, 3.828697373096623*^9, 3.828699157368094*^9, 
   3.8287000695629597`*^9, 3.828700421284803*^9, 3.828711298523411*^9, 
   3.8287209356236477`*^9, 3.828908660398972*^9, 3.828908755441113*^9, 
   3.828911040701927*^9, 3.828911386756925*^9, 3.828911470373048*^9, 
   3.828911557388294*^9, 3.828911977696866*^9, 3.828912173274919*^9, 
   3.828912269849279*^9, 3.828912475299453*^9, 3.8289126339228983`*^9, 
   3.8289573630558434`*^9, 3.8289622857786617`*^9, 3.8289623564263487`*^9, 
   3.828962391680706*^9, 3.828962434410884*^9, 3.828962471659651*^9, {
   3.828962502104456*^9, 3.8289625314554234`*^9}, 3.8289684573200417`*^9, 
   3.828968491695799*^9, 3.82896853516324*^9, 3.8289686001823606`*^9, 
   3.829003856614623*^9, 3.8290040433813868`*^9, 3.829004245475973*^9, 
   3.829005449939274*^9, 3.829005483801612*^9, 3.8290055140404663`*^9, 
   3.829068479441791*^9, 3.829070145358726*^9, {3.829070234311528*^9, 
   3.829070244766986*^9}, 3.829070291055995*^9, 3.8290704063721247`*^9, 
   3.829070532607337*^9, 3.829070564848271*^9, 3.829070596010833*^9, 
   3.82908016804676*^9, 3.829080237315843*^9, {3.829080280590684*^9, 
   3.8290803397708263`*^9}, 3.8290806559485083`*^9, 3.829084703370414*^9, 
   3.829084767784116*^9, 3.829084851508293*^9, {3.8290848833707857`*^9, 
   3.829084911888357*^9}, 3.8290850357742767`*^9, 3.82908512314226*^9, 
   3.829091000845223*^9, 3.829091394445816*^9, 3.8290921262562723`*^9, 
   3.829092182281989*^9, {3.829330242578782*^9, 3.829330325725052*^9}, 
   3.829936861065497*^9, 3.829936989625111*^9, 3.829937085785881*^9, 
   3.829937230686879*^9, 3.829937311263938*^9, {3.82993734157338*^9, 
   3.829937396200919*^9}, 3.834173007240198*^9, {3.834173094341731*^9, 
   3.834173124145454*^9}, {3.8341731575209627`*^9, 3.834173186309477*^9}, 
   3.8341994548244753`*^9, 3.8341995712915077`*^9, 3.834199607978443*^9, 
   3.8341996410317173`*^9, 3.834693633823764*^9, 3.8346936747555933`*^9, {
   3.834693711132259*^9, 3.834693738941004*^9}, 3.9138221720745907`*^9, 
   3.913826984717066*^9},
 CellLabel->
  "Out[901]=",ExpressionUUID->"ef9ddafa-13e7-435c-b141-2119439dd46c"],

Cell[BoxData["\<\"/Users/novakm/Git/GeometricComplexity/figs/Arithmetic\"\>"],\
 "Output",
 CellChangeTimes->{
  3.821283717913576*^9, 3.821283761793239*^9, 3.821358062749962*^9, 
   3.821473683265218*^9, 3.821489431458932*^9, 3.8217364428092422`*^9, 
   3.82173667533838*^9, {3.821736718943734*^9, 3.8217367480254097`*^9}, 
   3.821837713022696*^9, 3.821837764670711*^9, {3.821838674578001*^9, 
   3.821838702580845*^9}, 3.821838777596634*^9, 3.821838811284667*^9, 
   3.821838892168049*^9, 3.821839229490798*^9, 3.821839289903377*^9, 
   3.821839989855959*^9, 3.821840139350628*^9, 3.824426325246872*^9, 
   3.824552939975606*^9, 3.824553047058134*^9, 3.824553113476007*^9, {
   3.824553918211269*^9, 3.824553941929109*^9}, 3.8245713598982143`*^9, 
   3.824571615148594*^9, 3.824571733459551*^9, 3.824571821294758*^9, 
   3.824594572671687*^9, 3.824594656903871*^9, {3.824594692966066*^9, 
   3.824594736933958*^9}, 3.8245951236617002`*^9, {3.824595224013135*^9, 
   3.8245952436828127`*^9}, 3.824595320142049*^9, 3.824595373029558*^9, 
   3.824596827147439*^9, 3.824599290512032*^9, 3.8245993479112787`*^9, 
   3.824599392494898*^9, 3.8245994578752537`*^9, 3.824600459191856*^9, 
   3.824600556353489*^9, 3.8246723401942863`*^9, 3.824672449129015*^9, 
   3.824672492906993*^9, 3.824687181053759*^9, 3.824944073355034*^9, 
   3.8249441430130463`*^9, 3.824944196475874*^9, 3.824946231609867*^9, 
   3.8249978418052597`*^9, 3.825029725198988*^9, 3.825030812695064*^9, 
   3.825031082573687*^9, 3.825032037560668*^9, 3.8250322838822603`*^9, 
   3.825032433665989*^9, 3.825158737629599*^9, 3.825166101730838*^9, 
   3.825426069045907*^9, 3.82542663794422*^9, 3.8254279870785513`*^9, 
   3.825436397726921*^9, 3.8254385292151747`*^9, 3.825441763248808*^9, 
   3.8254493692769213`*^9, 3.8254638846260242`*^9, 3.825523336301756*^9, 
   3.825523463837887*^9, 3.82552351289047*^9, 3.8255525455054483`*^9, 
   3.825552578658648*^9, 3.82555282138538*^9, 3.825552890925305*^9, 
   3.825552968608398*^9, 3.8255530018323603`*^9, {3.8255531889818583`*^9, 
   3.825553217282958*^9}, 3.825553265179111*^9, 3.8255535357470512`*^9, 
   3.8255538214862413`*^9, 3.82555388736963*^9, 3.825553953269692*^9, 
   3.825638719999401*^9, {3.825638878849853*^9, 3.825638907989851*^9}, 
   3.825638964364759*^9, 3.8256392585852213`*^9, 3.825639649953084*^9, 
   3.825639750144898*^9, 3.825639856808455*^9, 3.825639910461055*^9, 
   3.825640024502027*^9, 3.825640067559943*^9, {3.8256401798490353`*^9, 
   3.825640254466804*^9}, 3.828053020101777*^9, 3.828053140119223*^9, 
   3.828053281226755*^9, 3.828053381358287*^9, 3.828053419567129*^9, 
   3.8280912400055847`*^9, 3.828534012437327*^9, 3.828539949615505*^9, 
   3.8285404943655024`*^9, 3.828540564644112*^9, 3.8285406739927692`*^9, 
   3.828540979819414*^9, 3.828541016050722*^9, 3.828541702426591*^9, 
   3.828607837717664*^9, 3.828608451065131*^9, 3.828608633022655*^9, 
   3.828613038842651*^9, 3.82861409090543*^9, 3.828616859686411*^9, 
   3.8286219892580147`*^9, 3.828623485712482*^9, 3.828625478358981*^9, {
   3.828641035870944*^9, 3.8286410599056683`*^9}, 3.828647641596143*^9, 
   3.8286600601587954`*^9, 3.82866055836465*^9, 3.828661685203168*^9, {
   3.8286617692386293`*^9, 3.828661794450316*^9}, 3.82866264308572*^9, 
   3.8286630417960033`*^9, 3.828663679995862*^9, 3.8286639881715*^9, 
   3.828664492389189*^9, 3.828664868663672*^9, 3.828665167716435*^9, 
   3.8286654573151217`*^9, 3.82866554451665*^9, 3.828694601409953*^9, 
   3.828697340810833*^9, 3.828697373096623*^9, 3.828699157368094*^9, 
   3.8287000695629597`*^9, 3.828700421284803*^9, 3.828711298523411*^9, 
   3.8287209356236477`*^9, 3.828908660398972*^9, 3.828908755441113*^9, 
   3.828911040701927*^9, 3.828911386756925*^9, 3.828911470373048*^9, 
   3.828911557388294*^9, 3.828911977696866*^9, 3.828912173274919*^9, 
   3.828912269849279*^9, 3.828912475299453*^9, 3.8289126339228983`*^9, 
   3.8289573630558434`*^9, 3.8289622857786617`*^9, 3.8289623564263487`*^9, 
   3.828962391680706*^9, 3.828962434410884*^9, 3.828962471659651*^9, {
   3.828962502104456*^9, 3.8289625314554234`*^9}, 3.8289684573200417`*^9, 
   3.828968491695799*^9, 3.82896853516324*^9, 3.8289686001823606`*^9, 
   3.829003856614623*^9, 3.8290040433813868`*^9, 3.829004245475973*^9, 
   3.829005449939274*^9, 3.829005483801612*^9, 3.8290055140404663`*^9, 
   3.829068479441791*^9, 3.829070145358726*^9, {3.829070234311528*^9, 
   3.829070244766986*^9}, 3.829070291055995*^9, 3.8290704063721247`*^9, 
   3.829070532607337*^9, 3.829070564848271*^9, 3.829070596010833*^9, 
   3.82908016804676*^9, 3.829080237315843*^9, {3.829080280590684*^9, 
   3.8290803397708263`*^9}, 3.8290806559485083`*^9, 3.829084703370414*^9, 
   3.829084767784116*^9, 3.829084851508293*^9, {3.8290848833707857`*^9, 
   3.829084911888357*^9}, 3.8290850357742767`*^9, 3.82908512314226*^9, 
   3.829091000845223*^9, 3.829091394445816*^9, 3.8290921262562723`*^9, 
   3.829092182281989*^9, {3.829330242578782*^9, 3.829330325725052*^9}, 
   3.829936861065497*^9, 3.829936989625111*^9, 3.829937085785881*^9, 
   3.829937230686879*^9, 3.829937311263938*^9, {3.82993734157338*^9, 
   3.829937396200919*^9}, 3.834173007240198*^9, {3.834173094341731*^9, 
   3.834173124145454*^9}, {3.8341731575209627`*^9, 3.834173186309477*^9}, 
   3.8341994548244753`*^9, 3.8341995712915077`*^9, 3.834199607978443*^9, 
   3.8341996410317173`*^9, 3.834693633823764*^9, 3.8346936747555933`*^9, {
   3.834693711132259*^9, 3.834693738941004*^9}, 3.9138221720745907`*^9, 
   3.913826985114304*^9},
 CellLabel->
  "Out[903]=",ExpressionUUID->"3c131810-996e-4123-9853-3e8204fc7d0e"]
}, Open  ]],

Cell[TextData[{
 "The data files each have four independent variables (",
 StyleBox["\[CapitalNu]max, Pmax, number of prey levels, number of pred \
levels",
  FontSlant->"Italic"],
 ") and one response variable (",
 StyleBox["geometric complexity",
  FontSlant->"Italic"],
 ")."
}], "Text",
 CellChangeTimes->{{3.820337858246282*^9, 3.820337950466853*^9}, {
  3.8246874503537617`*^9, 
  3.824687451752961*^9}},ExpressionUUID->"bc8521ce-46d4-43a3-aa01-\
fe4c426ca54f"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"varH1", "//", "TableForm"}]], "Input",
 CellChangeTimes->{{3.820337780033626*^9, 3.820337784888517*^9}, {
  3.820337820480145*^9, 3.8203378405023317`*^9}, {3.820439358726396*^9, 
  3.8204393823725986`*^9}, {3.8205008267921247`*^9, 3.820500836135211*^9}},
 CellLabel->
  "In[904]:=",ExpressionUUID->"d4b5d756-95be-4b7b-a925-4481e703a331"],

Cell[BoxData[
 TagBox[GridBox[{
    {"21", "1", "5", "1", "1.6894212960396355`"},
    {"21", "2", "5", "2", "1.4227130273084736`"},
    {"21", "3", "5", "3", "1.2581098808738735`"},
    {"21", "5", "5", "4", "1.0108543795779565`"},
    {"21", "8", "5", "5", "0.6764043757802068`"},
    {"34", "1", "6", "1", "1.9638958114015839`"},
    {"34", "2", "6", "2", "1.7302839327615755`"},
    {"34", "3", "6", "3", "1.5968386405238169`"},
    {"34", "5", "6", "4", "1.4129511730332804`"},
    {"34", "8", "6", "5", "1.1893870477965336`"},
    {"55", "1", "7", "1", "2.23195430458178`"},
    {"55", "2", "7", "2", "2.021377701628497`"},
    {"55", "3", "7", "3", "1.9079206087640885`"},
    {"55", "5", "7", "4", "1.7625459419046772`"},
    {"55", "8", "7", "5", "1.5976043667457618`"},
    {"89", "1", "8", "1", "2.4954185671963036`"},
    {"89", "2", "8", "2", "2.3012180957565307`"},
    {"89", "3", "8", "3", "2.2018881283084117`"},
    {"89", "5", "8", "4", "2.081382780225769`"},
    {"89", "8", "8", "5", "1.9521420049695113`"},
    {"144", "1", "9", "1", "2.755155840909846`"},
    {"144", "2", "9", "2", "2.572932167197103`"},
    {"144", "3", "9", "3", "2.483555778119898`"},
    {"144", "5", "9", "4", "2.380543398182587`"},
    {"144", "8", "9", "5", "2.2743018655273293`"},
    {"233", "1", "10", "1", "3.010729580610058`"},
    {"233", "2", "10", "2", "2.837423243943025`"},
    {"233", "3", "10", "3", "2.755316127674154`"},
    {"233", "5", "10", "4", "2.6646790285330013`"},
    {"233", "8", "10", "5", "2.5746400522534545`"}
   },
   GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
   GridBoxSpacings->{"Columns" -> {
       Offset[0.27999999999999997`], {
        Offset[2.0999999999999996`]}, 
       Offset[0.27999999999999997`]}, "Rows" -> {
       Offset[0.2], {
        Offset[0.4]}, 
       Offset[0.2]}}],
  Function[BoxForm`e$, 
   TableForm[BoxForm`e$]]]], "Output",
 CellChangeTimes->{{3.82033778158641*^9, 3.820337785157662*^9}, {
   3.820337822131731*^9, 3.820337840775548*^9}, 3.820338717650605*^9, 
   3.820338754395858*^9, 3.820338830952116*^9, 3.820339007874772*^9, 
   3.820339569687216*^9, 3.8203396740961742`*^9, 3.820341250883626*^9, 
   3.8203599028302937`*^9, 3.820360131925*^9, 3.820361062447731*^9, {
   3.820439371557496*^9, 3.820439382608864*^9}, 3.820439937262168*^9, 
   3.8204399704433107`*^9, 3.820440024356123*^9, 3.820442616695384*^9, 
   3.820454115464222*^9, 3.820454496201912*^9, 3.820495908187969*^9, 
   3.820495939098359*^9, 3.8205007948894663`*^9, 3.820501562490857*^9, 
   3.820509734914969*^9, 3.8205113598599*^9, 3.820512808355678*^9, 
   3.820530232568018*^9, 3.82053565282127*^9, 3.820535726164564*^9, 
   3.820535800409954*^9, 3.82053583812362*^9, {3.8205358848374023`*^9, 
   3.820535909265383*^9}, 3.820541485704562*^9, 3.8205415491451273`*^9, 
   3.8206060464349203`*^9, 3.820606431191064*^9, 3.820607059901902*^9, 
   3.8206074708864594`*^9, 3.820607754171915*^9, 3.8206208164672203`*^9, 
   3.82123089919978*^9, {3.821231159487288*^9, 3.821231176248639*^9}, 
   3.821231247196108*^9, 3.8212313099745607`*^9, 3.8212692476932993`*^9, 
   3.821283717956232*^9, 3.821283762855603*^9, 3.82135806287204*^9, 
   3.821473683949266*^9, 3.821489431722806*^9, 3.821736443297641*^9, 
   3.821736675377301*^9, {3.8217367195355177`*^9, 3.821736748717246*^9}, 
   3.821837713807292*^9, 3.821837764705482*^9, {3.821838674721981*^9, 
   3.821838703378603*^9}, 3.821838777629963*^9, 3.821838811323242*^9, 
   3.8218388922037687`*^9, 3.821839229524974*^9, 3.8218392899406652`*^9, 
   3.821839989928301*^9, 3.821840139385291*^9, 3.8244263260456257`*^9, 
   3.824552940900331*^9, 3.824553047096162*^9, 3.824553113508522*^9, {
   3.8245539182625713`*^9, 3.8245539419652977`*^9}, 3.824571359931863*^9, 
   3.8245716152100267`*^9, 3.8245717334936733`*^9, 3.824571821328857*^9, 
   3.824594573537224*^9, 3.82459465696108*^9, {3.8245946930003653`*^9, 
   3.824594736968914*^9}, 3.824595123718832*^9, {3.824595224047467*^9, 
   3.824595243719143*^9}, 3.824595320176395*^9, 3.8245953730665493`*^9, 
   3.824596827181737*^9, 3.824599290546129*^9, 3.8245993479634027`*^9, 
   3.824599392527622*^9, 3.824599457909011*^9, 3.824600459224761*^9, 
   3.824600556385623*^9, 3.824672340459483*^9, 3.824672449162221*^9, 
   3.8246724929450073`*^9, 3.824687181095737*^9, 3.824944073595298*^9, 
   3.824944143048081*^9, 3.824944196510991*^9, 3.8249462317153473`*^9, 
   3.8249978422133093`*^9, 3.825029725771842*^9, 3.825030812760665*^9, 
   3.825031082607791*^9, 3.825032037600976*^9, 3.82503228391838*^9, 
   3.825032433701344*^9, 3.825158737762754*^9, 3.825166101887146*^9, 
   3.825426069300465*^9, 3.825426637997264*^9, 3.825427987120091*^9, 
   3.825436397843561*^9, 3.825438529258678*^9, 3.825441763300702*^9, 
   3.825449369320551*^9, 3.825463884701269*^9, 3.8255233363453712`*^9, 
   3.825523463894519*^9, 3.825523512928269*^9, 3.825552545640294*^9, 
   3.825552578696877*^9, 3.825552821449924*^9, 3.825552890968584*^9, 
   3.825552968651966*^9, 3.82555300187702*^9, {3.8255531890324373`*^9, 
   3.825553217321123*^9}, 3.8255532652194033`*^9, 3.825553535785808*^9, 
   3.825553821531786*^9, 3.825553887417225*^9, 3.825553953308833*^9, 
   3.8256387204284077`*^9, {3.8256388788929663`*^9, 3.825638908032943*^9}, 
   3.8256389644045057`*^9, 3.825639258622986*^9, 3.825639649993222*^9, 
   3.825639750186604*^9, 3.825639856846714*^9, 3.82563991050348*^9, 
   3.825640024543242*^9, 3.8256400675976887`*^9, {3.825640179889205*^9, 
   3.8256402545107393`*^9}, 3.828053020240253*^9, 3.828053140161788*^9, 
   3.8280532812675877`*^9, 3.828053381397732*^9, 3.828053419604639*^9, 
   3.828091240045611*^9, 3.828534012495466*^9, 3.828539949655209*^9, 
   3.828540494405035*^9, 3.828540564683457*^9, 3.828540674031459*^9, 
   3.828540979881093*^9, 3.828541016111451*^9, 3.828541702749199*^9, 
   3.8286078380552063`*^9, 3.8286084511182137`*^9, 3.828608633061039*^9, 
   3.8286130389082127`*^9, 3.828614090948866*^9, 3.828616859847149*^9, 
   3.828621989359935*^9, 3.828623485752226*^9, 3.8286254784455748`*^9, {
   3.828641037228958*^9, 3.828641060089971*^9}, 3.828660060305601*^9, 
   3.8286605584033422`*^9, 3.828661685263002*^9, {3.828661769283821*^9, 
   3.82866179449044*^9}, 3.828662643124731*^9, 3.8286630418360662`*^9, 
   3.828663680063953*^9, 3.828663988210682*^9, 3.828664492645586*^9, 
   3.828664868842709*^9, 3.828665167759027*^9, 3.828665457502544*^9, 
   3.828665544694915*^9, 3.828694601856969*^9, 3.828697340890676*^9, 
   3.828697373136376*^9, 3.8286991574166813`*^9, 3.828700069606575*^9, 
   3.828700421343384*^9, 3.828711299013188*^9, 3.828720935955974*^9, 
   3.828908661049205*^9, 3.828908755496995*^9, 3.8289110407460003`*^9, 
   3.828911386801015*^9, 3.82891147041848*^9, 3.828911557432712*^9, 
   3.8289119777419147`*^9, 3.828912173340164*^9, 3.828912269901966*^9, 
   3.828912475345752*^9, 3.828912633968581*^9, 3.828957363496744*^9, 
   3.828962285854274*^9, 3.828962356459971*^9, 3.828962391905064*^9, 
   3.8289624345156937`*^9, 3.828962471705957*^9, {3.8289625021487093`*^9, 
   3.8289625315017347`*^9}, 3.828968457369598*^9, 3.828968491841527*^9, 
   3.82896853523488*^9, 3.8289686003391857`*^9, 3.8290038569578743`*^9, 
   3.829004043957443*^9, 3.8290042455299683`*^9, 3.8290054500142393`*^9, 
   3.829005483883223*^9, 3.829005514134614*^9, 3.8290684806495733`*^9, 
   3.829070145405692*^9, {3.829070234358962*^9, 3.829070244813321*^9}, 
   3.8290702911009808`*^9, 3.829070406417774*^9, 3.829070532791074*^9, 
   3.829070565063163*^9, 3.829070596109271*^9, 3.829080168154903*^9, 
   3.8290802374224987`*^9, {3.829080280711536*^9, 3.8290803398392487`*^9}, 
   3.829080656001774*^9, 3.829084703417478*^9, 3.8290847678316813`*^9, 
   3.82908485156441*^9, {3.829084883428298*^9, 3.829084911935156*^9}, 
   3.829085035822029*^9, 3.8290851231988087`*^9, 3.8290910009265127`*^9, 
   3.829091394492427*^9, 3.829092126306891*^9, 3.82909218233505*^9, {
   3.829330243948474*^9, 3.829330325975507*^9}, 3.82993686233628*^9, 
   3.829936989669559*^9, 3.829937085830935*^9, 3.8299372307350187`*^9, 
   3.829937311308444*^9, {3.829937342033863*^9, 3.829937396742786*^9}, 
   3.834173008718116*^9, 3.834173094387786*^9, 3.8341731246630993`*^9, {
   3.834173157951282*^9, 3.834173186678156*^9}, 3.83419945513866*^9, 
   3.83419957147338*^9, 3.8341996082232924`*^9, 3.834199641199375*^9, 
   3.834693634244422*^9, 3.8346936750096684`*^9, {3.8346937113107653`*^9, 
   3.834693739149534*^9}, 3.913822172112466*^9, 3.9138269851227903`*^9},
 CellLabel->
  "Out[904]//TableForm=",ExpressionUUID->"4924adf7-d512-47ac-8ae0-\
e3bc55332bb6"]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
Convenience function to append complexity differences to independent variables\
\>", "Subsection",
 CellChangeTimes->{{3.8173237788371153`*^9, 3.817323793621955*^9}, {
  3.817324059777796*^9, 3.817324074832838*^9}, {3.817324480289125*^9, 
  3.817324481432638*^9}, {3.8192424586892*^9, 3.819242467642172*^9}, {
  3.820338080974063*^9, 3.820338097549116*^9}, {3.8246874612092247`*^9, 
  3.8246874702080173`*^9}},ExpressionUUID->"0018b4b1-b12f-428f-9ef7-\
5389169b4ea7"],

Cell["\<\
Denom_ is the measure to which the Numer_ measure is relativized.  
**Note that only real part of complex numbers are returned (i.e. we ignore \
what are usually small imaginary parts )**\
\>", "Text",
 CellChangeTimes->{{3.817323812435058*^9, 3.817323855233652*^9}, {
  3.81924247649813*^9, 3.819242514072391*^9}, {3.820337302291645*^9, 
  3.820337320401532*^9}, {3.820337993705056*^9, 3.820338004240802*^9}, {
  3.820607425727882*^9, 
  3.820607462854632*^9}},ExpressionUUID->"4feccc87-384b-4496-acba-\
eba7f0fd4dc8"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"Relativize", "[", 
     RowBox[{"dataDenom_", ",", "dataNumer_"}], "]"}], ":=", 
    "\[IndentingNewLine]", 
    RowBox[{"Join", "[", 
     RowBox[{
      RowBox[{"dataDenom", "[", 
       RowBox[{"[", 
        RowBox[{"All", ",", 
         RowBox[{"{", 
          RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}]}], "]"}], "]"}], 
      ",", "\[IndentingNewLine]", 
      RowBox[{"Transpose", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Re", "[", 
          RowBox[{"dataNumer", "[", 
           RowBox[{"[", 
            RowBox[{"All", ",", "5"}], "]"}], "]"}], "]"}], "-", 
         RowBox[{"dataDenom", "[", 
          RowBox[{"[", 
           RowBox[{"All", ",", "5"}], "]"}], "]"}]}], "}"}], "]"}], ",", 
      "2"}], "]"}]}], ";"}], "  ", 
  RowBox[{"(*", " ", 
   RowBox[{
   "Simply", " ", "replaces", " ", "division", " ", "by", " ", 
    "subtraction"}], " ", "*)"}]}]], "Input",
 CellChangeTimes->{{3.81732299333392*^9, 3.81732302174054*^9}, {
   3.8173230963865223`*^9, 3.8173231822366543`*^9}, {3.817323301664303*^9, 
   3.8173235226706944`*^9}, {3.8173239140725803`*^9, 3.817323992444365*^9}, 
   3.817324084912911*^9, {3.817324498529277*^9, 3.817324500208415*^9}, {
   3.817324654002639*^9, 3.817324755109481*^9}, {3.8192418315520678`*^9, 
   3.819241839571138*^9}, {3.819241882265332*^9, 3.819241952342764*^9}, {
   3.819242021764966*^9, 3.819242068714172*^9}, {3.819242105137258*^9, 
   3.8192421510470057`*^9}, {3.819242201829896*^9, 3.819242236411672*^9}, {
   3.819242422933255*^9, 3.819242448755464*^9}, {3.8203372907966948`*^9, 
   3.8203372935481586`*^9}, {3.8203373260588512`*^9, 
   3.8203373830575027`*^9}, {3.820337417743504*^9, 3.8203374295587463`*^9}, {
   3.820360895274284*^9, 3.8203609064890327`*^9}, {3.820361051500152*^9, 
   3.820361052867422*^9}, {3.8204393422629538`*^9, 3.820439377868891*^9}, {
   3.8204437813592043`*^9, 3.820443782198412*^9}, {3.8206071544916763`*^9, 
   3.820607156162504*^9}, {3.820607195545083*^9, 3.82060729044552*^9}, {
   3.820607361540106*^9, 3.82060737279438*^9}, {3.8206074113051558`*^9, 
   3.820607423096562*^9}, {3.8211858804903297`*^9, 3.821185896496347*^9}},
 CellLabel->
  "In[905]:=",ExpressionUUID->"687b2a81-889a-4748-937a-9a078e6f818a"],

Cell[BoxData[""], "Input",
 CellChangeTimes->{3.820607308316888*^9},
 CellLabel->
  "In[906]:=",ExpressionUUID->"65696f40-73a3-45ba-974c-c9072eba0f43"],

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"blankplot", " ", "=", " ", 
    RowBox[{"ListPlot", "[", 
     RowBox[{
      RowBox[{"{", "0", "}"}], ",", 
      RowBox[{"Axes", "\[Rule]", "False"}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "None"}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
   RowBox[{
   "data_", ",", "\[IndentingNewLine]", "predVars_", ",", 
    "\[IndentingNewLine]", "axislabels_", ",", "\[IndentingNewLine]", 
    "plotlabel_", ",", "\[IndentingNewLine]", "plotRange_", ",", 
    "\[IndentingNewLine]", "colors_"}], "]"}], ":=", "\[IndentingNewLine]", 
  RowBox[{"ListLinePlot", "[", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Transpose", "[", 
     RowBox[{
      RowBox[{"SplitBy", "[", 
       RowBox[{"data", ",", 
        RowBox[{
         RowBox[{"Part", "[", 
          RowBox[{"#", ",", 
           RowBox[{"predVars", "[", 
            RowBox[{"[", "1", "]"}], "]"}]}], "]"}], "&"}]}], "]"}], "[", 
      RowBox[{"[", 
       RowBox[{"All", ",", "All", ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"predVars", "[", 
           RowBox[{"[", "1", "]"}], "]"}], ",", "5"}], "}"}]}], "]"}], "]"}], 
     "]"}], ",", "\[IndentingNewLine]", 
    RowBox[{"ScalingFunctions", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{"\"\<Log\>\"", ",", "\"\<Linear\>\""}], "}"}]}], ",", 
    "\[IndentingNewLine]", 
    RowBox[{"ColorFunction", "\[Rule]", 
     RowBox[{"Function", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"x", ",", "y"}], "}"}], ",", 
       RowBox[{"Which", "[", 
        RowBox[{
         RowBox[{"y", "\[GreaterEqual]", " ", "0.02"}], ",", 
         RowBox[{"colors", "[", 
          RowBox[{"[", "1", "]"}], "]"}], ",", 
         RowBox[{"y", "\[LessEqual]", " ", 
          RowBox[{"-", "0.02"}]}], ",", 
         RowBox[{"colors", "[", 
          RowBox[{"[", "2", "]"}], "]"}], ",", "True", ",", 
         RowBox[{"colors", "[", 
          RowBox[{"[", "3", "]"}], "]"}]}], "]"}]}], "]"}]}], ",", 
    "\[IndentingNewLine]", 
    RowBox[{"ColorFunctionScaling", "\[Rule]", "False"}], ",", 
    "\[IndentingNewLine]", 
    RowBox[{"PlotRange", "\[Rule]", "plotRange"}], ",", "\[IndentingNewLine]", 
    RowBox[{"PlotRangePadding", "\[Rule]", "0.05"}], ",", 
    "\[IndentingNewLine]", 
    RowBox[{"PlotLegends", "\[Rule]", "False"}], ",", "\[IndentingNewLine]", 
    RowBox[{"Axes", "\[Rule]", " ", "False"}], ",", "\[IndentingNewLine]", 
    RowBox[{"Frame", "\[Rule]", " ", "True"}], ",", "\[IndentingNewLine]", 
    RowBox[{"PlotStyle", "\[Rule]", 
     RowBox[{"LineStyle", "[", 
      RowBox[{"[", 
       RowBox[{"1", ";;", 
        RowBox[{"Length", "[", 
         RowBox[{"DeleteDuplicates", "[", 
          RowBox[{"data", "[", 
           RowBox[{"[", 
            RowBox[{"All", ",", 
             RowBox[{"predVars", "[", 
              RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "]"}], "]"}], "]"}]}], 
       "]"}], "]"}]}], ",", "\[IndentingNewLine]", 
    RowBox[{"FrameLabel", "\[Rule]", " ", "axislabels"}], ",", 
    "\[IndentingNewLine]", 
    RowBox[{"ImagePadding", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"60", ",", "10"}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"40", ",", " ", "20"}], "}"}]}], "}"}]}], ",", 
    "\[IndentingNewLine]", 
    RowBox[{"PlotRangeClipping", "\[Rule]", "False"}], ",", 
    "\[IndentingNewLine]", 
    RowBox[{"Epilog", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{"Text", "[", 
       RowBox[{
        RowBox[{"Style", "[", 
         RowBox[{"plotlabel", ",", "12"}], "]"}], ",", 
        RowBox[{"Scaled", "[", 
         RowBox[{"{", 
          RowBox[{"0.5", ",", "1.1"}], "}"}], "]"}]}], "]"}], "}"}]}]}], 
   "\[IndentingNewLine]", "]"}]}]}], "Input",
 CellChangeTimes->{{3.816306386124176*^9, 3.8163063921193*^9}, {
   3.81630646630332*^9, 3.816306475540495*^9}, {3.816306787585993*^9, 
   3.816306837511751*^9}, {3.816306869095235*^9, 3.816306872300852*^9}, {
   3.816345416327927*^9, 3.816345511670801*^9}, {3.816345782604364*^9, 
   3.81634578321037*^9}, {3.816349301228387*^9, 3.816349329072562*^9}, {
   3.8163556140228443`*^9, 3.816355636099658*^9}, {3.816355917696817*^9, 
   3.81635592284031*^9}, {3.816355961502699*^9, 3.81635597149335*^9}, {
   3.816358524923923*^9, 3.816358525721992*^9}, {3.816359428488605*^9, 
   3.81635947070394*^9}, 3.816359675425713*^9, {3.816359870433649*^9, 
   3.816359927460237*^9}, {3.81636001269092*^9, 3.816360012777248*^9}, {
   3.816360206739526*^9, 3.816360219457468*^9}, {3.816360270784112*^9, 
   3.8163602727748623`*^9}, 3.8163604870577497`*^9, {3.8163606195387783`*^9, 
   3.81636065950366*^9}, {3.816362342585772*^9, 3.816362363174869*^9}, {
   3.81636241519862*^9, 3.816362434021359*^9}, {3.816362464180767*^9, 
   3.8163624940572023`*^9}, {3.816362525202593*^9, 3.8163625764864283`*^9}, {
   3.816362642803762*^9, 3.8163626798664837`*^9}, {3.8163628122957697`*^9, 
   3.8163629121313887`*^9}, 3.816363450662854*^9, {3.8163635355721407`*^9, 
   3.816363575623752*^9}, {3.816363620687318*^9, 3.8163636332951508`*^9}, {
   3.8163637594505053`*^9, 3.816363898339398*^9}, {3.8163640877502728`*^9, 
   3.816364126770791*^9}, {3.816364228840251*^9, 3.81636423927822*^9}, {
   3.816364834569112*^9, 3.816364931275236*^9}, {3.8163649816034*^9, 
   3.816365025431823*^9}, {3.816365096711343*^9, 3.816365123987855*^9}, {
   3.8163660145616493`*^9, 3.816366032730111*^9}, {3.8163661318163548`*^9, 
   3.8163663052391768`*^9}, {3.816366340272155*^9, 3.8163663512949867`*^9}, {
   3.816366428677466*^9, 3.8163664291628447`*^9}, {3.8163844454676733`*^9, 
   3.816384459481962*^9}, {3.816384592844125*^9, 3.816384593386145*^9}, {
   3.816386710918906*^9, 3.816386760147542*^9}, {3.816386804381626*^9, 
   3.816386879095072*^9}, {3.816386923790298*^9, 3.816386941412841*^9}, {
   3.816387032051032*^9, 3.8163870468006783`*^9}, {3.816444660443944*^9, 
   3.8164446652146587`*^9}, {3.816445660256682*^9, 3.816445677734663*^9}, {
   3.8167260512764883`*^9, 3.816726051618678*^9}, {3.816781134540922*^9, 
   3.816781149211307*^9}, {3.8167812321954927`*^9, 3.816781262513309*^9}, {
   3.816781305721952*^9, 3.816781371647234*^9}, {3.820337277216474*^9, 
   3.820337277253586*^9}, {3.820337467173953*^9, 3.820337531475625*^9}, 
   3.820337599569209*^9, {3.820337651015842*^9, 3.820337659438446*^9}, {
   3.820338225849972*^9, 3.820338226225193*^9}, {3.820338276744081*^9, 
   3.820338285110422*^9}, {3.820338342556929*^9, 3.8203383551479683`*^9}, 
   3.820338398163212*^9, {3.8203384317452602`*^9, 3.8203384329213142`*^9}, {
   3.820338745117367*^9, 3.820338746076757*^9}, 3.820338974845014*^9, {
   3.820360028247098*^9, 3.820360031220089*^9}, {3.8203600618678913`*^9, 
   3.82036011984892*^9}, {3.820360217941765*^9, 3.820360332888473*^9}, {
   3.8203606942913437`*^9, 3.820360717962308*^9}, {3.820360759969324*^9, 
   3.8203607601682463`*^9}, {3.820360910441826*^9, 3.8203609107618027`*^9}, {
   3.820361158585142*^9, 3.820361253244957*^9}, {3.820361468813094*^9, 
   3.820361553848926*^9}, {3.820361601224601*^9, 3.82036166942852*^9}, 
   3.820417983346447*^9, {3.82041806477503*^9, 3.8204181086601686`*^9}, {
   3.820422134331917*^9, 3.820422212079978*^9}, {3.820427268753951*^9, 
   3.820427345541873*^9}, {3.820439440532199*^9, 3.820439448179399*^9}, {
   3.820439893376903*^9, 3.8204399351763773`*^9}, {3.8204399670230093`*^9, 
   3.820439967350263*^9}, {3.8204400215487432`*^9, 3.8204400219157543`*^9}, {
   3.8204423374108667`*^9, 3.820442343090352*^9}, {3.820442520321477*^9, 
   3.8204425207700987`*^9}, {3.820442598215561*^9, 3.820442598630766*^9}, {
   3.8204427792967377`*^9, 3.820442779399762*^9}, {3.820442819390629*^9, 
   3.820442877724291*^9}, {3.820442999831573*^9, 3.820443025277974*^9}, {
   3.8204448191585608`*^9, 3.820444821958654*^9}, {3.820450534069906*^9, 
   3.820450594347495*^9}, {3.820450778653612*^9, 3.820450786532168*^9}, {
   3.820450919415773*^9, 3.820450970573242*^9}, {3.820453409086705*^9, 
   3.820453415549988*^9}, {3.820453456636615*^9, 3.8204535066735363`*^9}, {
   3.820454365953689*^9, 3.820454366800994*^9}, {3.820454451581819*^9, 
   3.820454460404855*^9}, {3.820500866935145*^9, 3.8205009118927307`*^9}, {
   3.820500959043461*^9, 3.820501007833465*^9}, {3.82050107684754*^9, 
   3.82050108167096*^9}, {3.820501423075223*^9, 3.820501423274784*^9}, 
   3.820530241739563*^9, {3.8205352138509827`*^9, 3.820535252265112*^9}, {
   3.820535317014792*^9, 3.820535336765746*^9}, {3.8205355318143883`*^9, 
   3.8205355359579906`*^9}, {3.820535567653222*^9, 3.8205355709968767`*^9}, {
   3.820535720415329*^9, 3.820535723926764*^9}, {3.820535795932805*^9, 
   3.8205357961555977`*^9}, {3.8205358265370893`*^9, 3.820535907364373*^9}, {
   3.820541476365152*^9, 3.820541482936976*^9}, 3.82054154698248*^9, {
   3.820606927085288*^9, 3.82060694780324*^9}, {3.820607132678157*^9, 
   3.82060714305173*^9}, {3.8206077517730207`*^9, 3.820607752796213*^9}, {
   3.821185915985458*^9, 3.821185926112294*^9}, {3.821231306413313*^9, 
   3.82123130868431*^9}, {3.8214910937290163`*^9, 3.82149109710454*^9}, {
   3.8245529324949703`*^9, 3.824552935143895*^9}, {3.824553037426258*^9, 
   3.824553044785123*^9}, 3.8245537286614037`*^9, {3.8245539123122387`*^9, 
   3.824553956875152*^9}, 3.8245540743642073`*^9, 3.8245541146343107`*^9, {
   3.824594753193099*^9, 3.824594755629755*^9}, {3.8245950304906607`*^9, 
   3.824595118022625*^9}, {3.824595155293981*^9, 3.8245952190672073`*^9}, {
   3.824595277945094*^9, 3.824595303727584*^9}, {3.8245953453184643`*^9, 
   3.824595347469398*^9}, {3.8245956153880672`*^9, 3.824595710503183*^9}, {
   3.82459577202985*^9, 3.824595937535811*^9}, {3.8245992829338007`*^9, 
   3.824599283268814*^9}, {3.824599318564372*^9, 3.8245993186834908`*^9}, {
   3.8245993802099447`*^9, 3.824599384768923*^9}, {3.8245994427994623`*^9, 
   3.824599443487608*^9}, {3.824599993706237*^9, 3.82459999407364*^9}, {
   3.82460008612654*^9, 3.824600104941216*^9}, {3.8246001666526833`*^9, 
   3.8246002130812798`*^9}, 3.824600260679771*^9, {3.824600294390551*^9, 
   3.824600322628461*^9}, {3.824600364947981*^9, 3.824600367570828*^9}, {
   3.824600405225933*^9, 3.824600409817306*^9}, {3.8246005529484253`*^9, 
   3.8246005532034607`*^9}, {3.824672335507926*^9, 3.824672335723773*^9}, {
   3.824672367315117*^9, 3.824672367682122*^9}, {3.824672421601008*^9, 
   3.824672473750689*^9}, {3.824672707846835*^9, 3.824672712165945*^9}, {
   3.824687493496593*^9, 3.824687494048149*^9}, {3.824944105651989*^9, 
   3.8249441367299023`*^9}, {3.825031999596199*^9, 3.825032002098379*^9}, {
   3.8254423652678432`*^9, 3.825442413265324*^9}, {3.8254424651519823`*^9, 
   3.825442504053473*^9}, {3.825442551972974*^9, 3.82544255269214*^9}, {
   3.82555242732691*^9, 3.825552446701374*^9}, {3.825552476948642*^9, 
   3.8255525071151533`*^9}, {3.8255525394204397`*^9, 3.825552563169482*^9}, {
   3.825552773219379*^9, 3.825552810999861*^9}, {3.825552884141718*^9, 
   3.8255528845888653`*^9}, {3.825552923876217*^9, 3.825552926955222*^9}, {
   3.825552959818922*^9, 3.825552959906052*^9}, {3.825552999761211*^9, 
   3.8255530003124228`*^9}, {3.825553161682457*^9, 3.8255532154638042`*^9}, {
   3.825553258935053*^9, 3.825553263030349*^9}, {3.825553335139789*^9, 
   3.825553395977063*^9}, {3.825639251260309*^9, 3.825639251262064*^9}, {
   3.8256393141757603`*^9, 3.825639317070046*^9}, {3.829091007656226*^9, 
   3.8290910288892107`*^9}, {3.8290911140078583`*^9, 3.829091132647058*^9}, {
   3.8299367237724133`*^9, 3.8299367911616983`*^9}, {3.829936987019359*^9, 
   3.829936987570436*^9}, {3.829937077216062*^9, 3.829937082062772*^9}, {
   3.829937225434133*^9, 3.829937228777343*^9}},
 CellLabel->
  "In[907]:=",ExpressionUUID->"735164d9-3203-4292-ad14-44c18b28f061"]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Varying max abundance, varying number of levels", "Section",
 CellChangeTimes->{{3.815614457439783*^9, 3.815614522709207*^9}, {
  3.815847343644085*^9, 3.8158473783070927`*^9}, {3.824686673679988*^9, 
  3.824686683623619*^9}},ExpressionUUID->"1dcf95c5-15ef-46c0-b417-\
f659bc7e29ef"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"AxisFontSize", "=", "10"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"LegendFontSize", "=", "12"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"cm", " ", "=", " ", 
   RowBox[{"72", "/", "2.54"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"colors1", "=", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"GrayLevel", "[", "0.4", "]"}], ",", 
     RowBox[{"GrayLevel", "[", "0.4", "]"}]}], "}"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"colors2", " ", "=", " ", 
   RowBox[{"Append", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"ColorData", "[", 
       RowBox[{"97", ",", "\"\<ColorList\>\""}], "]"}], "[", 
      RowBox[{"[", 
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], "]"}], "]"}], ",", 
     RowBox[{"GrayLevel", "[", "0.4", "]"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"LineStyle", "=", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Dashing", "[", 
      RowBox[{"{", "}"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"Dashing", "[", 
      RowBox[{"{", 
       RowBox[{"0.05", ",", "0.01"}], "}"}], "]"}], ",", 
     "\[IndentingNewLine]", "Dashed", ",", "\[IndentingNewLine]", "DotDashed",
      ",", "\[IndentingNewLine]", "Dotted"}], "\[IndentingNewLine]", "}"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"legend", "=", 
   RowBox[{"SwatchLegend", "[", 
    RowBox[{"colors2", ",", 
     RowBox[{"{", 
      RowBox[{"\"\<More flexible\>\"", ",", "\"\<Less flexible\>\""}], "}"}], 
     ",", 
     RowBox[{"LegendMarkers", "\[Rule]", 
      RowBox[{"Graphics", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"EdgeForm", "[", "Black", "]"}], ",", 
         RowBox[{"Rectangle", "[", "]"}]}], "}"}], "]"}]}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"LegendLabel", "\[Rule]", "\"\<Relative to baseline\>\""}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"LegendFunction", "\[Rule]", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"Framed", "[", 
         RowBox[{"#", ",", 
          RowBox[{"RoundingRadius", "\[Rule]", "5"}]}], "]"}], "&"}], ")"}]}],
      ",", 
     RowBox[{"LegendMargins", "\[Rule]", "5"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"legendplot", "=", 
   RowBox[{"ListPlot", "[", 
    RowBox[{
     RowBox[{"{", "0", "}"}], ",", 
     RowBox[{"Axes", "\[Rule]", "False"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "None"}], ",", 
     RowBox[{"PlotLegends", "\[Rule]", 
      RowBox[{"Placed", "[", 
       RowBox[{"legend", ",", 
        RowBox[{"{", 
         RowBox[{"Center", ",", "Center"}], "}"}]}], "]"}]}]}], "]"}]}], 
  ";"}]}], "Input",
 CellChangeTimes->{{3.8246725189893084`*^9, 3.824672538651204*^9}, {
   3.824672604697793*^9, 3.824672613288725*^9}, {3.824672692982726*^9, 
   3.824672693541782*^9}, {3.824673099135751*^9, 3.824673102382865*^9}, {
   3.825553376521242*^9, 3.8255533859128647`*^9}, {3.825553440471273*^9, 
   3.825553450013547*^9}, {3.825638717624504*^9, 3.8256387184288063`*^9}, {
   3.825638865607793*^9, 3.825638905685801*^9}, {3.8256389626360607`*^9, 
   3.8256389628595448`*^9}, {3.825639321317294*^9, 3.8256393216371107`*^9}, {
   3.825639624241373*^9, 3.8256396451201277`*^9}, {3.825639694806807*^9, 
   3.82563974872362*^9}, {3.825639814705654*^9, 3.825639848071953*^9}, {
   3.825639887543188*^9, 3.825639908317672*^9}, {3.825639999202434*^9, 
   3.825640020019898*^9}, {3.825640066015882*^9, 3.825640066119032*^9}, {
   3.825640165148141*^9, 3.825640252822213*^9}, {3.82909113748589*^9, 
   3.82909116972447*^9}, {3.829091381309025*^9, 3.829091381996461*^9}, {
   3.8290918607861958`*^9, 3.829091862225506*^9}, {3.829091894760375*^9, 
   3.8290919014477577`*^9}, {3.829091959174419*^9, 3.829091960141506*^9}, 
   3.829092005452395*^9, {3.829092180525557*^9, 3.8290921811648808`*^9}, {
   3.829936853008257*^9, 3.8299368541754932`*^9}, {3.829937307606501*^9, 
   3.829937309949666*^9}, {3.8341993631130447`*^9, 3.8341993633184633`*^9}, {
   3.840735139215952*^9, 3.840735147838499*^9}},
 CellLabel->
  "In[909]:=",ExpressionUUID->"4e5bf0ba-f742-419d-a2eb-bfda12dba49a"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"axislabelCompY", "=", 
   RowBox[{"{", 
    RowBox[{"\"\<\>\"", ",", 
     RowBox[{"Style", "[", 
      RowBox[{"\"\<Geometric\\ncomplexity\>\"", ",", "AxisFontSize"}], 
      "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"axislabelRelXY", "=", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Style", "[", 
      RowBox[{
      "\"\<Max. prey abundance (\!\(\*StyleBox[SubscriptBox[\"N\", \
\"max\"],FontSlant->\"Italic\"]\))\>\"", ",", "AxisFontSize"}], "]"}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"Style", "[", 
      RowBox[{"\"\<Difference\>\"", ",", "AxisFontSize"}], "]"}]}], "}"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"axislabelRelY", "=", 
   RowBox[{"{", 
    RowBox[{"\"\<\>\"", ",", 
     RowBox[{"Style", "[", 
      RowBox[{"\"\<Difference\>\"", ",", "AxisFontSize"}], "]"}]}], "}"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"axislabelX", "=", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"Style", "[", 
      RowBox[{
      "\"\<Max. prey abundance (\!\(\*StyleBox[SubscriptBox[\"N\", \
\"max\"],FontSlant->\"Italic\"]\))\>\"", ",", "AxisFontSize"}], "]"}], ",", 
     "\"\<\>\""}], "}"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"axislabelNone", "=", 
   RowBox[{"{", 
    RowBox[{"\"\<\>\"", ",", "\"\<\>\""}], "}"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"legendlabel", "=", 
   RowBox[{"Style", "[", 
    RowBox[{
    "\"\<Max. predator abundance (\!\(\*StyleBox[SubscriptBox[\"P\", \
\"max\"],FontSlant->\"Italic\"]\))\>\"", ",", "LegendFontSize"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"xrange", " ", "=", " ", 
   RowBox[{"MinMax", "[", 
    RowBox[{"varH1", "[", 
     RowBox[{"[", 
      RowBox[{"All", ",", "1"}], "]"}], "]"}], "]"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.816449033518476*^9, 3.816449033782384*^9}, {
   3.817326875593637*^9, 3.8173268853850927`*^9}, {3.820535351004733*^9, 
   3.820535416275148*^9}, {3.821231027001092*^9, 3.821231028056094*^9}, {
   3.821839281708197*^9, 3.821839286035469*^9}, {3.821839970288713*^9, 
   3.821839980391632*^9}, {3.821840039766375*^9, 3.8218400717497272`*^9}, {
   3.824555431431737*^9, 3.8245554405740547`*^9}, {3.8245708565997868`*^9, 
   3.824570914908593*^9}, {3.824570968178876*^9, 3.824570980210464*^9}, {
   3.824571714286036*^9, 3.824571722660818*^9}, {3.824600920885607*^9, 
   3.824600926452793*^9}, 3.8246009795957947`*^9, {3.824601041297748*^9, 
   3.824601079575047*^9}, {3.824672482229925*^9, 3.8246724859255466`*^9}, {
   3.824672543307981*^9, 3.824672624360573*^9}, {3.834199365463478*^9, 
   3.834199379813649*^9}},
 CellLabel->
  "In[917]:=",ExpressionUUID->"8a60042e-2af2-43a3-8c9a-4b82d539bfff"],

Cell[CellGroupData[{

Cell["k = 1 models", "Subsubsection",
 CellChangeTimes->{{3.8203400822156057`*^9, 
  3.820340083472747*^9}},ExpressionUUID->"6e78963d-66c4-4871-a9cf-\
4abda647a9e2"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"k1varH1", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{"varH1", ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelCompY", ",", "\[IndentingNewLine]", "\"\<H1\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors1"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k1varH1vLR", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH1", ",", "varLR"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<LR-H1\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k1varH1vBWL1", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH1", ",", "varBWL1"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelXY", ",", "\[IndentingNewLine]", "\"\<BWL1-H1\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.816447039347436*^9, 3.8164470405299673`*^9}, {
   3.816448366713172*^9, 3.8164484026216784`*^9}, {3.8167031483987713`*^9, 
   3.816703152749979*^9}, {3.816712694934739*^9, 3.8167127223070908`*^9}, {
   3.816712757818255*^9, 3.8167127602898684`*^9}, 3.816712888791975*^9, {
   3.817324316427837*^9, 3.817324364902163*^9}, {3.817324790068469*^9, 
   3.817324824994782*^9}, {3.8173260627311068`*^9, 3.8173260958084183`*^9}, {
   3.8192425407045107`*^9, 3.8192426255162354`*^9}, {3.8203375598261013`*^9, 
   3.820337564617313*^9}, {3.820337666046061*^9, 3.820337666277379*^9}, 
   3.820338125981455*^9, 3.8203383097255363`*^9, {3.820338441928329*^9, 
   3.820338454183198*^9}, {3.820338546644705*^9, 3.820338548571662*^9}, {
   3.820338715517902*^9, 3.8203387164529123`*^9}, {3.820339112766468*^9, 
   3.8203391154774017`*^9}, {3.8203391459166813`*^9, 3.820339152676463*^9}, {
   3.8203393023420773`*^9, 3.8203393031420507`*^9}, {3.820339634210812*^9, 
   3.8203396392331553`*^9}, {3.820340061616788*^9, 3.8203400695998*^9}, {
   3.820360725689295*^9, 3.820360744312243*^9}, {3.8203612574278507`*^9, 
   3.820361268203433*^9}, 3.820361647228779*^9, {3.8204220966449957`*^9, 
   3.820422101427493*^9}, 3.8204398705056057`*^9, 3.8204403539109087`*^9, {
   3.820442793519513*^9, 3.820442794638156*^9}, {3.82045412184652*^9, 
   3.8204541245773897`*^9}, 3.82045443585399*^9, 3.820454481083798*^9, {
   3.820535421970633*^9, 3.820535433665814*^9}, {3.8205355843564157`*^9, 
   3.820535587875677*^9}, {3.821231057319425*^9, 3.821231057694737*^9}, {
   3.821271945716528*^9, 3.82127194718821*^9}, {3.824570948803836*^9, 
   3.824570954171232*^9}, {3.8245709879058943`*^9, 3.8245710180014067`*^9}, 
   3.82457160225655*^9, {3.824687140426382*^9, 3.8246871409683933`*^9}, {
   3.825157267287608*^9, 3.825157288134026*^9}, {3.82555342181534*^9, 
   3.825553464949497*^9}, {3.825553517923883*^9, 3.825553563826232*^9}},
 CellLabel->
  "In[924]:=",ExpressionUUID->"14f21cb8-243d-4eb2-9bdf-c9891575d5b3"]
}, Open  ]],

Cell[CellGroupData[{

Cell["k = 2 models", "Subsubsection",
 CellChangeTimes->{{3.820340070916478*^9, 
  3.820340075744876*^9}},ExpressionUUID->"58924c3b-c717-4ac1-8302-\
ef3afe9a39e4"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"k2varH2", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{"varH2", ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelCompY", ",", "\[IndentingNewLine]", "\"\<H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors1"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vMM", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varMM"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<MM-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vHV", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varHV"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelX", ",", "\[IndentingNewLine]", "\"\<HV-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vR", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varR"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelX", ",", "\[IndentingNewLine]", "\"\<R-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vAG", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varAG"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<AG-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vCDAO", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varCDAO"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<CDAO-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vGI", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varGI"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<GI-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vGIA", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varGIA"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<GIA-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vGB", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varGB"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<GB-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vHT", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varHT"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<HT-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vHTb", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varHTb"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<HTb-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vH3", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varH3"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<H3-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vAGK", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varAGK"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<AGK-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vA0", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varA0"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelXY", ",", "\[IndentingNewLine]", "\"\<A0-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vA1", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varA1"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<A1-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vA3", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varA3"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<A3-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vSH", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varSH"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<SH-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2varH2vSHb", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varH2", ",", "varSHb"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<SHb-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.815519237637163*^9, 3.815519245555642*^9}, {
   3.8158480074026823`*^9, 3.8158480080107307`*^9}, {3.816447071678545*^9, 
   3.816447106713594*^9}, {3.816447146830752*^9, 3.816447207643733*^9}, {
   3.816447256357439*^9, 3.816447277457424*^9}, {3.816447308522668*^9, 
   3.816447309592074*^9}, {3.8164473612657413`*^9, 3.816447412683972*^9}, {
   3.816447775871064*^9, 3.816447813676798*^9}, {3.816447999977116*^9, 
   3.816448000414381*^9}, {3.8167031302714643`*^9, 3.816703142109413*^9}, {
   3.8167127136289377`*^9, 3.816712754514069*^9}, {3.817324858653736*^9, 
   3.817324877440641*^9}, {3.817324933966977*^9, 3.817324945405822*^9}, {
   3.817326038771469*^9, 3.817326059060965*^9}, {3.817326091273047*^9, 
   3.817326094512412*^9}, {3.817326449322955*^9, 3.817326453794091*^9}, {
   3.817326903153098*^9, 3.817326905072357*^9}, {3.819242634708934*^9, 
   3.819242673914542*^9}, {3.820338581890685*^9, 3.820338610313342*^9}, {
   3.820339306822566*^9, 3.820339331228903*^9}, {3.820339375291284*^9, 
   3.820339375659152*^9}, {3.8203398745684023`*^9, 3.820339951612637*^9}, {
   3.820359805493299*^9, 3.8203598236362257`*^9}, 3.820422104276939*^9, 
   3.820440361110385*^9, {3.820535610206481*^9, 3.820535613804261*^9}, {
   3.820620735672349*^9, 3.820620747254779*^9}, {3.820625376762005*^9, 
   3.820625384849245*^9}, {3.821231233601988*^9, 3.821231233613798*^9}, {
   3.8212719832584476`*^9, 3.8212719883608713`*^9}, {3.82442606861342*^9, 
   3.8244260788358927`*^9}, 3.824570997050928*^9, {3.82457105726403*^9, 
   3.8245710833912277`*^9}, 3.824571602258946*^9, 3.824571691775424*^9, 
   3.824571731710269*^9, {3.824571763820484*^9, 3.824571765795393*^9}, {
   3.8245945606454887`*^9, 3.824594600795561*^9}, {3.8246008036429577`*^9, 
   3.8246008462408743`*^9}, {3.824600944445956*^9, 3.824600949709207*^9}, {
   3.824600987731852*^9, 3.824601015226462*^9}, {3.8246871417124577`*^9, 
   3.824687148415245*^9}, {3.825426542477316*^9, 3.825426549156464*^9}, {
   3.825438423022214*^9, 3.825438440614685*^9}, {3.825461924146182*^9, 
   3.82546192725695*^9}, {3.825553578402378*^9, 3.825553625624462*^9}, {
   3.828532325952744*^9, 3.828532340743123*^9}, {3.8285404430577593`*^9, 
   3.828540485551838*^9}, {3.828540520094376*^9, 3.828540560877108*^9}, {
   3.82878836477731*^9, 3.828788370456051*^9}, {3.8288189166101723`*^9, 
   3.828818924105933*^9}, {3.829003785950418*^9, 3.829003792308967*^9}, {
   3.829004211243207*^9, 3.8290042299933968`*^9}, {3.829068268396146*^9, 
   3.829068289210524*^9}, {3.8290700918693743`*^9, 3.8290701204671087`*^9}},
 CellLabel->
  "In[927]:=",ExpressionUUID->"37e286e1-45e4-42a5-9180-cabe5205f2ed"]
}, Open  ]],

Cell[CellGroupData[{

Cell["k = 3 models", "Subsubsection",
 CellChangeTimes->{{3.815848002272531*^9, 3.815848002562745*^9}, {
  3.820340051576777*^9, 
  3.820340056988686*^9}},ExpressionUUID->"17efa027-d874-4811-a01c-\
e23ea95c00bb"],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", " ", 
   RowBox[{"Prey", "-", 
    RowBox[{
    "dependent", " ", "models", " ", "get", " ", "compared", " ", "to", " ", 
     "H3R"}]}], " ", "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"k3varH3R", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{"varH3R", ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelCompY", ",", "\[IndentingNewLine]", "\"\<H3R\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors1"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varH3RvA2", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varH3R", ",", "varA2"}], "]"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<A2-H3R\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varH3RvHLB", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varH3R", ",", "varHLB"}], "]"}], ",", "\[IndentingNewLine]", 
       
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelNone", ",", "\[IndentingNewLine]", "\"\<HLB-H3R\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varH3RvHLBb", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varH3R", ",", "varHLBb"}], "]"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelNone", ",", "\[IndentingNewLine]", "\"\<HLBb-H3R\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varH3RvMH", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varH3R", ",", "varMH"}], "]"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<MH-H3R\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varH3RvMHb", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varH3R", ",", "varMHb"}], "]"}], ",", "\[IndentingNewLine]", 
       
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<MHb-H3R\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varH3RvMHc", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varH3R", ",", "varMHc"}], "]"}], ",", "\[IndentingNewLine]", 
       
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<MHc-H3R\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varH3RvSSS", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varH3R", ",", "varSSS"}], "]"}], ",", "\[IndentingNewLine]", 
       
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelNone", ",", "\[IndentingNewLine]", "\"\<SSS-H3R\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varH3RvS3", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varH3R", ",", "varS3"}], "]"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelNone", ",", "\[IndentingNewLine]", "\"\<AS-H3R\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varH3RvS3b", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varH3R", ",", "varS3b"}], "]"}], ",", "\[IndentingNewLine]", 
       
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelNone", ",", "\[IndentingNewLine]", "\"\<ASb-H3R\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varH3RvT", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varH3R", ",", "varT"}], "]"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<T-H3R\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varH3RvFHM", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varH3R", ",", "varFHM"}], "]"}], ",", "\[IndentingNewLine]", 
       
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelNone", ",", "\[IndentingNewLine]", "\"\<FHM-H3R\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varH3RvBD", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varH3R", ",", "varBD"}], "]"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelNone", ",", "\[IndentingNewLine]", "\"\<BD-H3R\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", " ", 
    RowBox[{"Predator", "-", 
     RowBox[{
     "dependent", " ", "models", " ", "get", " ", "compared", " ", "to", " ", 
      "BD"}]}], " ", "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varBD", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{"varBD", ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelCompY", ",", "\[IndentingNewLine]", "\"\<BD\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors1"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varBDvCM", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varBD", ",", "varCM"}], "]"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<CM-BD\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varBDvAA", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varBD", ",", "varAA"}], "]"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelRelXY", ",", "\[IndentingNewLine]", "\"\<AA-BD\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varBDvSBB", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varBD", ",", "varSBB"}], "]"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelX", ",", "\[IndentingNewLine]", "\"\<SBB-BD\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varBDvBWL2", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varBD", ",", "varBWL2"}], "]"}], ",", "\[IndentingNewLine]", 
       
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelX", ",", "\[IndentingNewLine]", "\"\<BWL2-BD\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varBDvW", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varBD", ",", "varW"}], "]"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelNone", ",", "\[IndentingNewLine]", "\"\<W-BD\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varBDvTTA", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varBD", ",", "varTTA"}], "]"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<TTA-BD\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"k3varBDvRGD", "=", 
     RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Relativize", "[", 
        RowBox[{"varBD", ",", "varRGD"}], "]"}], ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
       "axislabelNone", ",", "\[IndentingNewLine]", "\"\<RGD-BD\>\"", ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
       "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}]}]}]], "Input",
 CellChangeTimes->{{3.815519237637163*^9, 3.815519245555642*^9}, {
   3.8158480074026823`*^9, 3.8158480080107307`*^9}, {3.816447071678545*^9, 
   3.816447106713594*^9}, {3.816447146830752*^9, 3.816447207643733*^9}, {
   3.816447256357439*^9, 3.816447277457424*^9}, {3.816447308522668*^9, 
   3.816447309592074*^9}, {3.8164473612657413`*^9, 3.816447412683972*^9}, {
   3.816447775871064*^9, 3.816447813676798*^9}, {3.8164479692247334`*^9, 
   3.816448057538806*^9}, {3.8164480886201363`*^9, 3.816448091001732*^9}, 
   3.8167030867534323`*^9, {3.816703118735268*^9, 3.8167031226470327`*^9}, {
   3.8167127643160543`*^9, 3.8167127870807247`*^9}, {3.817325909675918*^9, 
   3.8173259283906183`*^9}, {3.817326004740299*^9, 3.817326032010993*^9}, {
   3.8173261058889227`*^9, 3.8173261124797564`*^9}, {3.817326912128593*^9, 
   3.817326917440187*^9}, {3.8192426814184313`*^9, 3.819242702817071*^9}, {
   3.8203386569439573`*^9, 3.82033866197532*^9}, {3.8203388241221943`*^9, 
   3.820338826617652*^9}, {3.820339335173245*^9, 3.820339345196364*^9}, {
   3.820339961332734*^9, 3.82034003313794*^9}, {3.820340111175024*^9, 
   3.820340124438216*^9}, {3.8203598473717747`*^9, 3.820359862721881*^9}, {
   3.8205302052458677`*^9, 3.820530216043984*^9}, {3.820535614236966*^9, 
   3.8205356167239923`*^9}, {3.820605261302792*^9, 3.820605278723461*^9}, {
   3.820605956329487*^9, 3.820605956897286*^9}, {3.821231240545412*^9, 
   3.821231240555372*^9}, {3.821272081950109*^9, 3.821272084165181*^9}, {
   3.824426098027773*^9, 3.8244261130822077`*^9}, 3.824571002970714*^9, {
   3.824571103495614*^9, 3.824571114694002*^9}, 3.824571602262199*^9, {
   3.824660288384014*^9, 3.8246603833794394`*^9}, 3.824687149232359*^9, 
   3.824997720434456*^9, {3.8249978048468523`*^9, 3.824997821613625*^9}, {
   3.8250301691843033`*^9, 3.82503033024542*^9}, {3.825030775723123*^9, 
   3.825030810753071*^9}, {3.82503094513407*^9, 3.825030964347776*^9}, {
   3.825031056616536*^9, 3.825031062176079*^9}, {3.82503211838247*^9, 
   3.825032171683408*^9}, {3.825032414813849*^9, 3.825032422545985*^9}, {
   3.825157227563678*^9, 3.825157230833502*^9}, {3.8254417247803183`*^9, 
   3.825441740018662*^9}, {3.8255536273775043`*^9, 3.8255536591513567`*^9}, {
   3.828615666724798*^9, 3.828615667707654*^9}, {3.828616149553447*^9, 
   3.828616161839816*^9}, {3.828665125442021*^9, 3.828665163249011*^9}, {
   3.828665196983692*^9, 3.828665218677579*^9}, {3.828818957577422*^9, 
   3.8288190389975977`*^9}, {3.828826861773019*^9, 3.8288268677960377`*^9}, {
   3.828908487175891*^9, 3.8289085331969976`*^9}, 3.8289087274561033`*^9, {
   3.8289122328635283`*^9, 3.828912233990244*^9}, {3.829068115842037*^9, 
   3.829068144328244*^9}, {3.829068182719139*^9, 3.829068193757881*^9}, {
   3.829070354882875*^9, 3.82907035599384*^9}, {3.829080622765917*^9, 
   3.829080635164534*^9}, {3.8290848146694508`*^9, 3.829084905323587*^9}, {
   3.8346935911078157`*^9, 3.834693608419414*^9}},
 CellLabel->
  "In[945]:=",ExpressionUUID->"c627ece8-31a5-446a-a187-f269403c829f"]
}, Open  ]],

Cell[CellGroupData[{

Cell["k = 4 models", "Subsubsection",
 CellChangeTimes->{{3.820605958530205*^9, 
  3.820605962676898*^9}},ExpressionUUID->"64f11ebe-be10-49fe-9465-\
118008debe8d"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"k4varBDOR", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{"varBDOR", ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelCompY", ",", "\[IndentingNewLine]", "\"\<BDOR\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors1"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k4varBDORvCMOR", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varBDOR", ",", "varCMOR"}], "]"}], ",", "\[IndentingNewLine]", 
     
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<CMOR-BDOR\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k4varBDORvAAOR", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varBDOR", ",", "varAAOR"}], "]"}], ",", "\[IndentingNewLine]", 
     
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelX", ",", "\[IndentingNewLine]", "\"\<AAOR-BDOR\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k4varBDORvSN1", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varBDOR", ",", "varSN1"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelXY", ",", "\[IndentingNewLine]", "\"\<SN1-BDOR\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k4varBDORvSN2", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"varBDOR", ",", "varSN2"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"1", ",", "2"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelX", ",", "\[IndentingNewLine]", "\"\<SN2-BDOR\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", "1"}], ",", 
         RowBox[{"-", "3"}]}], "}"}]}], "}"}], ",", " ", 
     RowBox[{"(*", " ", 
      RowBox[{
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "1"}], ",", 
          RowBox[{"-", "3"}]}], "}"}], " ", "Because", " ", "P"}], "=", 
       RowBox[{
        RowBox[{"2", " ", "should", " ", "be", " ", "non"}], "-", 
        "identifiable"}]}], " ", "*)"}], "\[IndentingNewLine]", "colors2"}], 
    "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.820605968224869*^9, 3.820606022190215*^9}, {
   3.820606068941037*^9, 3.820606234406135*^9}, {3.8212312405571404`*^9, 
   3.8212312405592613`*^9}, {3.82127224403246*^9, 3.821272261980194*^9}, {
   3.82183770547432*^9, 3.821837708945413*^9}, {3.821837740448929*^9, 
   3.821837741904497*^9}, {3.821838670676571*^9, 3.821838671227339*^9}, 
   3.8245710087141247`*^9, {3.824571103510684*^9, 3.824571103512702*^9}, 
   3.824571602264737*^9, {3.824660413866839*^9, 3.824660427145522*^9}, {
   3.825553661799837*^9, 3.8255536731986856`*^9}, {3.825553877879766*^9, 
   3.825553882517807*^9}, 3.825553950188795*^9, {3.828659802200283*^9, 
   3.8286598039717607`*^9}, {3.828661750159484*^9, 3.8286618440187283`*^9}, {
   3.8286973708568172`*^9, 3.828697398807301*^9}, {3.828912253749164*^9, 
   3.82891225634851*^9}, {3.8290801175060797`*^9, 3.8290801234245567`*^9}, {
   3.829080155871764*^9, 3.829080161575077*^9}},
 CellLabel->
  "In[966]:=",ExpressionUUID->"3e610904-bb9d-460e-9ea7-f3fa79621b74"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Combined plots - Var", "Subsubsection",
 CellChangeTimes->{{3.820340497504149*^9, 
  3.8203405083991957`*^9}},ExpressionUUID->"181c599f-ad03-4bba-956c-\
3b0811a7b375"],

Cell[BoxData[
 RowBox[{
  RowBox[{"LineStylevar", "=", 
   RowBox[{"LineStyle", "[", 
    RowBox[{"[", 
     RowBox[{"1", ";;", 
      RowBox[{"Length", "[", 
       RowBox[{"DeleteDuplicates", "[", 
        RowBox[{"varH1", "[", 
         RowBox[{"[", 
          RowBox[{"All", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], "]"}], 
    "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.820501474218446*^9, 3.820501493895547*^9}, 
   3.820501867178059*^9, {3.824686996683667*^9, 3.82468699675492*^9}, {
   3.8256392512728577`*^9, 3.825639251273324*^9}},
 CellLabel->
  "In[971]:=",ExpressionUUID->"c2afbdc3-8930-4241-819b-83595989fc1d"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"k1Allvar", "=", "\[IndentingNewLine]", 
   RowBox[{"Legended", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"GraphicsGrid", "[", 
      RowBox[{
       RowBox[{"{", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"{", "k1varH1", "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", "k1varH1vLR", "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", "k1varH1vBWL1", "}"}]}], "\[IndentingNewLine]", "}"}], 
       ",", "\[IndentingNewLine]", 
       RowBox[{"ImageSize", "\[Rule]", "Large"}], ",", "\[IndentingNewLine]", 
       
       RowBox[{"Spacings", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", 
          RowBox[{"-", "10"}]}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"Placed", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"LineLegend", "[", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"Map", "[", 
          RowBox[{"Directive", ",", "LineStylevar"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"DeleteDuplicates", "[", 
          RowBox[{"varH1", "[", 
           RowBox[{"[", 
            RowBox[{"All", ",", "2"}], "]"}], "]"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLabel", "\[Rule]", "legendlabel"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLayout", "\[Rule]", "\"\<Row\>\""}]}], "]"}], ",", 
       "\[IndentingNewLine]", "Above"}], "]"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Export", "[", 
   RowBox[{"\"\<GeomComp_var_k1.pdf\>\"", ",", 
    RowBox[{"Show", "[", 
     RowBox[{"k1Allvar", ",", " ", 
      RowBox[{"ImageSize", "\[Rule]", " ", 
       RowBox[{"9", " ", "cm"}]}]}], "]"}]}], "]"}], ";"}]}], "Input",
 CellChangeTimes->{{3.815860001290057*^9, 3.815860001611095*^9}, {
   3.816703089290669*^9, 3.816703113526773*^9}, {3.8167051827787733`*^9, 
   3.816705184344719*^9}, {3.816712790714468*^9, 3.8167128677583303`*^9}, {
   3.8167129033488073`*^9, 3.8167129076925*^9}, {3.817326653423532*^9, 
   3.8173266558821373`*^9}, {3.8173270440518103`*^9, 3.81732704483562*^9}, {
   3.819242717113296*^9, 3.8192427177440357`*^9}, 3.8192429294485893`*^9, 
   3.820339652937395*^9, {3.8203403225105267`*^9, 3.8203404334016247`*^9}, {
   3.820340463681525*^9, 3.820340490688971*^9}, {3.820340723112479*^9, 
   3.820340907992834*^9}, {3.8203601659921217`*^9, 3.820360178502738*^9}, {
   3.820361098043805*^9, 3.820361105330234*^9}, {3.820361143674377*^9, 
   3.820361145464829*^9}, {3.8204403683589373`*^9, 3.820440385443231*^9}, {
   3.820442370065785*^9, 3.8204424286302357`*^9}, {3.820442533785523*^9, 
   3.820442538592886*^9}, {3.820442569913596*^9, 3.82044257407167*^9}, {
   3.820453526985443*^9, 3.8204535282893457`*^9}, {3.820453625222767*^9, 
   3.820453669595346*^9}, {3.820453747777179*^9, 3.8204537519364758`*^9}, {
   3.820453815262314*^9, 3.820453829768147*^9}, {3.820453910098439*^9, 
   3.820453915041703*^9}, {3.820501470529426*^9, 3.820501499143772*^9}, {
   3.8211858563386097`*^9, 3.821185856849887*^9}, {3.821271949251162*^9, 
   3.821271949874569*^9}, {3.821272101115302*^9, 3.8212721106021748`*^9}, {
   3.821272744785494*^9, 3.8212727473053713`*^9}, 3.82138268323088*^9, {
   3.821839872373034*^9, 3.821839883483667*^9}, {3.8218399384187527`*^9, 
   3.821839952849349*^9}, 3.82457135264067*^9, {3.824600612827978*^9, 
   3.824600651456018*^9}, {3.824671467395912*^9, 3.8246715201608543`*^9}, {
   3.824671553728454*^9, 3.8246715599834747`*^9}, {3.824672126171977*^9, 
   3.8246721384825172`*^9}, {3.824672225415654*^9, 3.824672242422249*^9}, {
   3.824672284325918*^9, 3.824672285340722*^9}, {3.824672635824564*^9, 
   3.824672636016274*^9}, {3.824672813794273*^9, 3.824672858359617*^9}, {
   3.824686888248364*^9, 3.824686891047373*^9}, 3.824687004188877*^9, {
   3.825158694285905*^9, 3.825158702892959*^9}, 3.825639251276862*^9},
 CellLabel->
  "In[972]:=",ExpressionUUID->"786024b0-1ad3-47af-a024-31cafe75e23c"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"k2Allvar", "=", "\[IndentingNewLine]", 
   RowBox[{"Legended", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"GraphicsGrid", "[", 
      RowBox[{
       RowBox[{"{", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"k2varH2", ",", "k2varH2vMM", ",", "k2varH2vH3"}], "}"}], 
         ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k2varH2vHT", ",", "k2varH2vGI", ",", "k2varH2vGIA"}], 
          "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k2varH2vA1", ",", "k2varH2vA3", ",", "k2varH2vSH"}], "}"}],
          ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k2varH2vAG", ",", "k2varH2vAGK", ",", "k2varH2vGB"}], 
          "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k2varH2vCDAO", ",", "k2varH2vR", ",", "k2varH2vHV"}], 
          "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k2varH2vA0", ",", "legendplot", ",", "blankplot"}], 
          "}"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"ImageSize", "\[Rule]", " ", "Large"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"Spacings", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "40"}], ",", 
          RowBox[{"-", "40"}]}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"Placed", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"LineLegend", "[", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"Map", "[", 
          RowBox[{"Directive", ",", "LineStylevar"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"DeleteDuplicates", "[", 
          RowBox[{"varH1", "[", 
           RowBox[{"[", 
            RowBox[{"All", ",", "2"}], "]"}], "]"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLabel", "\[Rule]", "legendlabel"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLayout", "\[Rule]", "\"\<Row\>\""}]}], "]"}], ",", 
       "\[IndentingNewLine]", "Above"}], "]"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Export", "[", 
   RowBox[{"\"\<GeomComp_var_k2.pdf\>\"", ",", 
    RowBox[{"Show", "[", "k2Allvar", "]"}]}], "]"}], ";"}]}], "Input",
 CellChangeTimes->{
  3.820453931186556*^9, {3.8205015039119177`*^9, 3.8205015041516037`*^9}, {
   3.820620765247404*^9, 3.820620775925467*^9}, {3.8206253955458107`*^9, 
   3.820625408712368*^9}, {3.8211858532342043`*^9, 3.8211858536498003`*^9}, {
   3.82127198879319*^9, 3.821271992056746*^9}, {3.821272115978672*^9, 
   3.821272134769319*^9}, {3.82127274014548*^9, 3.8212727420254602`*^9}, 
   3.8213826832324457`*^9, {3.82148935011744*^9, 3.821489402113596*^9}, {
   3.82148946881633*^9, 3.8214894962863197`*^9}, {3.82148954182089*^9, 
   3.821489609066512*^9}, 3.8218398939659557`*^9, {3.821839935290318*^9, 
   3.821839935954204*^9}, {3.824426166696703*^9, 3.8244261690640574`*^9}, {
   3.824426376009399*^9, 3.824426378128484*^9}, {3.824553109264062*^9, 
   3.824553109415061*^9}, 3.824571352642585*^9, {3.8245717990747967`*^9, 
   3.8245718103543577`*^9}, {3.824595424027143*^9, 3.8245954602647867`*^9}, {
   3.824598967865479*^9, 3.824598968048705*^9}, {3.8246004929824963`*^9, 
   3.824600518396385*^9}, {3.82460075146809*^9, 3.824600751659607*^9}, {
   3.8246722607742443`*^9, 3.824672288236525*^9}, {3.824673063242001*^9, 
   3.8246730634168243`*^9}, {3.824686878960998*^9, 3.824686881903657*^9}, 
   3.8246870049661493`*^9, {3.82542655965212*^9, 3.825426561779921*^9}, {
   3.8254363961333647`*^9, 3.825436396276866*^9}, {3.825438448134301*^9, 
   3.825438456356393*^9}, 3.825461924150708*^9, 3.825639251280409*^9, {
   3.828533998840508*^9, 3.8285340049999104`*^9}, {3.828540368382406*^9, 
   3.828540377755848*^9}, {3.828540423322112*^9, 3.8285404260036182`*^9}, {
   3.82890855468425*^9, 3.8289085707714853`*^9}, {3.8290038124830637`*^9, 
   3.829003824305295*^9}, {3.8290683250095367`*^9, 3.829068331624579*^9}, {
   3.829070133555943*^9, 3.829070143090012*^9}, {3.829091920687948*^9, 
   3.829091940934424*^9}},
 CellLabel->
  "In[974]:=",ExpressionUUID->"308fe8f3-bef8-4434-9ce1-4050a4d365b4"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"k3Allvar", "=", "\[IndentingNewLine]", 
   RowBox[{"Legended", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"GraphicsGrid", "[", 
      RowBox[{
       RowBox[{"{", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"k3varH3R", ",", "k3varH3RvA2", ",", "k3varH3RvHLB"}], 
          "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k3varH3RvMH", ",", "k3varH3RvS3", ",", "k3varH3RvSSS"}], 
          "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k3varH3RvT", ",", "k3varH3RvFHM", ",", "k3varH3RvBD"}], 
          "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k3varBD", ",", "k3varBDvTTA", ",", "k3varBDvRGD"}], "}"}], 
         ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k3varBDvCM", ",", "k3varBDvW", ",", "k3varBDvSBB"}], "}"}],
          ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k3varBDvAA", ",", "k3varBDvBWL2", ",", "legendplot"}], 
          "}"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"ImageSize", "\[Rule]", " ", "Large"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"Spacings", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "40"}], ",", 
          RowBox[{"-", "40"}]}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"Placed", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"LineLegend", "[", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"Map", "[", 
          RowBox[{"Directive", ",", "LineStylevar"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"DeleteDuplicates", "[", 
          RowBox[{"varH1", "[", 
           RowBox[{"[", 
            RowBox[{"All", ",", "2"}], "]"}], "]"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLabel", "\[Rule]", "legendlabel"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLayout", "\[Rule]", "\"\<Row\>\""}]}], "]"}], ",", 
       "\[IndentingNewLine]", "Above"}], "]"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Export", "[", 
   RowBox[{"\"\<GeomComp_var_k3.pdf\>\"", ",", "k3Allvar"}], "]"}], 
  ";"}]}], "Input",
 CellChangeTimes->{
  3.820453937546249*^9, {3.820501508015766*^9, 3.820501508287448*^9}, {
   3.820605351801919*^9, 3.8206053559367523`*^9}, {3.820606295500165*^9, 
   3.820606295907669*^9}, {3.8211858498746843`*^9, 3.821185850337906*^9}, {
   3.821272084414246*^9, 3.821272087245534*^9}, {3.8212721414977293`*^9, 
   3.82127215120877*^9}, {3.8212727357212477`*^9, 3.821272737649537*^9}, 
   3.8213826832357473`*^9, {3.821492781209042*^9, 3.8214928623006067`*^9}, {
   3.8218398993892803`*^9, 3.821839928827242*^9}, {3.824426178376114*^9, 
   3.824426181119648*^9}, 3.8245713526441097`*^9, 3.824600645464813*^9, {
   3.824600732444623*^9, 3.824600732668395*^9}, {3.824672308556581*^9, 
   3.824672308820324*^9}, {3.824672748180997*^9, 3.8246727483480577`*^9}, {
   3.8246868950162973`*^9, 3.824686899150893*^9}, 3.8246870069488153`*^9, {
   3.824997493692337*^9, 3.8249975100660753`*^9}, {3.825029712814*^9, 
   3.825029745587359*^9}, {3.8250303868602047`*^9, 3.8250304270814342`*^9}, {
   3.825030978756187*^9, 3.825031001753683*^9}, {3.825031748476376*^9, 
   3.8250317767788897`*^9}, {3.82503184354503*^9, 3.825031864367299*^9}, {
   3.8250320586806993`*^9, 3.8250320670157843`*^9}, 3.8250324317226048`*^9, 
   3.825157232105921*^9, 3.82563925128401*^9, {3.8285323880303793`*^9, 
   3.8285324619301*^9}, {3.828616207039163*^9, 3.8286162101094923`*^9}, {
   3.828664972656793*^9, 3.828664978335843*^9}, {3.828665015278471*^9, 
   3.828665063555904*^9}, {3.828665099739766*^9, 3.828665102130307*^9}, {
   3.828908579675668*^9, 3.828908587898628*^9}, {3.828911543721821*^9, 
   3.828911545776682*^9}, 3.829068172319914*^9, {3.829070368986512*^9, 
   3.829070371833385*^9}, {3.8290847413950043`*^9, 3.8290847663047857`*^9}, {
   3.829091391028428*^9, 3.82909139190786*^9}, {3.8290914660738993`*^9, 
   3.8290914680569553`*^9}, {3.829092094009192*^9, 3.8290920952082443`*^9}},
 CellLabel->
  "In[976]:=",ExpressionUUID->"91f9a204-f294-4a8a-8c63-63301316d5cd"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"k4Allvar", "=", "\[IndentingNewLine]", 
   RowBox[{"Legended", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"GraphicsGrid", "[", 
      RowBox[{
       RowBox[{"{", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"k4varBDOR", ",", "k4varBDORvCMOR", ",", "k4varBDORvAAOR"}],
           "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k4varBDORvSN1", ",", "k4varBDORvSN2", ",", "legendplot"}], 
          "}"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"ImageSize", "\[Rule]", " ", "Large"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"Spacings", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "40"}], ",", 
          RowBox[{"-", "40"}]}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"Placed", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"LineLegend", "[", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"Map", "[", 
          RowBox[{"Directive", ",", "LineStylevar"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"DeleteDuplicates", "[", 
          RowBox[{"varH1", "[", 
           RowBox[{"[", 
            RowBox[{"All", ",", "2"}], "]"}], "]"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLabel", "\[Rule]", "legendlabel"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLayout", "\[Rule]", "\"\<Row\>\""}]}], "]"}], ",", 
       "\[IndentingNewLine]", "Above"}], "]"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Export", "[", 
   RowBox[{"\"\<GeomComp_var_k4.pdf\>\"", ",", "k4Allvar"}], "]"}], 
  ";"}]}], "Input",
 CellChangeTimes->{{3.820606298948094*^9, 3.8206063625619*^9}, {
   3.820606492316684*^9, 3.820606497212242*^9}, {3.8211858470747213`*^9, 
   3.821185847532804*^9}, {3.821272035213952*^9, 3.821272038293478*^9}, {
   3.82127215801717*^9, 3.821272166616365*^9}, {3.821272245134448*^9, 
   3.821272247086254*^9}, {3.821272731481889*^9, 3.821272733025807*^9}, 
   3.8213826832386837`*^9, {3.8218399099727697`*^9, 3.8218399191946173`*^9}, 
   3.8245713526457567`*^9, {3.824600661839768*^9, 3.824600719071143*^9}, {
   3.8246723105565233`*^9, 3.824672310796191*^9}, {3.8246727570207376`*^9, 
   3.824672757363739*^9}, {3.824686902135983*^9, 3.8246869048627357`*^9}, 
   3.824687009660419*^9, 3.8256392512873173`*^9, {3.8290920997691097`*^9, 
   3.829092103240294*^9}},
 CellLabel->
  "In[978]:=",ExpressionUUID->"aaca9f95-a5a6-4c6c-8acf-17b2c80aa5de"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Holling - vs. Michaelis-Menten forms", "Subsubsection",
 CellChangeTimes->{{3.828911650468699*^9, 
  3.828911677314293*^9}},ExpressionUUID->"d8f97d35-cce7-4f79-ae37-\
6a8b0dd9a94a"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"kHvMMvar", "=", "\[IndentingNewLine]", 
   RowBox[{"Legended", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"GraphicsGrid", "[", 
      RowBox[{
       RowBox[{"{", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"k2varH2vHT", ",", "k2varH2vHTb", ",", "blankplot"}], "}"}],
          ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k2varH2vSH", ",", "k2varH2vSHb", ",", "blankplot"}], "}"}],
          ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k3varH3RvS3", ",", "k3varH3RvS3b", ",", "blankplot"}], 
          "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k3varH3RvHLBb", ",", "k3varH3RvHLB", ",", "blankplot"}], 
          "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k3varH3RvMH", ",", "k3varH3RvMHb", ",", "k3varH3RvMHc"}], 
          "}"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"ImageSize", "\[Rule]", " ", "Large"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"Spacings", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "40"}], ",", 
          RowBox[{"-", "40"}]}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"Placed", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"LineLegend", "[", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"Map", "[", 
          RowBox[{"Directive", ",", "LineStylevar"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"DeleteDuplicates", "[", 
          RowBox[{"varH1", "[", 
           RowBox[{"[", 
            RowBox[{"All", ",", "2"}], "]"}], "]"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLabel", "\[Rule]", "legendlabel"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLayout", "\[Rule]", "\"\<Row\>\""}]}], "]"}], ",", 
       "\[IndentingNewLine]", "Above"}], "]"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Export", "[", 
   RowBox[{"\"\<GeomComp_var_kX_HvMM.pdf\>\"", ",", "kHvMMvar"}], "]"}], 
  ";"}]}], "Input",
 CellChangeTimes->{{3.820606298948094*^9, 3.8206063625619*^9}, {
   3.820606492316684*^9, 3.820606497212242*^9}, {3.8211858470747213`*^9, 
   3.821185847532804*^9}, {3.821272035213952*^9, 3.821272038293478*^9}, {
   3.82127215801717*^9, 3.821272166616365*^9}, {3.821272245134448*^9, 
   3.821272247086254*^9}, {3.821272731481889*^9, 3.821272733025807*^9}, 
   3.8213826832386837`*^9, {3.8218399099727697`*^9, 3.8218399191946173`*^9}, 
   3.8245713526457567`*^9, {3.824600661839768*^9, 3.824600719071143*^9}, {
   3.8246723105565233`*^9, 3.824672310796191*^9}, {3.8246727570207376`*^9, 
   3.824672757363739*^9}, {3.824686902135983*^9, 3.8246869048627357`*^9}, 
   3.824687009660419*^9, 3.8256392512873173`*^9, {3.828819092747779*^9, 
   3.828819255188499*^9}, {3.828826961176197*^9, 3.828826984302949*^9}, {
   3.8288271528408937`*^9, 3.828827154280231*^9}, {3.8289113745215693`*^9, 
   3.828911378689003*^9}, {3.82891141278402*^9, 3.828911467005423*^9}},
 CellLabel->
  "In[980]:=",ExpressionUUID->"489acaaf-4db8-4df6-80ca-b88ac2bfa4a8"]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Fixed max abundances, varying number of levels", "Section",
 CellChangeTimes->{{3.815614457439783*^9, 3.815614522709207*^9}, {
  3.815847343644085*^9, 3.815847392106306*^9}, {3.8246866443002243`*^9, 
  3.824686692311078*^9}},ExpressionUUID->"29f942ce-455c-4d7a-bdd4-\
5212f65ed6a9"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"axislabelCompY", "=", 
   RowBox[{"{", 
    RowBox[{"\"\<\>\"", ",", 
     RowBox[{"Style", "[", 
      RowBox[{"\"\<Geometric\\ncomplexity\>\"", ",", "AxisFontSize"}], 
      "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"axislabelRelXY", "=", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Style", "[", 
      RowBox[{
      "\"\<Prey levels \
(\!\(\*StyleBox[SubscriptBox[StyleBox[\"L\",FontSlant->\"Italic\"], \
\"N\"],FontSlant->\"Italic\"]\))\>\"", ",", "AxisFontSize"}], "]"}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"Style", "[", 
      RowBox[{"\"\<Difference\>\"", ",", "AxisFontSize"}], "]"}]}], "}"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"axislabelX", "=", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"Style", "[", 
      RowBox[{
      "\"\<Prey levels \
(\!\(\*StyleBox[SubscriptBox[StyleBox[\"L\",FontSlant->\"Italic\"], \
\"N\"],FontSlant->\"Italic\"]\))\>\"", ",", "AxisFontSize"}], "]"}], ",", 
     "\"\<\>\""}], "}"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"legendlabel", "=", 
   RowBox[{"Style", "[", 
    RowBox[{
    "\"\<Predator levels \
(\!\(\*StyleBox[SubscriptBox[StyleBox[\"L\",FontSlant->\"Italic\"], \
\"P\"],FontSlant->\"Italic\"]\))\>\"", ",", "LegendFontSize"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"xrange", " ", "=", " ", 
   RowBox[{"MinMax", "[", 
    RowBox[{"fixH1", "[", 
     RowBox[{"[", 
      RowBox[{"All", ",", "3"}], "]"}], "]"}], "]"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.816449026462763*^9, 3.816449026789453*^9}, {
  3.816449072436429*^9, 3.816449129345319*^9}, {3.817326825103365*^9, 
  3.817326837882925*^9}, {3.820535640969983*^9, 3.820535644257073*^9}, {
  3.8212311729610147`*^9, 3.821231173388054*^9}, {3.821839222751025*^9, 
  3.821839228005961*^9}, {3.8218401030916*^9, 3.821840110882886*^9}, {
  3.824571103514831*^9, 3.824571215025794*^9}, {3.8246011692923717`*^9, 
  3.824601201402215*^9}, {3.824673340893961*^9, 3.8246735295985117`*^9}, {
  3.824944184432435*^9, 3.824944192039165*^9}, {3.824944545402836*^9, 
  3.824944545754014*^9}, {3.8251660810123787`*^9, 3.825166095626637*^9}},
 CellLabel->
  "In[982]:=",ExpressionUUID->"feb1130c-7404-4962-a966-4f64f061cf71"],

Cell[CellGroupData[{

Cell["k = 1 models", "Subsubsection",
 CellChangeTimes->{{3.8203400822156057`*^9, 
  3.820340083472747*^9}},ExpressionUUID->"2ede0647-279c-4e3d-8b4c-\
3c0dccfc0bd3"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"k1fixH1", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{"fixH1", ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelCompY", ",", "\[IndentingNewLine]", "\"\<H1\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors1"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k1fixH1vLR", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH1", ",", "fixLR"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<LR-H1\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k1fixH1vBWL1", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH1", ",", "fixBWL1"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelXY", ",", "\[IndentingNewLine]", "\"\<BWL1-H1\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.816447039347436*^9, 3.8164470405299673`*^9}, {
   3.816448366713172*^9, 3.8164484026216784`*^9}, {3.8167031483987713`*^9, 
   3.816703152749979*^9}, {3.816712694934739*^9, 3.8167127223070908`*^9}, {
   3.816712757818255*^9, 3.8167127602898684`*^9}, 3.816712888791975*^9, {
   3.817324316427837*^9, 3.817324364902163*^9}, {3.817324790068469*^9, 
   3.817324824994782*^9}, {3.8173260627311068`*^9, 3.8173260958084183`*^9}, {
   3.8192425407045107`*^9, 3.8192426255162354`*^9}, {3.8203375598261013`*^9, 
   3.820337564617313*^9}, {3.820337666046061*^9, 3.820337666277379*^9}, 
   3.820338125981455*^9, 3.8203383097255363`*^9, {3.820338441928329*^9, 
   3.820338454183198*^9}, {3.820338546644705*^9, 3.820338548571662*^9}, {
   3.820338715517902*^9, 3.8203387164529123`*^9}, {3.820339112766468*^9, 
   3.8203391154774017`*^9}, {3.8203391459166813`*^9, 3.820339152676463*^9}, {
   3.8203393023420773`*^9, 3.8203393031420507`*^9}, {3.820339634210812*^9, 
   3.8203396392331553`*^9}, {3.820340061616788*^9, 3.8203400695998*^9}, {
   3.820360725689295*^9, 3.820360744312243*^9}, {3.8203612574278507`*^9, 
   3.820361268203433*^9}, 3.820361647228779*^9, {3.8204220966449957`*^9, 
   3.820422101427493*^9}, 3.8204398705056057`*^9, 3.8204403539109087`*^9, {
   3.820442793519513*^9, 3.820442794638156*^9}, {3.82045412184652*^9, 
   3.8204541245773897`*^9}, 3.82045443585399*^9, 3.820454481083798*^9, {
   3.820535421970633*^9, 3.820535433665814*^9}, {3.8205355843564157`*^9, 
   3.820535587875677*^9}, {3.821231057319425*^9, 3.821231057694737*^9}, {
   3.821271945716528*^9, 3.82127194718821*^9}, {3.824570948803836*^9, 
   3.824570954171232*^9}, {3.8245709879058943`*^9, 3.8245710180014067`*^9}, 
   3.82457160225655*^9, {3.824686749584235*^9, 3.824686752486354*^9}, {
   3.8246871708305683`*^9, 3.8246871712458477`*^9}, {3.825157310189876*^9, 
   3.825157325884542*^9}, {3.825553679511113*^9, 3.825553684070567*^9}},
 CellLabel->
  "In[987]:=",ExpressionUUID->"4f1756a2-0f17-46aa-8c64-b5ce5928201c"]
}, Open  ]],

Cell[CellGroupData[{

Cell["k = 2 models", "Subsubsection",
 CellChangeTimes->{{3.820340070916478*^9, 
  3.820340075744876*^9}},ExpressionUUID->"f2f3bf0e-5c74-4579-8d9d-\
bd81df97c677"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"k2fixH2", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{"fixH2", ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelCompY", ",", "\[IndentingNewLine]", "\"\<H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors1"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vMM", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixMM"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<MM-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vHV", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixHV"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelX", ",", "\[IndentingNewLine]", "\"\<HV-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vR", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixR"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelX", ",", "\[IndentingNewLine]", "\"\<R-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vAG", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixAG"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<AG-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vCDAO", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixCDAO"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<CDAO-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vGI", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixGI"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<GI-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vGIA", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixGIA"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<GIA-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vGB", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixGB"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<GB-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vHT", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixHT"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<HT-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vHTb", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixHTb"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<HTb-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vH3", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixH3"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<H3-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vAGK", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixAGK"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<AGK-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vA0", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixA0"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelXY", ",", "\[IndentingNewLine]", "\"\<A0-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vA1", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixA1"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<A1-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vA3", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixA3"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<A3-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k2fixH2vSH", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH2", ",", "fixSH"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<SH-H2\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.815519237637163*^9, 3.815519245555642*^9}, {
   3.8158480074026823`*^9, 3.8158480080107307`*^9}, {3.816447071678545*^9, 
   3.816447106713594*^9}, {3.816447146830752*^9, 3.816447207643733*^9}, {
   3.816447256357439*^9, 3.816447277457424*^9}, {3.816447308522668*^9, 
   3.816447309592074*^9}, {3.8164473612657413`*^9, 3.816447412683972*^9}, {
   3.816447775871064*^9, 3.816447813676798*^9}, {3.816447999977116*^9, 
   3.816448000414381*^9}, {3.8167031302714643`*^9, 3.816703142109413*^9}, {
   3.8167127136289377`*^9, 3.816712754514069*^9}, {3.817324858653736*^9, 
   3.817324877440641*^9}, {3.817324933966977*^9, 3.817324945405822*^9}, {
   3.817326038771469*^9, 3.817326059060965*^9}, {3.817326091273047*^9, 
   3.817326094512412*^9}, {3.817326449322955*^9, 3.817326453794091*^9}, {
   3.817326903153098*^9, 3.817326905072357*^9}, {3.819242634708934*^9, 
   3.819242673914542*^9}, {3.820338581890685*^9, 3.820338610313342*^9}, {
   3.820339306822566*^9, 3.820339331228903*^9}, {3.820339375291284*^9, 
   3.820339375659152*^9}, {3.8203398745684023`*^9, 3.820339951612637*^9}, {
   3.820359805493299*^9, 3.8203598236362257`*^9}, 3.820422104276939*^9, 
   3.820440361110385*^9, {3.820535610206481*^9, 3.820535613804261*^9}, {
   3.820620735672349*^9, 3.820620747254779*^9}, {3.820625376762005*^9, 
   3.820625384849245*^9}, {3.821231233601988*^9, 3.821231233613798*^9}, {
   3.8212719832584476`*^9, 3.8212719883608713`*^9}, {3.82442606861342*^9, 
   3.8244260788358927`*^9}, 3.824570997050928*^9, {3.82457105726403*^9, 
   3.8245710833912277`*^9}, 3.824571602258946*^9, 3.824571691775424*^9, 
   3.824571731710269*^9, {3.824571763820484*^9, 3.824571765795393*^9}, {
   3.8245945606454887`*^9, 3.824594600795561*^9}, {3.8246008036429577`*^9, 
   3.8246008462408743`*^9}, {3.824600944445956*^9, 3.824600949709207*^9}, {
   3.824600987731852*^9, 3.824601015226462*^9}, {3.824686753263286*^9, 
   3.82468676738203*^9}, {3.824687171430831*^9, 3.82468717396627*^9}, {
   3.825438476564177*^9, 3.825438513402038*^9}, {3.825461924154213*^9, 
   3.825461924157089*^9}, {3.825553685647758*^9, 3.825553716021353*^9}, {
   3.828532357367268*^9, 3.828532365750266*^9}, {3.828540610155202*^9, 
   3.828540667280211*^9}, {3.828788372672326*^9, 3.828788374295828*^9}, {
   3.829003835361541*^9, 3.829003842056445*^9}, {3.82900423853019*^9, 
   3.8290042442089167`*^9}, {3.829068346969018*^9, 3.829068363671636*^9}, {
   3.829070199656805*^9, 3.82907021712704*^9}, {3.829070286469493*^9, 
   3.829070286900577*^9}},
 CellLabel->
  "In[990]:=",ExpressionUUID->"04250729-098d-4804-bf59-7b5e29ef66fd"]
}, Open  ]],

Cell[CellGroupData[{

Cell["k = 3 models", "Subsubsection",
 CellChangeTimes->{{3.815848002272531*^9, 3.815848002562745*^9}, {
  3.820340051576777*^9, 
  3.820340056988686*^9}},ExpressionUUID->"72632c50-ada2-47c4-98a8-\
08e958aaf091"],

Cell[BoxData[
 RowBox[{"(*", " ", 
  RowBox[{"Prey", "-", 
   RowBox[{
   "dependent", " ", "models", " ", "get", " ", "compared", " ", "to", " ", 
    "H3R"}]}], " ", "*)"}]], "Input",
 CellChangeTimes->{{3.825030473183228*^9, 3.825030490814114*^9}},
 CellLabel->
  "In[1007]:=",ExpressionUUID->"7e68391e-58c0-4d6e-bd79-dd5fb9570c13"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"k3fixH3R", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{"fixH3R", ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelCompY", ",", "\[IndentingNewLine]", "\"\<H3R\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors1"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k3fixH3RvA2", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH3R", ",", "fixA2"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<A2-H3R\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k3fixH3RvHLB", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH3R", ",", "fixHLB"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<HLB-H3R\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k3fixH3RvMH", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH3R", ",", "fixMH"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<MH-H3R\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k3fixH3RvSSS", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH3R", ",", "fixSSS"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<SSS-H3R\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k3fixH3RvS3", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH3R", ",", "fixS3"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<AS-H3R\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k3fixH3RvT", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH3R", ",", "fixT"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<T-H3R\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k3fixH3RvFHM", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixH3R", ",", "fixFHM"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<FHM-H3R\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"k3fixH3RvBD", "=", 
    RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"Relativize", "[", 
       RowBox[{"fixH3R", ",", "fixBD"}], "]"}], ",", "\[IndentingNewLine]", 
      RowBox[{"{", 
       RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
      "axislabelNone", ",", "\[IndentingNewLine]", "\"\<BD-H3R\>\"", ",", 
      "\[IndentingNewLine]", 
      RowBox[{"{", 
       RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
      "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", " ", 
   RowBox[{"Predator", "-", 
    RowBox[{
    "dependent", " ", "models", " ", "get", " ", "compared", " ", "to", " ", 
     "BD"}]}], " ", "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k3fixBD", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{"fixBD", ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelCompY", ",", "\[IndentingNewLine]", "\"\<BD\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors1"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k3fixBDvCM", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixBD", ",", "fixCM"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<CM-BD\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k3fixBDvAA", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixBD", ",", "fixAA"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelXY", ",", "\[IndentingNewLine]", "\"\<AA-BD\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k3fixBDvSBB", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixBD", ",", "fixSBB"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelX", ",", "\[IndentingNewLine]", "\"\<SBB-BD\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k3fixBDvBWL2", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixBD", ",", "fixBWL2"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelX", ",", "\[IndentingNewLine]", "\"\<BWL2-BD\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k3fixBDvW", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixBD", ",", "fixW"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<W-BD\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k3fixBDvTTA", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixBD", ",", "fixTTA"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<TTA-BD\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k3fixBDvRGD", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixBD", ",", "fixRGD"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelNone", ",", "\[IndentingNewLine]", "\"\<RGD-BD\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.815519237637163*^9, 3.815519245555642*^9}, {
   3.8158480074026823`*^9, 3.8158480080107307`*^9}, {3.816447071678545*^9, 
   3.816447106713594*^9}, {3.816447146830752*^9, 3.816447207643733*^9}, {
   3.816447256357439*^9, 3.816447277457424*^9}, {3.816447308522668*^9, 
   3.816447309592074*^9}, {3.8164473612657413`*^9, 3.816447412683972*^9}, {
   3.816447775871064*^9, 3.816447813676798*^9}, {3.8164479692247334`*^9, 
   3.816448057538806*^9}, {3.8164480886201363`*^9, 3.816448091001732*^9}, 
   3.8167030867534323`*^9, {3.816703118735268*^9, 3.8167031226470327`*^9}, {
   3.8167127643160543`*^9, 3.8167127870807247`*^9}, {3.817325909675918*^9, 
   3.8173259283906183`*^9}, {3.817326004740299*^9, 3.817326032010993*^9}, {
   3.8173261058889227`*^9, 3.8173261124797564`*^9}, {3.817326912128593*^9, 
   3.817326917440187*^9}, {3.8192426814184313`*^9, 3.819242702817071*^9}, {
   3.8203386569439573`*^9, 3.82033866197532*^9}, {3.8203388241221943`*^9, 
   3.820338826617652*^9}, {3.820339335173245*^9, 3.820339345196364*^9}, {
   3.820339961332734*^9, 3.82034003313794*^9}, {3.820340111175024*^9, 
   3.820340124438216*^9}, {3.8203598473717747`*^9, 3.820359862721881*^9}, {
   3.8205302052458677`*^9, 3.820530216043984*^9}, {3.820535614236966*^9, 
   3.8205356167239923`*^9}, {3.820605261302792*^9, 3.820605278723461*^9}, {
   3.820605956329487*^9, 3.820605956897286*^9}, {3.821231240545412*^9, 
   3.821231240555372*^9}, {3.821272081950109*^9, 3.821272084165181*^9}, {
   3.824426098027773*^9, 3.8244261130822077`*^9}, 3.824571002970714*^9, {
   3.824571103495614*^9, 3.824571114694002*^9}, 3.824571602262199*^9, {
   3.824660288384014*^9, 3.8246603833794394`*^9}, {3.824686767742876*^9, 
   3.824686778173513*^9}, {3.824687174166771*^9, 3.824687176302137*^9}, {
   3.824997594743684*^9, 3.824997611677923*^9}, 3.824997667084175*^9, {
   3.825030500861959*^9, 3.825030702069303*^9}, {3.8250307361244383`*^9, 
   3.825030745155661*^9}, {3.82503101572248*^9, 3.825031037024952*^9}, {
   3.8250310703760347`*^9, 3.825031079247383*^9}, {3.82503223415376*^9, 
   3.825032248784334*^9}, {3.82503238089218*^9, 3.8250323882751083`*^9}, {
   3.8251572339137087`*^9, 3.825157235345438*^9}, {3.825441759178533*^9, 
   3.825441760697873*^9}, {3.8255537183022823`*^9, 3.825553746524295*^9}, {
   3.827509150496483*^9, 3.827509150958898*^9}, {3.8286162253739653`*^9, 
   3.8286162339007387`*^9}, {3.828665364304825*^9, 3.82866537921544*^9}, {
   3.828665411598477*^9, 3.8286654482206984`*^9}, {3.8289086147944927`*^9, 
   3.828908636009418*^9}, {3.829068417406084*^9, 3.829068437220479*^9}, {
   3.829070383961278*^9, 3.829070384712693*^9}, 3.8290806464683647`*^9, {
   3.8290849983027887`*^9, 3.8290850311327868`*^9}, {3.829085076587719*^9, 
   3.82908512192103*^9}, {3.8341730907931623`*^9, 3.83417309120015*^9}, 
   3.834693620730709*^9},
 CellLabel->
  "In[1008]:=",ExpressionUUID->"aecc9dee-84d3-4e62-80c7-bb197d91dd1d"]
}, Open  ]],

Cell[CellGroupData[{

Cell["k = 4 models", "Subsubsection",
 CellChangeTimes->{{3.820605958530205*^9, 
  3.820605962676898*^9}},ExpressionUUID->"8da1804c-25ba-4fc1-940c-\
f1dd8040afed"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"k4fixBDOR", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{"fixBDOR", ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelCompY", ",", "\[IndentingNewLine]", "\"\<BDOR\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors1"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k4fixBDORvCMOR", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixBDOR", ",", "fixCMOR"}], "]"}], ",", "\[IndentingNewLine]", 
     
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelY", ",", "\[IndentingNewLine]", "\"\<CMOR-BDOR\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k4fixBDORvAAOR", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixBDOR", ",", "fixAAOR"}], "]"}], ",", "\[IndentingNewLine]", 
     
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelX", ",", "\[IndentingNewLine]", "\"\<AAOR-BDOR\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k4fixBDORvSN1", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixBDOR", ",", "fixSN1"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelRelXY", ",", "\[IndentingNewLine]", "\"\<SN1-BDOR\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", "All"}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"k4fixBDORvSN2", "=", 
   RowBox[{"MyListLinePlot", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"Relativize", "[", 
      RowBox[{"fixBDOR", ",", "fixSN2"}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"3", ",", "4"}], "}"}], ",", "\[IndentingNewLine]", 
     "axislabelX", ",", "\[IndentingNewLine]", "\"\<SN2-BDOR\>\"", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{"xrange", ",", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", "1.5"}], ",", 
         RowBox[{"-", "6"}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", 
     "colors2"}], "\[IndentingNewLine]", "]"}]}], 
  ";"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.820605968224869*^9, 3.820606022190215*^9}, {
   3.820606068941037*^9, 3.820606234406135*^9}, {3.8212312405571404`*^9, 
   3.8212312405592613`*^9}, {3.82127224403246*^9, 3.821272261980194*^9}, {
   3.82183770547432*^9, 3.821837708945413*^9}, {3.821837740448929*^9, 
   3.821837741904497*^9}, {3.821838670676571*^9, 3.821838671227339*^9}, 
   3.8245710087141247`*^9, {3.824571103510684*^9, 3.824571103512702*^9}, 
   3.824571602264737*^9, {3.824660413866839*^9, 3.824660427145522*^9}, {
   3.8246867784938602`*^9, 3.824686782813356*^9}, {3.824687176486101*^9, 
   3.824687177325865*^9}, {3.825553749956534*^9, 3.825553775754472*^9}},
 CellLabel->
  "In[1025]:=",ExpressionUUID->"d5b4c671-0fd4-41dc-8404-58100e64cad3"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Combined plots - Fix", "Subsubsection",
 CellChangeTimes->{{3.820340497504149*^9, 3.8203405083991957`*^9}, {
  3.824686787259614*^9, 
  3.824686787571335*^9}},ExpressionUUID->"58223295-8a18-4402-8724-\
14224d4a70ab"],

Cell[BoxData[
 RowBox[{
  RowBox[{"LineStylefix", "=", 
   RowBox[{"LineStyle", "[", 
    RowBox[{"[", 
     RowBox[{"1", ";;", 
      RowBox[{"Length", "[", 
       RowBox[{"DeleteDuplicates", "[", 
        RowBox[{"fixH1", "[", 
         RowBox[{"[", 
          RowBox[{"All", ",", "4"}], "]"}], "]"}], "]"}], "]"}]}], "]"}], 
    "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.820501474218446*^9, 3.820501493895547*^9}, 
   3.820501867178059*^9, 3.824686795356986*^9, {3.824686966316761*^9, 
   3.824686967420313*^9}, {3.824687269584968*^9, 3.8246872697761307`*^9}, {
   3.825639251298621*^9, 3.825639251299054*^9}},
 CellLabel->
  "In[1030]:=",ExpressionUUID->"c2f5b276-2945-4680-b1fb-78a1c3bd6e6a"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"k1Allfix", "=", "\[IndentingNewLine]", 
   RowBox[{"Legended", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"GraphicsGrid", "[", 
      RowBox[{
       RowBox[{"{", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"{", "k1fixH1", "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", "k1fixH1vLR", "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", "k1fixH1vBWL1", "}"}]}], "\[IndentingNewLine]", "}"}], 
       ",", "\[IndentingNewLine]", 
       RowBox[{"ImageSize", "\[Rule]", "Large"}], ",", "\[IndentingNewLine]", 
       
       RowBox[{"Spacings", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", 
          RowBox[{"-", "10"}]}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"Placed", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"LineLegend", "[", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"Map", "[", 
          RowBox[{"Directive", ",", "LineStylefix"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"DeleteDuplicates", "[", 
          RowBox[{"fixH1", "[", 
           RowBox[{"[", 
            RowBox[{"All", ",", "4"}], "]"}], "]"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLabel", "\[Rule]", "legendlabel"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLayout", "\[Rule]", "\"\<Row\>\""}]}], "]"}], ",", 
       "\[IndentingNewLine]", "Above"}], "]"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Export", "[", 
   RowBox[{"\"\<GeomComp_fix_k1.pdf\>\"", ",", 
    RowBox[{"Show", "[", 
     RowBox[{"k1Allfix", ",", " ", 
      RowBox[{"ImageSize", "\[Rule]", " ", 
       RowBox[{"9", " ", "cm"}]}]}], "]"}]}], "]"}], ";"}]}], "Input",
 CellChangeTimes->{{3.815860001290057*^9, 3.815860001611095*^9}, {
   3.816703089290669*^9, 3.816703113526773*^9}, {3.8167051827787733`*^9, 
   3.816705184344719*^9}, {3.816712790714468*^9, 3.8167128677583303`*^9}, {
   3.8167129033488073`*^9, 3.8167129076925*^9}, {3.817326653423532*^9, 
   3.8173266558821373`*^9}, {3.8173270440518103`*^9, 3.81732704483562*^9}, {
   3.819242717113296*^9, 3.8192427177440357`*^9}, 3.8192429294485893`*^9, 
   3.820339652937395*^9, {3.8203403225105267`*^9, 3.8203404334016247`*^9}, {
   3.820340463681525*^9, 3.820340490688971*^9}, {3.820340723112479*^9, 
   3.820340907992834*^9}, {3.8203601659921217`*^9, 3.820360178502738*^9}, {
   3.820361098043805*^9, 3.820361105330234*^9}, {3.820361143674377*^9, 
   3.820361145464829*^9}, {3.8204403683589373`*^9, 3.820440385443231*^9}, {
   3.820442370065785*^9, 3.8204424286302357`*^9}, {3.820442533785523*^9, 
   3.820442538592886*^9}, {3.820442569913596*^9, 3.82044257407167*^9}, {
   3.820453526985443*^9, 3.8204535282893457`*^9}, {3.820453625222767*^9, 
   3.820453669595346*^9}, {3.820453747777179*^9, 3.8204537519364758`*^9}, {
   3.820453815262314*^9, 3.820453829768147*^9}, {3.820453910098439*^9, 
   3.820453915041703*^9}, {3.820501470529426*^9, 3.820501499143772*^9}, {
   3.8211858563386097`*^9, 3.821185856849887*^9}, {3.821271949251162*^9, 
   3.821271949874569*^9}, {3.821272101115302*^9, 3.8212721106021748`*^9}, {
   3.821272744785494*^9, 3.8212727473053713`*^9}, 3.82138268323088*^9, {
   3.821839872373034*^9, 3.821839883483667*^9}, {3.8218399384187527`*^9, 
   3.821839952849349*^9}, 3.82457135264067*^9, {3.824600612827978*^9, 
   3.824600651456018*^9}, {3.824671467395912*^9, 3.8246715201608543`*^9}, {
   3.824671553728454*^9, 3.8246715599834747`*^9}, {3.824672126171977*^9, 
   3.8246721384825172`*^9}, {3.824672225415654*^9, 3.824672242422249*^9}, {
   3.824672284325918*^9, 3.824672285340722*^9}, {3.824672635824564*^9, 
   3.824672636016274*^9}, {3.824672813794273*^9, 3.824672858359617*^9}, {
   3.824686795941272*^9, 3.824686816882269*^9}, {3.824686973572688*^9, 
   3.8246869745565*^9}, {3.8246872961123953`*^9, 3.8246872961914253`*^9}, {
   3.8251587189326963`*^9, 3.825158724468256*^9}, 3.8256392513026447`*^9},
 CellLabel->
  "In[1031]:=",ExpressionUUID->"d4a620e5-2630-4643-8c0b-962f0fab3745"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"k2Allfix", "=", "\[IndentingNewLine]", 
   RowBox[{"Legended", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"GraphicsGrid", "[", 
      RowBox[{
       RowBox[{"{", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"k2fixH2", ",", "k2fixH2vMM", ",", "k2fixH2vH3"}], "}"}], 
         ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k2fixH2vHT", ",", "k2fixH2vGI", ",", "k2fixH2vGIA"}], 
          "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k2fixH2vA1", ",", "k2fixH2vA3", ",", "k2fixH2vSH"}], "}"}],
          ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k2fixH2vAG", ",", "k2fixH2vAGK", ",", "k2fixH2vGB"}], 
          "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k2fixH2vCDAO", ",", "k2fixH2vR", ",", "k2fixH2vHV"}], 
          "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k2fixH2vA0", ",", "legendplot", ",", "blankplot"}], 
          "}"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"ImageSize", "\[Rule]", " ", "Large"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"Spacings", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "40"}], ",", 
          RowBox[{"-", "40"}]}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"Placed", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"LineLegend", "[", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"Map", "[", 
          RowBox[{"Directive", ",", "LineStylefix"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"DeleteDuplicates", "[", 
          RowBox[{"fixH1", "[", 
           RowBox[{"[", 
            RowBox[{"All", ",", "4"}], "]"}], "]"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLabel", "\[Rule]", "legendlabel"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLayout", "\[Rule]", "\"\<Row\>\""}]}], "]"}], ",", 
       "\[IndentingNewLine]", "Above"}], "]"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Export", "[", 
   RowBox[{"\"\<GeomComp_fix_k2.pdf\>\"", ",", 
    RowBox[{"Show", "[", "k2Allfix", "]"}]}], "]"}], ";"}]}], "Input",
 CellChangeTimes->{
  3.820453931186556*^9, {3.8205015039119177`*^9, 3.8205015041516037`*^9}, {
   3.820620765247404*^9, 3.820620775925467*^9}, {3.8206253955458107`*^9, 
   3.820625408712368*^9}, {3.8211858532342043`*^9, 3.8211858536498003`*^9}, {
   3.82127198879319*^9, 3.821271992056746*^9}, {3.821272115978672*^9, 
   3.821272134769319*^9}, {3.82127274014548*^9, 3.8212727420254602`*^9}, 
   3.8213826832324457`*^9, {3.82148935011744*^9, 3.821489402113596*^9}, {
   3.82148946881633*^9, 3.8214894962863197`*^9}, {3.82148954182089*^9, 
   3.821489609066512*^9}, 3.8218398939659557`*^9, {3.821839935290318*^9, 
   3.821839935954204*^9}, {3.824426166696703*^9, 3.8244261690640574`*^9}, {
   3.824426376009399*^9, 3.824426378128484*^9}, {3.824553109264062*^9, 
   3.824553109415061*^9}, 3.824571352642585*^9, {3.8245717990747967`*^9, 
   3.8245718103543577`*^9}, {3.824595424027143*^9, 3.8245954602647867`*^9}, {
   3.824598967865479*^9, 3.824598968048705*^9}, {3.8246004929824963`*^9, 
   3.824600518396385*^9}, {3.82460075146809*^9, 3.824600751659607*^9}, {
   3.8246722607742443`*^9, 3.824672288236525*^9}, {3.824673063242001*^9, 
   3.8246730634168243`*^9}, {3.824686828643882*^9, 3.824686866240542*^9}, 
   3.824686981958952*^9, {3.824687298471938*^9, 3.824687298583331*^9}, {
   3.825438521475202*^9, 3.825438527161571*^9}, 3.825461924159807*^9, 
   3.825639251306654*^9, {3.828533966490992*^9, 3.828533981976879*^9}, {
   3.828540389652499*^9, 3.828540413153981*^9}, {3.829003853529241*^9, 
   3.82900385423179*^9}, {3.8290684669479027`*^9, 3.8290684728908587`*^9}, {
   3.829070223576359*^9, 3.8290702421341543`*^9}, 3.8290921150725946`*^9},
 CellLabel->
  "In[1033]:=",ExpressionUUID->"866ed552-7c8c-4487-ba1d-053dcc00268b"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"k3Allfix", "=", "\[IndentingNewLine]", 
   RowBox[{"Legended", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"GraphicsGrid", "[", 
      RowBox[{
       RowBox[{"{", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"k3fixH3R", ",", "k3fixH3RvA2", ",", "k3fixH3RvHLB"}], 
          "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k3fixH3RvMH", ",", "k3fixH3RvS3", ",", "k3fixH3RvSSS"}], 
          "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k3fixH3RvT", ",", "k3fixH3RvFHM", ",", "k3fixH3RvBD"}], 
          "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k3fixBD", ",", "k3fixBDvTTA", ",", "k3fixBDvRGD"}], "}"}], 
         ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k3fixBDvCM", ",", "k3fixBDvW", ",", "k3fixBDvSBB"}], "}"}],
          ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k3fixBDvAA", ",", "k3fixBDvBWL2", ",", "legendplot"}], 
          "}"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"ImageSize", "\[Rule]", " ", "Large"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"Spacings", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "40"}], ",", 
          RowBox[{"-", "40"}]}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"Placed", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"LineLegend", "[", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"Map", "[", 
          RowBox[{"Directive", ",", "LineStylefix"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"DeleteDuplicates", "[", 
          RowBox[{"fixH1", "[", 
           RowBox[{"[", 
            RowBox[{"All", ",", "4"}], "]"}], "]"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLabel", "\[Rule]", "legendlabel"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLayout", "\[Rule]", "\"\<Row\>\""}]}], "]"}], ",", 
       "\[IndentingNewLine]", "Above"}], "]"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Export", "[", 
   RowBox[{"\"\<GeomComp_fix_k3.pdf\>\"", ",", "k3Allfix"}], "]"}], 
  ";"}]}], "Input",
 CellChangeTimes->{
  3.820453937546249*^9, {3.820501508015766*^9, 3.820501508287448*^9}, {
   3.820605351801919*^9, 3.8206053559367523`*^9}, {3.820606295500165*^9, 
   3.820606295907669*^9}, {3.8211858498746843`*^9, 3.821185850337906*^9}, {
   3.821272084414246*^9, 3.821272087245534*^9}, {3.8212721414977293`*^9, 
   3.82127215120877*^9}, {3.8212727357212477`*^9, 3.821272737649537*^9}, 
   3.8213826832357473`*^9, {3.821492781209042*^9, 3.8214928623006067`*^9}, {
   3.8218398993892803`*^9, 3.821839928827242*^9}, {3.824426178376114*^9, 
   3.824426181119648*^9}, 3.8245713526441097`*^9, 3.824600645464813*^9, {
   3.824600732444623*^9, 3.824600732668395*^9}, {3.824672308556581*^9, 
   3.824672308820324*^9}, {3.824672748180997*^9, 3.8246727483480577`*^9}, {
   3.8246868317317*^9, 3.824686857096953*^9}, 3.824686983765563*^9, {
   3.8246873033996983`*^9, 3.824687303527133*^9}, {3.824997546954062*^9, 
   3.8249975603846083`*^9}, {3.825030441489704*^9, 3.825030462855105*^9}, {
   3.825031115422152*^9, 3.825031144956191*^9}, {3.825031206794491*^9, 
   3.825031237144609*^9}, {3.825031298551759*^9, 3.825031299702112*^9}, {
   3.825031391523479*^9, 3.8250314201308813`*^9}, {3.82503158683572*^9, 
   3.825031601650468*^9}, {3.8250317190459127`*^9, 3.82503172165289*^9}, {
   3.825032199915594*^9, 3.825032212482163*^9}, 3.825032399963769*^9, 
   3.825157236194274*^9, 3.825639251310334*^9, {3.8285324918580523`*^9, 
   3.8285325184721603`*^9}, {3.828616246965446*^9, 3.828616248812953*^9}, {
   3.8286652561166277`*^9, 3.8286652579401827`*^9}, {3.8286652992511*^9, 
   3.828665338344983*^9}, {3.8289086467930593`*^9, 3.828908656032156*^9}, {
   3.828911553761145*^9, 3.8289115559761868`*^9}, 3.829068449077175*^9, {
   3.829070403001204*^9, 3.829070405176179*^9}, {3.829084629407484*^9, 
   3.829084631486382*^9}, {3.829084669189321*^9, 3.829084723634145*^9}, 
   3.829092119592358*^9},
 CellLabel->
  "In[1035]:=",ExpressionUUID->"8c92042e-f69c-4be4-923a-ad40c6d3191d"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"k4Allfix", "=", "\[IndentingNewLine]", 
   RowBox[{"Legended", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"GraphicsGrid", "[", 
      RowBox[{
       RowBox[{"{", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"k4fixBDOR", ",", "k4fixBDORvCMOR", ",", "k4fixBDORvAAOR"}],
           "}"}], ",", "\[IndentingNewLine]", 
         RowBox[{"{", 
          RowBox[{"k4fixBDORvSN1", ",", "k4fixBDORvSN2", ",", "legendplot"}], 
          "}"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", 
       RowBox[{"ImageSize", "\[Rule]", " ", "Large"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"Spacings", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "40"}], ",", 
          RowBox[{"-", "40"}]}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"Placed", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"LineLegend", "[", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"Map", "[", 
          RowBox[{"Directive", ",", "LineStylefix"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"DeleteDuplicates", "[", 
          RowBox[{"fixH1", "[", 
           RowBox[{"[", 
            RowBox[{"All", ",", "4"}], "]"}], "]"}], "]"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLabel", "\[Rule]", "legendlabel"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"LegendLayout", "\[Rule]", "\"\<Row\>\""}]}], "]"}], ",", 
       "\[IndentingNewLine]", "Above"}], "]"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Export", "[", 
   RowBox[{"\"\<GeomComp_fix_k4.pdf\>\"", ",", "k4Allfix"}], "]"}], 
  ";"}]}], "Input",
 CellChangeTimes->{{3.820606298948094*^9, 3.8206063625619*^9}, {
   3.820606492316684*^9, 3.820606497212242*^9}, {3.8211858470747213`*^9, 
   3.821185847532804*^9}, {3.821272035213952*^9, 3.821272038293478*^9}, {
   3.82127215801717*^9, 3.821272166616365*^9}, {3.821272245134448*^9, 
   3.821272247086254*^9}, {3.821272731481889*^9, 3.821272733025807*^9}, 
   3.8213826832386837`*^9, {3.8218399099727697`*^9, 3.8218399191946173`*^9}, 
   3.8245713526457567`*^9, {3.824600661839768*^9, 3.824600719071143*^9}, {
   3.8246723105565233`*^9, 3.824672310796191*^9}, {3.8246727570207376`*^9, 
   3.824672757363739*^9}, {3.8246868348517523`*^9, 3.824686844305375*^9}, 
   3.824686986701288*^9, {3.824687306559453*^9, 3.824687306670982*^9}, 
   3.825639251313615*^9, {3.829092123967821*^9, 3.8290921242789783`*^9}},
 CellLabel->
  "In[1037]:=",ExpressionUUID->"0824e1e1-31dd-4c02-867b-9ee795f73a18"]
}, Open  ]]
}, Open  ]]
}, Open  ]]
},
WindowSize->{1102, 1262},
WindowMargins->{{128, Automatic}, {Automatic, 10}},
Magnification:>1.25 Inherited,
FrontEndVersion->"13.3 for Mac OS X ARM (64-bit) (July 24, 2023)",
StyleDefinitions->"Default.nb",
ExpressionUUID->"e21c2e01-0597-4c50-b72b-96b7322a3950"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 231, 4, 86, "Chapter",ExpressionUUID->"7282a4e2-e405-46c9-8993-7cd191e25542"],
Cell[CellGroupData[{
Cell[836, 30, 157, 3, 84, "Section",ExpressionUUID->"7f7c2a79-7cbe-4a15-8122-e16ce1ee1f77"],
Cell[996, 35, 291, 6, 37, "Input",ExpressionUUID->"f361dc58-05aa-44fc-aea2-59cce461e788"],
Cell[CellGroupData[{
Cell[1312, 45, 194, 3, 56, "Subsubsection",ExpressionUUID->"ce7805b8-b297-4c34-ba41-b5a805b98bea"],
Cell[1509, 50, 1065, 16, 37, "Input",ExpressionUUID->"20e4ffb9-574c-48f0-b77e-8fa56001dd85"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2611, 71, 240, 4, 56, "Subsubsection",ExpressionUUID->"bc8af848-b53e-4060-b020-85a7beeb6c15"],
Cell[CellGroupData[{
Cell[2876, 79, 5095, 98, 428, "Input",ExpressionUUID->"6befdeee-d891-4598-9329-a7a3d2489bf3"],
Cell[7974, 179, 5601, 80, 42, "Output",ExpressionUUID->"b1c18577-a0f0-42b7-bc70-636252b45054"],
Cell[13578, 261, 8375, 127, 381, "Output",ExpressionUUID->"ef9ddafa-13e7-435c-b141-2119439dd46c"],
Cell[21956, 390, 5599, 80, 42, "Output",ExpressionUUID->"3c131810-996e-4123-9853-3e8204fc7d0e"]
}, Open  ]],
Cell[27570, 473, 467, 13, 73, "Text",ExpressionUUID->"bc8521ce-46d4-43a3-aa01-fe4c426ca54f"],
Cell[CellGroupData[{
Cell[28062, 490, 361, 6, 37, "Input",ExpressionUUID->"d4b5d756-95be-4b7b-a925-4481e703a331"],
Cell[28426, 498, 8585, 137, 695, "Output",ExpressionUUID->"4924adf7-d512-47ac-8ae0-e3bc55332bb6"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[37060, 641, 477, 8, 67, "Subsection",ExpressionUUID->"0018b4b1-b12f-428f-9ef7-5389169b4ea7"],
Cell[37540, 651, 529, 10, 73, "Text",ExpressionUUID->"4feccc87-384b-4496-acba-eba7f0fd4dc8"],
Cell[38072, 663, 2293, 48, 116, "Input",ExpressionUUID->"687b2a81-889a-4748-937a-9a078e6f818a"],
Cell[40368, 713, 151, 3, 37, "Input",ExpressionUUID->"65696f40-73a3-45ba-974c-c9072eba0f43"],
Cell[40522, 718, 11827, 206, 688, "Input",ExpressionUUID->"735164d9-3203-4292-ad14-44c18b28f061"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[52398, 930, 289, 4, 84, "Section",ExpressionUUID->"1dcf95c5-15ef-46c0-b417-f659bc7e29ef"],
Cell[52690, 936, 4161, 97, 480, "Input",ExpressionUUID->"4e5bf0ba-f742-419d-a2eb-bfda12dba49a"],
Cell[56854, 1035, 2777, 67, 246, "Input",ExpressionUUID->"8a60042e-2af2-43a3-8c9a-4b82d539bfff"],
Cell[CellGroupData[{
Cell[59656, 1106, 165, 3, 56, "Subsubsection",ExpressionUUID->"6e78963d-66c4-4871-a9cf-4abda647a9e2"],
Cell[59824, 1111, 3691, 67, 636, "Input",ExpressionUUID->"14f21cb8-243d-4eb2-9bdf-c9891575d5b3"]
}, Open  ]],
Cell[CellGroupData[{
Cell[63552, 1183, 163, 3, 56, "Subsubsection",ExpressionUUID->"58924c3b-c717-4ac1-8302-ef3afe9a39e4"],
Cell[63718, 1188, 13105, 286, 3756, "Input",ExpressionUUID->"37e286e1-45e4-42a5-9180-cabe5205f2ed"]
}, Open  ]],
Cell[CellGroupData[{
Cell[76860, 1479, 212, 4, 56, "Subsubsection",ExpressionUUID->"17efa027-d874-4811-a01c-e23ea95c00bb"],
Cell[77075, 1485, 16229, 350, 4432, "Input",ExpressionUUID->"c627ece8-31a5-446a-a187-f269403c829f"]
}, Open  ]],
Cell[CellGroupData[{
Cell[93341, 1840, 163, 3, 56, "Subsubsection",ExpressionUUID->"64f11ebe-be10-49fe-9465-118008debe8d"],
Cell[93507, 1845, 4373, 98, 1078, "Input",ExpressionUUID->"3e610904-bb9d-460e-9ea7-f3fa79621b74"]
}, Open  ]],
Cell[CellGroupData[{
Cell[97917, 1948, 173, 3, 56, "Subsubsection",ExpressionUUID->"181c599f-ad03-4bba-956c-3b0811a7b375"],
Cell[98093, 1953, 630, 16, 37, "Input",ExpressionUUID->"c2afbdc3-8930-4241-819b-83595989fc1d"],
Cell[98726, 1971, 3986, 73, 454, "Input",ExpressionUUID->"786024b0-1ad3-47af-a024-31cafe75e23c"],
Cell[102715, 2046, 4227, 82, 532, "Input",ExpressionUUID->"308fe8f3-bef8-4434-9ce1-4050a4d365b4"],
Cell[106945, 2130, 4254, 82, 532, "Input",ExpressionUUID->"91f9a204-f294-4a8a-8c63-63301316d5cd"],
Cell[111202, 2214, 2579, 55, 428, "Input",ExpressionUUID->"aaca9f95-a5a6-4c6c-8acf-17b2c80aa5de"]
}, Open  ]],
Cell[CellGroupData[{
Cell[113818, 2274, 187, 3, 56, "Subsubsection",ExpressionUUID->"d8f97d35-cce7-4f79-ae37-6a8b0dd9a94a"],
Cell[114008, 2279, 3199, 66, 506, "Input",ExpressionUUID->"489acaaf-4db8-4df6-80ca-b88ac2bfa4a8"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[117256, 2351, 288, 4, 84, "Section",ExpressionUUID->"29f942ce-455c-4d7a-bdd4-5212f65ed6a9"],
Cell[117547, 2357, 2288, 55, 194, "Input",ExpressionUUID->"feb1130c-7404-4962-a966-4f64f061cf71"],
Cell[CellGroupData[{
Cell[119860, 2416, 165, 3, 56, "Subsubsection",ExpressionUUID->"2ede0647-279c-4e3d-8b4c-3c0dccfc0bd3"],
Cell[120028, 2421, 3694, 67, 636, "Input",ExpressionUUID->"4f1756a2-0f17-46aa-8c64-b5ce5928201c"]
}, Open  ]],
Cell[CellGroupData[{
Cell[123759, 2493, 163, 3, 56, "Subsubsection",ExpressionUUID->"f2f3bf0e-5c74-4579-8d9d-bd81df97c677"],
Cell[123925, 2498, 12460, 272, 3548, "Input",ExpressionUUID->"04250729-098d-4804-bf59-7b5e29ef66fd"]
}, Open  ]],
Cell[CellGroupData[{
Cell[136422, 2775, 212, 4, 56, "Subsubsection",ExpressionUUID->"72632c50-ada2-47c4-98a8-08e958aaf091"],
Cell[136637, 2781, 335, 8, 37, "Input",ExpressionUUID->"7e68391e-58c0-4d6e-bd79-dd5fb9570c13"],
Cell[136975, 2791, 12963, 280, 3574, "Input",ExpressionUUID->"aecc9dee-84d3-4e62-80c7-bb197d91dd1d"]
}, Open  ]],
Cell[CellGroupData[{
Cell[149975, 3076, 163, 3, 56, "Subsubsection",ExpressionUUID->"8da1804c-25ba-4fc1-940c-f1dd8040afed"],
Cell[150141, 3081, 3768, 85, 1078, "Input",ExpressionUUID->"d5b4c671-0fd4-41dc-8404-58100e64cad3"]
}, Open  ]],
Cell[CellGroupData[{
Cell[153946, 3171, 222, 4, 56, "Subsubsection",ExpressionUUID->"58223295-8a18-4402-8724-14224d4a70ab"],
Cell[154171, 3177, 704, 17, 37, "Input",ExpressionUUID->"c2f5b276-2945-4680-b1fb-78a1c3bd6e6a"],
Cell[154878, 3196, 4067, 74, 454, "Input",ExpressionUUID->"d4a620e5-2630-4643-8c0b-962f0fab3745"],
Cell[158948, 3272, 4049, 79, 532, "Input",ExpressionUUID->"866ed552-7c8c-4487-ba1d-053dcc00268b"],
Cell[163000, 3353, 4271, 83, 532, "Input",ExpressionUUID->"8c92042e-f69c-4be4-923a-ad40c6d3191d"],
Cell[167274, 3438, 2624, 55, 482, "Input",ExpressionUUID->"0824e1e1-31dd-4c02-867b-9ee795f73a18"]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}
]
*)