(* Content-type: application/vnd.wolfram.mathematica *)
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
(* CreatedBy='Mathematica 9.0' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 157, 7]
NotebookDataLength[ 1264475, 28756]
NotebookOptionsPosition[ 1240092, 27977]
NotebookOutlinePosition[ 1240437, 27992]
CellTagsIndexPosition[ 1240394, 27989]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData["b"], "Input",
CellChangeTimes->{3.567005381700571*^9}],
Cell[CellGroupData[{
Cell["Gekoppelte Pendel", "Title",
CellChangeTimes->{{3.5664138833353558`*^9, 3.566413890670146*^9}}],
Cell[CellGroupData[{
Cell["Ungekoppelte Schwingung", "Section",
CellChangeTimes->{{3.566414746343994*^9, 3.566414749605749*^9}}],
Cell["\<\
Wir importieren zun\[ADoubleDot]chst die Daten der ungekoppelten Pendel:\
\>", "Text",
CellChangeTimes->{{3.5664104035631104`*^9, 3.56641041152826*^9},
3.566413879362546*^9}],
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"time", ",", "p1", ",", "p2"}], "}"}], "=",
RowBox[{"Transpose", "[",
RowBox[{"Import", "[",
RowBox[{
"\"\\"", ",", "\"\
\""}], "]"}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.5664051108167143`*^9, 3.566405133152111*^9}, {
3.566405192737733*^9, 3.566405209822948*^9}, {3.566405252532428*^9,
3.566405287714695*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["ungekoppelt", "1"], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p1"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566405351112589*^9, 3.566405357447461*^9}, {
3.56640544960851*^9, 3.566405474501894*^9}, {3.566405878244103*^9,
3.5664058812828007`*^9}, {3.566406623173218*^9, 3.566406650963872*^9}, {
3.566406681345848*^9, 3.5664066820338078`*^9}, {3.566406750765345*^9,
3.566406752245111*^9}, {3.5664068340642033`*^9, 3.566406978710898*^9}, {
3.5664071823293343`*^9, 3.566407190896555*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["ungekoppelt", "2"], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p2"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.56641041393626*^9, 3.566410422064912*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["plot", "u1"], "=",
RowBox[{"ListPlot", "[",
RowBox[{
SubscriptBox["ungekoppelt", "1"], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.5664055595915527`*^9, 3.566405647059338*^9},
3.566405885667727*^9, {3.56640642650696*^9, 3.56640642968895*^9}, {
3.5664067624120827`*^9, 3.566406864189818*^9}, {3.566406899579734*^9,
3.566406904307167*^9}, {3.5664069379227533`*^9, 3.566406948896392*^9}, {
3.566406998126951*^9, 3.566407002148629*^9}, {3.566410456823061*^9,
3.566410459040061*^9}, {3.566413311085313*^9, 3.566413311177349*^9}}],
Cell[BoxData[
GraphicsBox[{{},
{RGBColor[0.24720000000000014`, 0.24, 0.6], LineBox[CompressedData["
1:eJxdXXecnWXR3fRCypZsb3dLNrvJbrb3cp/b+wqogICAgArSm1RRQUCkqUiR
JtLhA0EBQUTuUkRApSMgSAsdAiSBhAAJX+45c8/7W/hnebO3PGXOzJkz8zzb
sPchO353ZkFBQf38goLcz+HbHvrhPb+7yI+fLzdO8fkGf+Eu2/5vY+NUcK83
Hm984Qn/sj/EXj3u6capFd3zb6zZ9UX9/pIHfLccvt+r/v497kosmtk09UTj
C5tP/MHr/h//4O4jz61omnp/hzvrTnnvHf+u+46+/LXFTVO539595Ht6//jC
Z688dPwDP1/XOPVOS+4LPtLz5VWd/2ueu07P9z7y+8ifN6zT+zme9fr+WnzR
Bj/+ublp6uQpvEHjORZf8LHGc9mH1z6YGvxErz/nvk9adz9no54x/c0b9f6d
lnT86dIPN+kZ4/jhp/q83GwWPrtZv98bL/hMn/fwttWt6vzcj8/pbJpq2z33
jV/oeRJv8J7xuWdt0fN+v1p7gr9/q//43IaMNE3h53EFLv/7ja25Dyxwf89t
yw5NU7mv3Xd0huM+NU09/+imr6+5eoZ+j+2umqnn3Khn7zTT5T//o9zynO49
Y7r3zHT5+XA8s/TM/feeXz0u90bvOblo5qrTyma76fPznj/dNrqLH/Cet714
25Bn6/3RP2/Y8vQxc/R77qf3nFvdbQaj19M+vGd+31y9Hts0e56en8rkNmCe
Xp8bje+WeS6/n+VYwHkuv9/89/kub39Yx195z9z/+Xr9+aEzDnzr8/luuv0s
0HM49+vrF3xlPgv1zPks/Mr6LXTASbTJ8LKd9ovz8Z4rZ+feuZ1enx48PbDX
G97vaQ+L9MzvW6TX//tfuf8W6fsL8N9irVcv/vOeac+LNX/a/xI9fw//LdF6
XfTb3H/e87bJXXBw8VKtTxwG5T3n0Hjtg0u/sr5L9f1YnvJCvZ7+xntuyG3X
QYV6/TPHbDOon3vPhxTnPEih5tsEB+a9H+bzH+/1HG+RnnNoWtJRpPFhvNGi
6fj4jvd74tl7xuNviqav383eM+2rSOPh/hfr94BrfbF+/8E2tO4x4j0DXl/3
Xs/1KP6KPXrP2z78p+fdXyz7APxfKpZ90F8Wy598lnP3JSX6PdejRO/nenjP
/P4SrTfM9VLv97kosMOd3uftmPuHJ7zXM054z1yPZVpvrscyzQfj32OZ5g9/
c/Sy6fv5a++Z/sZ7P8zj7977/7HNWwZe8Z4fy7nb6lIHP/pwo8WbUod1uKmB
49+h1NGv+mz+pQ5xd7f6qaNyLzy71G19epth/rHGvr/U3Z8LU/dVmv2XuhvW
PZnZ+5dl9v4yl/ux9oRNWfrbcgeYP77YMR6Wuxy6Vs2rdf/MRcct5Q5+4Gof
n39UwfWd63PAy98qHPz6u7UO/uC/FQ44mV9p61DJ/Tmu1AHvfZX2uYvdNuPZ
NrJKl/fbjEOV7ovcP+/9BeP2SZWOceRdP9br4krOp/C6LL+/0nFf12avybnj
9ZUOMF44l/5vcRX3Z98lUx9vyS1UlSMui6dyaDzZVTnabSn5zG5Vjn6wwvhI
lUMY3r3a7K3Kwf38X+0UlvefVe5HuZE+7KO/ejP/eQ3m/6odlnfvRvqvymrO
/2+N9H991S7PVwCnw6plH/Tf1S5n1XWnNHL811Q7hJk3Gjj+qWrHON5gfKza
rc8tzy4+jv/jake/VEf+srTGkdbVGL+osf2uMr5WQ/v4omSK61/j6OeW0l4v
ruE+3jbf+FONo53NIL96rMZdlaM5V36c5T7XcP6NL2ThL9pqHex2ySY/1ilU
a/s+2xFvtY5+ZztHvNXafhY54q2W81++zNHeax3XvczsoNbh246ttHnV8fOe
qnXfQMCuo/8p8tm61bnDcsO9xeeuyA33G3UOOOlocKP4wjp+/vcaiNPT6ww/
DTbvOtprY4Mjn6nj/M720e4/q3OIS/+od4DBsnrHuFPnGO/qbb9rHJY1Xs9x
PF3pwCf2qbdxlHP8l9cTj98t4vj/Ws/5bl5o76t3mNbLs/i+D+od9+0zP/jT
bJ/h520/Pr/J58gDHsjCj3T7uL5Xf8n9G/fZvOZPXZgzt6SP695eOGV2xvnF
SshH9vXZuMvIJw73OcaVyikM80Qfcf/vauLnDJ/5k7opuKPf+jj+ep/5c5/8
If2pT3jCsjzpc/n8g/P2iR9gnO97z/Azn3qv5/c2mH9sJH9rajD/1Wh8pcHm
4yOeXYNjHlJHvpNu0HzIhxpsPyuJ1212Q/9VRrwf2aD1qs59/U8bHH6UFk5x
fxscee6CKZjLHxrML3+ShT3d1aD9wjgfajD/9Jaf+2/jXbPZD9y+2uDoSGfT
3j5scMzjFjryoQb++82FtO8FjS4fV+vheBrd8hxMzyhzyB/6G80fVbvtcw4o
1Ogwjxl1jvlVI3H8Ur07OmcQ32505G0+B/zv3+joFxvo937YKHwhXPysUfhC
fDq/0dEvNlicaxRezY/q+2CfjzQaruroB59rZHzbvsbBPl9vNHswP7++0WGb
by13sM+tjVzPF5c52Od2TRzX7GKz+yb6+8Rixq2hJq7DyVv9xjsUrw7KGcaO
TdovrPueTRbfPsrCrg/K/35rln6ryYEXnTt3Cv7rtCaOu3kx86Pzm2yfipnP
3d5k+1ExhXHc3yR7pD9u4rok66awH/9rsn30kb+90+SAu8oG5hsbmxzM6bEG
y3+ahTf6uWbFL/KoZuEJcWasWXyG69TsYMcHN3L8OzVzH9c1EG/7NCt+YV8P
bTZ/5yMf/1Gz4hfiwC+aFb/gRy9oVvwC/K5qdnDzXeWMp39stni4zPLTZs5v
adEU7PqfzfRPd23HfO25Zsc8ZrblP83Gvz43ftFscerd7BG5jf6y2ezjz37i
bDn5waoP/eBFK5fTjsu2+BHPBpdzfLdsx32LLJd9ke8tJ94HSom/PZY78sZy
xrcDljPuRKscXn7MctrtiTUO/vGU5eYP6ixeLlf8wTL/brniE+PnckeeYHHg
LzaecD6+LRf+YJdPLRdeOa7lDuG5vIFxc+1y7sc/zO9/ttxBFllhcWJeC/nY
63UWD1uI549qHPSb3hZbhwpHftZi9l5Kv5pp0XrBDnZtMT+y2OW81IHfb+G8
i+eRpxyZ/7wC+qmfthgf2eAHTs5qMf/6lB/86eIWB9w++WoW4762xfzgpizW
6bYW4uX5mVPX5ejAvS2M5xcsIB9/tMX8qvGlF1rk78Fz3m6hfaXLqI980qL4
CN4+c4VDHnBH9RS/d4XiI/2a/X6Tj/ns6ArxQaxTYoXwSr1mhfDIf1/h8noZ
7PBQ75l+d4WDnf/J8Hv6iun4Pd/7PuD3yhVmj4bfW1ZMx+/fVjjQ+3cMv4+s
MHs0/D67wvyh4ff1FeR7vzD8rlvBeHuJ4XfrCuYbPzD8btdqfn8R/VlbK+PO
/+ZYPtXK9Rpcm0VcDbc68t5/+ZmHttp41/uJt1bztwWGt1bZE/HWqnyJeGs1
u8/z01bZK/HWauMvN7y1Wl5UxfhxZyv5clMN9/nBVvFD2mGrxb16xu2XW40X
Gy9a2yr8kge2Cr/0i22WLzYYb/aeibc2+QPirU3fR7y1cZ6ROsNbm+Ip8dZm
/rbK8NZm+VC5Az5+2qb14Pe0Me72FBsvbeM8OpYwD7iuzYFuHDiPcfR2G+8L
BZbXthmON/gZp9qEXyzvi23CL+2uTfkuXrexTfhF/jFrpdnTginy4pXit7Dn
rpXCK/WhlYo3eEyuVP6Nfdt5peydeedK4YF+dKXwAns+caXiIXnWSuGXfHil
8EtevtLl9XjyFu8ZtGpqpa1ro+lxK2lPO5se/t+Viu/gp2+uNHtvID/9eKXy
R/K6VbZvdeSnvlW2PzVTmNfqVZZ3lJmebL9/v5j6U3yV2fvSKWzbN1dZ/j+P
fGLvVYavGeaPVlGf+XBDlvu2yvj401n6o1XkL5+84sc4L1xl+eMmP+Zx1SqH
7X10pvmxVYxTey1wiNfZVZb/FJIX/ys/nmLTL1aRz80qc1yfVcZDK2jfH69i
/vVGlfHedukljPPtxr/y+V27+C/9dbvyRfrrdsVT+ut249ENZgfe67k+7eK/
XJ92xVeuT7viK8fdTj5fW8u84Mp2xvGSavucdsNXhek57bTH7jL64UdsfqeV
GJ9ut/y80Ph0u817ofHpduOjs4xPt5t9fOonn+7geK99k3WbVR32/Q9nyac7
LM8uYH4W7RA+yac76AeChdTr9uyg/zuyxPStDsv/y6hnHtdh/qqS+vBpHeLH
1E87xI8Rpn/fofwT9v2HDsVb5tsdpoc0mL7awbymrZH2/UwH7eYa48uvdQif
2L+POqbH2y86psfbBatt/Kb3tKxWPso4tlr+hPFsNfPz79SxvrDDatMdjD/s
sdr4YSX1zwNW2/jKmF8fs9p4XwnX+9TVtt+FXO9fr7b9Wmj1v9WMC2fN4nrf
tNrw8GmWPHo19a/QmizjvM1n86NWJ1xtvG+9n7rCasP7l37mp6stf51rPGq1
6UmLLY50km8+W2RxvJPrt36Z8eZOxVfGwU7xS9pBp/BJHt8p/IC3H9ApfDHO
dkoPYrzvFD4Z7zsVTxnvvddTt+i0/NTi8186me9/02c8udNwX286VafpL6ZX
vdJpemS16TmdpkdUMm/6vFP6F3A/u0v6GHHeZfyniHZR1cXvP2827bihS/4T
dtbaxThf9bIffnR1l/Hn57LMa7uk7yHOjHbRr/pnkL8Gu+hHd51PfTHeJf+P
uPO1LrOnYuOnXdJfkeft3mXxq8Lywy7zo9XEx/5dpkPXMl4f2mV6Rj3rq0d3
SS9n/mjj+7Hlsz/rsnWxevG5XcIbxn1Rl/BIPaZL8RRh79ouxVPqM12Kp7Dr
27poX4sbWK+5q8v4g4/1onu7lM9Sv+lSPGXc6hK/wLI+06V8lvlEl/JZrPdr
+f0u4nq/3aV8FuP6sIt4b5nD9d7YpXwW4/iiy/K897JY71ndxq+upn5R3G35
1Qd+rFNlt/R6xFVft/gb06Vu4mDPYsNBt+n8pbTv3m7Tfyss7+k2naiKfizQ
bTy5xvKmbumueN9kt8X/evr9b3SLvxKH3eLDSMf37hYfpp13C7+wq0O832Pa
R3nvh/85vtv0HdMdT+oWP+a4usXX4cfO6bZ51Vj87TZ/X8l4fUk3ef6p5bT7
K7tN71vGOHJ9t/wb7PuWbvk/5oXdykfgFv7WrfwWsHugW/kM86Ju88+P+zHu
J7rlnxnP89+3KYttfqmbeljvrCnE8Te6mSdsWEC99r1u8udvFVLfXd9t+mCJ
6avdqjfBDr7sVvyFnc7pUX6Lty3qse+rI/5repzptqbH9tAf/beB+G/rEf7w
PV09wivmMdgjvky+7v2e+9wjvINXJHvyOucUx9lDPvCLBtb7du4xncNn9UB7
/+Z607t7LH7Vkr8f0GM6fbXx/R7pwYy3Pcon8L0n9hjfKuF6n9Kj/AM/z+yR
vsB402O8b6blBz3SJ+Dnfpd/fjULO7umx/D3pB/fe2OP8ifmDz3GL2ZYfOpR
/oV5T/Uo34UfebBH+gvw/e8e5XeMXz3Kd7lvPYrHjPc9wgfw/VaP9Frg+IMe
4Ys4zI/H6jWf91h+ldf1e8WPgYOiXuGZ39srPQrbVtfLnxM+xvPlvcYj6pkP
tPfSn59TS7vp6eU8D6o2nbbX1reSccffa/yzzOrOvTbPEvrFTK/hp5Bx5+u9
5o+3szjZa/Yzm/n3Xr3mBz73Y9zf7zV/udZPHaZX9U/EmyN7Lf59kIX/O77X
+PeWLOLNT3ulh7B/odf0/UWMN2f3mn0VMd6c1yu9hXHPxn9EOfWjK3qpi6eq
qDdd36v8Fx97c6/p+/XUi/7cq/oJ7PbuXum9jPu9qpdi3g/3ch/Sjcy/H+8V
n4bfeLZX+MY8/tcrfDPv6VW9FDh+t1f4Bj9e1yt8A4+f9srf4HVbe4Vv+M05
fdLfyBv65L9YPu0z/JRxfRr7pM/jZ1uf9HvG8T7L9+ZSbx/os3rdliz2abzP
8qsPs/D7oT5b7zuy1Bv6TJ9+24/12b5P9T36qz6z03w9tU/2hmX4bp/qPfjc
A/qsnltCnnl4H+PcFWX088f2WT2j0nhUn+o/8Oen9BkfqKW9n9VnfLDe6hh9
zCOTPtr7RX2Mq381venyPunHsPdr7fOGGqg7/qFPfJr8qk/1I+Zjfcqv4Q/u
6xM/QLx/qM/8cZ3xtD7TkWr4umf6LJ+rIi97sc/ss4Jxf02f8dVS8zt95g+L
icOP+gw/Sy1PzNvLAuJsS5/F/xmM87P77fs+8QNXJf3i2/je6n7V+zCfxn6L
17OpH7f2U3d7y/hdZ7/qGazr9Fv8X2b1mH7jV+WMp6F+8UvWZ/qt7lZD+9y+
n/Z6VR3xtnO/8Iv5fLvf+GgD8899+4Vf5k/9is+Mf/3iz/DHx/SrfsS8tF/4
Zn7VL70Zfv/MfuW/zEf7xeeB09/2m77gY3/N5fn1q7d+iX71ayAO3tRvema1
9Z/1q34G//nXfuUjtKd+5Su0p371k9Ce+qVn0Z5svdYUsF/1xX72G/xqQxaf
u6Zfehbrb/3GL1/3w64+6rf68qfE86Z+i0+ziOeteXtYyHHPGZCeRX1lwPSR
EuKsesDmU8F/bxxgn8FD1fa5A+rfYT1vwOJtPfnrwADxs5fpTWMDLl93p38a
EH6J8wHhFXFhB+/3zFu894Nv7uF9PvsaBqy+Z/H4QG988POHe+MH7o8dsHym
kn7hJwOmL5QzHzl1wPC5jOM6y77/10X0s+cOmJ9axPzh4gHzL3PpT64YUP2O
+rSt731rqT/fPGD1i1v8rMcOWL/T+1ns490DNu4vuP/3D9h+z7F4N6B4TL8y
YPysiPzz2QHFY+oIA6xD3Flu/HxA9RPGsQHTG2rIF9cPEE+r69nvuXlA+hGW
7csB6dH4OXdQ+SyWuWxQ8Rh+pHZQ/RLwG82Diresdw5avLB42z1o47V4OzSo
ejPi7cQg93elj/iPDErPgh2mBy3fqTH9b1B6FvD/rUHb/zLif69B6VnkT4O2
voXM1w8etP1ZyHz9yEHz17Oo7x0/aHz80yzW9SRbj3Ney8Lufj5o9vQf7v85
g+LTzPcGVa9gvjdo9cb5lscNmr62hPO+YdD6foqNRw0qXwZe7hykDrWp3OY5
aHysin7s74Om59SYnj2o+i/rIIOq/wIvzw+qfsS8ZlB8mnr3oPCKt68dFL+m
/j2o+It5fj6o/kDy8SHzXz6LS0PSo7nvQ9LP2W85pPo29qFlSHoe8qaOIeXD
rFcNqd7LPGJIeiHqTYEh6Yn4ERuS3gi+OzlketjDfupw9v17vZGFv9xtyPzr
5ixwus+Qrc+sKfzcf8jyn+2sXjFkfL+Q8fLo/PctY7z80ZDlIeWMlz8bUn8m
8+Yh0/9q2O/5qyHFX/CgC4dsXr4p5ndDwg9o5DVDwhf1xiHaY8D0rVuHhE/w
r7uGFI8x7nu939NOhlR/gpk/OkRe9EWD6VFDxNO3G1h/fmHI+md85L+vDVm/
QD357ztDxkdrTf+28c2oZr6+acj08wqu15Yh0zNKyednD1u8LTb+PWzxcwm/
v3rY8Lg1S5wNGz97M0v+Paz8l7xl2OLHej/1gmHhlXrBsPFJ6/MPD6tfFead
Glb9knr7sPJf7PMuw7Jn+Kk9htWvAbx+d9jl+yzB4w8cFl4xvyOGlf9iv44b
Fl4RJ38yLD2Z9Yxh4RXLcPaw8Mp8blh6Fr7nkmHxZfL8YeEV9n39sPAKnezm
YevbreX33DFs+1Vt+tOw6dwVpj/Z51eWcb3+OWx6UQn39Ylhy0esT/65YdND
F1geNGy6/0z6gzeHxYewXu8PW31vjR/rtWFYfArr9dmw4XtDFutVMGJ8sID9
E0tHzA/PYzyqGFE/MPWBEdUzqQ+MCK/4/vYR8WV8f++I8IrvHxmR3ovvdyPS
g6lnjogvU88cUbxk/+mI9CmY/W4jwivGsfeI4i/sbv8RxWf4vUNG1J9BPXxE
8Z3+aETxH/v1sxHmJeF68vczRsQfyFvt866uIn+/cMTWv5z63u9GLD4t43pd
PWL9c0Vcrxvzv1/E9bp1RP3Z9Ecj6n/Dek2NKP+lPxqx/oq7s+yvGVF/Hfdp
RHoJ/dGI6hvUx0fUb0V/NCI9hnFiRHoN/dEI7f6xMsvfRlRvoT8atf2oJq6W
japeQ380qnoS+fao9Cfy7VHFT/oj75l6wKjiMfWAUenP1LVG1X/PuuWo8lvy
7VHVu2Dfu4wq3tIf2efvX2F8e9Tsv9R4/6jyW/j1I0aV39IfjaqeTn80avns
TPNHo7beG/30R6PKb+mPRtUPznUcNf/6MePtlaOWv89gfnr9qPll68+4ZVT9
VdRhRqWfMq8cVb8tdfVR6a/s9xs13b6a+vWTo4yv99ZST31+1PhEPfnxy6PK
L1m2HpV+RLscVT2J/GhU+Sv1ylHhlfxoTPGWvHZM8RY4qByTPgaz8I2pH4P1
lTH5G/L6MfEH2GPfmNVPKq0fY8x4WbnV58bU38/+gzHTfwrpP742ZnxrIf3H
zmPmn2dZ/j8mfsz8f8zwvSZL/XtM/TjUk8bUb0edKD++Asvjx0wvmkdd7NQx
xVvWmcfEj5mvjRlvLCX/u2hM8ZZ2OKZ6EvO1MfFj6l5jlo/V0c5uH1O8Zb42
Jr2ZfnpM8Zb9EGOKp8TJmPDLeor3euQ3L40pfhOHY+pXZjzzxsN45o2X/ZPe
fBjPxpUPsP9tXPkC1rdiXPwY61o/bvFzjtXnxq3+9bmfefq49ETW58bNP/+D
/eYj4/Qnh65jPhQcN75SYP0949YPPc/O145LH8E4dhq3fKuY+eO3xy1PN363
77jqvdSPxq2elq+f5Mdr+Dx2XPoOP2dc9V7az7j1oTVQ7zlrXPoR+z3Gp+Pz
4nHhkfm+94z5XTcuPYv5/rj4MNt+x6VHESfjOg8EnnG/N17ke4+MS4/C/J4Y
1/ki8qFx6VHw1y+NG78qNf8zLj0Ky7J23PzdEjv/7O0H/aStd0GB9ZdOqP+c
fmvC4ucf2b9RNWF4/8LPfq8J4ROwWDGh/BXxePWE8Ak/2Tche2R/wITqvTwv
MKH8leOcUP8y/OT2E+LD1LMnhBf2s0wIT9SzJ6QnEbcThgvrVz5iQvhkP5D3
evYnTkh/Yn1kQvoX/MU5E9Kf4C/Om9B5HazTJRM6r8N67oT563Li6IYJ07GX
0V/cMkEecF2R5W0T0p+wDvdMWN4+x/L7CZ0vwDL+e0L6E+z86QnD1294Pu6F
CZ2HY//RBPOxdVupX7w9ofMF1K/z41ts+diE9dEUWz42oXwMcWe2n/Fh5wrr
v/Xb+lTZ+Xy/8j+sR5Nf9VO2T/rVP0V9yK/6DPUhv/DJOp33TH3Ir3jJ+ppf
/Vewq6/7dV4I+72rX/wb3/sdv/JprMd+fvU3wuwO8Zu91xDfP/Qbn6rk/E7w
qx8D8zvZr3yffct++uFPC40/+6UXYH4X+hVPMb/L/NIbWK/1m79+k+dDbvIr
f2U+71f+Sr3ab/gp4Lre67d+jnlW//BbfF9iup5f+St5n194Zf3Dr3hKvdqv
/BXze9cvvLKe5lf9lvU0v/Rb9v/5hS/2VTrxYdjpdk58F/RriVM/B+y32Ck/
xf6XOuWnjHfO/Fktx1/jrI+52niC03lUfH+T03kmLGOL03kn8NuVjnzppELy
zg5n8W+h8R6n/kbse59TfyPPdziznzfY3zjqrD77ZJb27JSfMp461Qto3071
BPZPOcPzEsaXtLN6QjH56dec4gM+5+tO8ZTx16negf3b1Sn+kM85i//1U5jf
d5ziF+OzUzzFOu7nxHfZT+gUH7F/Bzvlr5jf4W46fo9y0qcYz530ZmzLCU75
KuO7o9/8pY/9zic75as8P+gsX6hhPnqO0/kB1ouc9ceV8Lzq+U79K9RBnM7b
YR0vdRYPZ1o9yal/nLqBkx7MeqWTHgx/c4MzPWmDH3HrD079FfA7f3TSg2E3
tznhE/H/Tqf+KfDku/P7XWr9y07nY3jey6l+Cf35QWd9zDWcx8NO+SHi1r+d
8kfyV6d4iv1+2sMn6w9OfJfzcuK37Bdy0/Xf15z6KwgDZ/p9Pf3W2079FbDn
953yafC8D53ybez3Bqd8HLrRRqd6Nfmx2fffCy1fdzoPi7x+RkDnYXn+KKDz
kdjXRQHD/2NZ1tECVk/byHpNSUD2gHUpD5i/XGj3YQSoIxxSyPyzNqB+KLyt
ISA9iX0AAeP3lVbPDZguUMN+gvaA7Uedna8LSE+CPfcEFM9Ynwso3mGcwwHF
U9LxgOIl9tsFhEfqmwHhl/qU937APxWwPrYG4nsyoHgOfO8Y4L7O91l/f0Dn
Y4mzgPqt2d8ZUD8Y8L1XQP3aWJZ9Ata3UGLnZwOmNy1lPP9BQHoA5xGQXgCc
HBZQfypwfWTA+iGfz2K9jwlY/H+FetHxAZ1HRxz7cUDnB7DeJwUsD11AXnRq
QP3viFunB6Rvsv8hIP2TeX9A9Vf8PDeg/nvY0wUB4ZVxM6B+R6zDZQH1M2Dc
vw8oP6UOEBBema8EhFfm2QHhFf7j5oD0X/iPWwPSq+An/xzQuXX2gwWk//J8
QMD4XzX3cSqg8wN43QMBnR8AD34oYP1sJYxj/wyY/raUvOGxgPX/LTBeHpCe
xHq6tz9Yl+cD1g/9qh/r8GLA+MN/srCnV7z9J38JqD+Z9S1br9Pm057e9ewL
+F0bMJ5SwvrIuoD0JK5rYHo/36cBy9+r2S/1udnD87XUm78MqJ8I85sZVHyF
jrQwqPiK718cVHyE/ygKCr+AZWlQei/DQFD5Lda5xvs85v9B5cfkP0HpW9jv
lqD6F9lfGZQ+hny9I6j5Io50BdXvRL0gqPM+gMlg0PrhljKfHw3q/gCMYyJo
9jeD9a5AUPuFOBIJCq/kP0Gd9+G8g6oHkP8EhVfyn6D0SfKfoOoN8I/fCqo/
Auv97aDwCv/xnaDsGX5736DsHeu9X1B8E+t9YFB4wXofEtT9Eti3w4PCG/zo
D4PCI8ZzrPeMdf5RUP1RrCsHdV4AfPNnQdVzMe3TgsqX4a/PCKq+xP6+oPJt
jPvXQeXjgNl5QdNrTD+60Nb7qGLu6yX5/VvCvOfyoPgLPvfK/HrMsP6toPgP
r4sLWn7wjB/rfVNQeiFlh/zz5izs+/ag6q2Yx51B5U/Y/7uD6nfH/meD6ocn
Hwqq3wn7/2BQ/YrU74I6P87+1aDl23b+54mg+p1gx08HdT6O+l5Q9VZ87gtB
xUvyjKDiKT73NQ+/5KFB1XuAt3eC4r9wa2uD0n95LtDwcJzx8Y+D4r/0P+YP
Ftl9NJ8H1Q/C/uug+kUwnpkh8z/LOJ65IZ2nxTyWhNRvho8tDhk/3pjlPRUh
4zcvZlmHts9LvEh/XBMyPXoj662+kPnHmbSXppDiKexlRUj4xL6sDAmfWKbV
IeGT7fEh4RP70hdSPZJ9gyGdd8OwxkLWr1ln/boh8V/2w4VUX2HeERL+8DWJ
kOIr7DcT0vkg1n9DisdYp2+EhE/Y7y4hnZ9lf0Fouh69Z0j4xP7sHRI+2Sca
0n0APP8Skt7GvuSQ9REvob84LPSV8+8hnWcmrwypHwLx+PiQfc+D7I840dbz
+ney+JyTQsYjPsuy3zNk+exs1itOD+m8CXjqmSHOY8ci5k+/DAmf5D8h4RP7
ckFI+EQ8vCikfmIM87KQzsuQF4RUD2HeEVI/IvlPSPjEvtwYEj7BD24JKX5i
PLeGhFfWt0PCJ/zFXSHhE/98T0j5KZbpXtvfU3zk9w+ErF+s3voFQ6qnsj/H
my/W8bGQ8Mn7FTx8Ahf/8fBJnuitN/ufQ8YvZvM+gle9/WJ/WMj0irdM/wvp
/Dt+vB+SnoT49WFI9RnWI0LSk5h/hRQPWG+39TyzmHnF1pDiCcYzI6x+Wmzj
7LDyVdjv4rDiF+y3KKz4STsNSw8i3wkLj7w/LSw9l+c2w4q3sMPGsPUNGb9t
Cas/mXwnrPuhsJ4dYcsXq43HhnWfFPDdF9Z5O/CgobDO21HvDqu+jM/xh3Wf
FcYTDKs/G58TDSsfpb8J63ws1icT1vlYrM8OYelH9Ddh8VuMZ5ewzt9hPLuF
7RzVUsaDPcPia/Q3YcNHmd23GNZ9FLyvJ6z8DX77oLD64bE+h9n8SixeHhlW
fsh8K6x6KfOtsPgqxvPjsPgu9Z2w8Mj+zbDwiPGcHlZ/A/zxWWHTQ0xP/lVY
ehHG85uw9GjY+YVh1ZPYDxNWfwP7q8JWpzM8Xpmfj+HxmrDFwyL6hxvCun+C
ek9Y/Z3kN2HDw+c8P3l7fv/fzlLvCVs8uN9PP5fHwzo/qzZh+W/Y1f1hnc8h
DsKqx3AcYfE38O1Hw8Ij+2/C0o94XtnDI+Lnc2H1x7N/Oaz6JNchrPiG8awJ
i5+yLz2s+Aj+/56HT6zPB2HpRRjHOu/9+PlJWPVY6uhhxU+M54uw+C3GUxCR
Po3xzIro/gms56KI6i3Y96URnYegvhORPsQ+qojx1c3U86oi6s+GH6qLSM/l
+Vn7voTlL8sjug8PYaAtYnrSAsaj9oj6FzCezoj0DuRBvRHpIcR5RP2u+NqR
iPphITtORHR+HXwtGNH5deZTEZ1fx3gSEek5WM90RPVM9v9HhDf6rYjiJc8D
RFRvQd6za0Tn8zCePSLirzx/GRF/Zf9bRPERP/aPqD+Qdh0RHrG/h0bUb0Se
FDF+VGr9lhGrXxXZ/agR628yPJ4YER6p60eER8btiPgO7O3nEcP3FO8TOTNi
/RPryGd/GTE99kvWY86NWH13Ltf5gojOy2E8F9n6VBWbnhMRn2O9OaJ6Pvun
IuKDGM91Edk7+UxEeGCfTUR4YX9VRPorlvOOiOIhzyNHxG/JZyLT9dv7IsIj
ddWI6jkYz0MRxWusz78i4rMYz+MR098Nj09FzH9VcH2ejcgfYTz/jchfYd9e
ikgPp54cEZ/FeN6IyB9iPG+bfd21jvv1fkT9vew3jagflHwmonyTuIjovi/M
87OI8Q6zn60R8S/oTjOj1u+6zO5riIq/0S6jqkfwPGJU9X/qN1HpMZhmRVT9
tNQ1oopvPF8dFd54T1BU8ZL1+KjqMcyfouKriOuro4qPWM+eqOIj9r0/qvtk
icOo8Ih1GYua7lfFerGLKj5iGUNR4RHjiUXV/8d+2aj6/9jvGNV5RIxnx6jO
K2J/vxnV+Qns7y5RnUeH/e8e1f1q1HmiFve2EI/7RM1/z7X7iaKGv8X8+YOo
+smxvwdHVZ9nvSqq86u0y6jOr2Jdjo3q/CrW54Sozn9jfX4S1X0O7BONCo/s
j4sq32QeHVW8xOvOjgqPPKcS1fk52MV5UeGRuI4Kj6xfRRW/MZ7Lo8IjtuHK
qPJLjOfaqOq/rAtGVX/i/SdRne/H+vwpqnwA+3V7VPkCdJu/RJVPsG0zqvPn
wONUVP32GM/9Zv+Xbs5iv/4RtfhgeHwkKv0H9vxoVP327N+L6rwb+UxU9T/q
xfb5tVW05xejun+MenFU9zXhe16PSv/Bvr4VVb2F50mj6l/AeD6Iis/yPLyH
T/oB75nnb6K674l8xvs87FdBjPs30+47nRNTvwLPy8es/l1N/1AY033F5OEx
1YNplzH1X/H+j5jlE4vtfrkY6+VTc+1+x5j6cbGey2M6X4x1aouZ3f2W9zO1
x3Q+GZ/TFbN6+Rb2p/TF1M+CdR/Mf5+dtxqN2T0LRcxDJmI6r4V5BWPqp8F4
IjH127B/MWb3J1cTt+mY+nWwPtvHlO+Rz8SUX8Ledo4Jj/SDMcVL9hvFlH9i
PHvH1M9APhMTH8a67R9T/Yb9/THhkXwmZvHC7qc5Mmb9cBWc99E23qzFx+Ni
6sflfQExq38t5XhOilm9YT7X55SYxZcZ5L0/t/HFPjE+E5Neh+/9ZczyiZez
GM9vYtL7uA8xw+ss02diug8Iv74spvNVGM8VMdXb6bZjOv+C9bk+pn4a2M+N
MfXTYxtuiam/lTzAs3/M4w4PH/Cff41Nr0/eExOfxXjui0n/gf/8u/cMe37Y
ez15QGw6Hh/3vo86QUz3p2LZno1Jn4L/fCEm/Yr9nzGrn1VxPK/FLF8pp394
Iz+/ZRzPOzH5N8Iqpn5crM9H3n5QZ4jp/g7s16aY7vdgXSKmflyeb49Jnwfe
Z8al39PfxI0Pz6edLIir/xvzKoorXrD/Pa770cBTK+KW31RZP3xceizicn1c
9y+BRzXF1d/H/tS4+CeG2RYX/tjvHFd8xLp1x9W/QD04Ln0X9j8UV78Q7Hws
rnom1tHFVY8ln4lLXyafiRt+yhh3k3HVe7Esk3GX/7sR5DNxnWchn4mrPgX7
/1Zc9y3B/nePqx7NfY1LX8c4943rfg98zPfj088rHhC3e80Xsp/s4Lju7yKf
iVv/RAnt/6i4+sFhb8fG1Y9APhNXfkk+E9d5TKzPyXHll+DPp8Wl9/D8SJzr
vp+dbzk7rvyQ9af4dDyeFxe/5X0mccVHnp+MC9/wG5fHdf6NfCYuPRjrc21c
9Rysz//FVe9h/3dc59/xuj/F5Z+Ik7j8F8b1l7j643neKS7/x/Nz3n4gLj3g
7Rfzpbjxl5d439K/4qpnUv+NW3zYRP76VFznvXk/alznvWmXNt4LC2lXL8WN
/5Zw316L6/4G5ktx9dPQv8R1fwPW9/246dGGh488vGDcH3t4on+JK/7Rv3j4
pH+JK37SvyT0etjZnIT6GXhuLqH6DOJcYUL9e/QvCZ0vo39J6LwKxl2dMN2p
mHXs+oTla0tN/03In7HfL2H6xgw7d5zQ+V32MyfkLxEHuhPqx8TL+hPKHzH+
4YTqIXjdWMLwvIj8zCWUP2J/Qwmd58bnxBIWb8oZz1IJu0+jinieTKi+h/3d
MaHz3NiXnRKqP8BffyuhegjzyoT6g9jflxBf5f1FCeEPdrVfYno/wYEJ1VMw
z0MSqn+ANx2RsHOFPvZHHZ1QfRLLclzC6sW1dt9RQvoOz1cnlD9zHgnl1+yv
Seh+GtjrmQmdl2d/TUL3m5G/JHS/Gd+X0H3d7PdPSN9h/21CeivW94qE9AX2
4yakP/B8ZELnU3j/YUL9tLCjPyYUH/E5tyWkf1DvTUjfYX9fQvoJ/HQ2oXyO
snBC/JJ6b0LxkbhPiL/CLh5NCH/MjxKqT7KfJiE88zx4QniHnfwvIX+A9X0l
of4H0NHXE+qnxc+3E4qPqDe8l1B85P1zCcVHnutOmB9aYPWkhPp9gJPPEsYf
PuH93FsS4quMW8np90vOS1q8/DTL+nVS96Nw35I6Pwy7K01aP3yp/T2WpOm/
FeRbtUn18zCuJtUvy7/zk1S/LL5/RVLnnzH/VUnFP/D4zqTiH3DQk5Reg/kP
JBUPsUwjSek/7JdJ6nwJ86Gk4i1eF0kqHmM+ieT0+/4zSeWLvC8omf87O6bv
JvX3Olg/Suq+ctjBbkn9/ReMY8+k6kt8X1L398K/fi9p9rg+S7+X1N8/wHwO
Tuq8ET73sKTOb8IvH5U0+5vDdTwmafXpRfSbJyT190/IT5LkW2PLyN9Otv1a
VU47OC1pfXiVjJ9nJHV/CPtjkupHJT9J6j4wxJnzk+o/hx3+Njn9/u1LvWf4
198nhTfg5aqk+uuA/+uSykepmySVr8Jt3ZzU+RLM59ak7jdhnEza+T07X/3X
pOqPsKN7ksYHi4j/+5I6/8r8J2l8Yzbx/3BS90exPzipvw/DvDOp/lieN/H2
l/3BSZ2vxnxeTKq/Duv6smc/sPs1SZ3XZD9ecvp9ve969sn7TpO6z5b6SlJ8
lPWir9j/5qTu84L9b0mqH47n51LSR+k/UsIj9nNxSvEOeClMqZ5BXTilegbw
UpFSPYN8JCX9l/13KcVz3meYUryDX12REh/g+ZiU+icY51Oq91O/Ten8CPaz
P6XzmOQjKd1/jvmMp+z803O8L8ylpAcw30lJL8C6x1PSE7CO6ZTuF8IyfC0l
/8777FLq98R+7pRS/gQ/tGtKfI71oZTyL9aHUsoHsW7fTU2PT/unFO9Yf04p
3sE+D01Nx9uRKeGN9y2mTF+op185PqXzKjDrH6dUX8F8Tk6pnoj5nJrS34fB
PvwipftJ6D9sflNF5j9S8lfMb1LyZ/QfKf19M/qPlMXDd7k/l6d0Hg885ar8
fn/EevF1+fEXsH59Y0rnRXg+MaX7dnleKKV6P3B5R0r1fvqPlPo7qZ+kdH8l
/UdK/aH0Hyn1s7LOmlI/K8+npYQ3+g8Pb+ynS4lf8ryjhz/6j5TiJf1HSvGU
9eaU6ifAz1spxWPWm1Pqv6U+m5p+3nt9yvx/BefzSUr3fWEem1PTz1duSek8
K+ZTkLb7CObS3yxI63wd/Uda9zPSf6TFL+k/0tLLgcPytPmLeaaXpKXvMZ9J
S//DOjWllf+wfy4t/YX5TFrn/Vn/Ses+ANhdT1r5FvOZtOqHmM9wWvUKnh9I
C2/UsdPCG9sV0sIb8vB4Wnij/0irPsK+i7TwxvN6aZ1vZn05rfo95rNrWver
UI9NT/97G3unVd+hHptf77nWL5dWfQhx7KC09Gq4wcPSwhtgcVRaeGP/Slrn
Z8k/0sIb+Uda/TWYz8lp61csYX53Wlr94+zPTQtvPF+aFt4Ql3+dFt7IP9LC
G3l9WnjDOC5Nq37I++vTwht1srT0Td7XmZa+wvs50soPeb9CWvkd/UeaPOra
vP6aVj2T+mta/Ji4TIs/w97uS4tfYz4Ppi0+GP9+OC28MQ6krb6+xPpxPbzx
/iEPb6zvpHVfCPtV0rqPDWb7StrysY+or6wx+x/80s/7Z82+Tp9r5+zSum+Z
/iOt+j1wsCGt/I51h7Tqacxf0qq38TxSWuclUYedkREeyD8yOm/M/CWjeh/P
P3rPWL+yjOIj7KAyo/NVzF8yuo8E+9yQEd9FPGnOiA+Dl7RmdF8e7KQ9Iz6J
7ezM6O8vst8/Y/5gO85jMKO/L8f7AjK2npuZX09kdF8P+3ozVh96huddoxn9
vQ/2v2XUz8bzvRn9vUnYww4Z/b083peT0d9/YL04o/uned4oI32Tfy8io/NW
mM8+GeVLmM/3M+KTsNMDMrr/g+cbM4pvvN8io3jF88IZxTPsz7EZ4Y/9/Rnx
S7jpn2TEL+k3M9JT4H9+nhHeeB90RvffM2/J6H582O25Gd0fwH6U/OeXUo+5
KGP8xfq9L8tYf8Bi4vWKjOFjrt3nk9H9hfQfGd0Xj/nclBHeeL49o/o87O22
jNX7t/J87B0Z4Q3zvDsjPYX6R0Z6CnjX/RnhjfXhjPpJWR/OqH+N9eGM7o/H
uJ7MiO+xPuzhjfpHRvkd3MyLGcU3zOeVzPT+7tcz6ifFfN7KqB7PvCOjfjnY
24cZ1f/oPzKq/2GZNmXUj0f/kdHfy6WemlF/Lc8PTao/hvepT4o/kI9M6j54
9p9Mqt8XryudVD2XOvqk/t4n73ec1P0RzCMndb8E/cek/DX4W+uk/DnPeU3K
3yNqdk2Kf3HdJtU/Sv8xqfiGeDI6Kbyxv21S/A/rGpxUfAMuopPCF3h0YlL6
Cdza5KTiG+LGDpM6z8G8YlL6Keszk+qHQXzcfVL6JXXsSemX2KZ9J9WfBn/+
/Un1i4LPHTCp+zx5TnRS+jDc0hGT0i/Zz5bfv8+y8EvHTeq8DPvzJ3WeBnZ1
0qTlDx/7eT5xUvkc+2UndR8x70OZ1Pk7xtlJnbf4f5vxFx8=
"]]}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0.},
ImageSize->Full,
Method->{},
PlotRange->{{0, 61.136}, {-9.704, 8.744}},
PlotRangeClipping->True,
PlotRangePadding->{{1.22272, 1.22272}, {0.36896, 0.36896}}]], "Output",
CellChangeTimes->{{3.5664132891225643`*^9, 3.5664133119354267`*^9},
3.5664150307723713`*^9, 3.566456507576449*^9, 3.566463336092799*^9,
3.5664645811722937`*^9, 3.5664657453655567`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["plot", "u2"], "=",
RowBox[{"ListPlot", "[",
RowBox[{
SubscriptBox["ungekoppelt", "2"], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.566410428720461*^9, 3.5664104526246443`*^9}, {
3.566411448648597*^9, 3.5664114602402077`*^9}, {3.566413317740816*^9,
3.566413318157606*^9}}],
Cell[BoxData[
GraphicsBox[{{},
{RGBColor[0.24720000000000014`, 0.24, 0.6], LineBox[CompressedData["
1:eJxdXXecXVXVTSa9T820TDKZkplJpr/pb2beeb2PFD9AQMSICiIdpCkoKIiA
qAgiKCIg7UOKoIAgbygivQkfIr0HCCQhIT3wZdbab93fwB/Gm/feveees9fe
a6+9z8ny1Uft9c2CKVOmLJs9ZcrEn4O3P/y9e/9waSDTf07w4Hcqxnl9Q+Dk
91d0zb6xcjx08DtP1730TKBwv92fbK4cb9r9t0v2f1mf/+7B2luOPfQNXT9T
99K2077ztq7X7nnn0p98+H5g+2nfuef4CyvHJz695/gPA7jtyZXjI3NfuOro
kY91jZ8tWR9445TSm+Jfrxy/oqrjlYaZG/T5fY/+Mfq3jRt0P47nEz2vZv9D
/K99aaOuzxzHD/R7/v0m3f/yddc+lO7/VPe74P5Pmw+8YLO+jz+3edf7LGz7
y+/XbdE15uV7W3U98TZzX9im+63GF7YHtu791p8ue7By/JHds1vVsSPwy4++
H+h9tXK85cCJJ+7U9Rh+sFPzjdc5f5c+PxT/5zNdn7r7Nd44ZYrL339z88QN
p7j8+0/MziH+qbp+8cktu7851eXHh+WuKnD58e/+y4rp+3jX6yem55wC/R6v
e2+Bfs/xTNPzuf7TXH78mOc3vOvU/IJVZy+e7ia/n3fN+0x3mOamqvHdX949
ZO/z2N827nrupBm65rhmOKzboqrxidndbTBusr3O1Pj4PO/6O3jhWS4/n//O
TizALH0+8b+1t8zS+5djAmfp/U/HDWbr839OwOGXs/V7rr/3+cXhc7/73g7v
mvYzR9eRiY+vn6Pf833m6nO+z9wvvM9cvS/xMk+f833m6f0qp09YsHdN3HvX
tIf5+j2fN1+fP/H4xH/e51Pw3wKNz4f/vGvas3dN+1+o62/hv4Waz0t/O/Gf
9/nul/vNkcWL9LwEDMq7njCTax/yrjm/izQfmJ7yQo2f/qZQ9rJ8YrmO8K6f
P2n3g39aKPs7qnjCg3if18OBefeD+fyf932Ot0jfn0DTwjbvGuONFbnrJmAV
rCI+vl6k3xPP3ue4/LV3jfm7uchxXarMvrxrrn+xvg+4LvOuP9497IOGivV9
wGtv73POh/c57dH7fPfNf3TRA97nnIdid80ETI6tMn/pXWNdS0p0zfko0e85
HyVfeL53DXP9fYnmZyKa7Hmn9/leE3/xjHfNeONdcz5K9XvOh3eN8R9Uqu/D
35zoXWM9f+Vd0y69a5jHP737/Wvir1/3Pn9qwt1Wl+ma8aZM/hXj37PMwYwf
q7D3L3O0u/LxEyYm7OdltO/IYnt+mdu9CrstvdTsv8zBDhLF9vvFjnFvW47+
ttxhug+Zbn9f7jgP5e6xiei4q9wB15lqXv+gwsGvLKhxwMs/KhznZQnX7b8V
7piJD9ZXOvq/SrfbSDY8+0S5A957Knn/P5Tw77OVDnHir4WOfKHSIewdON/1
HvT35PwzKh3XbabDfF1W6fDeCwvs+ZWOcWxbAHb0SaXDPB/8zwDHWeUmrGLp
T97KbdodHd5fUeWOwIM/zU2g8UxXZff/PAc+c0AVx9M7w/hIlWOcmmP2VuV4
n4XjXJcqd8Put1hdWEJ/9W6Vo58sM/9X7RDHr1tM/1VZ7YCzv5fT//VUO7jF
2yrGAadjql2ef9B/V8t/4bnXVMsfYvzj1Y7rmOdj1Y48p4Lj31TtwDv2LSd/
WbSE/rN1sfGLJY7vVWp8bYnZV+E453+Jzdc82utlSxx5xEzjT0ton+kC8qun
ltjzt+VoP0ucH0D5OAd/0VLjEKbffzUAfxGuceR1m8lbDqpxjENTzK5qHHnH
TEe81bidE2azep7FgRqz10JbxxrHdSt2u0dfsGrWUtrH3YvdlxGwl7oHJmhc
KG83Sx3C3NNV7sqJ4X55qaMfyo97Ke+3aYkj38nfr8YRX/b7PZaanSx1y2Bw
Sx389falDn703zUO/rp0me7HeLfMMS5VG06XOfqxKgc+8Y1lGi/Gf8Uym5cy
G8cyB7vZUMzxP7fMkWcVcvwfL3MHYSIsLk+vFZ5w//paR9401X02YdZdtcT7
42sCWL+RWkdel8tdMmFuqVrO69kf5D6ZMPv9ajm++7fkwEcOqTW8TSWfOLbW
3nPmONz/abUOYXbuPOLn3FpHP7doHGb82/zzi8yf15p9lZk/rXXk+Yvpf5+t
pd/qqxjHcr6Wf57xv7W1wg/ec2ut4i39/3L5Z87Hcn2ffGW58AQ4u+V6Pv3i
cuLv4jLjQ8sd84AS4vVbyx15RjHxfvxyzudo4Xj1xON/tNyRZ84f5/oud+QR
s8ZhLjctNz+6PQd7+vty8+/v5cBHHl5u+Lkhx/Vfbnb+dgA4fmO54zp9GsC8
rFtOf/DC5wHa3XL68/Nn0L7n1Jn9zDU7rnOM84uI+94689ulbo8JBxSuM7tb
bPNUZ7iocCdOLMNX62j/e1fxPofVOdpBNXnY9/L3X8J5+HGdjbfG5rXOIW59
VEP7vLVO+IJ9/qPOAb5X1jjY56N1jn5wCe/znzr6izerHezz7TrhC/b5SZ35
i0qO67M6xqnby2l38+ot3i02v1lv/qKEuBmoN3+2wMGeYvU2P7PoN/eq5zy8
MpV+6mv1xne2BuBnjqh3XM583luv+EWc1Zv9v8Z4fXG9xZeNOazHX+vNP08f
x3o8UC980R/XuwAceeE4x1Fvcb2I/O39erOHEuYbm+sdeP83yyz/abC4vngc
81jXQPtbW858t6NB8Qp2O9wgfv0DPLhhcn63T4P4Mf1bg/m9ynHwhqMbHHFR
QT7+gwbFL7zXzxrEd2C2v2lw4E13lI4Dflfnn1fMeHprg9lLkeWnDY552ILx
xokXeazBwby+P4f52n8aLP5Nt/ynweL95znyiwbja5tyx0387PMG8QvOc6P5
11sDwNHKRkcesCYAv93faO83hb+LNhoeZpkfbDR/Pp/jPqjRkVdYfDu8kf5h
uIR2fFKjg9/7WpnDsH/SyL8fKLd42Sg84nt/aBQeGT8bhUfkg3c1ks/8Yon9
rlF4BO/4d6PwSD7bKDzy7xu5Hv1LyXO2NypeIj+btcL8Xz4errDxL6Ff9a1w
mNdcpSM/WyH+CBxmV1j8LCMO9l9Bf/VBCXH07RUO03tREXF8/Ap7v4U27yvM
X83hfc/Pf386/cZlK4xffh6AG792hc3DxgCee/sK8zNvBGAH963gPBc/kMPv
nlxhcXRNDnzppRWG5y058Ks1Kyw+TKE+8ukKw+OMccTRgibGo2vnjnNemxQf
GdeaiOfzSpjP+psUf+C/k02KT+RNTYqPcFurm1xez0OYOLpJ+TRx0KT4B/ye
0zQZvxc3iX8Cv1c1TcbvLU2T8fuPJse82fD7aBPxf5Dh94Um8v41ht+3mwxf
JcTvhiaLK4bfz5occHvuQuJ3XrMjj5xLf9bSbHnEDMunmsX36TeaLb69noMf
2LPZ3ufhAPHWbPOxNkC8NSu/IN6alX8Qb83y98Rbs8XT+Ya3ZstbCu2+zeJr
iB93NpOHvVXK+PFQs+FosY27WfiF+3qtmfGuroo89aNm+odvVTNv3NasfIz8
t0X4xWMaW8RHibcW4Zl4azGeW2N4a1G+R7y1iK8Sby0W/6oMby18zp8quY4/
arG4Ws55+3kL8R1YbPPSYvlWKdftuhbO22tFlhe2mJ9YZDyzhfM0cy553FMt
Nj/TyYNebmH+efTnAY6rxfj8pgBwsLmFv7vgTeYf01Za/L8txzxupfCL+3Su
NP47xfShlaZPzKI9p1ba+OfTnvddSXwfVUh7PmQl84BTLB4ds5J+caiU9nza
SuLn4TLa87krLV6XGx9eKfxyXleav6ggP71tpfCLMDPuXZNHr5ysd/53peIv
4tq7K4VfrN+mlVznSyvIT6eusvcpJz+tXaX4i/DbvsruV2x68iqL14XUnxKr
ND9wC/+zyuLpLPKJ1auUP9IfrbL52p6jP1ql/JH+aJXh9znmH5esMr72nwDo
zdWrbD03UA/4yyrLH3cGGFdWWTyeznl+fJXheY7xnFWG54Uc57uraO+nWjzZ
tMrldSbOT6vZZZnl4a3ij/TXrYyPl1fxPv5W+o2o5ZPJVsVDjrNV+KS/blU8
5fx415yfVsPDUsf5af0Cf25VPKe/blW8p79uFR+gv241/FWQRz7aKj2IfLrV
8FhmfLpV/ox8ulX+jrhvVf5JPt0mvgP/uqpN/pR8us3m4YMA+XSb8hvy6Tbh
k3y6TfGV+lab4itwdkqb4iv4x9ltlnfMNf20jXnMmYuot/6xzXSnItr3TW30
k8eV0L7vbpO+Q9zm77eY9v18m/Qd5h1twhPWb32b9D2s3862yfF2TrvyU+Kk
XXjlurdLLyIO28WPGc/ape8wnrUbPy2l/nl4u/DKeNZufL6Q+fBZ7TaeBeOY
71+1Gz7nWP2vnXYyMp164p/bGTfGP8vxvdvNLjfmMN//ard48UYO8/1cu+Hr
ftbZ3mg3Pv6+5aftpqdttfy0XfkT89MO6RfUrzpkX/STHbJH5C+RDssvy0yn
6TD7LDce0iF9Bfc5vEP5IeNoh9n7Eov3HdJvGO87lH8y3nconsKs/9whfGLd
7/KuMex/dVi8qjHc23juX8I8/vUO5a/UczrkT2CPO+z9Wiqp407vNHsuJ68p
6ZR/gl+t6jQ9oYh5zvJOvueWeeRpzZ3GL2a6CW/2YnsneXt8qvnx/PWWAObR
3ym8ch47bf3uDGB9Ep3Kj2DXX+pU/sTfdSq/Ql5zYKf5++mWH3bK/oCPwzpN
f1wwjuccbfefUcT66omd0mOZP3YqP6S+0Cl8ANcXdiq+wf9f2qn4Sj2mU/EU
fOfaTuGV+oz3Oezk9k7pT9RrOoV/zPd9ndLvqd90ig9jvp/slH/BfD/fKT7M
fKJT/gnz/Wan6UULqeeu6RQfxnyv63Ssm81gPrC50/jzFObrOzuNN27OYb6n
dUlfAv6Lu4zPXZbD9yq7zL99GoDfre0SPpkudYkPAwdtXeLDMDOfff5EofGg
LtMrSqgjBLuUz9LOupTPIk6MdSk+4bW/3MXnHFHF/O2ALuptv6nmPK3uEp6Y
F3QJb1ino7qER/jvE7qUzzLue9fAxRldymfJk21+GmtoRxd0Kb4z/nYRj9Oq
6Rd/16X8Fut0VZf4Mf1Ul/gx7PiWLuP3pWbHXYb3Yur2/+gy/XYR8f9gF/P4
wbmWp3aZf5zBuPlMl/Q/xvMu85ebAghjr3ZZ/eWtAF77nS7FX+Dwwy7FX8b7
LtkP9dUu8WWs0+ddsj/M04xuy5fnjsPO5nebv1xIe1zSrXhLPbZb+S3w39Kt
/Bbz09nNeaipIP77u5XfMk51S59iPOie3I+Q6hZ+GR+8a8Bx327hmTjtFh+n
3t1NHtRQTv5+eLfp/mXG97sVfxlvuxV/YVendRueCsf5vW7pUxjHed2mD862
emO35QfTLT/otvi6i3rUH7qlD8Kur+m2+PxmDvnAjd2Kv+QR3ebvTX+8q1v6
JPA93q36APz0Q90WH2dy3Z7oVvxg/OpW/QHj+G+38cZiq490K98Fvt/rVr4L
fH/czXj7a8P3pm7zD/l41618F9NQ4BPeoJMU+cSnGed8iscw06XeNX7X6FO+
i3lt9Sm+Yx66fYq/xJVP8RdmHvCJP5Cv+qRXIf5nfYq/iMd7+1T/ZB7pU36B
dTrYJz0ZsP22z/zBHId4c6TP+Ms0ztPxPuU38H+n+oxPb6D+/yOf8iPqMD7T
r5/NId783Ec+6VuXw2Mu8qnewOf4zJ4KqB9d6VP+hnm73qf6IPzfzT7VN4Db
v/mkN2Pa7/GpPsJ+AZ/0Zvi1R3zSm+Gnn/ZZfK8g/33BJ3wD96/4xKepH/mE
b/i/D3ziz8DVBp/0K9jxVp/wjXX9zGdxooL674we8QPyqR7jVYvHWT7tMX9R
zPmp69H7Y35aemy955H/d/aofoq8oa/H6u5Tqc+P9Jh9bs1dPeGmwz22Hmtz
1Bt6jF8/RX1ijx7Lf16hvrxv/nmfWD21x/S4XfTn3+wx/z2dvOrwHtkX63U9
0kvhX07uod3dVMTvnd5j8ayUce8nPdJjYXbn95hebfzzwh7VV8iveqQXwd6v
6FG9FfZ+bY/0Jj63R/ya/KpH8Zpx2LuGP7i/R/EZ6/hwj/Jh6kU90sewDs/3
yJ8g/rxsv/dX8T3f6pH+xnH3KB9G/Flv89Nexvi8pUf5B+xzV4/yYdZfe+Uv
EcdKei2+zuJzq3uNB2yhm6/rld6M92nutfz/EfLpjl7jxx+yHtTbq/o76wS9
si/43XCv2ctMq8/0Gt82+9yjV/kwnrNvr+qXeJ+v9gq/eJ9DeoVf5k+9is+M
f72qF8GOT+pVPwvtrFf4ZX7VK/zid+f1Cr/MR73v48/f9gq/eK8relWvZb9E
r/JjuKk/9yo+0y/2mv5Ryv6Ju3sZF/5ZzP6H+3sVn2lP+fWYT379VK/F99ns
r3zefh+dxn7Vl/PzuzMHf/dWfv42sB/i/V7D8ws5uLX1vYa/Z4nnLb3UdZLr
iefP8vO7g3ie0ce8bfY001f6LF7PZlyp7rM+giLGobo+1W+ZP/fRXo9ZzHF1
9NnzKsi7+vrUz4NxDvepH4j+qU/1G/qnPuEXfmbPPuGXOOxT/IWfPMi7ph15
38cwvtsnfk1e0qd8HLzy5D7iq7qaut4P+6Q/A7dn9Zm/q+Bzzu+zcSzmul+Y
/32p1X9s/rYW0Z9cafP31kLTp/v43lfNoT+5uU/6M+ux+e/vCmD97+kznrKR
evMDfep/YbzrM770ONf/6T7Lp9bmsP4v9AnPxEGf4jH5eZ/iCfsd+hSPYXaf
9Ckegb9s66OO2FlMPefzPtNVrF9sZr/1eZUxPi3uF54xrpp+4RdhqaFf8ZT1
zv7J8barX3hmHtcv/CLejvYrPyZu+qWfAf+Zfulr1P/6bT7LiP+v9BuPKiH+
D+7n/B5WNE7+1K/8mPypX/kx+VO/+r3gf0/tN1xMoX53Rr/xz09zcBc/7Z+s
Z1zQb/H1ogDzlH71zzDf65eeRbvpl56C+bqhX3ya/Q39ig+w0zv7xaeZV/Ur
vtBP9UuPpZ7db/Gw3OygX/ELeHmxX3ov67f90oOpd/crPuLnH/WLT1P/7pc+
Dbzs6J8cfwsGhGfqmAPi12xTG7D3rLY4OqB6Fu6zYsD4sPUZttnnVy62etUA
/dMjpaYfDJi+kO9DHbC6l/Xdxu15XfOoZ40NqN+F9YgB9ZvhuQcMqB8NcfAb
A+qnoV0NKB+mHj9g+FuTQ7w8cUD5MG77gwHp0cDBjwcsfsywes+A9GjkL7/M
P28R+5UuGTC9t2ic+d2A6r+gLdcMqD+KeuMA5+E+07duGzA7MH3r7wPSj2GG
9w0oP6ZeO6D8F3HryQHhmXrUgPCO+XppQHoZ1unNAcVfrPv7A8qPqX8PKP4C
VlsGVA8jX8rfv5h8fvqg+hHJuwcVfxnfBunPbrH8pG5Q9QDy70Grp7/L9eoc
lJ5FvWDQ5v/dAPWCQa0/nh8ZVL8GzDs9KH2Uevug+hHBb/YbtHq91T8OGjS9
x/D6zUHZL/zEdweV/+L9jhtU/ov1OmVQ8Rd28cNB8VXWMwaV/2K9fj6oeMl8
blB8GG7td4PCK3E1KDzDvq8fFF6xjjcPKh/GfN0xqHyY+tOg8mHqT4OT9fTH
BlUPYz/2oPJh9tvY+x9RYrreoOG1iON8d9D6DRdwvtYOit9gvjYOWj9HAedr
+6DpXTsCmK8pQ+b/1rG+sGhI/ArLVDFk4/skR31gSP6f+sCQ8Irntw6pvwrP
9w2JL+P5Q0PKd/F8N0T7v7rE9icMCa/UM4fUH8z+0yHhFet2wJDwinlbPSS+
i3U6bEh4ZJ46pHhLPXxI8Zb+aEj5M9brx0PCK+bt3CHVn6lDDak+jfW6ZMjq
BqXU9/4wpPo25utPQ2Y/hZyvG4csn57P+bptSP2N9EdDpgsVcL7Gh4z/bLf6
Uf591lt/zZDqv1z3Iekb9EdD0j+ojw9ZfN0ZoD8aYhx4cpr55SHVf+mPhpT/
0h8NKf+lP/Kr/w+vUepXfyD9kd906Erj237xZdqVX/GV/sgvvFIP8Auv1AP8
iqfUL/3CK/tx/dKzybf90rvx3vv5hVf6I7/wSr7tV/2Iur9f9SPY3XF+9RvT
H/mtT7rE/JFfeKU/8pt/XGD+yO/y+6Loj/zG4wssL/ZbPX474+1VfvXfwE9e
71c/JPVwv/p3qIf7pXeyH9QvPZR241e9kv1+ftNT5rA/+Vm/9Fbwkxf9qiex
38avehLDiF/1JK6LX/0Q5Ed+6UXUK/3Sk8iPhtVvQR18WPEW/LxyWPEY01I7
LL7N+sqw9DDqDsPSy2CPPcPyL9Qxho03ltB/hIYN/0XWLzYs/4Vxf2lY/o15
87D6t5n/D0vfZ/4/LL5D/Xt4cn3g2GHFW/rtYeNb77Af4/Rh1ZMQ1s4aVrwl
Txs2vjvD8rVh8Tn87tJh9f+TJwyLDzJfG1a85f6oYcVb5mvDirfM14bFR5mv
DauexH6IYeGXfmBY/Jg697DwC5y9Oiy8ct69a8azYeGX8WxY+GX/5LD4MuPZ
iOpd7H8bsXyhgnGxYsTsv5S8Y9mI6kW0nxH1U7E+N6J+SNbnRrQfCH59aET5
LPxIaMTqRxsCtOMRw9d/A4wjI9KX4c/2GbH65voc+8FH5N/5nBGrB00z/WjE
/PIs049GrH40n/g8eUR6DPP9EemvtJ8R7X9if+eI+CbXeWQyPi8bUfxjvj8i
Pov3u27ETdr/e/OI8Ard/W/eNePaiPCNfO+BEfVDwm89OqJ+SLzfMyOq/5IP
2XieKqU+9urIF/zPiOl/Rdwf9NGI+jWYp4+oXkQ7GGHe9eI06y8dNb1oZ458
elTrg3mtGrX1fYn8qXZU+wdw36ZR4RNxs31U+IQd9YwKn+wPGBU+uV9gVPtz
qDONCp94zz1GtV+Hevao9VFUWD/0qPBJPXtU+OS6j2o/Afn0qPRf9gONCp/s
TxxVfOW6eJ/DX1zg/R7+4qJR9VNhvX83qvyZ9dxR6ceAxQ3e+IGLW0a1X4K8
xObr1lLe515vfpjfe/OH+zwxavxlLnnPc6NWr53B+X5pVPVdxv1R9S/DLteM
Sn+ifj0q/Yn8Z9T86EfMX3eNqh4E2E4PmF5ZYP23AfVDMm8KqP8R81EfUP8C
2ycD0m+oDwWsH3Ox6UMB6T+Yj9GA8MM8JyB8sb4WEP5g/3t717jP/gHFU7zX
1wPiv7jPoQHFU4zjqIDiKfD9vYDqz7jt9wPiv3i/MwPS07g/ISC9jbwiID0O
73dJwPyJ7Ye6PKD9UqzXBqw/Y2uOdhPQfivm8wHzh3dxv+LdAdXr2V8SEF6p
VweEV+rVAekf3J8cEF5Z/wjY/plFtOe3ArJHvN8HAeGV9bSA8Mp6WsDy4Qrr
awiofsu6kRMfRh/XPCf9GHa90Cn/xH2KnfCI9S/zPme8c9Kb2T/gpA8TN079
F/iz3qn/AvFphTP7tnx7pROfR1xrc+pP5jw5w1MRn9PjlC9wf4ezeD6H7+d3
6jelPTvlI4ynTv2qtG+nfIb9U075Dt4v4yzer2P/45ec4ini9N5O+RTjrzM9
aTbtc38n/YR8zime4v2+7lT/YHx2iqfwj4c61T/ZT+gUT7F+RzrxXbzfsU7x
FPc9wSmeMp5713jO971rxnen/a3IR850itfcP+hU34EdXeBUz2G9yCkfx/Re
7MR3iSNn8XEu/cnvnfpFWU/Kz99UxvOrnOlZW3OsVzrpf5jHG5zwCbO5yQmf
8IO3OvFdxIHbnfAJO7zTCZ/wY/c46Uu0W7OfAYunDzjqttcUc54ecuJ/rC84
6cG47xNOejB5mpMejPV+zimesf7gFE/pF5z4LvuFnOo18OtvOsVT4OYd73PG
ny/gda0Tn8a6rvP8A9Z7o5P+hffc7FSfIj929C8/W2z5en78pcTB1KD4L/cf
BU0vW8Q4Nj+oejh5VtDlz2WB/ysJuvw5NFjv8qDlM48FmHcGlY/CbmqC0pMw
bcuD6o+l3QS1v4z13KDpC3PYT9Aa1P4W1uOC6veDPXcH1R/F+lxQ/YJ4z8Gg
6iWk40HFU6y3C6reQn0zKHxRnwoKf4B/2rumfh5U/IVd7hVUfko9Pah4itt+
JSg9mv2dQdWLge+Dg8pPMd/fCGr/L/fPBqWH4z2+E9T+KNZzgtLnEI+OCaq/
Ebz4+KDxw83cf3VSUHow6wxB1W/A904Pqh8Z831GUPV4mM1Z+eup5FHnBNXv
yP6HoM4vIE8Mqv6Pp1wYVL8j7Ok3QdVvuC5B9RfAf1weVL8j5vGPQeGVumJQ
eGW+EhReyYOC4q/wHzcHFU/hP24LCq/In/4WFF7ZDxaU/sv9AUH1a8CexoOq
v8LuHwwqvuK5DwfV34h48VhQ8RXz/VRQ/STczx1UfGU9Paj4irj/YlDxFcv8
clDxFX+8HlR8JX8Jqh+G9a2g8lXY0weGp43PE78fBaU3Ag4bgsqXOA95fE2z
/qGg6f2z2Z+7I2h6yQLu1/vc1uvfhdR7CkKKr7DbuSH1B+L5C0I2PssPi0Li
v/heWUj6L/XrkPRdrPcS75r5v/d98p+Q8Ir1XhGS3sz+ypD0aPCKtpD0JOCw
MyQ9m3pBSPUp4Kw/pP2KoPn+kPDKuBESXvG9YEh4hV+IhoRX8p+Q+pHh9jMh
4ZX8J2T51nsB8p+Q8fvNPCdrn5D6F4GLr4TUb4P5/mpIeAXuvx5SfzLi8yGh
yfttDw1JD8V8fzek/QSY76NCqn8AR8eGtJ8AfvZ7Ie2fw3hODknvAS5+EJIe
xPcMTe5/+nFI+hHGcXZIfBjzcK53P/b3ec+Dv/5VSOddwA4vCkmvZr0xpHoN
5v13IfV3wQ1fEVL/InBzVUj9JeRDIdVreFxcyPzbbM73n0PWP1FA3eDWkOXD
W9nP8teQ9F/46ztD6lfF+t8TUj8rj6XI29emHPlQSOe5YP0fCmk/KPW7kOqt
7F8NKb4A78949oz3fs6zd+p79rmvjPzzJQ8v9NMenvDnm1/A27seHoG390OT
6zMfhZSvgpdsCIk/I15v8vwB/U9IehKesyOk/Q3svw5Jr8Z4CsLqP8Z4ZobF
/6GvLAyrPgPeURxWforHloV13gdpQ/76/RzsZUlY+ykxrbVh6b2wl/qw8Ak7
aQqrHwL2sjKsfgiMsz1s8WAe7aUrrHiKdekJmx6UP48hrH482MtwWPsH2K8b
Js6LKmm34bDqITxvKiy9FeuSDCueYh2yYeGT9d+w8Ii48WXvGna3X1j4ZH9B
ePL5L18LC59Yn9Vh+QvWecOqz3D/S1j4pA4cVj0VdnFMWP6K+3HDFh+LzG+F
VZ8BTk7Nr88s+ovTwtrPgXh1Rlj4ZL9nWP3iqFecEzY83RsAbzsvrP4Y5E+/
CAuf5D/5+fic9ZvfhIVPxIVLw+rPwTpeHlb/Dnlz2HhSEePFn8LCJ/lPWPEK
9nhjWPwT03BLWPjEc24Lq77K+nZY/Bb+4u9h4RP2eK93DbO4Lyz+jHE8GFZ+
Sv0lrPyY/Tlh4ROz9lRY+OT5CmHpveAr/xfW/jzqUnl7sfz9lbD4B97zjbD0
dPaHhS1f2cH+pTVh6QeIe2vz+HuG+wfWhaX/sh4RVv8a86+wzkdgvT0s/RHr
9Vken3M571Mj0i+xjNMj0pNgvwsi0kNhv0UR4ZNxIyI8kO9EhBfyzojwBH+3
LCJ8Yp3rIoqf5DveNflORPwY89kWkb7LvDAifwB890TEv+F3ByLi59S7I8q3
8feBiPY7YDyhiOpTGE8son4l+puI4XUe5ycbkR6A+dkzovmnv4lI38V49ss/
/w3uzzsgon5x6mwR7aemv4lovzX9TUT2w/N6ItKPMI4jItKPMC/HRGSfXNeI
zl9hvhXR+WLMtyKql2I8p0eED+o7EcU39m9GhC+M55yI8lH44/MjwiPzNu/7
GM+vI8I37P+SiPJh9sNEVH9hf1VE9Rc856rIZDxeE9F5MtT3IzoPjnpPRPVl
8puI+b9p7J/6a0T5BPWe/O83UN+7J6J8hPv5I9ID8fcPRGwfyieMn/+KGF/6
LMB1sfnYNp159ZMR7Qdj/01E+i73K3t4RPz8T0T6LvuXPXyyXzCiegbG81ZE
9RjS9IjqMXAbH3p4wvx8HFG/A8azwcMjxvNpRPkp+3Ajip8Yz86IznfCeKZE
pfdiPNOi4reYz/lR6wct57ouikofo74TFR7h98qjwiPrYVHVW4C7pVH5O9YB
osIj4lFj1OqnGwMww5ao9mcAJ61R+VuMpyMqfwxe7Ita/NvB+NgfVb6JuDcU
tX7+2ezPG83ffwH5Wiiq/gXmU1HZL8aTjMq+MZ+ZqPDI/v+o8Eg/F5Wey/0A
0cn7W/ePCn8Yz0HeNfdfRoVH9r9FhW/89WHRyf2+341Kv8J7HR1VvYi6V1T1
JPZbRnU+DP1YVPuDYW+nRYVH6mhR4ZH7DaLG53exP+GnUfXnY37Oy4//RfLZ
X0RNH3qeeLwwqn4j8pmo9AeM59Ko9AnqOVHV21lvjmr/JvunotIr8ffXRbX/
k3wmKr2TfY9R9cuyvypqfQiVxOMdUemp3I8cVb8g+UxUeiz3O0SFN+oUUeET
43k4qviK+Xnc+z3G87R3f8zPv6PSh7h/K6r+fIznv1HpQ7CfV6PmDxebnhzV
eRu47ztR63sq4njW5D9fwPGszeNrNsezPqr+QPKZ/Hxu53ptier8NeBre1T5
JvdbRHV+AXhyQUz94DyvIaZ8k3YQk97B/YgxnYdC/Samfjm49YqY6hXUJWKq
r3B/dUz1DfiH+pj2n7IeH1N+yfwpJv6KONUeUz6J+ez2Pod/6I0pPjJOxIRH
2M1wTHiEH3Ex6c0Ydzim/nuMJx6TXs1+2fznC63fMabzVPG9vWJ2/uEM4vF/
YjoPAOu7X0znScD+D4xJb6ffi+n8JtjbN2LS63k+UUz9oBj3d/K/n0b7PzJm
+d1s6iPHxnT+C/zICTH1/2F+To5pvwjm5/uxyfu1fxiTPfO8gZjsnf1xMeGB
uldMeMHvfh4TnrjfNya84T4XxYRH1pm8z1m/8n6P8Vzh3R/rdZX3fIznWvv+
+dav+7+xyXi8KSY8Yn7+4r0/7vtXb37gxu6Kmb62kOt2T0z9lcDjeEz7VzGe
B/LP38H1+ldM+52wXo/G1K8Le34yZn2ULxOPz8ZUbyGfiRmf+4z93y/G1P+H
9Xo5b09zmA++7tkn1uvtmPaPYFjvefbN/aSe/WM8H8fUv8D98B5+GIe+gK9t
McVP8hkPn1ivKXFdY35nxKX/cL98XP30sP/CuPoTMJ8lcZ3nyH17cfX78fyP
uPRZ8ti49DCe7xhXPo75bIzLv2FeWuLyf5jH1rjyfehynXH1a/J847jFt48C
sLf+uPwveJw/Lj2Q+4Hi6u/GfIbi8u8YTzQu/8/+xbj0SPKZOPnZy2Ucxx5x
7cemn41Ln4W97RvXflTqoHHll+w3iktPxXhWx5Uvks/EhUes72FxxU/298fF
d8ln4up3gL0dH1d8xnqdGFe9k3EirnonzwuIK/5jPGfEyW8uKeX8/CQu/gCc
/DSueif5TFz5AOz/F3HtX8N4fh1Xvx95fFz9ftRn4uZPXwjg48vj6k/AeK6M
q36C8fwpbnx8Zw7PvT6ufjTYz41x8TPYzy1x8TfiOq58C/ZzR9zwX8L+o7vj
Oj8Qt703rniF8dwflz6K1/pnXHwW6/5IXPyUdce4+Cvw+LSHR+p6cfUPwX5e
8O6HeXnJex77P+Pi1xjPm3HpPXjPd+LKl2mHcfF3nu8XF7/H/KyPa78p88S4
9ptivbbElV+y7zGu/JL72731At4LEtJ76G8SqpeR3ySUXyLfL0qo/sb+94Ty
ScxDRUL5JPvhE8q34PeWJaSPwC/WJ9SPwP7UhPQV3LYlofomdd2E9FjkAV0J
xT/qwQnhEXYykBAe4T+HE+pfwLy6hPBIPpNQ/ko+440H05JKKP/F18YSyo/J
ZxLSe8hnEsovYf9fSUgPg/0fmFB+yXVO6LwW2P8hCcP/Z9wP/O2E9DikmYd7
64d5OjKh/lvymYTySwzrhITyS9jbyQnpPeQzCek95DMJ6Y24zZkJ1TNhx2cn
VM/k/pGE+oV43mNCfJb1p4TyS/KZhPRSnmeSULzj/snE5PNFr0hMxuNVCcVT
vOe1CfU3YH7+NyE8sv87ITxC//pLQvkw8+qE6iOws7sS0re43ykhPHL/XEJ4
hB086M0n86WE+rOgRzyeUH8l9d+E9vMzX0povz/PR03ofB7iLGH8dArt5tWE
1dvsfPw3EzoPjflSQvVM+peE+g8wv2sTqpfgvdYnVC+BW96UkB5L/5JQ/zn9
i4cX+hcPn/QvScVLxIMZSeGT+469a9htYVL9QPQvScVH+pek+gnhNqqT6t+H
XS1Lqh+R+m9S/UDs90va+xTTD65Mqh+e/cxJ5edYp66k8neMvzc5eT/RYNL8
43ru9x5OWnx4mufnuKT4KtY3nNR+FbxnPKl8B/EsnVQ+hHGPJXVeEv7cK6l6
CPzoPknVK+EnvpJUPYT9fUnxVfb3JVUP4flFycnnMxyaFF9lfTspfMFej0oK
f6i3HpcUPmF2J3q/x3NP8e5P/pJUvZT7q5Oqp1KPSaq/if01SdV7YK/nJVWv
pa6YVL2I/CWp/dy0y6T4K/v9k6pHsf82qXwS83tlUvkk+3GT5m/Xcf/v9Unl
kzz/MGl8ahp1rVuTyncwv7fn7W+h9fcldb4t+/uSOo8BfiiXFL/j/pOk9B3q
vUnprfQTSe0HhRk/mVQ8Y36UVD7Ifpqk4iX3gycn54+vJBUfMb+vJ4Vn4OTt
pOoh8Ktrkup3R173YVLxnOfPJdXPxPPTk+p3Yj0pqf5FrMP2pOIj5mVXUvGR
65CSvs1+vpT4KuvXKeM/zwWIm5Txu3cY/8pS2h/Mf48lpf5OvH9NyvjrTDvv
NqXze5AGNqTU343nN6X07+vg/VelpOdAF+hIaf8J1q07pfwN792Xkp6DdR9K
Sc/hc1LCH/OhlPCG94mmxF/xPsmU+CjiTjYl/YjnBaUU/zjOlPqPWD9KKZ5j
HAektJ8T7/O1lPZzsu8jZTrGLPYbfytletpU+/feUupnx/scmVK/LPzrMSnt
DwNuT0jpvHz4iZNSOo+M/fcp9d+Rn6TUf0d+krL+kPkcx9n5+xWRp56b0n5j
9sekdD4o+UlK/TxwwxenlC/Cv/42pXok9ZaU9lcCF39MTcbL1anJ55Fdl1I8
ZNzwPoed3ZxSfQPvc1tK9Q3mDd7zAYe7U+rfgf3fm1J/APOflPoDmP+kyL/P
KiH+H0npPFD2B6f07w8wjKXUL8X9Jin1a7A/OKX+SLzPyyn1ewD/r6XUDwK/
+lZK/SLsx0vpfBP246V0HjTPO02pH4X6Skp8lPWilPpX8D7bPPuF/e/y7Jv7
59KmP5YRv7PSwgfWc0Fa+ANeCtPCH9chLbwBLxVp8U3ykbT6C9h/l1a843mG
afUn4LlNaZ3nwP0xacU78rK04j3127T6hbGevWmdl0o+kjZdcBf3j4ykVc/A
+7i06hnMd9Lyl8B1Iq39CFjPTFr5B9z8l9LKT3ieXVr1fqznPmn5b8Sn/dM6
/4D1obT8P+tDaeWD8AvfTGs/I97jsLT4JuvPacUf2OfRafFFnueSFp543mJa
/BLzfmpa8Q7zcnpa8RHvc2Za8RPvc1ba5f+dLtjZz9Kqr9B/pLV/hP4jrf5W
5jdp7Ren/0jrvD/6j7T65ZjfpFW/gJ++Oq390vQfafXjgFbemNZ5M9yfaM8/
/1rq4belzZ+8w/0Kd6TVv0X/kVZ/F/WTtOIf/Uda+5foP9KqZ7BOnNZ5Hdyf
llb+x/dOK/6xny6t+Mf9jmnFP/qPtPQV+g8Pf6w3e9cYx3seXllv9u5HfTat
fJP+wxsP3udTb7x4n23e+2Aed6W1nw3DmpLRfMA+52Q0X/QfGc0v/UdG/Yq0
+4z2D2CdyzM6n4J6SUbnOTKfySj/wLjqMzp/iv1zGel7zGcy0v9Y/8ko/4F9
dmekVzCfySh/wvsMZsQvuX8gI34JfhvMTM7PIhnpm8BFIiN80X941/TzGfXr
cL9eRnhjfTkjvOF99s9ID6Uem5EeCre3OqPzvKjHZsSn2S+XUT85wtIRGdV3
ALNjMtKbgYMTMtKj2b+Ssf6VbcY/MsIb+UdG/ch4nzMz6ldmf65nD+zPzZj+
PpV6xAUZ7QfE936V0b8HRv6REd7o1zOWfxWz/+X3GZ2fw/PrM4pv7I/LKL7x
vM6M8MHzOTLCD89XyCi+0X9khDfqrxnhk/qrdz+2AXrPg73dnxHe8D4PZcSP
yT8yqodSp/Del20SHt54/pCHN9Z3MvJf7FfJ6DwC4O71jPwf/UdG/pHnz3rr
yTwxI/9K/5Gx+l4B9ylszMg/U7fN6LxW5i8Z/ftD3I+U0f4GrPvUrOqF5B9Z
xQ/mL1ntV+T+x6zqd5i/xVnFK9h3ZXZy/laTVfxDnFyeVf0C89aQVX0Ddt/s
PQ88ozWr8zqxnB3ZyfUTX1b1Ffb7Z8WneV5AVnyb+x2zOv+bPDorPsnzcrPi
8+x/y+q8NO7vzWp9MO17ZpUv8BySrPIJ1ouzyje43yir8/L470VktV8Z7/ON
7OR/v+XbWeU7sJvDszpfgPsbs4oXPN8iK32T+4Wzsn+sz8lZ6Zvs789KHwGM
fpgV3lgv9q7hf36aFd54HnRWeGPdMTu5P+DCrPDGfpSs9iuTV2a1X5l9z1nl
s7C3K7PKd9mPktV5ofQfWZ1nhvf5c1b5NPe3Z3X+B+ztdpufCw+lP7zDW0/Y
0T1Z4Y36R1Z8B/P0QFb7B1gfzqq+zPpwVvVn1oezqk/jfZ7Nqn7N+nBW9W3q
H1nVv6EvvZxVfRzv83pW+53wPm9nlZ/hfd7LTs7n1nrXmMd1Hl7pP7KT/32m
LVnpp/QfWekp1FOzqjdw/9CYzi/heepj6tcjHxmz/rRiOw97TP+eI3BSNqb6
O81sTPsdeb7jmOq11D/GpIfRf4yJz8BvNY8ZHj7Nsa95TPt54AY6x7Sfluf3
jem8WfqPMeMPhYwn/jHFN/a3jSlewC5CY4pvwEFsTHwSw06OTT4fZ2xs8r+v
u+eY6gvcrzgmvLE+M6Z4CDs90Lsf5uPgMZ2HCbs8ZMz6sCyf/PaY8AY/e/iY
zs8ljxwzfWQR+8+PG7P+hHnWzzam/VH485Qx9cuzP39M+iX86Rlj0i+5P3HM
9IEneb7oOWPqp+B5KGPil+xjG9P+1/8HV+YUNA==
"]]}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0.},
ImageSize->Full,
Method->{},
PlotRange->{{0, 61.136}, {-6.612, 7.579}},
PlotRangeClipping->True,
PlotRangePadding->{{1.22272, 1.22272}, {0.28381999999999996`,
0.28381999999999996`}}]], "Output",
CellChangeTimes->{{3.566410435735461*^9, 3.566410452995893*^9},
3.5664109580810347`*^9, {3.566411449368547*^9, 3.5664114605545807`*^9}, {
3.566413289237323*^9, 3.566413318655211*^9}, 3.566415030897718*^9,
3.5664565076791887`*^9, 3.566463336195983*^9, 3.5664645812736597`*^9,
3.56646574547892*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"maxQ", "[",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"x1_", ",", "y1_"}], "}"}], ",",
RowBox[{"{",
RowBox[{"x2_", ",", "y2_"}], "}"}], ",",
RowBox[{"{",
RowBox[{"x3_", ",", "y3_"}], "}"}]}], "}"}], "]"}], ":=",
RowBox[{
RowBox[{"y1", "<", "y2"}], "&&",
RowBox[{"y2", "\[GreaterEqual]", "y3"}]}]}], ";"}]], "Input",
CellChangeTimes->{{3.56641315956796*^9, 3.5664132198033733`*^9}, {
3.566413394481358*^9, 3.56641341197544*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"minQ", "[",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"x1_", ",", "y1_"}], "}"}], ",",
RowBox[{"{",
RowBox[{"x2_", ",", "y2_"}], "}"}], ",",
RowBox[{"{",
RowBox[{"x3_", ",", "y3_"}], "}"}]}], "}"}], "]"}], ":=",
RowBox[{
RowBox[{"y1", "\[GreaterEqual]", "y2"}], "&&",
RowBox[{"y2", "<", "y3"}]}]}], ";"}]], "Input",
CellChangeTimes->{{3.566413192765345*^9, 3.5664132279711514`*^9},
3.566413402759541*^9}],
Cell["\<\
Durch Messung der Abst\[ADoubleDot]nde der Peaks und Mittlung finden wir die \
Periodendauer und daraus die Winkelfrequenz:\
\>", "Text",
CellChangeTimes->{{3.5664147703005657`*^9, 3.56641479938657*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max", "u1"], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["ungekoppelt", "1"], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566413235571628*^9, 3.566413275967595*^9}, {
3.566413430063892*^9, 3.566413440501727*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"5.998`", ",", "8.323`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.634`", ",", "8.744`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.258`", ",", "8.744`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.888`", ",", "8.722`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.514`", ",", "8.678`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.143`", ",", "8.7`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.786`", ",", "8.678`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17.408`", ",", "8.656`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.07`", ",", "8.633`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20.653`", ",", "8.611`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"22.29`", ",", "8.589`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"23.929`", ",", "8.567`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"25.557`", ",", "8.567`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"27.16`", ",", "8.5`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.816`", ",", "8.5`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"30.424`", ",", "8.522`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.09`", ",", "8.456`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"33.686`", ",", "8.478`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"35.318`", ",", "8.478`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.926`", ",", "8.434`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"38.577`", ",", "8.389`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.216`", ",", "8.411`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.836`", ",", "8.411`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.46`", ",", "8.367`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.088`", ",", "8.345`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"46.712`", ",", "8.3`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"48.36`", ",", "8.323`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.99`", ",", "8.3`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"51.61`", ",", "8.3`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.201`", ",", "8.234`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.854`", ",", "8.256`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"56.479`", ",", "8.256`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.115`", ",", "8.145`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"59.726`", ",", "8.212`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.566413256914629*^9, 3.566413289323971*^9}, {
3.5664134167114*^9, 3.566413440847289*^9}, 3.566415031021736*^9,
3.5664565078006887`*^9, 3.566463336376527*^9, 3.5664645814495687`*^9,
3.566465745929775*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min", "u1"], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["ungekoppelt", "1"], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], ">", "6"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566413456018401*^9, 3.566413470723761*^9}, {
3.566415038999071*^9, 3.566415039357242*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"6.861`", ",",
RowBox[{"-", "9.526`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.461`", ",",
RowBox[{"-", "9.504`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.093`", ",",
RowBox[{"-", "9.415`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.719`", ",",
RowBox[{"-", "9.46`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.35`", ",",
RowBox[{"-", "9.437`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.969`", ",",
RowBox[{"-", "9.46`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.602`", ",",
RowBox[{"-", "9.349`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.215`", ",",
RowBox[{"-", "9.393`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.841`", ",",
RowBox[{"-", "9.393`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"21.471`", ",",
RowBox[{"-", "9.371`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"23.114`", ",",
RowBox[{"-", "9.282`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.727`", ",",
RowBox[{"-", "9.304`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"26.357`", ",",
RowBox[{"-", "9.304`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"27.982`", ",",
RowBox[{"-", "9.282`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"29.633`", ",",
RowBox[{"-", "9.26`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"31.246`", ",",
RowBox[{"-", "9.215`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.866`", ",",
RowBox[{"-", "9.238`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"34.507`", ",",
RowBox[{"-", "9.215`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.138`", ",",
RowBox[{"-", "9.193`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.773`", ",",
RowBox[{"-", "9.193`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"39.403`", ",",
RowBox[{"-", "9.171`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.025`", ",",
RowBox[{"-", "9.171`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"42.656`", ",",
RowBox[{"-", "9.149`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"44.28`", ",",
RowBox[{"-", "9.127`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.92`", ",",
RowBox[{"-", "9.127`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"47.546`", ",",
RowBox[{"-", "9.06`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.171`", ",",
RowBox[{"-", "9.082`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"50.788`", ",",
RowBox[{"-", "9.082`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.429`", ",",
RowBox[{"-", "9.06`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.06`", ",",
RowBox[{"-", "9.038`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"55.692`", ",",
RowBox[{"-", "9.038`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.292`", ",",
RowBox[{"-", "8.993`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.922`", ",",
RowBox[{"-", "9.038`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"60.549`", ",",
RowBox[{"-", "8.993`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.566413471916809*^9, {3.5664150310789013`*^9, 3.566415040404913*^9},
3.5664565078557463`*^9, 3.566463336478348*^9, 3.56646458150393*^9,
3.566465745996812*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["periods", "u1"], "=",
RowBox[{"Quantity", "[",
RowBox[{
RowBox[{"Join", "[",
RowBox[{
RowBox[{"Differences", "[",
RowBox[{
SubscriptBox["max", "u1"], "[",
RowBox[{"[",
RowBox[{"All", ",", "1"}], "]"}], "]"}], "]"}], ",",
RowBox[{"Differences", "[",
RowBox[{
SubscriptBox["min", "u1"], "[",
RowBox[{"[",
RowBox[{"All", ",", "1"}], "]"}], "]"}], "]"}]}], "]"}], ",",
"\"\\""}], "]"}]}]], "Input",
CellChangeTimes->{{3.566413494813076*^9, 3.566413556415259*^9}, {
3.5664150580065393`*^9, 3.566415065042259*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"1.6360000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6239999999999988`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6300000000000008`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6259999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6290000000000013`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.642999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6220000000000017`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.661999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5829999999999984`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6370000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6389999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6280000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6030000000000015`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6559999999999988`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6080000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.666000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5959999999999965`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.631999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.608000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6509999999999962`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.639000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6199999999999974`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6240000000000023`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6280000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6240000000000023`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6479999999999961`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6300000000000026`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6199999999999974`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.591000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6529999999999987`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.625`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6360000000000028`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.610999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6000000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6319999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6259999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6310000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6189999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.633000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6129999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6260000000000012`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.629999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6430000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6129999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.629999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.625`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6509999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6129999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.620000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6409999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6310000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6350000000000051`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6299999999999955`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6219999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6310000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6240000000000023`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6400000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6259999999999977`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.625`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6169999999999973`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6410000000000053`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6310000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.631999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6000000000000014`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6299999999999955`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6270000000000024`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )]}], "}"}]], "Output",
CellChangeTimes->{{3.566413505628381*^9, 3.5664135571302958`*^9},
3.5664150311242647`*^9, 3.566415067611311*^9, 3.5664565084002333`*^9,
3.566463338099834*^9, 3.5664645826550217`*^9, 3.5664657498240147`*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["T", "u1"], "=",
RowBox[{"Mean", "[",
SubscriptBox["periods", "u1"], "]"}]}], ";",
RowBox[{
SubscriptBox["\[CapitalDelta]T", "u1"], "=",
RowBox[{"StandardDeviation", "[",
SubscriptBox["periods", "u1"], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.5664135644395313`*^9, 3.5664135932825413`*^9}}],
Cell["\<\
Die Winkelfrequenz des ersten Pendels ist mit Fehler:\
\>", "Text",
CellChangeTimes->{{3.566414803554338*^9, 3.566414813129795*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]", "u1"], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]"}],
SubscriptBox["T", "u1"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413595788748*^9, 3.566413604730227*^9}}],
Cell[BoxData[
TemplateBox[{"3.8606001924653013`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.566413602619113*^9, 3.5664136050051537`*^9},
3.566415031204768*^9, 3.566415070761404*^9, 3.5664565086381187`*^9,
3.56646333841057*^9, 3.5664645828844337`*^9, 3.566465750150197*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]", "u1"], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]", " ",
SubscriptBox["\[CapitalDelta]T", "u1"]}],
SuperscriptBox[
SubscriptBox["T", "u1"], "2"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413681720048*^9, 3.566413748696438*^9}}],
Cell[BoxData[
TemplateBox[{"0.03717729314667121`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566413749146556*^9, 3.566415031262624*^9,
3.566415072159926*^9, 3.566456508755047*^9, 3.566463338537654*^9,
3.566464583012895*^9, 3.566465750274612*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max", "u2"], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["ungekoppelt", "2"], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566413235571628*^9, 3.566413275967595*^9}, {
3.566413430063892*^9, 3.566413440501727*^9}, {3.566413796758622*^9,
3.566413799446402*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"6.123`", ",", "7.263`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.694`", ",", "7.579`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.346`", ",", "7.53`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.964`", ",", "7.554`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.601`", ",", "7.482`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.193`", ",", "7.554`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.838`", ",", "7.506`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17.459`", ",", "7.53`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.096`", ",", "7.482`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20.705`", ",", "7.506`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"22.344`", ",", "7.482`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"23.981`", ",", "7.506`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"25.61`", ",", "7.506`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"27.239`", ",", "7.482`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.87`", ",", "7.457`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"30.506`", ",", "7.482`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.143`", ",", "7.433`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"33.766`", ",", "7.482`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"35.399`", ",", "7.482`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.035`", ",", "7.457`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"38.636`", ",", "7.457`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.273`", ",", "7.409`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.918`", ",", "7.433`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.544`", ",", "7.409`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.171`", ",", "7.409`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"46.794`", ",", "7.409`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"48.413`", ",", "7.409`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"50.043`", ",", "7.409`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"51.67`", ",", "7.36`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.317`", ",", "7.336`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.94`", ",", "7.409`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"56.563`", ",", "7.36`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.201`", ",", "7.36`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"59.811`", ",", "7.336`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.566413256914629*^9, 3.566413289323971*^9}, {
3.5664134167114*^9, 3.566413440847289*^9}, 3.566413819713417*^9,
3.5664150313090363`*^9, 3.5664150753051977`*^9, 3.566456508807225*^9,
3.566463338596031*^9, 3.566464583055215*^9, 3.566465750313025*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min", "u2"], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["ungekoppelt", "2"], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], ">", "6"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566413456018401*^9, 3.566413470723761*^9}, {
3.566413823508792*^9, 3.5664138261967173`*^9}, {3.566415077930971*^9,
3.5664150782119904`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"6.888`", ",",
RowBox[{"-", "6.442`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.512`", ",",
RowBox[{"-", "6.539`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.144`", ",",
RowBox[{"-", "6.491`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.769`", ",",
RowBox[{"-", "6.491`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.4`", ",",
RowBox[{"-", "6.491`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.019`", ",",
RowBox[{"-", "6.515`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.654`", ",",
RowBox[{"-", "6.442`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.266`", ",",
RowBox[{"-", "6.442`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.316`", ",",
RowBox[{"-", "6.418`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.917`", ",",
RowBox[{"-", "6.467`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"21.549`", ",",
RowBox[{"-", "6.467`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"23.166`", ",",
RowBox[{"-", "6.467`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.807`", ",",
RowBox[{"-", "6.467`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"26.436`", ",",
RowBox[{"-", "6.442`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.072`", ",",
RowBox[{"-", "6.418`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"29.711`", ",",
RowBox[{"-", "6.418`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"31.327`", ",",
RowBox[{"-", "6.418`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.973`", ",",
RowBox[{"-", "6.394`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"34.589`", ",",
RowBox[{"-", "6.394`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.219`", ",",
RowBox[{"-", "6.369`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.826`", ",",
RowBox[{"-", "6.369`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"39.486`", ",",
RowBox[{"-", "6.369`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.078`", ",",
RowBox[{"-", "6.394`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"42.739`", ",",
RowBox[{"-", "6.369`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"44.365`", ",",
RowBox[{"-", "6.345`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"46.003`", ",",
RowBox[{"-", "6.345`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"47.6`", ",",
RowBox[{"-", "6.369`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.255`", ",",
RowBox[{"-", "6.345`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"50.873`", ",",
RowBox[{"-", "6.345`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.517`", ",",
RowBox[{"-", "6.321`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.13`", ",",
RowBox[{"-", "6.296`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"55.779`", ",",
RowBox[{"-", "6.296`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.404`", ",",
RowBox[{"-", "6.296`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"59.032`", ",",
RowBox[{"-", "6.272`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"60.668`", ",",
RowBox[{"-", "6.272`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.566413471916809*^9, 3.566413829493991*^9,
3.566415031357643*^9, 3.566415078497319*^9, 3.566456508855875*^9,
3.5664633386471853`*^9, 3.5664645830948133`*^9, 3.566465750351231*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["periods", "u2"], "=",
RowBox[{"Quantity", "[",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Join", "[",
RowBox[{
RowBox[{"Differences", "[",
RowBox[{
SubscriptBox["max", "u2"], "[",
RowBox[{"[",
RowBox[{
RowBox[{"2", ";;"}], ",", "1"}], "]"}], "]"}], "]"}], ",",
RowBox[{"Differences", "[",
RowBox[{
SubscriptBox["min", "u2"], "[",
RowBox[{"[",
RowBox[{"All", ",", "1"}], "]"}], "]"}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{"#", ">", "1"}], "&"}]}], "]"}], ",", "\"\\""}],
"]"}]}]], "Input",
CellChangeTimes->{{3.566413494813076*^9, 3.566413556415259*^9}, {
3.566413832579789*^9, 3.5664138372995863`*^9}, {3.566415082202187*^9,
3.566415086305985*^9}, {3.566415269070177*^9, 3.566415348273381*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"1.6520000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6180000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6370000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5919999999999987`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6449999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6210000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6370000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6089999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.639000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6370000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6289999999999978`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6290000000000013`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6310000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6359999999999992`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6370000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6229999999999976`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6330000000000027`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6359999999999957`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6010000000000062`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6370000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.644999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6259999999999977`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6270000000000024`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6229999999999976`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6189999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6300000000000026`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6270000000000024`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6469999999999985`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6229999999999976`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6230000000000047`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6379999999999981`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6099999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6240000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6319999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.625`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6310000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6189999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6349999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6119999999999983`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6010000000000026`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.631999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6170000000000009`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6409999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6290000000000013`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6359999999999992`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6389999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6160000000000032`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6459999999999972`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6159999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6300000000000026`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6069999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6599999999999966`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5920000000000059`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6609999999999943`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6260000000000048`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6379999999999981`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5970000000000013`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6550000000000011`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.617999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6440000000000055`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6129999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.649000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.625`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.627999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6360000000000028`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )]}], "}"}]], "Output",
CellChangeTimes->{{3.566415326917296*^9, 3.566415349315674*^9},
3.566456509397315*^9, 3.566463339286828*^9, 3.566464583626692*^9,
3.566465750934465*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["T", "u2"], "=",
RowBox[{"Mean", "[",
SubscriptBox["periods", "u2"], "]"}]}], ";",
RowBox[{
SubscriptBox["\[CapitalDelta]T", "u2"], "=",
RowBox[{"StandardDeviation", "[",
SubscriptBox["periods", "u2"], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.5664135644395313`*^9, 3.5664135932825413`*^9}, {
3.566413840931016*^9, 3.566413846450987*^9}}],
Cell["\<\
Die Winkelfrequenz des zweiten Pendels ist mit Fehler:\
\>", "Text",
CellChangeTimes->{{3.5664148290726423`*^9, 3.56641483671231*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]", "u2"], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]"}],
SubscriptBox["T", "u2"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413595788748*^9, 3.566413604730227*^9}, {
3.5664138496182423`*^9, 3.566413852914188*^9}}],
Cell[BoxData[
TemplateBox[{"3.858465945814931`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.566413602619113*^9, 3.5664136050051537`*^9},
3.566413853330969*^9, 3.566415031488805*^9, 3.5664150943028173`*^9,
3.5664152865403767`*^9, 3.566415352194001*^9, 3.56645650958377*^9,
3.566463339543058*^9, 3.566464583792719*^9, 3.5664657511200542`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]", "u2"], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]", " ",
SubscriptBox["\[CapitalDelta]T", "u2"]}],
SuperscriptBox[
SubscriptBox["T", "u2"], "2"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413681720048*^9, 3.566413748696438*^9}, {
3.566413855794153*^9, 3.566413863833433*^9}}],
Cell[BoxData[
TemplateBox[{"0.0354872997401147`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566413749146556*^9, 3.566413864296844*^9,
3.566415031562516*^9, 3.5664150958247833`*^9, 3.5664152921305733`*^9,
3.566415353714468*^9, 3.566456509701437*^9, 3.566463339688518*^9,
3.5664645839125013`*^9, 3.56646575125113*^9}]
}, Open ]],
Cell["", "PageBreak",
PageBreakBelow->True]
}, Open ]],
Cell[CellGroupData[{
Cell["\<\
Schwache Kopplung (Aufh\[ADoubleDot]ngung oben)\
\>", "Section",
CellChangeTimes->{{3.566415550474904*^9, 3.566415561856851*^9}}],
Cell["\<\
Die Aufh\[ADoubleDot]ngung der Feder befand sich hier bei\
\>", "Text",
CellChangeTimes->{{3.566415594191719*^9, 3.566415638364727*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["l", "oben"], "=",
RowBox[{"Quantity", "[",
RowBox[{"5.5", ",", "\"\\""}], "]"}]}]], "Input",
CellChangeTimes->{{3.5664156413819637`*^9, 3.566415677841835*^9}}],
Cell[BoxData[
TemplateBox[{"5.5`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"cm\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: centimeters"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Centimeters\""}], "]"}]& )]], "Output",
CellChangeTimes->{3.566415678959667*^9, 3.566456509756049*^9,
3.5664633397301598`*^9, 3.566464583954674*^9, 3.566465751295093*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]l", "oben"], "=",
RowBox[{"Quantity", "[",
RowBox[{"0.1", ",", "\"\\""}], "]"}]}]], "Input",
CellChangeTimes->{{3.5664156797709217`*^9, 3.566415691630045*^9}}],
Cell[BoxData[
TemplateBox[{"0.1`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"cm\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: centimeters"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Centimeters\""}], "]"}]& )]], "Output",
CellChangeTimes->{3.566415692080596*^9, 3.5664565098055983`*^9,
3.566463339782089*^9, 3.566464583992806*^9, 3.566465751350028*^9}]
}, Open ]],
Cell["\<\
Wir importieren zun\[ADoubleDot]chst wieder die Rohdaten:\
\>", "Text",
CellChangeTimes->{{3.5664157071366663`*^9, 3.566415712766675*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"time", ",", "p1", ",", "p2"}], "}"}], "=",
RowBox[{"Transpose", "[",
RowBox[{"Import", "[",
RowBox[{
"\"\\"", ",", "\"\\""}], "]"}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566415733208415*^9, 3.566415742796677*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "asym", ",", "1"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p1"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566405351112589*^9, 3.566405357447461*^9}, {
3.56640544960851*^9, 3.566405474501894*^9}, {3.566405878244103*^9,
3.5664058812828007`*^9}, {3.566406623173218*^9, 3.566406650963872*^9}, {
3.566406681345848*^9, 3.5664066820338078`*^9}, {3.566406750765345*^9,
3.566406752245111*^9}, {3.5664068340642033`*^9, 3.566406978710898*^9}, {
3.5664071823293343`*^9, 3.566407190896555*^9}, {3.5664157551585693`*^9,
3.5664157724838877`*^9}, {3.566415848992949*^9, 3.5664158492234583`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "asym", ",", "2"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p2"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.56641041393626*^9, 3.566410422064912*^9}, {
3.566415777189785*^9, 3.5664157786755123`*^9}, {3.566415852231278*^9,
3.566415852527092*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"time", ",", "p1", ",", "p2"}], "}"}], "=",
RowBox[{"Transpose", "[",
RowBox[{"Import", "[",
RowBox[{
"\"\\"", ",", "\"\\""}], "]"}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566415791171216*^9, 3.566415792488168*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "sym", ",", "1"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p1"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566405351112589*^9, 3.566405357447461*^9}, {
3.56640544960851*^9, 3.566405474501894*^9}, {3.566405878244103*^9,
3.5664058812828007`*^9}, {3.566406623173218*^9, 3.566406650963872*^9}, {
3.566406681345848*^9, 3.5664066820338078`*^9}, {3.566406750765345*^9,
3.566406752245111*^9}, {3.5664068340642033`*^9, 3.566406978710898*^9}, {
3.5664071823293343`*^9, 3.566407190896555*^9}, {3.5664157551585693`*^9,
3.5664157724838877`*^9}, 3.5664158119699497`*^9, {3.56641586288662*^9,
3.5664158631188993`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "sym", ",", "2"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p2"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.56641041393626*^9, 3.566410422064912*^9}, {
3.566415777189785*^9, 3.5664157786755123`*^9}, 3.566415815385363*^9, {
3.566415865766223*^9, 3.56641586599216*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"time", ",", "p1", ",", "p2"}], "}"}], "=",
RowBox[{"Transpose", "[",
RowBox[{"Import", "[",
RowBox[{
"\"\\"", ",", "\"\\""}], "]"}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566415791171216*^9, 3.566415792488168*^9}, {
3.566415834488915*^9, 3.56641583536876*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "schweb", ",", "1"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p1"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566405351112589*^9, 3.566405357447461*^9}, {
3.56640544960851*^9, 3.566405474501894*^9}, {3.566405878244103*^9,
3.5664058812828007`*^9}, {3.566406623173218*^9, 3.566406650963872*^9}, {
3.566406681345848*^9, 3.5664066820338078`*^9}, {3.566406750765345*^9,
3.566406752245111*^9}, {3.5664068340642033`*^9, 3.566406978710898*^9}, {
3.5664071823293343`*^9, 3.566407190896555*^9}, {3.5664157551585693`*^9,
3.5664157724838877`*^9}, 3.5664158119699497`*^9, {3.566415845159831*^9,
3.566415872266081*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "schweb", ",", "2"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p2"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566405351112589*^9, 3.566405357447461*^9}, {
3.56640544960851*^9, 3.566405474501894*^9}, {3.566405878244103*^9,
3.5664058812828007`*^9}, {3.566406623173218*^9, 3.566406650963872*^9}, {
3.566406681345848*^9, 3.5664066820338078`*^9}, {3.566406750765345*^9,
3.566406752245111*^9}, {3.5664068340642033`*^9, 3.566406978710898*^9}, {
3.5664071823293343`*^9, 3.566407190896555*^9}, {3.5664157551585693`*^9,
3.5664157724838877`*^9}, 3.5664158119699497`*^9, {3.566415845159831*^9,
3.566415872266081*^9}, {3.566456499895197*^9, 3.566456501983284*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{", " ",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "sym", ",", "1"}]], ",",
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "sym", ",", "2"}]]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}]}], "]"}]], "Input",
CellChangeTimes->{{3.566417491347795*^9, 3.566417494211622*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {
{RGBColor[0.24720000000000014`, 0.24, 0.6], LineBox[CompressedData["
1:eJxdXXWAF1XXphExEJDubrZ7+c0W7C6wbHfZ3fFidyeKit1id+Crvrt2d2Ir
BioqUtJ+7vMM5/nO+M/6cO7Mb+7pc+6dO6P3PqJ8vy6dOnX6rU+nTh1/B3er
3m36o8/FXh718NEHlsW3d6Ab/3w1dsNLHf/wfFty83+LdunyYeyo7J0/vf3I
v9rq9838ZsEln8YGLn/n74oVndqvzrvo0J+3LI/tj/96tHfCf9/GKlfcef1L
o3Zu579/Hzvjqo6Bvdv/vemi309eEfvj5Ni/t+7dvnef2vTHX/sptrGi44Je
7W/eWvDk2m0rY7j84e7th/285Z6/PvjFfo/3XxXjuHVtO90/7N9H+jP2/pgv
Np168LdtJ/wyIX6n+1fHzmp/498RH8aKd+ky9bwBf8X6PzjnuxP7r4ldcs3h
fc9qXxP78b2OCzoFmFb2utjsf+/20cLuQcfTHP+/9TE+505Bx+zu+WtDDLdZ
vlOw5oP5/z7y37ENkxove2F9z4D32Rh7cX3HP3QLOO/Nsf/dPGTmV+M6Ba8f
3/F/W2KF//76g3PWx/Jxwy3h9d+G89gaw8/e/EEb+bU9tqTjMd/4qw2Xfbc9
hml+s62N8+8UfDWux78s7dbO5+0UpF6Q0/rjez3by5eNOOe3ss7B8x3TX9ur
nfftHICN83dunxjfwbEuAfnVq/3fh/j3SboE5EuP9tzWjhl1Cd5+q+O/bu2n
dIipqGuweukrc1Mv6NQONrzTNcBt9t3S9vHCDoZ3C0I+t0GPFnULKIcf2jiP
bsHQmR1PfGfslg629Oge4LGGfBPKoXvQwe1Y8q+xDu1b+kr3gPr3d2zkv7NZ
NqJHeP9tMd6nR9AXAu4SkC89wvHdgrs7HjOnZ/i8PQLOv2fQAwrYMyC/ewbX
XdvxX88gEf/tZHTqwU4B9a1HKP+dAvzsVd2CuzrU8uheAfnQJaCe9gpKwcDt
Mfzz372C2zp+5qONsQ5ruebwnYPjrhz0r6X9Hsp95/A5v41RP3oHH3aoVfpL
ofx7B5TL96H8ewc3/dkxod/bqFe7BNs/6mD8xjbOb5dgh37QznYJqK9d2o8B
Y3cNINZN3drvOLJD43cNKNeeoT3tFuDxpu/U/mrHY7XuFvB3dwr1Z7egBIa6
U/u6bR0/vLuNpz7tHsCMdu7RTr3b3fSTdtfH9Ifj+4R2tqUNz3VCn2ByB1sm
rWkb26GWz/YJ9fmnNupjn2Brh/ru3doGvuy+R0j/nH4kY49Qv1fH8Bg1ewT0
S+tjuN2xewTk++bYvR23uXyP4D9g5PYY9XSPgHrcOaD+7WH6Nb5jGr37mvyh
FuP78u+d3QPYfW7f0M578L5NfQNMp7EHn+Mk0eFvntP14MfnfUP5d6P+bewb
6lmXYHPH4/frZ88Hds7oZ8+Px53bL9jhV+if+/G5Xvg79Df9TP/oZ/sF9Pvf
hX6lX6gf74T+qF8APvW5u+20f3/+ykH9A/r/j9toL/3NvqHv/+kfMG6sbcPz
Xtk/mAcBbWzDvB/qHyCMTN3WRr/SP6B/7sT48FP/YDgevEs7nnfyngHn0bWd
ctgznG/3dtjlPnsGo+Ggw3hz+p4BwsjxPduhrtcJc357mr7jsq17mr7iZwYO
CKjX3dvBl4QBAdzAL11Dfzog5G+XdtrzgGBHPKJeDzD7wzzeHRDOb30bn3NA
ALdQ8WcbxvcaGIB9w35qgz2OHRgwHi5vo18YGFCuT9Hfnz4wtI+3GFfuGBj6
019isO+2gQGfa02M9jIw6JBat+oNsZM6DHDzwDDObY7hsj0HBfTL22KMZ4MC
zrNTQHsZZP6N/nxQqC9dafcPDDJ9pb0MMvug3AcFO+Ih1GLiYKPTLwwO7TP0
3y2DQ3/QOfS/g4Md8Rl+/+rB5l/5HINDfdkSoz4NNn2nvxkSyv8P5hFxQ8J4
s4Lj5w0JIPdrPmFecsCQ0L88HMPzLh0S6vdbbdC/l4eE8v8l9MdDzF/Rfw4N
7WVDG39naMjPzW3k09CQX9vbYCdHDA39Q6d2xqGhAeNi13b4+aeGhnGrG/Xv
/aGh/nRvh19YMzTYkR/RroeZffC5hhmdejHM4jnM4OJhAf1sV9rbPcMC5jtd
2ukfhgWMG50ZD74dFvqrfxhvRg4P/dPWNoglGB4wrqxro/8bbvpO/zDc/Dnl
OTwAHPNFG37mieEW/2g/w0N9eTGU5wjq0dKfQnmOMH8PPS0ZEVDv14Z54IjQ
vjbGkD6cM8L8P9T1zRHBjvwMecPKEWG87RzKYWRAv9eF8xo70uyBfBkZyr9r
gGFnjzR9xrxu0/XMq0aG+U3n8DlH2u/TPnfcb3sM8tlllOk39GPwKJsP5JQ1
yuYPsy4eFerTzzH8bu2o0F6/CvV7VJg/vB7Dcxw3yvwL2HzWKPPv8AdLRoV2
uqKNcX9UsCMfpZ2NCqgnG0J5jTJ9px8cZf6Q/m+U6Tv0buuoMN/q3E4/PNr8
K35/0OiAeUjXdub3o8P8rxv9bdFoyy9gxzXC0NP9Rpt+05+NDvO8ru30I6ND
/evC8XeODmAmfTtz/OOjTb8x/sXRzAMu2tgGO39vtOk78v1vR1v+i3j35+gA
4m7+lfnM1tEB65jv2sD33mOCHfk+/eOYcP6PtFG+Y0x+4HvxGPP39NdjQntY
HYPeHDgm1K91Mcj5P2Msf6Z+jjH/jzh315iQP1uZHz0+xvw/5TvG8g34//fH
hP6xcyjXMWYvlO8Y89+cr8ZTvmNDf9op1OOxYVz5Jwa7yRxLO+q2NcY4PTb0
3xvD+Y4NdtRP1OexwY56DnZ93FjmUfWrWIedOTa00x85funYMP5/GaM+jzV+
082MtfhLOY0N9e/HNvq/scGqDjfy2++hfMeG8WhNG/OlsWFduD6U7zjLfyDG
4eMs3+V8xwVhHRfWV+NM/3ifcaG/6sx8e/9xZh/U53EWL+AuzhSGHBeNs/yf
ejbO/DvY9uC4MG53Zj707Djz97TzcebveZ9xAf3oNurrz+Os/kOes2Gc2Qf8
Qrfxlv8wXowPdvQPwP+k8ZY/go9548N86xP6kwXjQ716lv6kZXzob9pj+PfD
xof6vZz5zYnjgx19Bjz/hePNXvD8144PWBf9GeO8dtDX0l6eGm/5Eub58vgw
X98UQz774XjLr4/oYM93460eRXz9Y7zlJ5jmtvFhPvxPjPXDBPP3eP7pE8ze
YC9ZE8weqA8TLL+nPkyw36N/m2DxjPo/wepN+vMJNh/o8xUTLD7CX90yIWBf
568Y9WFCyP9fmf8/NyGczw9hvJxg/KY+TLD4DP+zcoLVC7DbDRPMv9GuJwY7
+jOsnyaG+vRzqA8TLZ/C+PyJFl9gF+UTQ/++ifbYOtH0j/nNRKsvwP9TJoZ1
+/Y26uXESL410eoPzOvuiRaP+O/CfA5h6sNEsxfmgxOtHqDc9Xv0DxMt/6M+
TArzoa3sV02bFNrD5tA/TDJ/Qn2YZPbDf5/EvOHEVW3wM/tNsnqC/mFS6E+/
DuP7pAB+6MZ3Gb8unxT2P64N+weTLD+gPkwyedMMJ4X5z4qwLzXJ9AXP89kk
i0fMpyYF7OutiVEfJpn/xvN0nWzxiXXX5LA/sIn+OWlyGD+20p/nTg7nvy1G
/zDZ6hf6B2H6B41n/a37UR8mW36FuHGdfp/6MNnqCerDZOsn0D9MNv+BPPfD
yWZP9A+TQ37/FvqHyWE/7sfQP0y2/g/1YUqwo19JOU4J5fdkGB+nhPH4o1Af
plh/iPneFKtPGB93XL+a+fVxU0L5rqV9nT3F/DP9wxTrJ0FMt04J2Mfa1EZ9
mBLms1tpX89NsfyO/mFKWE9t5/N8NiXML/9po3+YEvrTTu3UB2Hqw1SLN9SH
qXY99WGq2Tf9w1Szf9hjxdSQ35uYj7VONf+B3zliahj/17UhDp861fI1/M5F
U62/xv7BVPNPeP67pwbsQ35H//bkVJMH9WGqxSv6h6kmP+aHU8N84L0Y/cNU
63/SP0w1/WD+MM36oYwX08L5/xljvJhm+R7nNS3s7/wd5v/TrF5g/jDN9Jvx
Ylrwbge7r98c5kvTzB6oD8Lwt7cI43ke0PWMF9NC/7cpjBfTLH+jPkwze6c+
TDN/QH2YFubja0P/MN3sifow3fpXnPd0619BzvnTzX6oD9M9/1unm3xYf0+3
+ER9mG7+EnXyxdMt/6M+TA/zpd+Y/yydHubPq9uYP0wP4/WaUB+mBzvWJ1i/
Tw/zr7/DemG6xTPqw3Tz/3ie7dMtX2Q9OMPiBfPJGWZ/rBeEWS/MsHyN+jDD
6hnWCzPs/pTTDKvfGC9mWD4HN3DljDB+b+DzPjTD+n3kwwzzN5T/DPNH7G/O
sHqS+eOO+38Z5gszLD7hubvPtPyc/c+Zlv9hfMpM85+870yrfyn/maYvULO9
Zlq9DH92+Ezrl1H+M82e2B+ZGcCP37qe9fe1M82+6A9mWnygP5hp+g4+vDTT
8jH6A2HmCxrPekL3o97o92BW3ePseaBvA+NC/7+O44fHWfxFHTAhzuIP/Uec
9U8gz8S4YMf6E+w4M876YYy3cT6/K4yz/jviammc9WsQJ2rirH+AqqY1zvwl
/OSBcdb/oT+OM3+L3zkuzuwJ8zklzuormNXZcWZPkNNVcaaPkPsNceb/WZfH
hXXnljb8vTfO4gX826Nxfv3haWHYfbuuZx4TZ/ZJNY2z+Ai1/yTO7AX3+TrO
4g/9fpzlc7jPqjiLx4hv6+IsHiFP3xJn9Sbk3jk+5PdKPn/feLMnPP/g+PB+
73P86HjLx+H3J8eb/bB/Fh/G34+pT6nxFo/Ax+x465dC/wp23G9lDGo5P97s
C2loZbzpH9jcEG/2hefZK97qD8Srg+LD/HEd152Pijf9Zr8w3uoX5NmnxYf9
zA1cZz5XdPprYTzP4njL1/A81+v+/Bvv4+c98dZPgB4/HG/xB2rwVLzFX/jZ
tnjLf2Fvr8SbfUEN3oq3+AS1/ije8mnY2xfxoT/6gO79+3iLV3ieX+KtP4fn
WR1v/WjqXXzorz9jffxPvNkb/UWC77cOSLD4hWmPSLB+Hi4bn2D5EdOJBMsP
kZckJpg+sx+XYPki+JmTYP0O+O0iYfwpTTD7hL7VCKPP36zxrG91f6jZYQkW
P1nfJJj9g58nJZh/YD8kIayn1zJfviDB6if8vTzB4hX4eY34g+ndLP4xL02w
/h3SoAcSrF/E/lmCxS/w55kEkx/9eoKtL+B5Xk+w9Rz2ExPM/7KeSjB7ZFxP
sPqL62UJYT9/Jdf7fk+w/hfUY22C6Sv4syXB9BnP0yXR9B3PsVOi2Sd/N9Hs
k/5EmP5EGM8fl2j2hMdMTbT6CM8fSzR/AHuZnRjG678Yn+YnWn8G/KxMtPnQ
nyRaPwdi2TvR+nvQt4MSLZ5Rzolhf+2zGMxkYaKtb9KfJJq9Qe7nJpq88DyX
JJo8mf8kmr3Br1yfaP0M9vsTw3iwgvnPfYmW/6Dt/Fii+XPGm8RQH1Zzve/5
RIt34OvriWaP8HvvJZo9Mp9ONP2HPL9PNPtgfp0YwG99+ncb+yCi4/qNwgh7
/ySafSPf7pFk61mYVr8ki19g44gky3fZz0my+dB/JNl8oWdJScYPiDU/yfwV
89Uk4y/iYWVSqI+vMx42JFm/AvPdOynUl2diUOtDkky++Jmjkszf4roTkkw/
kH+fnmT9LeQn5yeZPYHflyeZ/sFfXZNk9gQ/c2OS2RP0564ksyfWR0mm7/QP
SVbfwB6fEcZ9XhAGn15Psv4J+++6P9mk34f8vtHzMQwlWXzGZX8kWT0JM1qf
ZPky18OTzL+w/kq2/JryTzZ7wvMPTbZ8AvIYk2z5Ov1assUr+vFk6+9Cj9KS
rd6if0i2fIb+Idnqb8TTeclhf/w3+tvKZNMvPE9DsuWP1MNksyfkcQcnWzzA
8xyVbOs3zDeSTb/xPKclm73hec5NNnvgvgRh/OxiXc98Q5j+Qb9HPiVb/YQ4
83Cy2RPkuyzZ8kGu7ydbvIL/fyXZ4hXC0tvJZl+sM5KtH8h8I9niF/iyItnq
L/Dn12TrZ+B5VieH+e+rob9ItnyS/iLZ7I/+IsXiGfdTpFh+CX6OTLF8kvVJ
iukfHmNaiukn/UWK9/+ZKbaeD73PTbF6jvlGitkD9zEKg5+1KRZv8PwtKd5+
9xdmvpFi+Sz4eWyK2Rf7iSlhvfY749GZKVZv4Xku0HzAz8tTrL8Dfi5JsfUK
9iFSbL2P/iTF7I39txTzb1wvTzH+Y17Ppph/ZNmWYvUZ87wUqw/oT1Isf8F+
i89SzB9z+2aKxTP0aX5OsfoDfuKPFLNH+pMUs0fmYSmmr1DrbqmWf7G/lWr9
fvYzUs0+IfZxqRb/2B8XHfV0ojDiQ2aq1VOw/9xUs3/Wr/o92H9ZqvkL2mmq
7VeAvbWkmn1RP1LD/tFK2v9hqWZf1I9U81/4mZNTzb/xOVKtPkbcvjDV4hvM
dlGq5R/Uj9Swv784BnnckmryhjyWppq9QR4Pppq+MK1JtfwRz/lsqtkf/Xaq
7ze+mWr1HfTwg1TTX+jJ56mm34gL36VafIHfWJlq9oH7rE61fA7+4G9h3Ha7
xrNeSTN7gp0PSLP7w+xHpFl8Zr6RZs9P/5Fm8QtiTUqL9DfSbL8g9SPN/BP3
T6QZP5mHpBm/2T9LM/tiXzAt2LE/GvI4IM3sC27miDSzL/qttHD96JtwfSrN
+vcoR89JM31iPZtm+ob88co000fGlzTTV/DttjTTZ9azaRY/GF/SrN6DPJ5K
M/tgPZtm8YfxRRhieFuY9Wya2RP84RdpZt+ML3oe6PuvaeYPYH9/pZm/YHxJ
M3/C+JJm/obxJd36sRDzwHSzN9az6ZZf4PknpJt9sf+VbvkJ1xPSrZ/F/mm6
yRtxOi/d/C3i5Nx00xf0UcvTTZ8wri7d6n3UKXulW35JPUk3faV+pFv8436N
dKtvuO8t3eyP+Ue62R/zj3Rf710pzPpE45l/pFu/An/v0f3hRx/R70Mey/R8
1I90q7eg769qvshz30k3f4O86ZN080eIB1+lW78DYebHdFtvhF2sSrd6DG5v
XbrZG9t26WZvmE+XDKvPuJ8yw+QPvzkkw/Id+KvRGaY/sI/JGWZfbM9l2H4d
sDc1w9ZXOe+McL3gD8aD2Rmmz5xXhuk74kFlhtkffqYxw+wDZrSv6Ihvh2ZY
/YTnPlr3hx6flOHt/cwM65/Cf12YYf6BcVHzgTtbkmH5NNTylgzbfwH/fbf4
BbE/lOH780+Kv1z/yzB/h77NyxkmH/rpDMsXuT6aYf0P5qMZ1l+GPL/PMHvj
72SYvWE+f2XY/h36iwyrT9j/yrB8CvrZM9P0lfVLpvXnuB8l0+Id/nlCpuk/
2DA90+yDf0WnvxCmv8g0e2E9q9+DnZRnmv3TTjMtHrM/mmnxCvM/KNPmC/08
MjPSz8g0e8J8Tss0fsJfnptp/AYfL8s0ecA+r860/JD1bKZff7kz0+QNP31f
pukD+PlYpvU/oJ/PZFq+iN99IdPiGeLEa5nmz+H/38/0+vlZpukv1ODrTNNv
sjHT7I/9rkyzB8hnfabZC+tZYcina5Zh5B29s+x6xLXhWWbv3KeTZc/HfkaW
778nZJk/Yf6ZZfGc/dAs4w/lmGX7XdkPzTL+Iv+uzTL+wz5bs8yeuH6SZfLj
+mWWvU/D+JFl9TjjR5blM4wfWbY+yviRZfEL8XBxltUfjB9ZZl+IY7dnmX0x
v8iyfIthNcviHeNHluk/d7llmX1AP18RZv2q8ZjWx6Iz78gy+4Ecf8gy+6ba
6Hm4PzrL4hP312ZZfIJ+dsk2e8K69u7Zxh/Gj+xwvq9w/Jhsy8fJ12yLT3xf
INvWl6kn2db/4Nta2VZfQ66F2ZYfQp4Lsi0/xHNUZ5s+oS5rzjZ/zf54tvWn
Wa9mWzxjPZJt+st6Ndvsi3LKNn1n/BCGfS7KNvtjPZJt+RrrkWxvn3fp/qxH
si2fI1+zrT/B+KHn5f76bPMXzDc1X/Yzsi0+Md8Uv5hvZpt/Yr6ZbfUW40e2
2Rffr8m2/BB23GmW1V/MN2dZfogwPXiW+Vewb9Qs28+Bx5g4y+IV/86y/iPX
q2eZfXEf7izz93y/ZZbZF9zFvFm+nqmcZfEC828Qxvz30XiurwlzfU0Y8lwo
zPdL9Psoy87T81EP9fyYz9WzzH+gvLlJ8wdf7hR/KMdZlu9BzR6fZf6K6yWz
zJ+xDpxl9gV2vTHL7Atq9P4ssy/Gj1m2n4P9i1nmX9m/mGX+F/P5c5b5Z+4/
mGX2xv1ZsyyeQT7dY6af4NtuMcun2L+Imb2xvyUMfzs95vuXScLc36Xx3A8b
M/tgPhGz+MP+ln4f/14Xs3jE/Q4xe37u94jZ/JhPxGz+6H8sjJn9wN+cGrN+
PNdHYua/GD9iZj+hWzT54M8NMYtXSHfuiJl8KbeYyR9+/bGY+VvqQ8z0h/3x
mOkX++Mx89/MJ2KWL2Hen8ZMX8PXkS2eUR9ipt/cfxGzeEF9iJk9cD9OzOyN
9UdgdPjF3oFdz/cTA4s3XK8PzF5g7gMCW+/j+n1g8Qdubnhg+TDkPTow+wFf
xgfGP8h/cmD8BXunBcZ/+Ku4wPIJyCMpsP4u1+sCy+fZLwlM3oyzgekD9TPw
9cHswPSJ/djA/DX6OCWB+XPkR2WB2RPsqyqI6HNg+o56ojEwe6Ceiw4130cY
+nygxsO+DtH94SeOEMa+tWP0POzXCINPJ+r5uV8oMHvierPmz35OYP4GYr40
MP8EPbkiMPtBWnq15IN5XBtYvwLzuDGw/IP7twOrlxEf7wgsPmHd6O7A8j/M
/77A6gXYw8PSP/RTHwvMnhD/ngwsfsH//Dcw+8Jl/wvMvmifwshPXpb+Yz6v
B2Z/8B9vB2Z/tF/RGe+Fud6p+2NaX+r5kL99E5h/oNvTfDHPn2VPzGMC8zfs
ZwfW/4HerpE9wf9tCHw82iz7wmNtCyx/gL12zjH7Ql7bM8fyD8SXXXPMnuCv
98gxfcH8++dYfsN9tznWn4c8h+ZY/wv2OTLH9BP/PjbH4gEeY6Iw5DlFmO8T
55i+M58VHWxIFh1PmS465Jmt34c8c3Is/mA++TlmL9DPwhzzD8x3NF/mwznm
X2CfFeIXhtXkmH/CuIYc81+QZ3OO1bf4nb1zTD7s5+eYfdFuc8y+uD8wx+pn
6OFROeZv4X+PyzF7w++ckGP2BjacnGP6B/97eo75d/jfs3NMX8Gn83L8+upF
Oabf4MdlwuDHlTkWTzCfq3PMPrlfVXTozU26HvO6Tb8Hf3WnMPoT9+p5uZ6d
Y/EY+vqIMOT7eI7FJ8h3mfiFx3o2x/wV68Ecsy/ul8wxe2J/McfyCdTrb8qe
MJ93ciz/Qzz6MMf8K8z6E+kH1y9yLB+EXL7KsfqL+zGlb5xXjvlz9Bd/EcbP
rpL+cn+W7JH9S+k/nmOjMJ57qzDs4h9hyLdrrtkL5NtDGHqze649D9YH+uX6
fHZArq0/wd6H5Np84b9H5Bo/4L/H5Br/cNmEXPNX0IcpucZ//Pv0XItX8Hfx
uWZPkHtSrvlL1FtpuSZv7l/PNftifZxr+gI25OWaf+Y+8VzTL+jD3FyzN/T/
FuSavbE/n2v6i3y8OtfsDXyoF0b/qynX4iHsfS9hpD/7aTz0+0Bh5CeH6vdg
70fqeTCfY3LNXqAPC3MtHsEvnaT54b6naf6Q71m55m8g33NzzZ64nphr/gv5
yaW5Zk/ItxZJPrD3qyQ/8HGJ5At/fmOu379xa675V54/kOv7GXdLn7j/Kdf8
NfTqoVzvzx/LNX8P/X5SGGr4X+kz8w1h5hu5fr/jy7k+/3xddMTbt0VnviE6
2PaR6JDvZ8LMN2RPiLffaD4QywrZF+rnn3Ot/4B//1X8wu/+kevzwTXiN+az
XvKgnkhe6IdtyzX/CLvqnGf2hsfskWf9C8hz1zyzN6hhnzyzN+4ryjN9Y76R
Z/qI5xqWZ/YGPzQyz/QX8hwrzPc18kzfuc6bZ/aB+Dwjz+wDdXCCMMal6Hrw
IUO/j3lnC8M95Oj5mW8Is9+WZ/aDy+Zp/vA/peIP3x/IM3vC49eIv/QfwtDP
5jzLLyDPvfNMPvjd/fIsHwGfDsqz/J/7CfLM3yK/PzLP9AX2dmye6RPPx8gz
+0J8PTnP9I/9HGG+75Vn+SXzjTzTX8jnojyzP8aZPNN3vg8kzPUDXY/fuU6Y
6wkaD396q+jwp3fqeViv6HnhT+/PM38Cf/pwntkL1x/yzB+BT8vEP+THz4i/
+Oe2PJ8PviDMvqXkh+d4I8/8JerXdyRv9p9kX/CnH+dZfMN9l+eZf4YafCkM
OX6bZ/UGw770ke/HSH/ZVhXmvrE8Hx/Wyl6xrrhBGH5ss+yF/QzRoUed8/34
nfPt/tDv3fLt+aDfffNtPjxPJt/mz36GMPR7eL5/f2RUvvET9jou3/gNe52U
b/bD/R355v9Qd8Tlm3/kfqB8kzfYk5pv/pTrM/mmL3BTs/LNvqAPucLQ79n5
pn/cH5Lv88f5+WZ/3E8kOvu1onN9J9/0m+sa+ab/2G/aKjr7GboeecgBuj/s
6BBhyPPwfPMP6J8eHZnP8cLg8wniB9+3yTf7gb2eIf6xTyJ+Q78vkDwgposl
L75fnO/zwcWSN9ejpQ98jzDf/C0e42bpD+RzW775Z6jlXcLg273CkM8D0k/W
K/m+fntCGPJZJgx9e1YY/YW2fG+vL+Z7e31VdMznTWGI+11h2OuHej7Y6yd6
fri5z4WRL3wt/vB9EfEP+e1P+ZbvcT+nMOT7u+QB+f4leUFf1+WbP+T6iOyJ
53lIP/DnH2GurxYYhl71FIZ+9ynw/rtfgekj8vuBwohHQwt8/3Fkgek36r2x
wtDvCcKY/xRhzH+6fh/6EC/M9f0Cswf4yTQ9P5dvheF/ggL/fkBegfGL9UqB
8ZP7hwqM3/CnJcLQ7/IC35+oLjB5cX+RMOuVApMv65UCsy/uLykw/WD/v8DX
X4cWmH7hPkeKjvXgY4Xhf/6j8ejPnyTM/dIF3l7PFJ3rB8LcHyuM+VxSYPaA
+SwSHfNZXGD6j3xhieaHfOEGzR/6dov4g8vuEP/QH75bGPK5Txj69pAw9O0x
yQf+50nJD/HyvwV+P8VzBeYvcZvnhTGfl4S5P0IY8nlL+sT3gwrMH3M/jfSP
6x3CvE76zHpF+s71UmEuu2s8Lv9FGPf9Xb/P9dQCHx/WC9N/CCPebdV8IJ9O
s22+8D/dZhv/6OBmW3yhHGcbv5HG9xOm/5ht8kF/d6gw2DJytskT/nesMPcL
zjZ9QTyZMtv3A2fMNn1DPR0vzP6oMPQzbXZkf+Fs378PRKf/EIZ+Fs42feY8
REd/YIEw+6PCPP9SGP2fet2P+wk0X7B7b/ED8WR/8Y/vV4nf0O/DhLm+LHnx
/TzJk+vNwtDvkzUe8jlNdMznLGHEzfOkL+DjhcLc3zTb9Av9nytmm/6xPyrM
ekUY8r1JGPy4Tffj+3/C2A9wjzDq8QeEud9Wz8fzpjQf1iui43efFT+QL7RF
+PGixnP/zOzI/v7ZPr68I8zzByRPrLt8LAy9WK7xyNe/Eh357XfC6F//IH2B
fFcK8/1m6RfX26V/yNfXSj8xnw0Rfd2s8egXbNf9UH90mWN06MPOc4zOfePC
yIf7ajzsfYDoPF9PdK6/is71V9Gh3+NEZ10lDP2eJsz3recYfxDnkoS5/jrH
+Mv11zkmD66/is71V9FZr8zx9Wux6EhvSuaYviC+lgnDf1UJc/1VGGbROMf0
j+dpCMOt7SvM/Wq6Hs91yBxvr0cIwx8fI8z11zlmT4ivJwqzXpnj4+sZwmDX
OcIwv/OFkd9frOdDPne56JDPYtGR318jOusV0SGfm+f4/cm3CXN/lOTBekWY
9Yow7O2ROT4/f3yOfz9kmfSL9UpE39qFsb/iRekv6xVhxMs355j9YT7vis71
FWHu7xaGWJYLw59+Lcz3ReZY/IO+/TjHx8uVwlxf0Xiur+h+qDfWan6oJzfO
8f5nqzDfJxD/uL5SaJjvIwlj/rsXGv+5viJM/1Ho/e+QQtMPrq8Umr7C/44W
xvzHF/p4MlmY52oLI6+OL7T4hH5Jkuh8XaXQ51tZwvQfwphPXqHli3jsOYU+
Phbr/sgXSjQ/yKlcmP5DGOtldYV+PaFJGPq9l/jHczkKzV6g3wcKs14R/7n/
VfLi+kqhyZv1ijDrlUIfj04rNH1CvnCmMOrxc4W5vlLo48Mlhb4fuKjQ9Bf9
hasKff21RBj57Q3C3E8pDHu9XZj7YvV73M8hOs/jEZ3vmxf6ePdkoe9f/1f8
wHyeE0b5+rww92eK33w/XZj7NSUftu0lP/jTj4Tx9zPJn+8DSD943kGh7++t
EGa9Igz7+zVif38Ic31FmPtOpO9YN98Usb9thT6f61Rk4/HPvYQx712Fub5S
5PfH9RfG/AcV2fx5XLMw11eEMf+xRb5fPaHI+Mn1lSLjP9dXikw+XF8RhjyT
hXnfIn/+QbYw11eKzJ5Q7xUUmX5wfUV02Ou8Ir9ffUGRz/8qROd+DtF53oMw
11eEef5Dkdfv/XU/1itFvv91WJG316OEeT6eMOLRQmHu5xDGfU8v8v2Fs4W5
viKM+Vwk/nA/h/jL9RXJj/tri3x/4Tph1iuSP/T7NukH6xWNZ71S5PP7B3Q9
8w1h7uco8vXbsiKzH75vXOTr+XbR2R8VHf74VdHRb3lTGOneOxrPfRVF3t4/
0fOAj8uFmW8U+fj0vTDaSj8J83wdXY824e+iI79dLTr7G8LQj43iF/sbwtxH
U2wY/OhabPyHfewiOvujorM/Wmz6wv5GsdenocWmj3y/XnSuKwizv1Hs7WNy
sff/04u9fcQLo1+VVGzxBv4/vdjyM9S/2aLjvoEw8td8YeQrhcU+/5wrOs8Z
LI74Cz0v12OF8Rz14hf7G6LzvsVmb9CH/YWxv+VgYeRFhxX7eHak5EV/Uez7
5QuLI/0NYcj39GLTb8T3s4TpL4otfoAfFwlzPVaY/kIY/ZqrhaHH1xX7eunG
4sh+DmGuxxZbPsj1WNGRr9yv+6FeerjY10uPC6N/tUzjwddnxD/Uf23CPF+9
2Pu/V4Qhnzc0HvXsO5IX+nHvF/v49LHkD/Eslz4hvn8lzPO9I/r6Q7Hvx60U
5v7RYp9//Vns86+1xT4+bdB4rscK87wEYdRLnef6eq3nXKPDXncVHf2JPeb6
5+8vDP0cNNf3J4bN9fFopDD8z9i5xn/0gScKw39PnWv85z4o0ZlvzPX1Uspc
swfu55jr95NlCzPfmGv6Q/8hzP2jc00/eT6M6Kj3FgijX1yh+8Of1ojOfEOY
+Ybuz3xDdNQH+8/19dLBc729HSbMfEO/z/2j4gfi8wnCmM/Jc03fuX9UdMjn
LGHo5/kaz/Ns5/p66TLR+X2eub4/cbXGI5++TvoAftwkjHr2VukT8w1hvh8o
zHxDmPs5hGGvT8z1+dcyYe4fFeZ5OLqe23rm+vjwqjDs7Q3ZA/eP6n7Q1w+E
uZ9jro+XyzV/9kfn+nrpO9GRP/0gjHi3Uhj5wiphpAurZU+Yz1rJA/P5W3T6
D2HsZ9guefJ8t3mG+V2AeaYvyBd2F4Z+9xXme+nCkOfgeaa/PG90ntfv0fO8
fo+f5+11kjDW66ZpPPo7cfN8/pg4L9LfEOb7UhoP/xMTnf0N0dFfnq35YNmr
WOPZH9V49P/LhREfq4TBnrp5fj9e0zyfL7QKo/+/7zyTF68T5vv/wjwfYp7v
Vx0jjPkcP8/0B/Z64jzTR9jrqcJ8P2We6TffB55n9sD9HKLDH18iOvR7kTDT
vnneXpfo99jfEB353M3C4Mcdwsh/lup6vm8uDHt9UJjrsbqe+0eFwZen5/n6
7znxj+ftST6Q78uSJ+Lla6Jz25Qwz+Ob5/P7D6VfiC+fSl8QX74Q5vvtEX1d
IYz85ydh9jfmWbxhf0OY/Q1hnsckDL5s0v3gv7YJIx/sPN/vn+opzPdV5vv+
3R6i832V+d7eB2k89GHYfN8vHznfx7Ox842fqBcnzo/kG/N9PJohDP+VMN/k
Df+VMt/773Rh2PssYb5nJMz9o/NNn/CcRcJ4rHnC0IdSYewLqpxv9oL1kNr5
Vi9BvxuE+f0CjYc+7CPM/sZ8H88Onu/rt8P0+3xfRZjnK4tffF9F1yMfPkWY
5yPO9/3VsyQPnpcoDH98keSH/OsyyRfx7EphxLNrpB/gw3W6nu8Tazz6s7dp
PPd/CXNewjwvbb7PJx+J6OvjEX1dJszzsuab/YAv7aLDf70kDP/1qn6P+79E
53qK5sP+xnyff30y38enz0Vnf0OY35fQeK6nzPf16EqN5zFakhf7G5Iv6rd1
0g/kkxuFeY6yMOLtP8JcTykxTP9R4uuL3Uvs97ieUmL6hng2oMTX80NKvL2O
KDF95nkMwjwPTON5Pq1+H/5rujDPo9R4vg8rjH5XWomPZ1nCXE8p8flnXonP
P+fo97ieovlzPUUY+Vp5ickH86kShl7VC3P/V4nJFz+zlzC/B6PxfF9FGH8O
1Xjukyvx+dcxwjxvpsT0i+dJCPN9FY3n/q8SH8/OFUY9f2GJ2Rf3f5X4fHKR
7gd7XazfQz1/rTD0+0aN5/cqdD/Uj3eU+Hzy7hKfT96n63nOeIQfj+n3YO9P
iX/w588IQ77/E7+531yY+82F+b6K9AH8eFv6A3/+vvQd8v1Y+sbzGzWe2+xF
Z39DmOen6H58P7Yk0t8Qhr7/WWLxCvnXWtH5fqww5LtZmOf96fd4nv0CP5/u
wuDfbgvseeH/+y7w+7UGCHP/xgLjH/dvLPD53ugFfj19nDD4N2mB789OW+D7
s3ELIvXJAq8PqaKDf5kLTL+wHjNrgX9fMU90nicmOt+fX+D7CfOF+f78Ah/P
KoW5f0P3w7QahWHvrRrP/RsLfDw7QJj1iTDylSM0X9Yn4gfrE/EP+nCiMOsT
YeSvZ4r/WJ87Z4Hvz14oDHd1iTD9hfSB66/CkO8SYfqLBT7fuUX6R38hTH8h
zPpEmOuvwnyffoHf3/SkMN+nF+b7bcJ8v00Y/epXFvj65nU9P/j2tjDynfeF
+X5bhB+fCUPfvxQ/cd23wtzvJXnx/Axh5Du/SX70F6IjP18j/eD5GtIf5Dub
F/j8bbsw119LDWO9s2up6SPq5Z6lvp7pVWr6zvO+RMdj7iJMfyMM++ij3+P+
MWHwo3+pf94Buh79nEGl3l4HC0M/hup65G/DS308HVnq1+dGC3P/qjC/31Dq
138nlJr82H8RHfOZIjrPNxMd/npGqc8H44Shnwmlpl/Yj5NY6uuRZI1HPZAq
OvrV6cLwH5nCXE8Spv8s9fYaCEO/coWhz/mlfj/HbGHkd4Wlvp4qLvX9uXmi
o19SouuR3y4Qnef76XqeK1fq41GV6FzvFr8Rn+pKfb+nQZj9Jcmb5xuU+n5F
qzDi5d7C3F8j/cL+yP2lf9yvJ8z1MGGenyKM/PQwYcSLI6TfyM+OEoZ+HKPx
iGfHic79OqKDTScIw15OEoZ/P0WY+3ki9n+G6OhnnSMMf32e+IHfu0D8wu9d
JPnAvi4R5n7jUt/vu1zygn+/QnS4ocWi8/vX0gf87hLpE/cnC8OP3SD94/q/
MPfxC6Nfe2upz+duF4Y+3SmM9Z2lup77BYQxn3uFsR58f6nvpz8Ysa+HhWFf
j2o+3A8tDH18Upj7o8Uf9vOEkb8+K8z+njD0qU385/sXEfm+KIx+2MsR//uq
6JDva6U+nr2h8Yivb5X6/vk70ke+vyH9g//8QBj+5qNSn+99LIz+6aelvj5a
ruvRH/tCdK5PCEO+3whjP9q3wsinfhTme2q6P+b1SyT+/iYMffpd88fv/SmM
/Yt/iX+4fq3kg/x1nTD6oxskT/j7jdIPrNdsFsZ6wlaN52copX8836/MX9+l
zOtjN2GeR15m1yP+7VTm7auXMPxbb2H4m111P/Bjd9HhH/cQhr/vp/GQ355l
vt8yUHTo4yDRuf+0zMe/YWXe34woM/5CDqOE4e/HlPl+9zhhngdS5vO/iWV+
fWiyMPLBqcI8/07XQ79mCqNfE6/xqDMTyvx+vGRhnqcoDP1IK7N8D+4wQ3TE
vyxh9n/LfL4WlHn7zBXm90aFwY/Zwnzfr8zHryLNB/5mrjDaR/M1f+6PE795
vp/oqBcrROd6lDDf95G8kb/Wlvl4VC/M/fwR/Wgu8/l/qzDfDyrz/cJ9pW/w
V/sJw18dIP0GPw4SHfw4pMzX/4dF7OUI0eE/jhIGP47ReMzn2DKfLx4vDH4s
lL0gbp0oDP99sjD2t58qjHh0uu6H+vBs8QP+5lxhyO38skj9Wubz7YuFEc8v
FUZ+eZnkC/taFNGnK4Xhv68SRj50jTC/fy79BP+uFx3+9wZh8O8mYfDvFl3P
86PKfD10h+wJ+fJdEfu6Wxj58r3CyJfvE8b6+wPCyC8fEoYePCKM9PYxPQ/s
44kyH8+fKvP52jJh1uNlvj/0rK5nfS57RH7TXubrqReEwY+XhCHfVyRf9JNe
K/P5zetlvn54U/qG+uFtYfibd4URT96XfYAfHwrD/35c5t8f/FR09gOE4X8/
F2Y/URj9qq/1+9jP8W2Zr4e+F4a+/yAMfvyk+YIfKyP28qsw+PFbma+nfheG
fvwpfuM5/5K8kB+tFYa9rI/Yy9+iw142iQ492yLMfEP6hv7OdmGkt53KDSP/
7SLM913L/X6iHqKj37ST6NCvnct9PNul3Mez3YSRr/TR/eA/9ij39Vy/cpsP
+LanMPebCkO/BgsjXxkqDLYPKzf+IX8bIczzPspNPojPY8r9/rGJ5X59ZrIw
97eX+/XZacLIB2aUm37id+PKTd/BvwSN53qPxvO8IWHuNxHmfjVh5BlZ5T7f
yxbm8bj6PUwjp9zHvzxh6GOBMPRxju4HfhSJjvqjuNz3M+cLgx8l5T4fKBXm
epPkw+/tCUOfqoVhn7WSN/KBemGeRy39Qv+2SZjf29J45Dd7iQ5/tU+5zxf3
Ex1/DhDmeQbSd+jTwcKI54dG7Otw3Z/nswnDPo/W/eGvji339dhxoiOeLRR/
2N/W/eCvThJGPXGKxkM/ThOGfZ4hjHr9rHLvr84Rhn6cJ3uCv7pA8kd8v0gY
9nKxMPzVpdIn5M+Xl/v66IpyX08sFsb6y9XC8DdLhLn/WL8H/bpB+gx+3Kjx
fP9JdFx3qzD4eXu53/96p65Hv3mpMK67R78Pe7tPGP2cB8p9P+4hYdQjj8he
EA8fFYa9PSH+s78vDH4uk7x4np0wvxMjzPxCGH/bI/r1gvQJ/ZZXhJGPvKbx
sO83RGd/Qpj7p4W5n0n6zv6EMOrbD4Uhv4+Fwf9PhdmfKLd6DPz/Qhj8/0rj
oc/fCIP/38newP/vhcH/H8t9/P1J80F+t1L84P6pCP9XRfj/R7mvj1eX+3xk
TUSf1wmDnxuEUf/8LQx+bpZ+Qp+3SL+5/1sY1/8T0efOFUbn9zkrfPzoLjri
ac8KHz96CYPPvYWRz+wiDH7uJox8po9+D/rcVxj5Yf8KXz8NqDD+IZ4OEoYd
D6nw9eSwCp8vj6jw+4lGis7vEYuO+DO2wuQP/zBeGPo5scLnQ5OF4W+nCqMe
nV7h+2czRef7uBW+nkrUeL6fW2H6jnoqRXTwM03Xo9+bUeHzw6wKH79mCaMe
DSq8vebqevxuvubPfoX4xfNFhHF9sfgLfs4VnduVhMHPBRW+v1omeYKfFdIH
9AerhGHvNdIfvi9c4euPemH4iyaNR37ZXOHrl1Zh5Kf7ROzhAGH4hwOFkU8d
LAz+HyrM7/hW+PzySD0P5Hd0hcUn6POxGo96+PgKH+8WCoP/JwrD354kfiG/
PEX8RX5+mjDyqTOEeV6s5IN86pwK3y86r8L3By6QfHkeZIXvD1ws/UJ+ean0
D9ddXuHrlSsqfL2yWJjvK1X4fGqJMPztdcLwl9cLM38QRj51s54XfL9VGPHn
9gqfX95Z4fPLpRU+v7xbzwv9uFd0nk+p+4EfD1b4+P2wMNc/hJFfPi55wP8/
Ifnx/Slhrn9IP3hejOhc/6iIrH9oPPzd86LDPl8U5v5njUc+9Kr0F/b5uvQb
9vmG6LDvt0WHfb4jOvKh90TH+uQHFb4e+0iY5+EJ4+9nEXv5XM/PY89Fh359
LYz+wDcRfn6n62FvK0RH/fKj5IP487Mwz10Uhr/5TfIFP3+v8PXwH8L8vrIw
90cIQ7/WSd/gfzZU+P7ARmG+DyJ9BT+2is79FMLQr06VhpEfdqu06xG/ewjD
PncShn3uXOnts3elt89dK20+4P/uwtCLPSp9vdNPmPlDpfGX+ylER39pSKWP
V0OF+b1YYX6vqdK/Dz9GmOsdlT6fmyAMfk2q9Po3pdKvL8UJgw8JwrDXpEqf
7yVX+nwvtdLne+nCyPcyK32+l63n4/svwnx/Tpjnm1b6+qdAGPnJbPGD/QbR
Ife5ld5fzBd/eR6Zruf37Sp9v6e80ut3ZaXvr1YLY1xtpc+P6qV/yL8bK33/
q7nS979ahfG+2l7CkMe+lb6+30+Y+98q/fsTB4nO81eFeX6znpfnG2k+iCdH
av78vqcw3hc4ttLXd8eLzvWLSh9PTqz08eRkYZ6PFLGf04X5PpDkBf93luTL
/XfCyDfOE+Z+CWH4v4ukn8ifL6n09flllb6+XiT9Bz+vFIZ+XSUM/3m17sf1
DGHw8zqNx/6EG/R76FffpPHwn7cI8/s5Go94fpcw4tfdwohf9wqjnrxfGP2R
B4X5vnSljz+PSB7Qs8eFeQym5In1oKeEUf88LX3h/mPpH/aTPSfM9yWFeb6L
MPj/YqWvX16q9PnRq6JzP0Slz4/eEAb/3xLmeXTC6Fe8V+nzxQ/0e9Dnjyp9
v+ITYdj3Z8LIb5ZX+nrwC/ETf78S/xHPv9F4nk8lzPexhGHfPwrDvn/W/WHf
K3V/7o8Q5nlWGg/9+qPS92dXS1+QJ62J6Nc66Sv7DcLsN0j/uf+60vIt2PcW
jUd83haJP/8Is99QFek3CEO/ulfZ/ZEv9qzy+WKvKv8+x85Vvl+9q+jsN4jO
83OqfP+tb5XxD/GjvzDse4Aw+w1Vvh82pMr7y2FVPt8YUeXPZxwljHxjTJXv
d4+t8vnOeGHwc6Iw+DK5yvSd/QZhvp8ijPp4pq7n+yrCfN9NmPsjhNlvEOb+
CGHujxDm/ghhfo6yyvcHA2HEq3xh5Fuzq3z9Uyh5IN8qFub+SmHurxQG/0ur
vL8sE4a/rJS+wF9WS//gL2ukX4j/daLjPg1Vvr5u0njwv0V0nq8sOurJfXQ/
8H8/YfSLDhBGvDpIGPHqYN0P/vJQYfYbhOEvjxTm+e5Vvv45VnSe9y46vzcT
4ecJ4jfyqZNFR71wapWvf06TfHH9GcK47izpA/MHYeYPwuhXXCDM/EH6h3ry
EtG5XiE6+j2XC3O/pewH/ZvFVT7+XC2MeLxEGOy+Thj6eUOVzw9vrPL10C36
/SPCDxi69x1vFwYf7xRGfb5U/AM/7hEGP+4T/3m+rOSDfOjBKp+vP1Ll489j
wjxfQZjrFdIP6OfTVT7ff0YY+vmsMKbdVuXzo3bpH+TxgjDk8ZIw/MUrwpj3
a8L8/oYw+mlvVfn6/h1hyOO9Kp+fvi86/PWHoqOf+bH4wfOzhWGny8V/7q/U
9dxfqfHcX6nxXL8QBj9XROLXD5I31y+Ewc+V0hfo56+iw1+vEka++UeVr59W
R65fIwx/sU76C/1eH9HvjcKY9yZhvg8aiX/bhKHf/wiDbZ2rfb7atdrbe/dq
uz/XL6p9vtqr2udnvYVx/a66P+xjN9GZTwhDP/tW+/3Z/UXn+Rei498HVfv1
oCHCkMcwYb6vKox8YGS1Xw8aU+3Xg8aKznxCGPo5UeO5fiE68rupwvzeQbXP
D2dWR873Eh3+JlEY8TBZ47E/MVWYfNZ42FO2fh/xIqb5c/+D+Mn3ZUVHvVcg
OvRnjuSBfluRMPsRwuxHCHN9Qhj2WCYMe66QviD/qhKG/tVI//g+XbWvlxqE
US81RvS3pdr6B6gPWkWHf95H18M/71ft660D9DyIdwdW+/zvYNH5/Tlh7ncQ
Zv5Q7fPho6t9Pnys+A9/cny1z6cXVkfyB2H2H6p9Pndqtfevp0k/MI8zhXm+
gPQJf8+v9vHgQmHkKxcLc/+k9JPnDwiD7YuEsT/5SmHo+1XCyFeuqbb6BvH5
WtFhL9fr96F/N2o+8D83af6Q/y2iI/++TXR+T08Y/Z+7xE/Uh3dLXuj/3Fvt
48H9wjz/QBj538PC/I6u9IP9B+kX+w/C7D9U+3znaWH2H6TfSIeeE+Z6RMSf
Py/74Pn2wvDnL+t6nnev69l/iNjDG8LsP2h+qA/fEeb7GMLsPwhzPSLCz08i
/PxM4xEPPhed3wuUPOGPvxIGP78R5nkO0g+cD7hCGHrwo/QN/vhnYdQnv0g/
sZ/qN9Hhn1YJ83vnwtDP1cKot9cIcz1CmN8Xq/b1ycZqX59sFub3g4Txvs/2
al+fdKrx+2E7C4Of3Wr8+Y09hPl+Ro33T72Eka/0rvHrbbsKc32iJrI+UePr
k36iI17sKTr6HwOFkY8PFka+MrTG708eXmP6zf2SwpDHqBrfXxtT4+PNONHx
zxNrfH00qcbXR1M0nu+31/j6aIbGQ55xwlzPqPH9giTxA/lOiuaL/DFNdO6f
FEY+nyX+o17MrvH5Ukx0yCNH1zN/EB39qAJhnr8hzPN7dH9+j0n6BX7Oq/H1
zYIa348qrfH+u7zG10eVwvDf1TX+/YNaYfjv+hofzxqFuZ6h+/H7cDV+fWlv
jYd97Kvx4Od+wnwfQxj540HC4OchwuDnYbo/38cQnd97EX/5Pob4i/roONFx
/X9qfD52gvQF+dBJwvD/p2g85HFajc+HTheGvzqzxvv/s6XfkMe5oqO+Ol90
5hei8/sQwvBXl2o88qHLhZEnXCGMOLZY1yN+XC3M/ZLC3O8gzP0Owuw/aL7w
VzeLzu9r1vj66nZhfpZLGPaxVPxl/0HyYv9BGPZxvzDix0M1Pr95WBj9rUeF
cdnj0ifI40npE/ZDLRNG/PivxvN9DNERf/4nOuJHuzB+7yVh9ENfEcbvvRax
5zdEh397K/J77wgzfxCG/nyg+cKePxLmfklhfmZd/MR9lgtD/l9IPrj+K8kP
9vyN5A97/i4i/xWi83woYdRHPwvz/U5h7meIxKvfa3x982ckXq0WZv4Qscd1
wtzPoPHwjxtFZ/4gzP0MGo/+5nbR+X5nrc2f+UOt8Q/22E0Y9tRdmOdVCSMf
6yUMfvau9efn7yqMemH3WtMHPMcewswfan29sGetrxcG1Pp8bFCtz8eG1Pr1
zWHC/I61MK4bVevzsTGiY7/HONHRj5sgDP82SePh36aIDn5OE+b30Wp9/TVT
dPi3BGHkY4maP/dD1Pp6MVV0+Ld00Xm+jjD3QwgjH4vVmj1xP4Qw4k1ere+v
FtT6eDNHGPG/UBj+rVj6xvxBGPVKiTDiTakw+nHluh/KnkrRuR9CmPshItfX
1/p8rFF01N/NwtwPIczvU9f6+m9fYZSH++n5mD8IQx4H1Xp/c0itz48PE+Z5
QeI3z4eo9fHmGGGo83HCWI/5j+SL/PoEYeYPwswfpD88n0yY+UPEvs4UZv5Q
6+PVuboe/up80SGHC6X/yK8vFoa/urTWr09dJoz1qUUR+1oszP6EMOzjGmE8
1rXC/D6Vnhf+6kZh5GM3C0Met4rfqB9vr/Xx/45aH/+XCmM/9D0R+7pP8uf7
FhH7eqjW53MPiw5/9ajo/P5VrY8fT4rO71MIM38Q5vnRwpDH/3Q/5g/C4Mvz
Gs/vWYiOePyy6Py+hTDi8esaj/XCN4Uhz7c1X77PWevzsfeF+T6n+Mv3OaXv
uO2nEftYLoz8/Itan499KfkjH/xGGO3v74QhzxW6Hv7qB+kb1y9qfT63Uhj7
ZX7VeO6HEOb6hTDXL4S5fiGMemedMPdDCKNe2iiMeL5JmO9f6Pkgj221vv78
R/zm+kWdYcizqzD7EXV2PeyhV523h96iw552ER3y212Y6xV13h761nl76F/n
48UAYex3HCSMenOIMPLTYXW+vhlR5+1hVJ1f/xktOvdL1vn6ZLww8ttJwtwv
Wefrm6nCWD+YLsz1CmGuV9T5/DRRGPEmWfND/E8VP2EP6cLox2TW+fifLQx9
nlXn65tAGPLIrfP1f74wz/MT5vdO6nw+VizM7xfUeX0uqfP2UKr7MX8QHf2U
yjqfj1ULQx61wnx/U/fj+5uiw781iQ55tIjO/RCio3+wj/iHemM/8YvvXwjD
vx0kDHkeUufjzaF1vn9wRESeR8k+0B87Whj7MY6r8/nY8XU+3iyU/vD8dOk7
8qmTRYc8TxVGvDldmOsZwoj/Z+v3IM9zRef3Gup8/+BC0bm+UefjzSWR6y+v
8/XOojofr66s8/XjVcKo/64RZv6g6yHP60Xn+oYw7OtmyQPX3SqMeHN7xL7u
lL5gGktF5/sWdT6fu0/jsd/o/jpfLz0ofUQ+9nCd5VOIN4/W+XjzeJ2PN08K
w18u0/X8nrcw5PGsMOT5P2F+/0oY8eZ5YeYPwvyenn6f3+PU/HD963U+n3uz
zudzbwsj/3hX/ON5EBH7+jBiXx/V+XzuU8kX8Wu59IH5g+i4/suIfX0t/US9
860w+iPfazz83Q/C6K/8FIk/K4W5/0H2gnxuVcQ+fhcd9rG6zudzfwnD362N
xJ/1wrCPvyPxZ5Mw7GOLnh/6vS0Sf/4RvyCPzvWen13rvX11r/f5QM967+96
1UfyiXovz13qffzard7kD3n0qTd94vub9aY/PM9SmOfr6npcN0h0/B2s+zGf
qPfxZ4Qw39/U9dz/IIz1rrEaj/71+Mj1EzUefybX+37AVGG+v1nv/c1MYZ43
pfHIBxLFP8gjWfKBfaTWe3+VFpFHpsbDX2UJM58Qhr8JpA/83oAw6s3Z9X69
s7De99eKhbE+N0/jeb646OBjqTDPf9B49IMqhVEfVdd7e6yt9/GqXnTUq416
fsi/WRj5R2u9j1d7iR+wx32Ewdf9hCH/A+p9Pn6Q6MwfROd5UpIvv6ciDPkf
FZH/MdIPyP846R/izfHCkP/CiD2dKIzHOFn3Q7v5VGHEq9OFEW/OjNjT2cKQ
x7nC/P6CMMRygTDkcbEwz1fX77H/UO/jzSLxA/Z4pTD4epUw1p+vqff53LXi
P/dH1Pv4f2O9jzc3R+zpFukH9Ps2YdjTHZI3388Q5v4IYejlvfU+3twvOt/P
EB35+cPCuP5RYe6PEEZ/7cl6n48tq/f1/9PC0O9nhPl+hjD6OW3CyBOeF+b7
GcKod16u9/nYq8Ko318Xht2+KYx+zNviP+r/d+t9vfNexL99KDq/r1cf6T8I
8zwpYZ4nVe/rpS9FR/z/Whjy/FbjYV/fi87zqCPx6qd6X2+tFEZ/7Zd6y79Q
L62SfUCef2g884dIvPur3tdLa4X5PWE9H/MHYfzupki82iLM/EGY+YMw5N65
wefXXRsi+YMw8wdhyHOnBtNX5g8NPl7t0hDZPynM87AbfL3Ut8Hvt+4vjPWE
AQ2+XhokzPcxGnw+N6zBx58R+n2s74xq8PncaGHcfpzG87xKzY/vbwqzH9Hg
7XOq6OxHiN88r1IY9h3fYPJBPpjY4OWZ3ODlmdrg/WV6g+kP5JnZ4ONPtjDs
MyYM+woa/PtvucLMJ4ThL2c3+PM8CkVHPC8Wnf0IYcizRBj8LG2w/XHI78tF
hzwrhfk9E/0erq8VxrzqND/Is1GY3zsRZj+iweeDewnz/Afxm/2IiDwOEEZ+
fZAw3++M2NdhDT6/PrzBx68jNZ77K6Vf8HfHNvj87HjRwYeFwswnhHk+ZYOP
P6fqfrCP04XRnztb4yG/c0VH/nm+ML9vL8z+Q8QeL43Y4+WaL9cvhCG/xcKQ
31XiF/c/CENu14r/PO9amOc9NPj85WbpD9+/EOb7F9I/vn/R4Pd3Lm3w/ax7
hLn/QeO5/0EY+eRDGs/zovR8yCcfE4Y/eEKY71/oep5HKTrXL4SR3z8rzO/L
COM+7ZHrXxBGP+olYejPK+Ivrn9N8uD7F5If5PGWMPL7d4T5/oUwfuf9Bp/f
fyj9Qbz8WHSeb93g85/lwpDnF9JHvs+p+IH1xW+E4V+/03jIc4Xo/D5ng9/P
8LMw/MEvwvDPv0Xi3Sph/Myf+j3uh2jw+eyaiD9YJ8z9lJF4uzHiTzYLcz+E
5MX9lMLcD9Ho7auzMPdDNPr9qd1F53kPjaYvmGYvYe6HEOZ518L83pcw90M0
mr5jPaufMPdDaDz3QzR6+xosDHkMFYZ9DNP1/H6G6Oh/jBJG/jNWGP3BcY0+
Xk6IXD9J/OJ+Sv0e9GGaMPLRGcLwt3G6Hv42QfyGv04SHfJMaTR58zzKRl8/
p4sOf50lOuxzljDPtxaGPHMavX3lCcOdFgij/p4jzPcxGv3+77mNZg98H0OY
51sL4z5luh76UNHo65sqYb6PofHYz1EnOvxtQ6OP103CfB+j0cfrVmHY597C
+LOv5AF92L/R+8sDJV+eP6nrkU8fGpHn4cJ4riN1Pc+Pkr7x/KhGX58cLwx1
Xtjo+80nRK4/WXSeByE6/O1pwhh3RqOPn2cJI386Rxj503kR+74gYl8XNfp8
9pKIfV7W6PPZyxt9vXiF+Al/uViY73MKw18uafT1/3XCsM8bhPk9a2F+L67R
51+3CSN+3tHo86+7hHGfu6Wf6Fff2+jrm/tFR3vxQWGeb63x2C/1qDC/P6fx
iJ9PROx7mei47Glh9HOe0Xj0x56L2Hdbo4+/zwuz/9Do4/Wr4j/Gvy7M9Qph
/H1b8uV+B8mf37cTHfb8oejc7yCMeujTRp8/fSY69O8L0WGPXwpzvUIY9dC3
wlyv0P24XhHx7z8JI59dGbHnX4Xhn1c1+nz2d9Fhz6tF53mTwpD/2ki8Xi/+
8vwHyQf16SbRIf8tokP+20SHf/5HdMijc5PpD+TRVRjy6C7M728Jo//USxjx
urcwz38Q5v6HJtM3+Oc+oqO+7dvk87f+wtjfO0DjEa8H6X6wxyHCkOewJl8f
jRCGPEY1GT8gzzHC6D+Na/L1zXhhXD+pyfgLeU5p8vnXtCYvz+lNpg+wj5mi
Y5rxwpBnYpO3j+Qmn3+lCrPfIMzvbTV5/5zd5O1jVpO3r0Dj4Z9zhZF/5Qtz
/aLJx8tC0bE+W9zk7Wuefg/pR4kw8p9SjUffoVyY39vS7/E8CNF5HoQw7KNO
4+GvGiQf8LOpydtHizDyn72EoYf7NPn8Y78mn78cIMz3OZt8fXBwk68PDhUG
Pw+XfvN7rcLgx9FNPl4dq+fheRCigx//afLx8kTReX61MPMHYZ4/KQy2niEM
/TxLGHw6p8nHm/OafLy5QM/D728J8/tbwvA3lwnzPCnJE/tBrhDG9VcJw19c
LQx/s0QY8eN66Qu/FykM+7hJ+on+5i3CqA9uE+b3JHU98o+7REd9cLcw6r17
hXm+lK6HPB+M6PdDEft4VNdz/UJ01AdPar7MH5p8/Plvk48/z0T81XPC+P02
2QN+5vkmnw+8KIx88uWIfb0qecK+XheGv3pTGP7/rYg+vBvRh/eFmU8IM58Q
5vqF9JH7H2RfXL+IxK+vhJlPKB7Bvr8VHfrwvTDk+YMw9z8IQx9WCmO/9q96
Pp7/IIx88g9h5AN/an64fo0w8wlh6MOGJl//bxTm+dWSN89/EEa/fJsw909K
33ieVLPXvx7Nke9rNfv9aTtrPN/fFEb+u6sw6pHdhfFnD2HoXz/dn/0G0bF/
ZmCzj5eDhVGfDm328Xa47sf3N5v9/s/RwvzehTDf32w2/vJ7ncLIRydFrp8i
OuLltGa/njlDdMTLONHx3PHCyEeTmr1/T27265lposMfZAjz/c1mn/9kN3v9
iwkj3ubo/vz+hTD7DcI8/6HZ7In9Bt2P39MSRj47X8+D+mCBML+npfHwJxXN
3p9URq6vEYY864SRzzZErm+UvOAPmoWRj7YKIx/dWxjy3FcY+ej+0i/I40Dp
H/LRg0WHPA8V5vc5I9cfKXsDn4/W/dB/OlbjkT8dL8zzqjUeYjlBGP2Ck4R5
XrUw84XmSL9BdMjzLM0f8jxHmN+7EIZ/v0AY/vnCZh/vL5E9wD4vlbz4vU5h
9huEcdli6Qv6P1dLPzFuieiI19cJY73mhmZf798kzPMnhfH3NmF+70IY8rhL
9oB4u1R09H/uEYa/u0/PA3k80Ozzt4c0HvXeI7o/1y9Ehzye0PWQx1MR+3ha
mOdHRezjWWHkw23CyL/ahZF/vSj58TxKYZ4HEbGv1yL29YYw8q+3hHkepTD6
P+8J8zwI6Sfi9UfNPv/6pNnXJ5/JvmCfn4sOf/lls98/+nWz3z/6bcQ+v49c
/4N+H/rwkzC/nyXMfEHzQf63SvyDv/692fcP/mz2/Zy/JA/Y99pmn7+tj/jL
vyP+dpMw/O2WZp9/bZM+4fp/pG9Yf+ncEtkv2WJ02Hd30WHfPUTnfgfRef6k
MOqrXVp8/2A30fGcfYRRr/YV5n6HFpsP9zsIc7+DMPc7tPj4O0z34/sXonO/
gzD3S7YY/9FPHCeMfuQEYZ4X1eLztynC0IupLb4fNb3F528zW/z+sHjR4V8S
hdl/aDF9RfxOFWb/ocX3hzNbfD6VLcz9Di2R/oPo3N8gjPcD5ggjPhQJc79k
i8//5osO/SnRfKA/peIX+k/lwvhTKfkgPlSLjn+vFeb3NzUe+tMoOvSnOaI/
rcLI//YWRnzZN6I/+wsjXh8ojHrwYGHE+0NlL8jfDxMd8eUI0WEmRwmjvj9G
45G/HSc639cUHfHlBGHk0ycJo51xijDy+dM0X6z3nBHxB2cJ8/sWGs98QZjf
t2jx/ZqLJG+eNykM/btM4xHfFokOfbiixefzi6VPiE9Xt/j4tER0njcpOvpn
N4jO86qFmS8Ic31CGPnjHdJvxJe7hPH37hb/fsO9LT5/vD9y/YMtPr49rN/D
30daIv0FzQfXPxnxJ0+Jn4hP/xXm97yFUR/+T/KDPrdL3rj+BY3n+xUtPr69
rOuR/76m61HPvCHM720KI76+I32GPbwrDDa8r/gBe/iwxdczHwujv/GpMOqZ
5cK8T4vPt76K2NM3+j2+n6nn5fmSwoiPPwrjNj8L8/tYkfj4q/iF+LhK/OT3
sYR5XnWLz5fWCPN8SWH4pw0tPt/aKAx92iQMfdwqfeP3K1p8PtOp1eiYb+dW
v5/s/2HEm67C6Cf8Pwx+dtf9uB+i1ceHHsI8L0LXg187tfp42UsY+cPOrd4e
egujX7SLMC7bVRj9392E0T/dXRj7F/q0mnyQ7+8hzPxFmN/baPX9hv6tvp+7
pzD8xYBWX58PFJ3vmwojPxwcuX6IMOq9obof+DhMGPF5eKs/n3eEMOLHSGHo
yyhdj3gxutXXV2OEUX+MFUb+PK7V55/jW339NUHPz++Vtvp4O6nV96snt0by
r1afT0xp9fo8TRj6NK3V+9vpokMfZ0T0caYwro/TeO5XFZ3nh0t/cX5oouiI
R0nCuD5ZGPaeIgx9TBWGPqUJQx/SI/aQod9HPZopjHiWpfH4k93q4+MsYehz
TPPF9YHo8Kc5whiX1+r9Wb4whhW0+vxrtjD2d89p9flYoTDymaJWXx8UCyO/
mSv9QT93njD+zhfm+8DCqM8XSD+Rz5UKIx8pbfXxrly/z+/JC8MfVmg88p0q
8QP7O6s0HvpXLYz4WaPx8Ge1oiO/rGv1+XK9xiM+NggzP474wyZhyKNZGP6o
RfJFvd4qzPeVI/q7tzDkuY/ux/xaGPLcT+PZnxPmfmJhxLcDheGPDhKGnA4W
hj85RPqP93sOFUY9c5gw4uHhkeuPEEY+daSen+9LC0MfjtZ4nt8mOvzZsZIH
9OlY0fH7x0uefL+61edrC6VPfN+61edXJwqj/v5/mOuPrT5fOVkYbv8U6Tv8
2anC8GenCSP/Pl0Y8fEMYfijM4Xhj86KxLezRUcefY4w4tu5Gs/z7oXhD8+P
xNcLhKFPF4p/yCcvavX14MXC+P1LJB/4w0slH/jDyyL5weUaD3+8SHTM/wrR
YU9XRuLB4kg8uErXcz+W6DyfRhj2vEQYv3NtxJ9fJ4z5X99q9Qrmf4Pw/wGY
ZP/j
"]]},
{RGBColor[0.6, 0.24, 0.4428931686004542], LineBox[CompressedData["
1:eJxdXWWAXdXVjeIaIAQSQtxlNDPJZPLuuM+8ee+NKy6FIgWKu0txKe7uUEop
MNNS3K1AcQ/uECTwMWvdrPWd8CeceVfO2XutbUfu5G33SO0wYtiwYZ9sNGzY
0L9bjGrdYP7t9yV+OnTXe/c5c+bgUOuiLx5OfDQje60bJ1w/kN97T816I55P
FL3ZdMq5f/x8oHP7of97KfHtyhf2/2jGbwPnlJ2024c/v5LYY8xRg49dNmpw
GP57K5F596oL/jNprcEd8d87ibcP3PTmqrfXHrx1751P/+zgdxP8d+3BbTdq
X3znIx8kZg69rnPNwccvq7jrm5XLE/jzfiMHd//w5+u+eu6jRC7+WznA53+a
+P3mRH7vlwNDd21f9EX8vKcHDkDHv0yc+u/vZnWf+k6idr0Rc48b+1U8nu8T
vw/i955+nbj6997duveIqHidl67Ys/jbBF7TsGaE197/XeLSLRe+Pm2NdaKh
0V331feJZ6e8+uOhu64Tff1cw+9d/iHx5/sv+f2KtaL3nxn6YUWCchkdcdw/
xe8dHj2639CFPyeqIYAfEuV44M+xfN5LcLy/JPC4aQ8NUF6/xuP9YoBy+zXx
4v5DI/glHv+wiH8fMcj+DotWpIceuMZg6u6Jx3zSPDziv2sN4udLhkdD2qm4
a61BynlENHVoOPeuOUg5jYgo51GDpf1DIxoRUZ4jBg9JDCFgZLRK/kOjeuWp
kdHDdQUnlPT/MMB+jYoeGHrMvz8aeHDS0J2j4vtfGjhvSNyPjYr49xdjuY6O
2x8lKL/R0ZAW1nnpq8QQ+q55aHT0OxjHjWr9JbH176O4e+IaEXE6LBo/dPsR
a0S8blQE9b+5RoTh3r1GdO1DQx1bM1qlH45/zejKocdfsXZEea8ZXT70zwtr
x+NaK9oLQFg7qhz68/5r6X7qf624P2tExM3aEcS4/agIarx17Yj4GRZBPD+s
HYE2c3+OebNOtO/Q7Rt8lfh+SEzfrROt0j/xsW4EdexzR6z/dSMMr+7NWP/r
Sr7EyXpx+4cBjm896eeIs4cIuV58/4jBPw2pIbF+jPNRg5TD+sIL4bRBtIp/
1OsGEe3AmjF+NhBeyPsNI45jjRhPGwo//xqC2TcbCj9DvT9w042ioae+/8wv
A7x+I/UfcDtgowjiOu7jAb5no1hv/xsgHjcSfoDXDTeO2O/lic+HzMCSjaNV
/AaO2jaO2I+fE5TrxjFuhkXX/66lbU/bOMbDiIj2YtXzRsW42jjqxotGR9PX
+F2i646JNv9dq+l314zwz/QxwgnGUTomIq9j3PSMiSj3tSPYx4PGCE/Qw31j
ItqDtSj3/40RvvDcFWOEb9jlTTaJyLOREcS5YJNolX2hnjeJx/FrbIc2iYij
n2J7s+r3LxPU+yZRPRTyXoL82SS2Y8/F9mgTjvOqCwYOG3IL4zaNaP9eGCDO
No3ty3sDwPufN415+M0A/cim0VboyI8DwPctm0bn/3Xov5UDTz4x9N+mlOtJ
w+gfPthUeEF/Z28WAX7XjByEW6nYLL5/9CD0sN1mIX4P3ywiLtccBGzOd5v9
2oxyPHMN+p9fNougnvzRgxDX5mMjmLn1Rg3CzuSMVX84zrExX4cPks9jI/qR
Xwe+vGbI4IyN9fvTAMb99Nj4/V8NTMaDxsb6ep/Xr715jM8XB4DDqZtHq/wt
7dfmsX6eSXB8m8te4DVXbh7bn28SwNnA5hH94I8J8mXzGO8rEwcNEfCnzWP8
Dovw583GCf/0Z+OEf/JlnPBI3o2LVvlHmLGbxsX2eM0Yp26z325DjzO3iPG1
ZjT0+rPLtohW+Ut0u2+L6NchcWWPinm1hfoHuZ2zhfDO524R29PfEsTTFhHj
iJ8StDdbxuP4KgGxZW0Z3/c+r6/fMmrEDS8nYC932jJivHF/grjbMrp4iFYF
jw4Afw9uGdu75bE93jLG/9exPx4vfwj8bTk+5s/PA88PiXfx+Ig4+W0AdnWP
8cITcT0+wvBeGTmI9/59fATajRpN/D07XviH//l6fES/OnqQcpig9mwYrgm6
nnidIPsPnJ88IcKfx4wk366bEMcHwwfJqwkRnzOM/uCtCfIvkNLWW4nf4EG0
Vez3vhig/dtKeKd92Ep4pz63Et7Bw79tJftD/mwVj+ftWJ8TI8rx61ifE2N7
+0MCYmucGPv/X+I4baL8McKHYybG/Izt5eMThbcLh9z58onCI+OTrYV/8nPr
6NOhx3yyRmzXt477vyb1dPTWij/A2su3lv+gndha/CI/t47jjxER+bl17A+G
x3ZokvANPW4xSfEEzMnSSZIH1Fo7SfEU7HX7pHgcb8f4nhTbv0cS6P6+k2J8
/GMAfDxqkvwt7MF5k+J+vj9AnkyK7eE3A/TbkyLatRWxvZsUEWe/DNDeTorl
9Vts/ybFfBk+CP/+yyTZV/R/ncnCP94/bnL8vFGDtGuTFV+ARzVuQ21tvh68
28HPox2YLLwnoZDJEeOk4bz+qsnyR7j+zsnCN65/YHLEfn43gPjhmcmx//ly
ADx+a3K0Bh9If/fF5NjevM545pfJcV4xMAD8rTslxue/aW9mTontx+uxfqdE
jLu/TIAHtVNiO/1dgv9OifD4i35MgKc7T5G9h/348xTFy8TnlBhPI+iXrp4S
42ck7eSdUyKo+8dVcfwU8QG4enZKHAfH9vrNKTGuR8c48PUcr59HuU0V/smb
qYpnEB8VTRVfOe6pit843qlx3L0ixvNU+qH53zKe3ndq7Ie+SKD/R06N/eGH
vP6aqZIv8TxV+gD+H5gaxzdvDRBXUxVv0/5NlT+nfqcKD4yXpooP1O+0aFW+
BjVsNU32n+OdJnvL8U5TPsfxTlP8g/fuOE3xCfHsNv450teDZ6dPixg3jYzj
92lxnjJiEOb05mnCP7p977Q43h82SLs7LVqV35NHHg8u+3BazJcVA3jN96ve
/+0AeDFquvhBfzFd/hPyz5sey/sJ8qtsuvwveTdd/pnxwXT5b8h59+kR6xJf
ML45cLriIfT/xOnyD+j/X6fLfpLv0xUv099OF1/gLx6cLr7Abj4/XXhFnePt
6dGqPBh25/PpygfhZ1dOV/zO/GGG+ID+z5+h38GXpTP0POJhhvwD8TBD/ov2
bYb4QvzPiJgnr0zQns+I+fZTAng+Y0Ycl33PusOlM2J7/3WCeJgRx12fMf6/
b4byA/rLGcq/iIcZsX2/jfZn+YzYvj4wAD1+PyOOH14bYBwzM8bHBwPMn2ZG
q+pJxMPMWD7f8/rymYqncVlqJu3EzyvJx/6Zcb46LI5vZiqegvwPmRkxDhsx
SJzOFP7p92aKH/D/186UfyAvZ4qPxPFM+SviYab4w+tmyr+RRzMVP9E+uP/E
wyzFh8DhvFniE+3DLPGHeJgl/0I8zFJ9AHraYVa0qv5F+zArtsfXxHiYJf0x
/50VraqPEQezGLdM+STGwyzFz7QPs+R/aB9myR7j7y/Pkr1mPDVL/CIeZolf
6M/I2cIz7cxsxfvEw+zoaaSfI+P8erb4QfvgNu3D7NiejCS/dp8d+peDZsdx
24hYzrOVTwBH58+O60+/sf/XzlY8STzMVj5N+zBbfELY+/zs2B59wzro27PF
J9qH2bJftA+r3vdqgniYo/iM/nGO4jPiYU6Mn7djPMyJ5fcp8/P2ObG9/Jr1
n53mxPHRd4yv952jeIbxwJw4D/uZ/u6MOcrPgefL5gi/xMOckF/3zZH/on2Y
Iz6gPy/PEf9oH+aoHkU8+HriYW4cpw+P60tzY/88bJB4mKv8g/ZhbsS6xE+s
N6Tnyn6gn/1z4/d/Q3+9x6r7vxjAcw+dKz6hXyfNFZ9YP5gr/4T+Xzs3jq/O
Jp7vmqt8hXiYq3ib9mGu6lOMD+cqPqF9mCt/RfswV3hi/DBP9pv+Yp7wSH8x
T/k88TBP/op4mBetqm8zfpgnf0J/MU/8YLw0T/Eg8eDfYW8v9fPQn5vmxf51
OOup980Tv4mHeXE99TfmIy/PU3xKPHh8xMO8iHH597RXI+dLPsTDfMXDrNvM
j0Cvj95gPat8vuJp4mG++EM8zFf+yfx7foy3d2M8zFf9EfWBk+fL/hIP8+O6
8reMf66Zr3yf8cP8mA8/DhAP85UPMX+fH3G+4tc4X5iv/Ih4mK/8A/35db7i
McZ5C8QPxpML5G+YLywQX5kvLFB9inhYIH4zX1gg/jPuWqD4lf5igewH7NuZ
C2Rf0K9bFsh/s1676n3vkE+PL4jrvc+x3vu/Bcr3GT8ukL2j/hfIHmKcoxcq
/mD9c2HsTz7l9YsWyh9xHAtV/6L+F8b+72fOO22zMObLSvq3Py5U/ET9LxSf
WB9ZKHxTbgvFL9oDt2kPFsq/wCz9Z6H8G+3BwtgfDI/jCr+P+cTCWD7D4vmJ
hTHef2W8OjpL8yHA2+ZZGi+u3ypL/gd2aEaW5EX7kSV5Qp+5WXE96H8J+Nmi
LOmD/jZL8xEYb3WW9AleJ7OUL8ENt2XF9ZTlrIf1ZwkfsCM7Z6leRnucJXzB
LOybpfgH4zkkS/iEGI/Okv2HmM/OEp8A+wuzhH/GEVniE4Z5vdt47+1Z4h/8
xj+ylO+A14NZitdYV8xSvAb8P50l/wO9/DdL/gd4eiNL9XDKPUv5I/TyaZb8
N3j1bZbiY9Rdfs6SP0I8MTxb/gj9H5Mtf4T3bpGt/BbXT86OWBddnkDeOTtb
/of1s2zZV9Y5s2V/YV+KsxXfYdwV2eITYN+QLXuO9CuTLXuPx3Zlyx+gP9tk
h/5ql2zFX4hL93Kb9cJs1cPAq8PcRhh2rJ9Pe50t/qA/Z2WLP+jPBdmKTzlP
nS3/g+uuW/X8HxIYx63Zqi/ALv09W/Ew9DqQHccvn5BvD2WLX4DZE9niF+57
IVv8At9ezdb8Cnj7Trbid/Tno2zVj9CfL7PDeuoP2TE+PmG97bds4Yv2Ikf4
4305EdR37vcD4M3EHOEX9nZ6jvwVw4kc4R9yy82RP6HdyVE9A/IsyRF/YDdr
fD3EkvTzgLe2HM0Hgja9OeIX89sc+VPoYfcc8Yt6yJE/hjwPypF9YT0kR/Ee
5HlCjuwT5HlajuJpyPPcHMUHGN4lOaoPsV85qk+ABzflKJ9i/SxH8R/k888c
1Z9YR8pRvQL9eTRH9VvWE3PifOzbOJ/KER6pxxzV+zhfliM8oz+f5YiPgMc3
Ocq/IJ+fc5TfoD8jcuX/YDfXytX8KOPmXPGJ9iRX9Wjak1zxC/3PypV/gjwL
cpUvof+JXNVjIKfKXPlv+KeGXNUjIM9MrvIn2pNcxdOAzba5mh/Ac3fJlT5o
h3KlL8Bi/1zFg7QnuZrPhF08Nlf+DP05JVf2mPFPbsyXT5mPXZCr+JD1/lzV
x8HLG3Lj+cXvOV96R27EefsVsb/JFf+A43/lCv8Y9qO58new18/kij+Mp3MV
z0Gf7/h6xte54hfrtn4+7l+RK35BSr/lKp4Fj9fIi/OjOP7bJE/jAw0n5kke
rOfkyT7RfuTJfsEe5+XJvsHvlOfF73swrm/nqd6HfzN5sqfwh115srcY77Z5
Wk8BWv0hT/4M490rT/4McjogL85/VjAfOzxP84WIT47PE34h79Pywnr6uXnC
P+KTi/Lk7wCTq/PEL+ZHbtM+5IV8/Gee6nWwC//2+4HnR/NUr2T9PU/xHvD8
sscH/b2ZJ/tB2OZpPQ3i3c/zYn/0eQLD+i5PfOJ8eJ74xPwrX/kt9Z/PdRMb
3c3+j8+XPqGPKfniD+OwfPGHdjdf8Q54X5gv/tA+5AtftA/5wh/+rc/XehHa
h3zlK+hPV77w/MuQWds2X/Ejhr1rvurX6M9ebjPeyBc/0J/DfD/6c2w+5+kO
/Cle/+b3oT9nuX+MN/IV39I+5Mtf0Q7mx/ndV/SPt+bLXzHPz1e9nPP7+cpX
YVYfyld9Fa95Mj/2F88OEOf5yrcYb+SLb8DNu/kxvl7i/OHH+fJf6M+X+bH9
/ID5+4p85RO0F/mKh2gvFsXx5TcJrqdYpPU4kOfWi+S/mJ8skv+CfuctEh9o
LxaJf8S92+BL6SLlc4w3/Dv40uznQZ7tixS/ov99ixT/od87LlK8y3hjkeox
kOc+i8Qv1hMXyX9Dv0cukn9Hf05YFPP5Y8rztEVavwF5nrdI8SH93qK4vvNU
bE8WqX7L+tsixSOcL18k/wUY3LtI+QLnsxZp/pa8XqR4kfZkkebr4WdfXhSu
Z3hrkeZzgKsPF8mfoe76+SLhnfZkUZi/rVwkfoD2owrk71jfcpv1jAJdDzs+
rUDPY328QPEr4ujcAtkHjLOoQPU+8L+0IFq1PpT5awHjmMs+I/+bC8QvxiEF
4hf41lcgfhEfBbJ30MvuBYrfiY8C1Z9w28EFsX15gXw7qkD1KujtxALVg2EO
Ti+QfyM+CrReC/q4tEDxEfRxTYHwCH3cXCC8And3Fcjf4TH3FgjvtLsF8i+s
1xSIj+jXcwWqN2J93f8K5J9gx9729Rjn8gLxC37iywL5V/z5hwL5L+jl1wLF
g8xXCmUvcNvYQtkT4H5iofwX441C5be0H4XyX7BLeYWKJ1jfKJT9Iz4KpT+u
nyiMVq2/JQ8KlQ+wflYYr+N9O55/KlT9GPrYqVDxEPSyR6HwRztaKH5xfqpQ
+RlgeUyh8Mx8tlD5DtzCmYWKH+lfCsUP8PDyQtX3mc8Wyj/Sv/h+6OPvhYr3
mM8Wil/0L+4P7OGT7i/z2UL5L9jDVwtlT+hfLA/g/ePCMB74yvKkfynUemH6
l0Ktv6J/WSx/hvdsvljxPfPZxbE9fov50YzFim9Y/1os/8X5hMWqJ7N+ulj8
Qv2obLH4BTnXLRY+4SdSi+N4aAXrLx2LhW/4oW0Wi2+YT9rZbeJjsfIjrtdw
m3HX4tBfHuvnk2eL5a+YnyxWvsj8ZHEE3t7zHf3T5YsVH8MOXbdY/hv+4LbF
8l/Qx92LNR9IfCyWvcJ7Hl4sewbYPLVY9g52/L+LZQ/hD15fLL7Bzr6/WPUs
4OzTxdI//P+3ixVPots/LxZ+0K8RS+TPuJ5yieInxGlbLpE/gL2avET+DHqf
vUT4ZnluifwbxFuwRPxjXXeJ+ILHVLrNcS4Rf2B3M34+xtXt94OH27t/wOVu
S1S/Qdy49xL5K/i3g5ZoPQrna5bIv8N+nbhE/p958BLZL5id85ZI3nBHly6R
PqC3a5eIT8DnLUuUT7O+vUT84vzfEuEBfufBJYp3aJeXCE+cH12ifI3x6BLV
q6HPd5aIb8TVEuEX/fhqifBNe7FE+Gf9a4n4gevWLBJ/mL8U6XeuRykSf6GW
GUXyn9Dn/CLxnbgoUv9oL4oU/9FeFKm+yny2SP4cckoVyR5x3UJRvD7wXdYj
tynS/AfGv0uR8i90a8+i1eoZRarP46+HFSk+AY6OLdJ6PtjZU4s0PwN+nlMk
/8V8tkh8Aj+vKlL9HnXyG4qUr0GedxTJ/gOH/yxS/gb/+u8i5TuIox4p0nop
2P9ni5QfMZ91G+N+o0j8Ie2LxB/Wu4rkj6Cf74o0P8V81v2DfkYuVf8Bu3WX
Kh/Fv1st1Xp2+smlql+wnrFU8x/oZ85SxeOMP5eqHs966FLVe+lnlopPrIcu
lf1E/N2+VPUO6Kl/qdZzcv5kqephnL9cKj7RfyyV/yJulgqv9B9LxSf6j6XC
O+R21lLFY/QfS8UP+PMr/DvjC7fxz21+Hv2H24D9oN8PfD60VPV15q9LZQ8g
xheXyj9RT0vFL4QV7y0Vv/DnT5aq3sr10UsVD3J97VLlW8DniGLlW4ibNixW
fYP+o1j2EtdPKRafmBcUK37hfoFi+SfahWLNJ3O3VrHwhniguljxEvTZVCz7
D362FiteRB7bWyx+sT5eLPwzX3Wb+Uix+Md81W3mI8XiC/1HsfgCfp5eHNf3
v2J8dp77y3zE42G+Wqx8ivlIseqBzOuK5c/pP1b9/kq8vt7yZrxZrHot85hi
5cOMN4tj//V4XM8oFr8YbxZrPoz+o1j5N/fXFItfuG7YMsWHjDeXCW/o5hbL
hE+Ib9Iy4Rc4nLksXh/7bbyfa5nq25yvXiZ/Qhy6zXVoy8QPmIt63896l5+P
8XctU36E8W+3TP6I82vLZB84v+bxQJ/7LxN/uL9kmfwTcbtM/ol2ZJnkifGc
s0zxHuzgxcuUX4H3Vy2TPaRcl8leIr67c5n8FedLlgkPjHOWCS8Q12PLZJ8h
h2eXaT6H/mNZyLe3lsl/sX6xTPjFeL5YJr5x/cEy4Z3rs5aJD9DP6IT4iF5u
4DbrFwndz/pWQv4GuJ2fUHzK/DQRzicUJcQfrodNhPWb2oTmq1jfSqg+Ab13
JOSfuN4hofyJ6z0Syp8YTyQUTwBn+ye03wj25tCE8mfOjyQU/5GHCcV/nG9N
iE/Q64UJ+SuEO1cmhD/iISH7jjj1joT8F/GQEL5ZH0/In7E+7jbjCbeh55cS
4gvx4Dbx4Ou5/iKh/Ih4cH+4HichPjH/iDQexEfrRuIT9ydGsjecr4/EH9B9
bCT+cP4+UrwAf7hVJHsHuU6OpD/oaXok/UIvsyPF+7huXqT4BfYqK1L8h3Hm
RcIX5+si4Y/1kkj4ZP4TKR8hPiPhGfKqjFTvYD02Ev4ht8ZIfMNzmiPxBY9t
8e/Es+9HPtEdib+Uo/uDP28XKX4FnneOZB/Amz9E8kfQ6x6R/DfqyH+yvMgL
yxP258BI/onrhSLF35xvtr5Yz4lkD2GH/hIpvsd7zohkX5E3nRMpfsH4/xqJ
T6hfXBSJT1y/bfzBP14ZCZ+g7bWR5n8w/hsi+S/w4dZIeAfu7ojEN+jhLrdh
f+5xG+O5388jPyP5H/jlB90f/P3RSPVMyOlJj4f8jVRvoL+PVN/jfGek+Jhm
L5I9Qvz2ZiR7BTy8Gym+g1o+jGTvuO4nUv7Lenak9evg69eR5lMw7u8j1SeA
h5+MF/yz0vyC3oaXiF/cRl0iPMK/rF8ivOI1G5cIzxj/piXiF3lYIn5Bn+Pd
Bj+3LhE/4HWnug0czPTzoc85JeI39xOXyH8yni1Rfgg3nl8i/mBYi0s0Xuiz
uETywDhLSiQvjKe8RPyBmqpLFN8x3ilRvMB4uET8AT/TJfJP6FZbifSN+lxX
ifAAffaWhPZ32xLFN6znl6hewX6VCI9cH1gifiFu3qtE9UL0Y9+SEN8HlAj/
gPnBJfIfkNPhboN3R5eIP9DTcb4f9vekEvEX8ji1RP4S8jjT/cO/57j/XK9a
Ij7Bn1/s8SOfubxEfAIsrirR/B/qE9eXKF/ifHaJ/BXweluJ/BX0e2eJ9oNA
LXeXyD5CbPeWyF8xHyzR/BXXS5Yov2J9sUT2GWJ6vETzMxjPU+YX/NHzJfJf
KKP+1/zi/IXxDv/6eonyF67HND8olxLFj/BTH5mPTBN8Pddn+XmsX/r9kNuK
EtXvYAd/sT2AG/jN/IJ+R5Yq3oN+1ygVvyCXDUsV76Fbm5SG+2/Glsb62Zl8
37JU9g/jmliq/Ak4nFKq+WDwYkap6hPAw5xS7RdBN+aXKv6Dvcsulb2G384r
VTwEXBaWav6G69dLhV/mx6XiF8xWWan4RTtcKvyjn3Wl4Xq8JrdZn/f9wHWr
28BDZ6n8EepfPaWqV4Lv25SKTwh/diiVPwa+dy6Vv8a4dyuVvQHf9ywVnzCe
P5XK/wMP+5eqvgcxHGR9QL+HlaoeAf0eZX1Cj8eWKp/ifGKp/BX+/pdS2V/g
9PRS1YcB27ONL+QH55UKf7DnF5XK/gOnl5UKrzx/oFR45n6ZUvGL659KxQd0
8xa3ge87SsP6wV2+H2bgnlLxh/GG38d4w/1jvFGq+gvzg1Lli8Ddk6WyJ4w3
SsP1SS+UKv+kWzG/GG+Uan4Q/vbNUsXj8Frvlsr+gUYfWp/A28fWN+zX5+Yb
+vF1qfID3Ped+cZ5CPMNcltZKnsOvzm8TP4M/65RJvxCn+uXiV8Y10Zl4gP3
15eJD9SD2/h3gtvo19ZuQ59T/XzG8WXiE8dZJnsAKS8oE59gt3LKNB7kR4vK
5J9gNpaUiU/wR8Vl4hNgX1Im/8R4o0zyZ72tTHyCPuvLFG/gtcky+SvuHyiT
v0L328qEB9qPMvkr4LO3THjCv9uWiV94zQ5lYfy0S5nwyvUEZcIz7MieZYrH
gLt9ysQH6tVtiP1gt1nPKROfuN/LvzPeKBOfoJ+TykJ/dKr7x/1AZfK/nD8o
E58gj/PLZF84n1AmPsGeXmb5wZ5eVRbGg9eWyZ7Bnt5YJnsHe3prmfwX5x/K
FN9D73eXqf4Huf+zTP4L8dNAmerBGM+/jS/6oTLZc4znsTL5M/DkKfOL9Sfz
C/b0ReMdcdwrZeH88mvmC+KFt9xmvuLruT/Gbda3/XzWpcrkT+EfvilT/RJy
/75M8R/k/JPHw3pGmdZ3wU4OL1c+iuvXKVc8DXxvUC77BXyPKdf8Ls+TKVf+
y3pGufiEv29VLvuJ8U8qV/0PfJ1WrnwbfJ1VLn5xfUe56oGwk1nlyj+4Hqhc
/IJ4CsrFJ87PlCs+xDiWlYtfwENpufgBfFe6zfUhvp7jLhd/uJ7Iz2e9tlx8
4vxOufhEObu/CBv6y2UvWM8oF58g1p3KxSfkO38oF5+gxj+Wy16hX3uXK7/C
ePYrF5/gHw8olz3kfpty5Vvg6xHWN3lfrnwLuDihXPyCHk8uF7+4v7hc/EI8
eFa57Dvno8tl/7nPt1z4Bb4vKRe+oZ/L3UZ8f3W5+AC+Xl+ueBL6uclt5ivl
Yf72N/8O/dzt5wM395bLX6G+MFAu/kM/D3g8PC6xXP4Z43m8PKyfP10u/wW+
Pl+u/Ap6/W+57BdhXy7/hXjhjXLZP+4XKZf/wnM/MN+4ntN4gH4/M16g36+M
J9z3rfHG+RHjked5lCuegn5+M345v1ohfOO9a1aIf8D3RhXiB+fj3UbcunlF
6I/GV4TrX7f285DvTfX7gO8ZFeoPxj+nQv3H+OdXhOfpZVdo/Jzfr1A+ini4
sEL2idO3FcqvwJOoQvUj5isV4hPj8ArxieuHKlS/gD1trBCfgO9UhewthtVa
IT5xfVFFFJwX2VMh+818pUL2netLKmT/Wf+vkL+CPnerEH/Q7z0rxAf0ax//
DvvzZ7fhJw9ym+ulK0K+HlkhPnP+wG2uj60QvzCeUypkDzCe0yvkjzGeszx+
iO08ywvjvrBC8SAuu7RC8TXi2ysrFC+gPnxthfgE/dxQIf8FvN1SofgeeLvD
+of9ucv4AG7uqVC+xf3QFZqfQbzwrwrFSxjPfyrC/OuRCvEL+nmiQvUN7g8y
/rmexvzgfIf5w/tW48+b/p3zpf6dNKqQv8LtH/n9MGufmV+cT3V/4R++83ho
PyoUD0MMv1TIn0M/wyrFN9ifUZWyVzRwleIXeVUpfsHqbVIp+0j7USl/hTxs
fKX4BXu1daXwAvs7tVL5FdcLVspfwZ/MqRT+WB+tlP1HPp1dKfyyPlopfuG1
hW5zvVCl+AEcR27TfrgNfFa7Tbvl5wFHTZXiE+ujleI7z7+sFJ9gRzo9Hq4n
qBSfIO5tK+Wf8O+OlcpHub+qUv4J+N69Unzi/HKl7B39UKX4xPnmSvEJ+D64
UnyCfg6rVD6A8RxVKX8FOR9XKfxgfcaJlbLnXN9UqXgQ9Z8zKoVP1kcrhWfm
K5XiE/R7caX4AHlcXim+EGdugwbXuY18/Cbfz/W2fj5x6PczX3H/oMd7K5Vf
AZcDleIT5PGAx8v1M5XyX/QTlhfXY1aG65mfrVR8gH6+WKl4EHHiK5Xh/sbX
K1XfhV142/xC/fq9StlX6Hd5peJB7m+ulP/ifLvxhud+YzxiPN+vhtefKsN6
wa+V4Xq6EVXCP/CwTpX4wrpGlfwT9DSmSvwB38f6fp6v5zbnX6vEJ86/Vsm/
Qo7TqtR/2vkqjQ/4nlel8XO/dZX8E/LxvCrxifOvVeIT51+rxCfOv1aJT5x/
rRKfmK9UiU/Ad22V+ITwprFK+RX8a3OV/BPsV0uV8MX51yrxCe/prhJeeZ5G
lfAM/7p9lfwH16u5jef+oUp84f7/KvEF9vhPbhOHvh/jOLAqXK94SJXiP/jX
I6rknyCuY6rEJ9Dv+Crlj3jOyVXyT5DzaVWyL9DPWZYX3nOu5cl8xfKGfi6p
Ep+43rpK/orro6rCeuD1VeIT85Uq8Qnjvq1K9pf7B6tkn7m+znhjvmI84s+D
xivG8UCV+MN8xXiHv3zc/MB4nvbvnF/x71zfbb4BBq9UhfNnb7jN/SJ+HvD2
vvsD/SyvEv95WZXyK86vVMk/I9/4xvwCLFdUhfbnlyr5f+4nsLw5v1It+8b9
SNWyfxj/htWyl5xfqVZ8QvtRLXvL+ZVq2WPOr1QLX+DN5OqwHji9WvjEbbOr
hV+uK6sWvpHnZVeLD6iX5FWH658K3Qatl7pN+1Ed8q3Mv8MuVfl9tB/V4jfi
hUb3F/OHqdXG0+LxYr6so1p8gt3qqRaf8N5tqsP9wNtXi0/A987VYbywW7Xs
H9e/Vqv+xPmV6nC+/8/V0j/zlWrxCf7osGrxCfHCkdXiE/RwbLXyK86vVItP
eO8p1WE98PRq+Qvg9Oxq4Z3zK9XyRwi4LnSb6yndhpyuqBa/qJdq8YnrOarF
H57H4zb3m7u/zFeqw/rmPdXiE8ZzX7XiYaSv/7J8uD6zOlyf/mi16u1cr2n5
kxfmE+zpC9Wyj6jvvVyt+hT3A5hfXMdqfuG+d6uVXxGmxhf493G17DvPW6uW
/+L8SrX8F3lgvKMu9KP5gPGsdBv9GFYj/oAWa7uN+Yj1a+SfOL9SE/rHTWv0
fox/XI34xOOaa9Rfzq/UyB9j/FNrNF7uV6hR/kS/USP/xPmVGtXTOb9SI/lD
n/k1mq9iXlQjPnF+pUb65PxKjeIV9LuiRnjg/EqN8AK+1teo/sX1HDXiE+dX
aoRPrueoEZ943kON8Mz5lRrxiec/1ITx3I414gvzFbeZr/h6ng9QE87v7uvn
w2zsXyM+cz2H+we/frj7D/0e7fFxfqVGfMJ4TqpR/sn1HDWq/3F+pUZ84vra
Gvkn6PX8GvGJ+UqN6n/A9+U1speMM2oU/zNfqQn3r95UE9rj22oUD3I9R434
xHjD+OR+45qwfj1ovLM+aj7AHj9cIz6h3vK4+YNhPeXfuQ+kJqxP/Ne/Q7+v
1Ii/jDfcH/ind8wv6O2DmvD8xI88XujhsxrZF/iBL2tkf1jfqAnnq1aYX6xv
WP6MW2qlH8hjZK30B36sV6t4kPXRWvGJ9dFaxTesb9TKXgNP42tlz7m/vlZ4
JG5rhVfWN2rFJ35foTbMd+bXhvzIrhV/gKM8t3HZYl+P/LfYzwM/Ir8PcVR5
rfgEu1Lt/sIO1dWqfs59rLVhvpiulX3hfGyt+IP8r7NW9on1jVrVW3keRK3y
Kchlx1rZP6xv2bVW9hHd2L1W+uV66Vr5J9qLWq23oBxqhR/WN2oVD2EYh9eK
T+DdUbXiE+1FrfCLfp1UK3zTjtSuNh9bK35BLue4DbGcX7va/q7a1dZzuM35
WD+f87G14XkuN9aKT5DjrbWqZ8K/31krf4X61d21iofx93/Wik+4b8Dy5Pnq
tYoHwJOHalX/g34eq1X8h3z2qVr5K9Tjnq2Vv0I/X6xVPgX1vGJ+wb+/bjzx
fG/jDXh9z3jEeJbXKh8hbmqVr3A+1nzjfKzxD/59b35wPrZW8R7PS6gN1x8N
r9P1XD9aF/J1/Tq9D/3YuC6sT2xaJ/sAfI6rC+sTE+o0ftZH65Q/wf5MrVP8
DD3NrFP+BPs9ty5cr7SwTvaN8Uad9IXxL6oL56eW1Mk/8by5Ovknxht14hPt
R53sNdeP1oX5fH2d+IReNNUJr7DC6TrhGbxtq5O/YrxRJ//CeMNtxhtu4zk7
1ok/iKd3rRN/GG/4+Yw36hT/cf2o+4tuHVAnPuG5B9eJT1w/Wqf4D/o5qk7+
G/g83vLDfSfVhfXVU+vC9S1n1sk/sT5q/cHvnG/9Qh4X1yk+wTguq5P95XXG
D/cH1in+YbxRF66Pu9X4hJ7+Vheur7vb+Ob60Tr5D56HYz7wvJM6+SPQ/uE6
+Svg5DG3uX7U90NOz7nN9Rx+H+MN94/1Ufef60frZC8QP71Xp/gXal9uvuHv
n9bJHsGsfFkne4XxfFMne4Y//1Ane0f7YX6Bl7/WyV7yfLd6+S++tz7Mrzas
F34wzjH18lfkSb3wCH1uUS8+8bzRevEJ+J5cLz5wf4rb0Ocst2Gn5tUrvkN9
J6te/OL5pPXiE+sbbnO/VL34hH4m6sUn1jfcf9SXKz0+0Ki2XnxifdTygB1O
1YtP8I8t9eITht1RL3nzezf1iifg5/rrpS/Y0e3rpU+eB1GveIX7/+vFJ54P
US8+cX9KveJBjGe/esWD+PuB9cIj+HpovfDK/Sn1wjP3A9fLP3E9R734AzGd
4jbwfbrb3O9VH+ZL57nN+kZ9uH7iEr8f8riyXv4K8c817j/3m9fLXoCvN3v8
nI+tD+fL77L8wNd/1IfzVfdZ/jxvz/qBfh+sF58wzkesX/D1CfOJ5/GZT5yP
rVc+Dv/yUr3iH4zrVeOP+9uNT+D1XeOXn8M0v1jfqJc/YX3DfGJ9w/zheUxu
I6760ddjnCvrw/NYhjeozXijQe/nfpUG5U+4fuMG+SfuV2kI18+Oa5A8gIcJ
DeIT13M0SJ6MNxokb6hhZoP4xHijQfrC+Bc0SJ/AVU6D7Cf6saghxMPiBvEJ
fF/WIP/EfdENof0ub1A+D5zVNAivGEd9g/wT8JBsEL6x3inTIPzDb7Y3hPX2
rgbxid8vcBt42K4hjB93dJty9fshl93dP+5XaRCfeL6yx8f9Kh4/4uFDGsQn
no9o+THeaBCfeF6i5Q9cnNSg/ApqPbUh/P7EmQ3Kj6GmcxtkT5G/nd8Q7q+7
uEH5AuqzlxtfXP/VoHiQ5xAYnzwvrUH+iuu/3GZ9w/hmvNEgfvC8LPMB+exg
Qzif+58G8Qv262G3uf6rQXzlfEqD/BXrG+4P6xsNsgd0Sw2yF6xvePz8vkSD
/BXnU8wv4Gh5g+Jr6PezhvA8/C8bFP8hf/u2IdwPvKJB8R/lav2jn781KD/g
fEqj+EX70RjmFxs2Cn+cT2kUXuHPxjYKzzx/oVF84vlOjeIPz2Nwm+eBNYo/
PJ/WvwPH8xvFH+rJ7+N+2MZwv2Fho/I9rv9qlD3gfEqj/C/PiWwUn4DvqkbN
N3A+pVHy4nxKo/IpxGupRskb/7Y0Sh+gYWej6hNc/9WoeB7w36ZRfOL3YBpV
n+B+lUbZY+Bkt0bFPzzHtFF443xKo/DI82YahVeeJ+E296s0ik9c/9Uo/nC/
SqP4g3z+xMYwXzrFv3M+xb+Dr2f5+VDzXxvFJ+D7okb5T36vwv2HnK5slL/C
bdd6/JxPsXz4naBG2SOuN7d8wfe/N8pfwZ7/s1F8gn7vt/643tz65Tq7RuVT
3K9ifEAeTzbKHsOeP2t8Qb8vGn88v9H4hBxfa5T9Z32jUfEgz08xv7g/tjH0
T580hvPBX7iN+OubxnB93/fmF/T702r8/bUxXD81vEn8wjhGN8k+QH4bNCne
g/0f06R8ifOvTfL3XL/RpHof1280heuZJzcpnuD6jSbxCeOa1SQ+cf1Gk+wn
1280yb4yP2mS/eX6jSbhCe8pahLeYLWXNck/cf1GU7g+qbJJ+Ob+ebeBh4Ym
+RPun28K+ZFpEn+4fsNtnj/m+8H3/qbV1m+4PxjPTk3iE/OTJtVbAKs9mmQv
mJ80qV7D/KQp/P7HgU2Kl5mfNCn+w3OObBKfkBce06T4gfaiSfEfzNUpTeIT
7UWT/BPnX40X6Pe8JvGJ9qJJ+Tn30zeJT7QXxiPtRdNq+UlTWP+7pUl45376
pvA8mbvc5n56t7m/rUn84f42t8Gbh5rEH9qLJvkrzNc92RTWI571eLi/zeOl
vbA8gPfXLC/EO2+ZX1zvZX7x/AzzC/HOJ01a70J70SR7iLu+Nr94vob5Bdr8
ZH4h3vnV/OL8a1L8Qr9GJsUvDGvNZJifrJ0Uf3jeV1J4x3vWS4brGzZIhvzY
KCl+cf2Yf4c8NvXz0d+xSfEHZm1cUvwBX7dIij/Ax3j3H2LaKqn4Dn5r66T8
EcYzOSn5cP1qUvLj9xuSki8/z5eU/Fl/Scr+YTxzktIfzzdLSr+w1wuS0j/i
wayk8AF85iQV32E9Tm5S+Tp4mp+UP4LeCpKy9+DN4qT4A/tRlBR/OJ+UFN5p
P/07188mxQ/8vdRt4Lncbci10vcjvqv2+yHn2qT4xP2BSfEJ42xMik/ARVNS
/onn+yXFJ/iHtOUFebQkZZ84351U/Af/1JHUfC/k0ZUUn1hfSobnVfQmFc+D
z/1J2Vf4y22Tiv+4viYpPmF95I7mE9frGY+cDzOfeH5KUvEe+rG78Q9/sYf5
gTBhL/MH+PhTMoz39vX1XK+TDOvlB/j5kMtBybB+foj7x/U85hf4ckRS+SHM
+DHmF+z1cZYP3ndCUv4I7zspqfgA4z7F+uB646T8Ec/3TsofARdnWN8w82cl
w/0+5xgvqAeel5R95vrkpPwP/MSFyXA9+sXmE/VoPKNee5nxDt5fYT4AT1f5
d+DmGv/O9QL+HeO53r/D7tyYDM+XuDkZ5k+3un/Qy+0eD+PcpOJZ4PEuy4Pr
o5Ph+vN/2B4hfr3X9or1Pdsz4GnA9o77L6xP/PuA+YM440HzB/p92PYWr3kk
GdbLHzOe4F+fMH/w96eSyj+4f8P+APbzOeMben/B+Md4XjRfUD99KRmud33F
16M+9qrbnJ9wG+N60+8DL94yn4HL990/6jkZni/2kccPPXxi/gBPn1l++PcL
yxd+6Cv7Ix57klR+hPj1W+uPx+7aPsLer0gqP0Ie9pPxAdz9Yn+EeOpX+yOe
79cs/OH+Ec3iE547qln45XnkzfI/8H9rNQvv4NfabsO+res2XrN+s/gCeWzo
32EfN/bzYe83cRv626xZ/AGONnd/gcdxzRof1582yx9xfrdZ8oHeJzZLfrA3
k5qVf8LeT2mW/4HapzXL3vE8kGbpD3qf2ax6Hs9Tbpb9RDw4t1l44Pl3zeF+
joXNyhdQr8luFt5Q/8lpFp8Qr+c3y97zPMVm4RdyKGyWf4A5XNIcxmtLm8Uf
1n+blR/x/BFfz+9LuM3vjTaLP5BHpd9HHrh/4GdNcxjv1Xl8KB81ePxcH2f5
8Hy/ZtUfkC+mm8Unzkc1Kx7gfp9m5UuIX9ubw/nczmb5J67nt/4xrl7jA3rv
b1Y9j/uDmsUvyGP7Zvkr2KsdmsP1OzuZT5DHLs3yT5DHH4x32PHdm0N/tIfb
wN1ebkMef2oO1+ft0xzGi/v5/ZDH/uYT6ocHmk+w3wc3K77D+vZDm+WfIKfD
m+WfEGcf3Sx/DntzbLPsFfh1vPnE/NV84vclm+WP4M//Yv0Cp6eaP+DX6c2y
t7zP+EE/zja+0O9zzR9+/7w5rD9c0Cx7D/t7ofkE+V1sfEN+lzaH6+sud5vn
O5pfwMnV5g/Efq2vB06u9/MRL9/g/mD+/aZm+U/El7c0q94AOd3WHM6v3dGs
fInfRzF/8Jy/Nytfgprvbla+xHzc+sDf77W+mJ83yz8hvhlsVvzBfS3Nivcg
j/80K/6Hfh8yfmC2HzG+mM8bf5DH4+YTz0c2foGDp4138PRZ8wHyeN5t2IUX
7Y8gj5eaw/OZXvb1sL//8/NZT/T7oeY33Ibe3nJ/8e87tg/A+3seP+Txge0L
5LHcfAJfPrZ9gjw+sf2CPD6zfQM+vrD9Az6+sn1EfPSN/RPe812z4jt08wfb
X8DqR+OL3+NsVr7EeKM53I/3q/EKMzosJTwDhyNS4hf3u6aEf7xnjZT4gT+v
5TbwtY6vB77Wcxv+bAM/H/HKRn4/7MfGKfUPdmCTlPiE+tFmqfD8tc1Tsi/Q
0xYpyQfxyviU7BOum5CSfPl9uJTkz/M+UuITXjMlpfwJ/ZqZEn+Qv81OiT+M
+1PCD+zVvJTwBRwsSAl/sL9ZqfD7izkp4ZXzPSn5I543lBLeud7Eba5XS4kf
yMeWpsJ4rzgV1tMTqXB/SEkq9H9l7h/wWOH+Y1hVKcV3kEdNSvEd3lObEn/4
PdaU+AN5NFqe/F5vSvO1nG9KhetTMqlwfWWr9YdutFu/iAc6U7KvPI/a+ED9
ticle8zvbRlf6Nc2xh/ksF1K8RL6sYPxChzsZHzzPAPzA4/dNRXWs3dzG9f9
0W2ez+b78d69zSfYq31S4XqnfVPyn4DR/u4v69sp+V/Yq4NSsh+Q4yGWB8R8
WEr2B/w8wvJF3npUSv4Jej0mpfgb+DguJfuH15yQkn2Efz8ppXgEfDk5pfwZ
9uovKeUHwNlpKcV3yI/OML+QT5xlfGL+5RzjF/bmvJTiLa4/Nt6BrwvNB/Tz
Iv/O/U+psL59WSo8b+WKVLje4Sq/D/Xma9wf2P/r3F/w7QbzCXq9yXyCH7zF
fEI+clsqXF9+eyrc7/S3lPw/6/spxXt4z92r2bt7Uoov+L30lOI9xhcpxSew
X4PGB/D1b+MH9ZaHzCfEI48Yj+D3Y+YP6xPGM9dPG+9cz+Q26xPmB/Lb592G
/l709ZD/S6nwfPZXUuH5TK+6P+jH6+4vYPam+QP5v23/A/m/Y/sC+b9v+wP5
f5AK1+svTyk/5fop2zfI/9NUeB7m56lwfd6X5g/k/3Uq/D7pt+YPPxtk/iD/
+cH8gTx/Mh6B559Tqo9z/bfxi/t/M76Bk+Fp4Z/f53QbOB2dlv+BnNf075wP
cRt2cN20+If3rJeWf4Q8N0irfxj2RmnxB7AbkxZ/EB9umhZ/eL55WvyBXMel
5Y+QP2yZFn+QT05IK75GfDgxLf7wez1p8YffI06LP7DLU9OKR2AfpqeFF+Bz
Zlp4Yr0iLbzB3s5NK55Dv+anhU88d2FaeOZ+3LT4BHubmxb+uT/XbXiBRelw
vVGhf0e9d0k6jA+Xuo37lvn9sENRWnxivSItf4r4pDwt+8B6RTpcL15t+eD+
WssP8qxLi0+ME9KKByDPpnRYX21OK57A39Np+SPUB1vSsp+gRVtafOJ+YeOH
+3nS4hPk0JMWn8DL3nS4/qE/Lf4gPt0uLf5ATjsZ77htZ/MBYtjVv0P+u7nN
c4D9PNiHPc0X6G9vt4HnfcwfjGM/95/xg8cH+R+Ylj2BvT3I/IFaDzF/EJ8f
lg7PXznC8ud5sdYP7N4x6bBedJz1y/ghLXvK8yDT4fdkTzZ+MK6/GF+Qx2nm
D/zPGeYP4u2zjF/uVzK+IY/z/Dvs7fn+HfbygnTofy5yG2b9EvMJduGydOh/
rjBfII+r3D/I4xq3YReutX0APq5PK57j+ZRp+WPI42bLD/K4NR2ez3t7OjwP
+860/BHs/9/S4fq7u9OKJzj/kZY/4nkxacVznP8wXjj/kQ73Y/wrrXoDcPFA
Wv6I65+NX8RDD7sNfj5qPoCfj5k/4PeTbqOfT6XD+dpn/DvmJ58zn4CPF/w+
nodnPsMPvOz+gi//S4f1hdfS4flFb5hPqA+8mQ7XA79tPoFv75pPyF/eT4fr
WT+0P6Jc7Y9gbz6xfiHPz9JhPvy57Svsz5e2v1wfYf8EuXybDs+X/d72nedd
GM/cD2K8Qx6/mA9cT+E28DUsozbiw1GZ8HtNa2TC9QxrZZT/gJ/rZMQX8HPd
jPgPfq6fUf8h/w0zGh/4uXFG4wceN8mIP4wfMpIf11NkZL8ghy0zsm/8HkJG
9g/3TcwovuD3mjLiC8z5lIzqC5zvyKi+gHhuRkbxDeQ1KxOelzUnIzzyPNJM
mP/kZIR38DXPbfA1323EewWZMN5bnBEfEO8VZeRPiOOM/B/3v2TEB+6fy4gP
PN80I3vA/fsZ8QFWrTIT1l9qMuID4sW6jPjA+YtMOB/elBEf0K1kRnwADFIZ
5TcYZyYj/wJ8t2ZkT2E/240fnrecEf4RN3Qbf/wOhvEJffVnxAfgeBvjGfrY
3m3OX2RWW/9mPkAfu/h3nr+akX/i+c1+H883yoT+ZE/3n9/39PiwX2CfjPwr
8rv9LB/OX2RkP3geUib8fsbBGeU7PB/J+gCMDs+E54cemZF/gf07ynzh+rtM
GG8cZ7xwvUQm3J90kvmC55xiviBePNV8gT85PSP7DnmeabwDX2e7Dft5Tkb+
h/MZbkOe57sNnF1oPqFefbGfBzVeaj7x+znuH/5+tceDcVzr8cJ/XW95IJ+8
MaP4FvWRmy1P7pc2f+B/brP9Ah7vtH2DXbjL/MG8yt/NH+Q//8ioPsD1x5lw
P8B9GcUr3C9p/PF8F+MT8n/A/IE8/mM8w04+bPxzPYTxz/UQ/h39fMJtnkfn
61GveMbPR7z4XEb+DAB9YTV+/zcT7i9/2fxBfPOK7Qe/D2j5oL79uvmD+940
f3g+leXP/VgZxWf49/3V7N2H5g/4vTyj+IzrI+xvuMzT/gb4+tx44vlWxhvy
468z4X7tb41P1huMZ9YbjHeuvzYfwO+f3cY4V7rNeoP9EesNLavVG1r0PuBr
dIv4i3hxzRbxid9jblH/eT5fi8aH+s36LfK3rDe0SD48P6dF9gf3j2mRP8I4
N20Rn8DvsS3SD+sNLbJ/wNeWLWH8PaFFfEK8MbFFeAGPJ7UIT5D7lBbFL6w3
tAh/3H/SInxCnjNbhF/Ic3aL+MV6Q4vwz/0pLeH5jwvd5n6VFvGJ+938O9dH
+PmsN7SIT1wf4f5wfYT7y/URHg8/R+nxQo1Ri+I1+KvyFvEJaq+0fHkeUIvq
1Yi3alsUn3F9ZYvqA1xf2SL+QP7JFvEH9rLZ+IC9zBg/xKnxBXvZZvxBbh0t
4g/G3WX84s89xjfk39cS7qfbpiWcv9nObch/B18Puezk58EM7+L3wV/t6v4A
h7u1KJ5jvaFF+Rrs5Z4eH893b5H94HxFi/wRz3tvkT/i92Za5I94/rv5g3jq
4Bb5I+QLh7bIHgIXh7XIXuL+I1q0HwbyPKpF8Qrjhxb5I8YPLfJHkNsJLeH+
gZPcRj55ivHK+QrzBfWe04x/rrc0P4DDs/w75HmOf8e4z/PvGMf5LeH5Rhe6
zfNT3B/OV7i/e8QfMFw1PqD+CtsP+J+rbF/oVmx/II/rLF/I44YWxXM8X9b6
AU9uNp94fpP5BN7cYT7xfIUW1ds4X9Gi/Bjd/of5xO95G2/o573GJ3g4YPyC
Z4O2/7jv38Y/9PEft3HZQ+YP7MUj9jf8/oavRz3tCbdhL54yn/DnZ9wfxKfP
ur+wi8+bT5Dbiy3Kj3h+tuXB83Btf7i+0nzi+kr7I66vbFE8wPkL+yPI8137
I9iJ92wvOX9hPkGey1uUD+PvH9v+wl5/avuMePPzlrAe96XtO+7/uiWMr751
G/j+riWc31xhfoDvP5o/vK4lXA++0nwBvn9rCdfDDW/V+4Djka3qH/A9ulX1
Ns5ftIpPMCtrt4pPiM/WbQ3Xn67fKn8E3G/QGs4HbdQazgeNaZV/wt83bRWf
+N7W8PtB41rD+aAtW8Un6GNCazgfNLE1/D7l1q3CH7+31ir/xP3vrcIv44lW
4Rv4nNkq/HP+olX+BvHdXLf5vQO38f6Fvp/ne7kNe5PbKv6iG/nuD9YnFrSq
vsBxtYZ8Km6Vf2aW2Sq+cP1Dq/jC/bKtYT2holV8AX6qWsUX+Lka64/1COuX
9Qjrn/MTreIL+NjcKr6Az+lW8QV+s6U1PE+8zXjlfrpW4Znfm2wN1891t4bn
kfS5DVz3t4ovsCvbtYbzoTu0rrbeoVX+Bv5u51b5G85XtIb16N08Pq538PgZ
P7TKnjB+aJW9YfzQKnsEe7Kf+cH9v9YP44dW2TvWH6xf2NVDrX/g97BWxSf4
58jW8Lypo1plj/Ge41vD8/hPND7Bu5ONX66fdJvnD7TKv2DZx+nmA9Ynn+k2
xHq227Ar5/p5eM5fW8P5pQtaw/r5Ra3h/NTFrfKf0P+ltg+A3eWWB7+nZ3mh
/nO15Yn88FrzBXq83vqA/bmxVfEazz+wPvHcW61v9tt8Yf3B9pT1h9bw/Ou/
G2+sPxiPrD8YrwiH7jNfOB/hNusP5g/Pt3cb9vxBt3neve9n/cF8Yf2hNfy+
xhPmM/LDp8x37scwX1h/sH/hfITlAXn+1/KCPF+2/YE/+J/tE91Yazi/87r9
C+T5pvnD8xzsXyD3d1uV/yJ+fL81/J7Fh8YT8pOPjDfg9BPjEfbpU/sbfu/c
fAI+v3Qb+fbXxj/nI9zm98Xchn1Z4Tbk+ZP5wu8HuY39Pr/6fZDnsDb1D/Zl
eJv6j39HtWl8/L5hm+wH92e0ST64f+028Qm4WbdNfII+1m8Tnzg/0SY+cX6i
LZzf2aQtXI+1WZv4hPrH5m2yr4jHt2gLv886vk18gr3Yqk145HrJNuEV+pjU
Jj5xHq1N+Ob30trC+tzMtjA/mtUmvvB7z76f+9t9Pc/T8e/QZ5bfz/mMtrBe
kNcWnp+1qE18AgwKPX6un2xT/oN4fmmb8h/ki8WWL+KVRJvsGfRR0qb8h/FD
W/j9uYo2xWs8f6NN+S7P72kTn/g9pjbFK5BnfZviNfy9qU3xDecz2sL1L6m2
MH/PtIXfV2l1m/sx2sQPyLXTbc5ntMn/cD7DbX4fztdDntu2iT/gx/buD+S5
g/nD/RjmD+LHXTxeyPMPbbInkOfubeH5j3u0yT7xey9t4XrDP1kfsHv7tsn+
4f4/m0+Ixw5oU76LeOgg4wH2/xDjBfo4rE32Gfg+3HiDvTrSeMRzjm6Tf4I+
jjWeocfjjXfGF+YLvw9hfsBe/cVt2JHT3Ea99gzfD396lp8P/3FOW1i/Ps/9
43qHtvB8xws8PtYfzCfYq0tsb/h9Tdsj7vc0n6DPqyx/8OMa2zvWH6w/1h9s
L8GPG21PMa5bjA/Yq1vNJ9S3bm9TPIdx3Gn8QR93tYXf87rb+IX/uMf45n4M
8wn+53630a9Bt/G+/5gviFoeagvXsz3SpvgSYn/MfIF9e8L95X5O84XxQ1t4
vs9zbeH6wBcsL66XtDzRrZctb54vafsG/b9q+4d/X1/NPr5pvoDPbxsPeM67
xgvPhzKekB99aLxxf2dbWI/7xHzhegbjmfGD24wf3Gb8YH6gn9+u5m++N19g
H1e4zfjBfOF6BvcP9c1f21Qv4P7OdvlXxg/tGj/4OKpd9gR8Gt0uvvC8qnbZ
I8Rja7eLL5Dnuu3SD+Lb9dsVPyBO3LBd9hDy3Lhd+mf80K54H/LcrF18gV0d
2654BuMa1y788TysduEV8pzQHp6XM7Fd+AY+J7WH+x+mtIsPWO8xzW3cNsP3
A6ez/Dvs2xw/D/Kc5+v5fTT3D7ha2C5+w77ltMufQs+57eIT10O0h+t1CtrF
J9i3xZYnz9exvCnXdvEJ8ViiXf6H6yGsT/ibMusb/qaiXfE9v4fSrvgfw6o2
nmDfao03xg/tyo+QrzS2C6+QQ7JdfALuUm4jb8i0C/9cD9EuPnE9hNu4v9PX
w151+3fY3d720N/0uz/8PnW7+M/1EO4/LtuhXf6W8YP5A33sYnlBH38wn6CP
3duVD/G8IOuD50O0az0Czw9qVz4EOO/bLnsJ3Py5Pfw+0gHmE+MH44fxg/HF
88mMP8YP7eH85JHtYTx3dHsYzx1rPsBeHe82unFie5jvnOzfYa/+4jb3d5o/
qBOd7vczfjCfWJ9ol38CP85tl39Ffe2vHj+/T2X5wF5d1K74F3q7pF3xHPRx
meWPcVxhPnF9hPUHeV7TLv+EOtF17cqHoY8b2sPzaW5qD+O5W8wf6OPW9jAf
v934hN+70/gFP+4yvvl9CvOJ8UN7WO++123o4363GT+4Df/xr/ZwfdsDbmPc
D7bL//D7FuYP/PGjHh/k+rjtB4bxZLv8Nfdzmj/Q07Pt8vfcz2l5cz+n/RH9
SHs4H/SK+YP4/FXbT8j5NfMJ/7xpvGAYb9sf4bp37Y/A6/fMJ85fGK/8npfx
jPUyH5sfXA/hNucv3Ob8hfnB+Yv2MN/51m2uh/D7QOsV5jf8+Y/uL/dfmD+4
baX5w/UQ7eF6p+Ed4g/0ObJD+SXrER2SP/iwdof4wvOnOuR/wKf1OmQfob8N
O6R/zld0hN/zHtMhfwRcbNoh+ww+jO0QfxBnjesQPnHdlh3iC/zqBLeR30zs
EL65/sFt8GFyh/jB9ZL+Hf57up8HMzfLba6X7AjPl5zr/vH7I+4/5ys6xB/O
V3j8nK/oEH+gp/wO2R/4/wLLF3xY3KF6NuoxRR3h+UrFHYrngOdlHeIP+hl1
hOd1lnaIP7Bz5R3CD8/z6xB/8JzqjnD+vrZD9pzfL+gQXnkeeYfwDD4kO0I+
pDrEF9RTMm4jHmv19dBHu9vcv+k29292iL+wMz0dYf2gz/3neoiOsH6wXUdY
P9ihQ/zh/gvzB//uYvlCn3/okP8BP3brkH1j/cH6gz736pB9BAv3tv6xHmNf
84fnEXas9r0W44vnp3fIfiOeOtj4hD4P7Qj9zeEdYX3syI6wvnZ0h+Iz6PPY
jnB96vG+HvH1iW5zfqMj9DendITx3GnmE/h5ekdYPzjT48P9Z3eE+6HOtXwY
P9j+QMoXdITr2S/qkP8Bvy6xfQMOLrP9g7+5oiPc/3OV+cP9FsYD91t0hPu9
bzB/sN7oxg7Za65/MF8Qj93aEfqb292GHbjTeOf38DoUj8Fe3u02v+ftNvRx
r/kFfd7vNr9/5ffB3/yrI5zffcB84vf0OsL1Sg97vLj/UcuD50lbXrj/ScsT
anja8uZ5ELZn4Nfz5hP49YL9Ec+D6AjPa3rFeGD80KH4Dfe/ZjyBX28Ybxj3
W+YT6iPvmE+wd+91hOdlfbCa/1neEeZLH5s/MGCfmi8Y92dugx9frua/vnIb
z/nG/AFuvzN/wI8f7I/Ajx89XvDj545w/cFK+yPw4zfLD/oY3ik+QZ4jOyV/
8Gt0ZxjPrdkp/XH/ZqfiDcYTncID44nOcH3PBp3h/u6NOoUv7t/sFJ94nmVn
+D30sZ3CL/zkuE7hG/LcojOcj53QGdYDJrrN/Zudof+Z4ucBN1M7w/r1dL8f
98/sFH+gj9md4g/XU3bKH3H/pscPeS7slD/ieVOWH+KB3E75I+gjvzM8n6Kg
U/ECcFzYGdYTiqxf2KulndI/44lO2VvYm6gz3F9X3hmu/6/sFF9Yf+gUXpGv
1nYKz5gnqO8U/nm+uNvod9Jtnv/g+1EPyriN/Ki1U/zk9wvchr/qdH+Qr3Z3
ij/Qf29nOB/U3yn+AD/bdIov4ON2lhfmO3folD3Cc3fqlP/heVLmC+OHTtUT
eJ5Up+IJfk/F/IH+91pN/3/qDOtz+xo/sLP7mS/Qy/7mC4Z9oPHJcXcqnkK/
DjW+4a8ONx8ghyNX49PRvh76OLYznC893r9jfcMJfh/0cXJneD7XKZ2hvznV
fIG/Ob1T/gY4PNP2BPo42/LC/PO5neF80F8tb66PsD5gHy/qDOsHl5g/XB/R
qXgd+L68U/Ec+HSl+cP9GZ3h/phrzR+o8XrjD/7mRuOT+zPML/D+VuMb999u
PnB9hNvAwV2dob+5278j//+Hnwd8/9N84f4Mt1HPGXD/gPt/uf/cn9GpfA84
fbBT/pj7NTvD730+avlhvdTjli/qMU92Kp5GGvO09QW5PGP/A/v2fOdq39fr
DOO5lzqVD/E8KeOJ50nZ/6Cfr5lP8P9vmE/Q51ud4XzrO8Y3z6M2/qHPDzrD
+vXyzrC+9pHbyJc+9f3ox+d+H+OHznA9wledYf36G/ef37Eynxg/ePz8/o7l
A7v1s+XH+KFT8RvjB8sfzx3eJf/D+KFrtfihK6wnrNklewp9rtUlfDB+6BJ+
wK/1uoQvrp/sEv54HnaX4jmun+wSflmP6BL+IeaxXeF6gnFdYX1uS7e5H6Mr
9D8Tu8QfyGGS26xH+P14/LSu8LyDGe4/9292hecdzPH4oc+5lg/rEV1hPWFh
l/wP+J3dFX7fJrcrrCfkd0l/rEd0Sb88/7pL9Tjos6hL9hb6LO4SfgCbRJf4
A35FXbLn3N/ZJXwynugSfoH7yq6wPlfdJfzDn9d2hd+PqO9SfoM/N3aF5/0k
fT3i+5Tb0GemK6wntHSF/GrvCs+/6+gKz5fs7pL/5fdOLB/WI7rkj/j9ky75
d57/YHmzHtEVzg/tZH0hvt7FfOL+TvMJ+tjdeEA898cuxS/c39klf8T1leYT
cLWP8cj9nV3herT9jWfGE8Y7z6d0m+srV+PH4eYP3NrRq/HxWF+P+PN4v5/f
tze/WX/okj/l/IX5g/ed5vFz/sL8gf7O6lL8Bv2dbfly/UOX4jfo/6/WD8+7
7lI8wfMeumQvEb9cYv1z/0WX4jfuvzB+uP+iS/YZerqmK/z+13Vdipe4/sF4
5foH4xmX3WL+8LwotxFP3uE27MHf3Ob+Cz+f51G6zfkL9wfx/b1d4fqJ+7vC
9QiDHi/Po+wK96f+x/ICfh6yPHH/I5Y391+spo8nbO8Q3z9le4j4/pmucH/Q
s8YD918YL/CXL5ovPN/aeOP+C/MF+nzVeOV+TvMFZulN4xvjfNv4hz7fdZvf
53Sb+zl9P+zBR34+7PMnq/m7T7sUP8JOf2H+cD2Ex8P1EB4v10NYHlxPaX/N
9RCWJ9dDWN5cD2F9cD2l7RnXQ3SH+42Hdyt+43qIbvkfrofoln2FPtfqlv9B
frF2t/wP10N0C38877pb+OT3vrrD/QIbdwvf8CObdIfrpzfrlv/geojukF9b
dIt/0Md4t8GPCd3heQhbu833dovviH+mdofzWdM8PvRjRrf4g/tndSt+43pK
yw94mNctf4N4dIHlD3ub1S39QO853Yq/Iae8bvkb6HNRt/wNz6PsFl74PcNu
4Ql6W9otfwN+LusWHqHPqFv8gT5L3OZ6ym7hGea0olt4x3VV3eIH92P4d36/
3b9zP4bbPN/abeCh2fcDD+nu1fZjdIv/3I/RLf+DYXdYHrC3Xd2yN3h/T7f4
xP0Yli/3Y1j+4Oe23fJHeO/23bJ/wMOO5g/0uLP1j27vanwgnt7NfII+/2h8
8fyobsU7PD/KfOH5UeYLz48yH/Dn/c0X+L8D/DvuP9htngfhNuztYW7Dzhxh
vkAqR/n9ENMx5g/ip+Pcf34/tjucLz7J9gP6OMXy4fczLD/u5+xW/AZ9nGH+
QK9ndYfnMZ9j/cFenmf98vzJbtlP8PNC44Hfs+5WPYHfi+tWPsD9GeYT/OeV
xiPPtza/oM9rjWe85/rucP3ajd3yNygv3ty92vnWvh7rpW53m9+f8/PhP//m
Nvh992r8/of7Cz/0T/MHcr7P46WZsTxYf7C8WH+wPIGfh7vD85YfNV84X2F7
yO9TdSve4HqHbsUj/L6d7S34/Hy34hmud7C/IYyMP4zr5dXs+6vmE/j4mvHM
+YruMB96y3zgfIV/53yF26w3dIf5zPLu8PstH9u/wA586v5zvsLjw2O+7A7P
v/7afIH+v7H8uF/T9ojnP1j+yE9/NF+g/5/NF4xjpfkC+/xbd3gexvAe2VPo
Y2SP7C30MbpHeOL3t3rEF9Bi7R7hD/563R75F57/0BPGTxv2CM/4+0Y9wj/y
2zE9Yfy2qdtg4VhfD72M6wn5uGWP+AF9TnCb50W5v9DHJI8H+pzSE35PaVqP
+ML1Dz3h96Fn9Wg+APqc06P8h+sne+RvuF+zR/rDexb2SL/gc3ZPuD8ot0f8
gT7ye8L9QQU9whfrDT3heT1FPcIn6w09wi/nK9yGnqOecL1caU8Yf5X3iD+c
v3AbOKz29ZifrfXzWG9wG+FHo/sHOSR7xHfUK1I9q31vq0f+hvvIe8Qnngdh
eYEfHZYv7FVXj/IfyLPH+oA8+6wvyHEb6xP11e16wvnyHYwHrn8wf7ifs0f2
F/LctSfMD3Yz/iDPP/Yon+D3WnvkfyCPvY1n+Kt9zC+eB2E+QB5/7gnr3Qf6
d55f7TbjBz+P50/6/ai/HOH+4d+j3Ib9P8bjQz+P8/hhd06wveH3t3pkj/j9
rR7ZK9r5HtkznifVI3sHs3SG9Yf7z7Z+0etzehRvYFzn9Sgegd29wHzi9yKN
L/DjYvMJ9c1LjU/g9nLjF7i4skf+CfHH1cY78oNre8L8/3rzhedLmU/Q583+
Hfq8xfcDD7f7fZy/cH+QH9xl/jB+sL2AvbqnJ/z+9z97Vjtv0vLC+wcsT35v
y/IGvx7oCfdrPdij+AH8etj6hVwf7QnPw3i8R/EI7P8T5hPG+bTxBTw8a/4w
nrB9ZzxhvlCvxjvXP7jN+Qu3gYfX3WY8YT6B32/5d8j9Hbehz/fMJ65/MJ+A
h+XuL+772OPh+Q/2v4gnP7c8EA980RPu9/3a9onxhO0X8PC99QE8rOgJz4v7
yfrkOgzrG3pdafvK9ZPmD8+T6g2/h7JGr/DH/Zu94fkI6/TK/3D/ptuIf9fv
Fd6Rj2zYKz4Afxv7d+BvE7dZb/DzMOzN/X6MY4vecD/t+F7xG3Laqlf85/5N
jw/4mdwrvgBmU3rD8/in9So+5vc6e8UPfq+zNzw/fk6v9AV/Oa9XfGG9oTes
F2T1Kj5BvSC7V/YWesnrFX64/6I3PB+6sFf4gz1Y0iu8cv+m27i/2G3u3+wV
3uFvS3rFD37/wr+z3tAbrqeucpv1hl7xg9/Tcv+g9wb3H2Jv6l3te1oeP+xJ
2vLh95MtP9zfZvlCnx298jeIZ7t6w/VU3dYf7EFvr/JX4K6/V/EGeLltr/gC
fW7fK76gHzv2yv5CHzsbb4hHdzV/cN9uxiu/z2k84/49jXc8dm/zAX/fx/xB
/LSff4c92N/3Ix49wL9DKgf5fTyv2nxhvOD+s95gvkCfR3n86Mcx5g+/d2H+
wL6fYHnCPp9oeTNe6JX9wn1/6ZV9wzBPM59Yb+iVfQROzjIe8JxzesPvM5zX
G56ncb7xhvmaC41H2OeLjV+eP9kr/wN9XN4bfj/kCvMD+ri6N4zfrnEb9Z/r
fD/s3Q294fdPb/L7oI9b3B/ke7eZT5y/6JW/gT7+1iv/Cn383eMHL/5h+fD8
qF75b/DjXvMJ8fCA+YR+DtreQe8PWJ88j9L2kudBGA/A4SPmE/j1mPEFvT7h
Ns+jNB7xnmeMV54HYT7BX7/QG+Yn/3Ub+nzZbfDzf+YT7OVr/h14eMN8wp/f
Mn+Ah3d6w/nQ93rD8+4+6A3rB8ttLxgvmD+I/z7tDev9n/WG9YMvLF9+P8v8
gZa+sb2D2r7rDfcT/2D+QA8/mj+wtz/3ht+DXGl7jPt/M38w/zK8T/zheoc+
4RX8Ht0Xnp+whttc7+A2z5/sE1+A0/XcxlM36BNfwO+NfD/y1TF+P9c79Ikv
XO/g/nK9Q5/Gw/UOfWG9fkKf5MH9F33iD9c79Ik/XC/ZF87/TOsTf4CTGX3i
D8+L6hN/uN6hT/qGH57bF+5Pnt8Xxm8L+2SPYV+y+8L9Zbl9wiPrD27DzBb0
iT+sP/SF9bmiPuEf9xf3iR9c79AXzo9GfeF5JuVuQ45Vfh/8Q437w/WSfeI7
5yc8PuCnsU98AQ6SfbIvqD+l+hTvQu+ZPsXD4Elrn/jC/Zp94gu/v9knvgA/
3X3iC27r7VO8Dvz0Gw+A4bZ94gv8y/bGE7/nbfzBX+9sfCIf3NV4htx2cxtx
y+7GP/zLHuYH/P1e/h3v+VNfGL/t6zb3a/r58C8HuD+Ipw9yG3brkD75G8Tz
h3l8+OcI8wX24CjLi9+3sDwZL1je/L5Fn/w//NNJfeH6xFPMF8Dg1D7ZQ/Ds
9NXwcIbxAjye1Sf7C/90Tl+4/vo844/nTRqfqJ9d2Cd7z/OqzRfGC8Y75yf6
wv1DV7oN/3K127AL17rN86PcBg9u9Ps4P9EX1t9udf95frXHy/qC5YH777K8
YE/+bnkCJ/dY3vyet+0X8sP7+8J8dND2D/f/uy/MZx/ok7+Bf3vQeEH8+4jx
hHzmMdtnfm/T/IF/fcr2Hnx42njm+ZKr8eH5vnD+9EXzAfWNl9yGHF/x9fwu
nduwM6/7/dDLm+YL92e6vzxf0vyBf3zf40Xc82Ff+P2J5ZYX7OPHfYrPYHc+
NX/4fSzbM55Xbf7Av31tffJ8Sfsb2Kfv7W9w3Qr7G54v2Reen/FLX1gv+NV8
Ad6G9YffBxreH64n+729Ct/A5ch++RPUE0b6d8hztH/negj/zvjCbZ4X0R+e
j7qW+8PzI/rD8+LX6dd4wId1+8Uf1IvW6w/Xs63fL3+D+u8G/eIPpL5hv+QN
vW3UL30AZhv3iz+MX/rFH35vo1/xBcS+ab/8Dd6/Wb/ie/w7tl94Yr2kX/zh
ftN+4Q9hyRb9wiv3n/aLP8DV+P5w/duE/vD72Fu5DXs50W34j63dBl4m+Xno
5uR+8QdinuL+IP+Y6v5C7dM8PsSf0z1+riftF3/4vdL+8Psks/rD9dWz+8Uf
xl/9sm/wH3OsP84H9SuegB7mWf/A8/x+8Qd4XNAvews8LuwPzxPM6pf/4XrV
fvEHT80xfnF+aK7xC3+UZz7h/ny3wfdF5gPEUOA2v2/m64GHxX4f8LikP6wP
FLkNf7bU/QUeiz0e+Mdl/bIXwHPC8sH9keWHf0ssX8S/Zf2hPSu3vvC+iv7w
+yWV/Yo3sL67ynxBPFZtfEAPNcYTcFJrviC+qeuX/UY9t974xLgbjF/uBza+
kZ839YfxXNJtxCP/rw1/l3Kb35P3+2AP0+4P4p0W8wPrO1s8HuCvtV/xKPxn
m8cPe9beH66n7ugP6ymd/eH8c1e/8hnGx/3h9+V6zBcMo9f2EPaor1/xBvL1
/v5wfcE25gfwu63tMfS5nfHF+Nr4w307GJ+szxnPXE/sNp6zs9sQ2y79YX6/
q/kCe/IHt4Hj3frDfGZ39wf+8I/uL7834/EgntrT4+V+adsL4GFvy4fnt1l+
sGf79Ifnf+1j+eP9+1k/3F9t/rBeaP5wv7X1D3t6oPEBlB9oe8v5x/7w/J2D
jUeES4cYr6DVocYz7Nlhxjv8+uFuwz8eYf8Be3Rkfzi/eZTb8G9H+374zWPM
T/Tr2P7Vzrt3G2bqeI+H388xfyCXE80f3HdSf5gPnmx54v2nWN6wh3+xPvDv
qY4HwLPTbP9As9OtX4z/DOsffDrT+IA/OMt4gj84uz+sp53jeIfn0xiv6Pd5
5g/mg/9qfKP/55sfGP8F5gPGf6Hb/wdPksLm
"]]}}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0.},
ImageSize->Full,
Method->{},
PlotRange->{{0, 132.893}, {-2.0300000000000002`, 2.146}},
PlotRangeClipping->True,
PlotRangePadding->{{2.65786, 2.65786}, {0.08352000000000001,
0.08352000000000001}}]], "Output",
CellChangeTimes->{3.566417495260788*^9, 3.566456511109968*^9,
3.566463341386297*^9, 3.566464585910201*^9, 3.5664657523167133`*^9}]
}, Open ]],
Cell["\<\
Aus Gr\[UDoubleDot]nden der Datenqualit\[ADoubleDot]t (Gr\[ODoubleDot]\[SZ]e \
der Peaks) nutzen wir die ersten 20 Sekunden:\
\>", "Text",
CellChangeTimes->{{3.5664175349367733`*^9, 3.566417543950457*^9}, {
3.566417602122631*^9, 3.566417618913526*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "sym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "sym", ",", "1"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "20"}], "&"}]}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566416210895996*^9, 3.566416261044602*^9},
3.5664173353662987`*^9, {3.566417547400022*^9, 3.566417604524452*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "sym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "sym", ",", "2"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "20"}], "&"}]}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566416210895996*^9, 3.566416271659527*^9},
3.566417337909851*^9, {3.566417550743938*^9, 3.566417606580274*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{", " ",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "sym", ",", "1"}]], ",",
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "sym", ",", "2"}]]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Full", ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "5"}], ",", "5"}], "}"}]}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.566417583125825*^9, 3.566417586237597*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {{}, {},
{RGBColor[0.24720000000000014`, 0.24, 0.6], LineBox[CompressedData["
1:eJxdWWl0VeUVzZwwiJCEzAnv5Q15yctL3n1X67Lq+j7nEbXqEpd1QKpWu+rY
4jzVqcuqrdYqIlrFqqh1oNaKbdV7nYtSRcEBRxCZFASSkAQy0Nyzz9t30fwg
3Lx7v3u+c/beZ3/nRWddcNxZRQUFBfuP/RP8rv39/HmFp75pCuSn2j9xUua5
Bza/be5/I7Lw4nNe9fY87V+HTyxaZi7ab/wnf7lwq3fymft8fcztn5jaFe8N
HL+6wL/nwFt/uW5ohTlbfsp8rLPSnLD60XlvRMb7+Ps35jd3BzdO8McWvXPT
VavND1eZsaUn+LMmn7T38/9ZawaPDx4Y5787/+AXekfWG3l8Yal/3rqhJ7Z+
uIHvw/obDe7r8yqeahoLabP5oPXz7df8YqV3+YakU/HUFnOD/87YHcvMEROL
0r+t2Wqqnzl01RXVPeb2OedX3uD3mDVLgwcKrGxrvz5zyNhqyy8rtUE0l7yy
zSDOChvs7omt/UaWWVFhez6cPhbygOlPnfKH17aVW6wzaF7fFvyhxGLfO8wr
DzZ0fxkvsIsvCf43ZA4be/szh24zB8mCQ/r8St3HsJHXPvihh3yNmnuDMN/Z
6sljq0aNbPPrEQ/7L7BfxsvGUlriI94Cu9ct+89cs7TcP+7Flpu+/0mhfTXY
fu84H+sWWknj9PF+mxNkrMgiX+P8sSDGIimyyEuZf8DMYEdF9r9Lgp8S/+qg
TIcX2y0L3jpyr1sKfEnDe8VWljlzyPvosiDhJVbz7L0ZwObOEos6fOthHyW2
sTuI+FHzUJCWslIrYTV8rXUotUG2zZ7fmQB9C94qtcDfgJk2tpsXW8p0/RGD
dcpspRS4yCIvZXp/iX08CHP/co23zGL/5bZMAFhuke9ye9/c4KfcuvJTwc+B
gwoLvJVp/SusvPbuEvtYAMuLx1nkocgCp+PssZLAUSN/HhhnHw5es3zQBGyZ
c/54O/uuupITJ23Suo/XOFca4GOCXRbAau83tP4TLOryjdZ/gv3z5mBDmzzg
aqIdXR4kftDD/ibaPD7As4kWeC3yfyWJ3c1KWbeX+I9cGCB+N4u6liufJlkJ
L1Phvx2ENXOSxXsrFD+T7NFC1Aq/byR48e68H3ja3QqNxpf5wN3uxCd4N5n4
wf2TlWdDnsR1+WTbHqQl1ePFAli+NFnxvNYDHifb4QC+s2Z6kpfdp+jnn0FH
fjxF8b3FSBgzpljo0jYjy/16ikXed5gng2XumGIvlUSOGuB0igWOCy3wN4X4
SgTbmFDJ+gssEpX4/WipFd4fUKk8L8O6p1Za2c4pZYjjyvBz0ZuXw+clH59V
av1LgL/BSsVZkd0RhF9VxfgknV1VjF/CPbLK5nUF+lyFuF4bUL2pIv6gs1W2
Pijfc6tUV6oUH++pHlVZydPkx71rx15/V121hf5/5IEv1eS34P3Saou+0etJ
vHdV26OkQIOe7PvZaittJD3iQVeqLfS5AP1hbbVtlsCLfIm3farFPop91GGq
7rfUF17+bKqNikBrv7luqpU2ckm5L3C9L7zG/qYS7/LY8FTiVV5TW2OB61Jf
8pKrsSIDG4pVT2s0v0U++Fxj8/0IuK4h/2Qf79fo/rZ5iLPGiiwcv9mT+8fV
Wklf01pP+BirteiHKzzoQq1FXRdB76+rVX4sQV95pFb1dIMRfnu1FnH1GPCl
1gZVKzmx31wZEHBHrfa5HUYem1pnocsjBv2szmKfBRZ8qaO+Qc/rFC/F4P3T
dcQr+FJHfqDudTbfDwUWbfX8HLpQr/xU/T69XvWgUPW33ub7s+j+PfXUV8RR
r3gZMsBTPfEOvWnQ+v8AH5Ft0H6zGvcf1WCl7nM+hi/5eYPqy0Ij8S5oUHwv
8QR/bzZo/TeoHjdQr6CfjcqXfg/vadR87vCQp0bN16gnPLmgUfWhwEcfarTo
i8W+6PyiRu1bJcDfB42Kn1JfdKGn0eb9EXjdRH4griZ+Dlw0sZ8LDW5rstDZ
YvDtiSYLv1PkQx+aLPpGIfrByibVq53oN9OaVZ+GPSmLbbboK30e9K+ZeIc+
NFPPUc9mK5etn3vymn80s/+BP82Kl9e1ni3A0YK1Ws8W6r3g9OgWC9z3qg9s
UX4NGrEPN7VQ/wWu77bYvD8T37C+RfttodZhmoXuFWFfsWnkA/IyTetfbOW2
G6cRz7Kvh8Pn4aumqb8p1Din8f3gZ369USP1mRghvgUf9RHuR+q0b4T7F1of
EVE8rTPy3pMiytcvFd8R9Q+LjcQxO0J9kTTfEKG+ix7cG1GervbQ9yM270fB
s4gFTvq1XhHiHToYoR5C/yLEu+BuOKJ+q9CHDkepr/L+uqiFDyn24e+j6v9K
oLeHR+kvhMczwmvB6VlR4ht6FlWfV+xDR6KKvyLc/2jUCk0qC3H/81HiW+5/
PQofcOugJzxfGiXexe+vjNL/Sr/bHLVS7tO+g58ZjlqcY1Z5kvcJrTbv96GP
rbr/v3mobyvrJ3k/opV6D71uVT5sMYKbc1oVX31G6nxpK/0z8NlK/Zc+91ir
5mcY/uj5Vuo/6ttKvyH6/0Gr6mOh1rWVfEF9W6nf2G94P+obUz0tUBzHtK/s
NMKbfWLgUcmwQZ+OqX4P6n5jNn9+Ap5jNn+eE17PjsFHnbwR57DrY8rTNbh/
QUz7/xcGeI4x35CZGPsv6hRT/K3xoH8xuzGQke83aX1j2o96PPilmJ4Lt2l9
4/Q/UsbmOP0u9hu3eo7T81Wc+MM6cdWrQvjts+PkB/AcZ78Qubg+vJY63hmn
/wfO4tR3Sdszce3bhfBDL8Wp9+B5nHqPdeIWOjoCvK6L8/wnPqc/Tn6ILpQk
6H/QLxI2Pz+Q/O+RoH+UPB6YUL/1MfTkmITi6iXoyekJ1RvfyN/PSyi+V8Df
XJGw+TmDxP+7BPki8c9NWJyLNhvsK/95L/iyKEG/JPt8M6F+fbsRP7ssQX99
QZCeVQmeR6W//pCgP5FtjiTUD+80OD8kqfcSfyZJvglf9k2SD8BDkv4eeEjy
fdC3JPsZ8J/keRN6nuR+BM9/TLI/il49lLSY62w1wENS8/8d/P/LSd3Pt9ov
k8w38JBkfxb9WZ/keUF425+kvoHXbTY/n8H5qU3xtE7x0EY/Jfcf1Mb+Irw4
rk31fTv4OLON+IO/aeP5QvJ/dZue20c94LLt//xWG88fsq/H29iP8PfwGnGE
18BDG/kCP9jG8wDqHr4P+tBG/wc8pNQPDWNe1ZlSPuxQfUhRT4CHFPmDv6fg
G67Y6InOnJXieQL6kFI9/Ur7e8qKDj3wPvrXHSmdf8zV+UGK/gB4SLHeoGFK
/c9qnUuliBeJ59MU+xH8VMpirtdjgIcU9VviKW5nf8K5q13nA9uhz3u0a/8Y
hp4f0K77HzHQh3aeX6AP4TX0Ibwf5+9wPeChnf5K+sZ94fuBh3aeJ4CHds4T
oA/t1A/xucvaySfoQ7vm+3vVh3adx61RfWjn/Ad46LD5eSXq2KH1e0H7Y4f2
4+WKhw7Oh+D3Ong+QX/MP78F/np2h9a3F/y6sYP6DH3o4DxJyjS/w2KOtd0D
HjrUzw6DXy930N9BHzr0PDWKeD7tUH+504M+dKieFvjAQ3gNPKTZb4CHNJ8H
HtLkN/QhTf4LH49Pa763w4/NTFM/5D0XpLX/93nSh69J06/Je25Nc76G+UGa
+iTxP562mEOugr69kGY9gIc0+xX0Ic36wR+m1Q8sNdCHNOef0Ic08QH/0Ml5
KPpFp+5/s0G/6KTfw746db4zoP6/k+cF+IdO4hv9otO+H6R73g71S53kA/AQ
XovePhReSzxPh8+jX3Sq/m3XftFJ/wY8dJLvwEMn9QB46FQ/3qv6kCGfgIcM
51fYd4bzK6nzQRnyB3jI7Jr/mRnWB+fvDPsT8JChXso5+bYM/R/wkFG/9D38
z4KM+uctHvxDRvt1j+IhY/PfT+D8nlH/NaDnhQz7GfCQof5LPKMZ+kWcB7vY
L+Anu8g/nBfCa5wXuujXgIcunmdwXuji+qhTF89v6Bdd9HMiA3d1af/uR7zP
dnHehzx0UW9Q/y7qEeabXTxPwj/m1/9C/UIX+5PEXdpNf475Zzf9n9z/o27q
J9bt5vkX9e8mXgRmZ3TzvCx6dn4352Wofzf5hPlItxUdn78N5++53eQX9KCb
/QF60E28Sx7e6KYfgx6E1/AL4f04T4TrATfh+4RWpVnGI3irzar+9+H+5iz7
r5wDkln2H+hHlvMTqaebtfnvn4TH+2Q5D0O/ze7q7w7Lcv4uffXYLOc10idm
ZDk/kFPNzCz1UnTynCznP9DjLPVW3jM7Sz7Jfq7O8nwltLoxSz5Jne7OEo9S
9/uz1H+cy7N67hzy5PeTWfYL0bfnsrt+//DP8Fp474fPw8dkyU/ANMv+KLD/
OEu+yDpfZdl/oPtZ+jlZZ2OW/Vj6W1+W/Uh8+lCW502pe6Gj+V6P+Csd8kni
r3d0vQ9wf9ShHxfdb3fIH8zPHO2/HwFPeznsR5LH/RzOSwV/B+fXW28EltMd
8kts6AkO8Sdp/qlDfkk8Zzg8f0i/OtdR/9hn5NxzkUN8Y17o8PwiPvtaR+eZ
/fie+ebwc+h1eC3x/MmhX5N45oXr47eza/98wuE8QXC80GH/ERgscth/RWc9
h/5X+PaWQ34JDJY47E8C6+UO/bTw7XNH9ehDyPs3DvuVxLPB4XxO4tnicB4N
3Dmq15/ifLzTId+gF7ld5601OfYv2XZLjvM8eSyRoz+CncjRH4ovcXPEM+Zx
OfpFyef+Oc47RLcPD6/l17E58lPwNiO8ljn/aeH9ON+G6wvMzsuxf+J8kyP/
JZ9X5qgPmIfk9DzdC798S47nJ/l9R479SvI5J8yPbO/BMH/wpTnO78QGPZ3j
vAjzsxz7l+Tn3znWD7qe4/cLEs/iHL/PwTwxR/3FeSpHPqKv53j+wvdlOZ3n
r8f3fZtynH8JPHpzxKvkZyhHPEs8RS7xLnFUuOQn3uuSn9CT8Bp6El5L/FmX
fJIw93J5PpL4jUs9EL4c4mq/3or+NN3lfEbyeYLL/UBPXM5zpCyzXM73BG/n
uuxnqLOr87VPjdDkMpffb0JPXPJN6n6zy3pJPLe7rCf8j0u+ia7McznPwLzf
1X6wGv7nry79j4yd/+5Sz9FvXMXDFnzf96rLfid5XeySj6J7S13yEX7aJf6l
nt+45Af8tWtFtz4Z8DAHCT+X5wfDa2l7O13y+38AvkIJ
"]]},
{RGBColor[0.6, 0.24, 0.4428931686004542], LineBox[CompressedData["
1:eJxVWWl0VeUVTV5mQIYkEDK/5OVNeXnJHWpdFl33c8A6Ya26xGWtReq8ilQr
ilLHOiyrLgeKE1pnAVuVqnVoxXsVRVFbELAgVplEoKABAmFIAs09+7z9FvlB
eC/3fvd85+y9z/7ObZk89YyLIgUFBccM/hP+rpj6+JYn6j7wCuSnOjh7ePbV
J7o/8rYk7PK/NrzoH37+P04aFlnujVvzs3sfvuIH/9wLw/+t9HYNrJi+JXHQ
f+i4u3+zqe9Lb2rlH4JPni4OsM5a76wNz8/+IFoeXCw/671111e//NN1FcH8
qy594Pvfb/DwuyKYPPKcI1//+DsvGT7u3LLg06fHv9EzsNmTr68pCqZs6pu3
Y9kWz5WfAR/rb/MGb/YOP3+7H9514bhuXW+Jf50Evt277/3dqfPuW++dPCyS
uXPMDt1Prze4icFId3ovDEY3/6qIOXrIymd/e/QuTx4zoczIY9/d7T1V1/V1
W+kQE+5u3o5e7/PWr/bdePkQs3PZhMGQ93jXvvvk4BXlZuPS8A97PeSlxGDf
+/W5hWbxNeGFfd6JkoA93vGyYJ/m51sP++33ZLm2RT7ydUD32+0jbwe8L6aH
O+jX/RcYfB8JEG+B2XtmuGBpcMZbTbdv/Xmhwe/yQP78ZKEJqzP+jfIAeY6Y
WLidd8oC5ClikOfi4NhJ4Y4iBvmMBDd4IQKKTC7/4a6+/HeR+eiUI+46ZtIe
H3EVm4XhMu9v8T+MhncW6/0r/UfCdH9SbPD9F5rXEv28xUP+SkxYhSErd3gh
+uYsKjHvXD1zbPHZ/V7z4C7eaio1tcUhMgtMfXj7LaUG1xUbKf+aUiPbfavU
zF0UBlZmcvXB/svMc+Hyz1YY5LvMPBP+WlGh+yo3VwoQKswJ4dfTy3k/6l+u
8ZQa4KbCSBovLDZSxvkVBvgpMJKePRVGaJPpU94MMdPC24fv8HrDNO0eYnL1
Bz6GGinH1a9p/Yca2d4pa7T+Q5lf4GSYft7jY3/DWJ9bZoWEHKb3R4LfhWXw
DlOcFwfIw2HEC+A03OT4h7oON9CBMsXPcOIFvB9hsI9SxdMI4ue9EGY9I4if
MPrrq0eacNWNS/t9XD+S8QvcrhtpJF13/s/Hc0Zq3Vb7wONI4kfwOmKUQdyb
vR9CGfjJKJPjt+Bo4iiDOPo85HWU4qbAvDhYpcn3j1I8RAz0IrdeseJqlDlP
HlRi4qWDGR1aaWoGq3rmhjIjv+KVxIns49hKA14rbn5ZaZD3CiP6OKOSeJI6
LKg00INy5H11JfEl6+6tJL73h+FXVRnwrMhIOjurTE5fUOcq3ccB1aEqAxzt
V73J/X27h7pXmVOlIN964E+V6tgy1aMq7PP52f5Nl4eRVRvo3wofOKtWffnW
F7xfW6087PEl3pnVplEC2ecLvl+pNo89Gv4M+P/6LPypRl7vLkB/+K6aeJF4
06ONwG9OUSBtZfxovb8kkDr8evSh+L15tAEuywKBzWP5z4hrNPI4sxT9p3+0
kfIcXhJIumrGGJG5YcWB6IwzhvFgn2OUr4UB+DzGoI8c8LfPCQVnjNZ3vy/7
XjJGn7/Db5GFxmi9NuL6ihrF5xe+4DBWY3L9FvpVo/VZir58cw31Qh7zXI3q
T48nOPNrDPrgPg98qVG8D3gzQgLur1H8Fhj5evRY4h/9bCzxD76MJR7Bu7Em
1x9Fxl4aq3pcpjjNf0bc+c9Sx2St4qvMhI+fdVytyfVLCftXteZAmC67WHlV
y/gkbw/VEu9Yt1b19KAHPNUa+Ij9HvSmTvexw5O0WXV630Zcf2qdOU1uWOWJ
Xl5SZ+A33vWAuzrz55BWRyz2BX8f1qnebVY9rlP879R+XM9+KPirq1f+9PnL
w/QeWW+Ak4O+6OrUeuIJuK43sr0viwJ57pv1RmhXXAL8fV5P/Ev/2Vlv0FdL
AuShgZ/TIlwNvB54baD+C87vaTDydWUR+DavQf1BYQBeNRisU4B+sLaB/UWy
1NxIfgsPTKP2vW4f+tdIvEMfGol31LOReBce/r2R+gP+NOp+1mk9mwzyuFPr
2aR6u8eTtJ3WpP2/X31aE/ux2Ifbm5SfqpefNhFvj4ftfHMT8Qh/0kz8g5/N
Zlu4zNZS1fVmjb8Mdbqtmf5DWPtMM/sHdKKZ/AI/m9V/RAz42az9oFB1KEp8
Sx1ro/QTIidHRZkPKevJUfop0etzorqPdYrvqOrfx56EPy2q+HjbFz7+Icp+
K3rwSFTj3OiDJ1HVwx4ffTtqoGt7Ve+iBjjr96G3Uc3XQdW/qPKlMJD+3h+l
vkr8Q1qIf3n+2BZdrziArrXQXwiPTsp/lrJNzF8vvLsovx50oIV4P10K0mLg
kwpx/fMt7Edy/estxLdcv7DFIM7dvviHpS3af7b7wuO1LaYUC6Lfdbeo3nwN
P9PfoucK3xf8DW1VfL4PvUm2qn58rfVtNfDd2z3hwcmtqtO7PfxuNbL8E/s8
4emlrdR70Y9rW+mXgc9WxVMEfemFVsVPEXTy9VYj5d6X8/Gt5IPg6vNW9cGq
12taFdclioP89dhvfj3kLUb8gzcx+hnxR+Ni5Cv2HaN/w35j6rv3Kp5j6EPZ
XfDT02Lah7o9if/WmPbDTbh+Toz5BZ5jrIfgf2FM/c1aH7iK0W9D/2Ls56hv
jHiAX4qRD6hvm8md16QMjW3Uf+y3jXqL/bbxPIf9ttH/yHMvbqM/AZ7zn+XX
rfnrhWcPtBn4piL17216TokEIqcvtxH/EvY7ber3CwLobpvJne/Bo/x+5LJN
bcqXvb48pjf3/F2+8KI4Tn6gX8TZPyX/P4prvj8Dv46Ls/+Cd3H2Z/iDOPu3
5HlK3GAu0Q1/c32cfkji/2Oc/UHifzRO/QTf4/TL6Ldx8kX6xYdx8kV0c3mc
eJU5x7q4yZ2DRXd+iPM8KH12IE7/jvNDgnyQ+LMJ/l34clSC6wEPCfYH4CHB
/gV9S5AvwH/C4Jw84EHPE8q3/Z7g+cGE+rJezB2eSqje7/SAh4T6ru/h/xck
eD5Av0zw/AU8JFTf/wb92ZxQfV3oSx17E+of/uvDxyQVH9/5OD8lTW6eBDwk
NT+9uP74JP20XHZGEjrRNwA+TkrqebVA/U2Sfkryf0PSwIdFAuA0Sfyj7yXJ
D+n/c5PsD+BlknwEjpPsV8BDkvzBdUn2N/AoSf8EfcjHDzyk6A8Fhx0p8gn6
kCJ/gIcU+wvwkOJ8QOp0Ucrk5l/Qh5Tq8RzFQ4r1w/k3ZXLzMeAgBd/SulXx
kKJ/hj6k2H+gDynqsXy/KkW9hp9KkV/AQ4r8kniK0sQzdCZNvw88pM0SOX4W
6fk6TX5AH/KfoQ9p1ZMi8GtK+tD+MiOtvi2ieU7zPCE4eiyt86eDiH9umn4S
eEjzPA19SJNPYnuXp1WPejAHXZcmn6APaeoX9CH3vK884KGd/gz9sZ3+DHho
V/ysUzy0a/624Xx+Trvq5U7Mfy5pV3+0G/56Wjv9DPxAu57D+tDvHmzn+Vzw
/HQ78Qs8tB/KrwXt7F/Qh3byQeJZ1U7+QR/aOY8CHvLXAw8Z9emFOl/KaH8u
CICHDM8f0IeMwVxiP+YNZ2aoHxLnpIw+vwf9emru/m5f1r0xQz5JXHdnyCfM
DzLsTxL/3Iz6q1nA8xsZnleAhwz9NvQhw/kU/GGG/gT6kGG/gj5kiCf4hw7q
N/pFB/GIftHB8zzw0MF+BTx0mNx8G/6hg/0E/aKD/IBf6qAfBB7yfxe9fSq/
nsTzUof210LMUxd0kN/AQ4fOUw/iPLKqg/4UeMjvD3joMPDlvdCroizzAzxk
6Ycxt8kaodeWbzDPOj5LPw08ZMkf4CHL8yfO31nF2wbFQ5bzR5kP3JOl/gIP
WZ0r74L/mZPleR/+Iat82OcDD1meh3B+zxq8rzig54Usz0fAQ5bnD4nnQJZ+
DD6vk/yAn+xkv8F5oZN8xXmhk/Mp4KGT/MZ5oZP8h+/qpH9Fv+ikfoi+zeyk
vkhcr3Syf2Nem3veevDp006d9y7DvHd1J8/78I+d1DvUv5N6KPss6aL/wPyz
S/vJNlz/4y72I+yji/Mv1L9L+18f3jtd0KV8GUB/u6KL/gn17yKfMB/pIr6R
ty7yC3qQ/ww96GJ/EVn6oIv9DXrQpf2gUH1F/nk4T3Rpfgr0/USX4v0A/GqJ
xfchgrcai/uV6xst9h/RoYTFfEE/LOZT6ulaOg9a7UmfHWexHui3Ft9HyH5P
tFhP4fXpFs9L0oYnWjpP2Yx52CSL+BAdudTivAx6bBFfIgvTLPof2c8NFvEp
abzNov5LmmdZ5JPA/nGL+IePsMgn2eaL+c/y3Fct8k/6xtsWzzvC68CiX8Nc
0aJfE/wvsdh/pC7/sdh/BE/fWJyHI+8Wz49Sl20W+7fwapdFfyxzlz6L/Uj8
RKHNfiTxV9rsR/LcWpvnW7m+xTaYi2725NyZttl/MD+zqa+Yc9rUX9GXo236
O9n3eJt8EthPsKnncvw6y6bey7K/sNkPJJ4L7EP71WU2/Zf40ivznzEvtDkP
E17dlP8sNuyO/PrQa5v8kXj+ZJM/Es9sm/4U76lt9h+5bl5u/T2e7GO+zfmC
6NKbNv2w1NW31b9sBd8W2eSXwOwzm/yS+1bY5Jfw7Sub71eEt+tt+neJZ4vN
+ZHEs90+dJ66x1Z8bMW87aBNfEEvHOIP9zlGyvdwry+8aXKIX9HbuMN+BTvh
EP+SN9dhP4HuOJxnSD6Pccgf0c2T8tdLWk7Pryd4m+jwfaDQ5nyH/ML51mE/
lTpMccgv1MFhP5Z8znCoL5iHOPR7ks+7HOqT5PN+h35a8vmwQ38g23vS4XwI
cTmcTwgPXnJ4nsL8zKH/k/z80+H8CXMkh/MKiWexw/kt5omOnsd26XnKIR5R
R4fzPrwvc4hnied7h3wUePQ4PH9Jfvocnm8knojL/ie6We7y/Sh8s0s+QU9c
zqOhJy75JfFbLvuT5PMIl+clid9zOY+RPJ3gsn9Lf5rgch4h+TzL5fkJeuLS
TwtsJrt8PyDrXuayHtAhl/USWEx36QehJy7fZ4ou3uGyn0k897rUY/gfV/my
Deex2S79Ieb9Lufjwsu/uPp+sRfvS19zDd7b79V+45J/guP3XOJftr3YZb8T
vV7qkj/w0y79nNRzff56+GuX/MLcNr++3L/XJb8kSwdd+tn/A4Q4zrE=
"]]}}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0},
ImageSize->Full,
Method->{},
PlotRange->{{0.116, 19.999}, {-5, 5}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02], Automatic}]], "Output",
CellChangeTimes->{3.566417587175609*^9, 3.566417621760257*^9,
3.566456511261606*^9, 3.5664633416112537`*^9, 3.5664645861284657`*^9,
3.566465752524501*^9}]
}, Open ]],
Cell[TextData[{
"Nun bestimmen wir die Frequenz ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "1"}]], TraditionalForm]],
FormatType->"TraditionalForm"],
" anhand der Daten von beiden Pendeln. Wir nutzen die Methode von oben."
}], "Text",
CellChangeTimes->{{3.56641766653157*^9, 3.5664176686717243`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"oben", ",", "sym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "sym", ",", "1"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416344367093*^9, 3.566416404499189*^9}, {
3.5664164749772043`*^9, 3.5664164803566027`*^9}, 3.5664165186680202`*^9, {
3.5664165522816677`*^9, 3.566416554473386*^9}, {3.566416667930216*^9,
3.566416697488927*^9}, {3.5664177507973003`*^9, 3.566417753419446*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1.434`", ",", "3.106`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.999`", ",", "2.95`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.591`", ",", "2.795`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.224`", ",", "2.595`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.812`", ",", "2.395`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.464`", ",", "2.218`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.089`", ",", "2.04`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.656`", ",", "1.862`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.255`", ",", "1.707`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.883`", ",", "1.552`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17.498`", ",", "1.418`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.104`", ",", "1.307`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.566416365943509*^9, 3.566416383937974*^9},
3.566416480807665*^9, 3.566416519318247*^9, 3.5664165549251204`*^9, {
3.566416668287786*^9, 3.56641669808327*^9}, 3.5664168622938766`*^9,
3.566417345454031*^9, 3.566417755350679*^9, 3.566456511289555*^9,
3.5664633416434383`*^9, 3.566464586176196*^9, 3.5664657526178637`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"oben", ",", "sym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "sym", ",", "1"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416788206684*^9, 3.566416811680894*^9}, {
3.566417771063353*^9, 3.5664177743940067`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.575`", ",",
RowBox[{"-", "3.488`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.203`", ",",
RowBox[{"-", "3.288`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.797`", ",",
RowBox[{"-", "3.11`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"5.401`", ",",
RowBox[{"-", "2.933`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.014`", ",",
RowBox[{"-", "2.733`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.671`", ",",
RowBox[{"-", "2.533`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.254`", ",",
RowBox[{"-", "2.378`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.884`", ",",
RowBox[{"-", "2.178`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.482`", ",",
RowBox[{"-", "2.023`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.119`", ",",
RowBox[{"-", "1.867`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.726`", ",",
RowBox[{"-", "1.734`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.341`", ",",
RowBox[{"-", "1.601`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.91`", ",",
RowBox[{"-", "1.49`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.971`", ",",
RowBox[{"-", "1.468`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.566416813683556*^9, 3.566416863962236*^9,
3.5664173476919193`*^9, 3.566417775282922*^9, 3.566456511338883*^9,
3.56646334182946*^9, 3.56646458625939*^9, 3.566465752718773*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"oben", ",", "sym", ",", "2"}]], "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "sym", ",", "2"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}], "[",
RowBox[{"[",
RowBox[{"2", ";;"}], "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.566416884021413*^9, 3.56641688700436*^9}, {
3.5664173643089952`*^9, 3.566417366486847*^9}, {3.5664177873744593`*^9,
3.566417790560857*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2.999`", ",", "3.229`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.591`", ",", "3.156`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.169`", ",", "2.962`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.812`", ",", "2.889`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.409`", ",", "2.743`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.022`", ",", "2.622`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.63`", ",", "2.476`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.255`", ",", "2.403`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.8`", ",", "2.257`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.857`", ",", "2.281`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17.413`", ",", "2.136`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17.468`", ",", "2.16`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.035`", ",", "2.063`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.566416888434183*^9, {3.566417357006805*^9, 3.566417366938409*^9},
3.5664177920084963`*^9, 3.56645651142619*^9, 3.566463341884886*^9,
3.566464586322035*^9, 3.5664657528188257`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"oben", ",", "sym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "sym", ",", "2"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416895715335*^9, 3.566416898579172*^9}, {
3.566417795714665*^9, 3.5664177982003317`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.575`", ",",
RowBox[{"-", "3.235`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.203`", ",",
RowBox[{"-", "3.089`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.797`", ",",
RowBox[{"-", "2.992`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"5.401`", ",",
RowBox[{"-", "2.894`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.014`", ",",
RowBox[{"-", "2.724`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.643`", ",",
RowBox[{"-", "2.603`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.228`", ",",
RowBox[{"-", "2.506`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.8`", ",",
RowBox[{"-", "2.409`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.455`", ",",
RowBox[{"-", "2.287`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.024`", ",",
RowBox[{"-", "2.19`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.665`", ",",
RowBox[{"-", "2.068`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.232`", ",",
RowBox[{"-", "1.971`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.813`", ",",
RowBox[{"-", "1.874`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.5664168993845367`*^9, 3.56641736972589*^9,
3.566417798769298*^9, 3.566456511528388*^9, 3.5664633419307127`*^9,
3.566464586378169*^9, 3.566465752922181*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["periods",
RowBox[{"oben", ",", "1"}]], "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Flatten", "[",
RowBox[{"Differences", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Part", "[",
RowBox[{"#", ",", "All", ",", "1"}], "]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{
SubscriptBox["max",
RowBox[{"oben", ",", "sym", ",", "1"}]], ",",
SubscriptBox["min",
RowBox[{"oben", ",", "sym", ",", "1"}]], ",",
SubscriptBox["max",
RowBox[{"oben", ",", "sym", ",", "2"}]], ",",
SubscriptBox["min",
RowBox[{"oben", ",", "sym", ",", "2"}]]}], "}"}]}], ")"}]}],
"]"}], ",",
RowBox[{
RowBox[{"#", ">", "1"}], "&"}]}], "]"}], "//",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"#", ",", "\"\\""}], "]"}], "&"}]}]}]], "Input",
CellChangeTimes->{{3.566416950448785*^9, 3.566417094263796*^9}, {
3.566417128819862*^9, 3.566417220526993*^9}, {3.5664172740031776`*^9,
3.56641728085063*^9}, 3.566417453279512*^9, {3.566417831280361*^9,
3.5664178422700863`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"1.5650000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.592`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.633`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.588`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6520000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.625`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5670000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5990000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6279999999999983`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.615000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.605999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.628`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5940000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6039999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6130000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6569999999999991`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5830000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6300000000000008`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.597999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6370000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6069999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.615000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.568999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.592`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5779999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6430000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5970000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6129999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6080000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.625`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.545`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.556000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5670000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.628`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5940000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6039999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6130000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6290000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.584999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.572000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6549999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.568999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.641`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5670000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5809999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )]}], "}"}]], "Output",
CellChangeTimes->{{3.566417037145218*^9, 3.5664170852269993`*^9}, {
3.566417129680561*^9, 3.566417140647348*^9}, {3.56641717581981*^9,
3.5664172224107037`*^9}, 3.566417281888981*^9, 3.5664173767611523`*^9,
3.566417453831401*^9, 3.56641784324682*^9, 3.5664565119474287`*^9,
3.5664633424468803`*^9, 3.566464586773714*^9, 3.566465753309416*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["T",
RowBox[{"oben", ",", "1"}]], "=",
RowBox[{"Mean", "[",
SubscriptBox["periods",
RowBox[{"oben", ",", "1"}]], "]"}]}], ";",
RowBox[{
SubscriptBox["\[CapitalDelta]T",
RowBox[{"oben", ",", "1"}]], "=",
RowBox[{"StandardDeviation", "[",
SubscriptBox["periods",
RowBox[{"oben", ",", "1"}]], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.5664135644395313`*^9, 3.5664135932825413`*^9}, {
3.566413840931016*^9, 3.566413846450987*^9}, {3.5664172409639*^9,
3.566417250652793*^9}, {3.566417447558818*^9, 3.5664174599257507`*^9}, {
3.56641784719655*^9, 3.5664178532279987`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "1"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]"}],
SubscriptBox["T",
RowBox[{"oben", ",", "1"}]]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413595788748*^9, 3.566413604730227*^9}, {
3.5664138496182423`*^9, 3.566413852914188*^9}, {3.5664172604677753`*^9,
3.5664172659954042`*^9}, {3.566417462405601*^9, 3.566417465982563*^9}, {
3.566417856011732*^9, 3.56641785863536*^9}}],
Cell[BoxData[
TemplateBox[{"3.91790345757869`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.566413602619113*^9, 3.5664136050051537`*^9},
3.566413853330969*^9, 3.566415031488805*^9, 3.5664150943028173`*^9,
3.5664152865403767`*^9, 3.566415352194001*^9, {3.566417267815569*^9,
3.56641728474636*^9}, 3.56641738194198*^9, 3.56641746640886*^9,
3.566417859152856*^9, 3.5664565122597113`*^9, 3.5664633426366177`*^9,
3.566464586875085*^9, 3.5664657535526037`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "1"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]", " ",
SubscriptBox["\[CapitalDelta]T",
RowBox[{"oben", ",", "1"}]]}],
SuperscriptBox[
SubscriptBox["T",
RowBox[{"oben", ",", "1"}]], "2"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413681720048*^9, 3.566413748696438*^9}, {
3.566413855794153*^9, 3.566413863833433*^9}, {3.566417287240891*^9,
3.566417295474732*^9}, {3.566417441918975*^9, 3.566417475309024*^9}, {
3.5664178617474422`*^9, 3.5664178658833942`*^9}}],
Cell[BoxData[
TemplateBox[{"0.0686098221347908`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566413749146556*^9, 3.566413864296844*^9,
3.566415031562516*^9, 3.5664150958247833`*^9, 3.5664152921305733`*^9,
3.566415353714468*^9, 3.5664172959548683`*^9, 3.566417383528458*^9,
3.566417442368752*^9, 3.566417475991418*^9, 3.56641786640982*^9,
3.566456512376854*^9, 3.5664633428144608`*^9, 3.5664645870254*^9,
3.566465753675912*^9}]
}, Open ]],
Cell["\<\
Das Ergebnis stimmt innerhalb der Fehlergrenzen mit den Frequenzen ohne \
Kopplung \[UDoubleDot]berein.\
\>", "Text",
CellChangeTimes->{{3.566417870282703*^9, 3.566417929237158*^9}}],
Cell[CellGroupData[{
Cell["Antisymmetrische Schwingung", "Subsection",
CellChangeTimes->{{3.566416149396151*^9, 3.566416152554798*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{", " ",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "asym", ",", "1"}]], ",",
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "asym", ",", "2"}]]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}]}], "]"}]], "Input",
CellChangeTimes->{{3.5664158836474*^9, 3.566416140980277*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {
{RGBColor[0.24720000000000014`, 0.24, 0.6], LineBox[CompressedData["
1:eJxdXXd8VVXWxc6HqHSkl0BoIaT35N30nrwk2B3HQcc66jj2MorjOPY+9jL2
NurYuz6sWLEXFCsqio2iCAr6kbVu1vqdxz9h5Zx77zl7r13OPufeTJp3SPef
N+3Xr1/lgH79en/+uOGto7/OvDvx7MS7/rZfV+6CTWedOmLxogcTV/9w83Ot
xatTb29sze3/cqL0vuePfOI/36febJ83aOfStxI1e37x2uQPXkgV7vFI88BN
P0ismb77uU/99EnipWvrH1i94ZNEL5q++8rERrDxAZ8lVvTe7vR1ieTZlxw8
5OTPE4dWDnj3+r9uSHyw7oQDHjt8Wfz73xK39Har/irRMrB3JBsSvXefdery
xMjFi37uWboucdCyX29d+cZ3Cdz+3B8TfP4Pif3O/+74ROHy+D4rEnuXf9x5
9iXvJPrh36oEx/1M6prRcz6csuXqxMLex+z5RYrjWJ24dONVC15cmeL1PyZ+
6xVL7toUr1+TOOWbrofGn7Ih9cJGKYye83M8v34Lnu4dxlM/JzZevHHm/RZk
YEJrExjujb+n1m8cbfu8XxI3XfHMRgmvT2Fai39JTMANf071SnHdCesTvG5F
6vLLev9tiOf3WWrYnY2fHjvst8RtvbcZdEtqTO/wT/o9MWrzHbedfc+Hidz+
t4/dde9+0TT859vEt73D/KZf1CcfPneT6Lpetby1NlF35l82SnCTaKPQL9x+
8/WJGZjIphGfvz6xD/5tGrHfrwmOZ9No3K69Ev01MXfpjRvvuFnUp49VvcPa
ebMIt9txTQLiW7BZxHGujse9ucbX+9uLajePDoPCvki88nLvv82jNqjjtVif
W8TX35jA9Mq3iPr4RnlvER3TS8vbP081bZTOnY1bRr3aPnjIN7H+tozA5/NX
x/reKuqTN++3VXz9LymOd6sIj521IXVxbe/Et4rIn99StIP+EcSx8rfUIb00
ubZ/dM9VvQ2/p57sVfvq/hFu+/GGFHn1f9GJEPD6FPX0f9HU3mmfuTZF+Q2I
yJefUvj1XwZE5MmKFJ8zIAKd91ieIg+3jr7vhY8sTlE/W0d9fKZ+tpa8IMXJ
AyOY6+iPY54OjDjOL2I7Ghjhsct+SHCc20S8bnXM220iDPOuNQnyfdto48M2
3nJtzLdtI5hN5S8JTO+qbaNXey+74pfY3rZTO+exXQRxj10b82M73f+IXtps
OyiahwesYns0SOPD7Q8ZJL6AT+cNikiX9xP0V4Oi42Ao/6ZfWTFIfOH4B0fk
3dIUntM0WHyhPAdL/pTj4Ig8WpWCHC8fLH2Bx+8PFp/wmHWDo+5es+v6JQXe
jBwSQVxP/Er95w2J+uyfvBkivr3ea/4HDIn6/Av4cY3b/96r9heGRJT7ryn8
/HyInkd/OyTq81fQw5ihEe+7JoVxFw2NcJ/mH1MQ11FDNT+Kbaj4Rr4Olbzg
bl8ZGvPjgxT1MjS2n5dj+xoW9fkn2uOwWH+Pxv5kWNTnryjfYeIj5TssYpxY
zrjz4DDpn3oeFvXFEz5nuPwbeTFcfKKfGR71+WU857Dh4h/4do5xL71+uNmY
zzOmPxoR0e5/SlC+I2J+rY7j5IgI7uLgVbw+OSLifVckqIcREXn+XczfEbG9
fk1/+PSIiHHvE9rLRyNivr2ZgL5+HiF5wq8NHhnR7i9LkScjxfe1vWZYNzKW
5ztxfBsZ8+GTFOZ15UjxH/2fGRnHgxUxf7aP6Nd/iv3f9lGvNQ9492f6p0O3
j2j361Kcz/biI+ztf9vLv4LvL20fwR0M+DXFcbk/5DpplO7H8Y+KOK41KdDp
T6Mi8vxHxuP5o6K+/ITzGRUxX1gZ22df+3exfY4Sn+nvRsuf5uPf6Hh8C2N5
jI7I288S9Mejo778goQYE/vD7+kvp46JyJOVMR/HRIzbq2I+jlE8JB/HxPf7
MebjmIh281PMxzHiG3k8RvH1qF539uGYiHHqpwTGscb9aR9jdT/E8RljZS+U
w1iNB3Hrj2PFX95nrOZ3Q6/aM8ZF9OvvJRivxomPyA9PGxfL+/UU+l8/Lo53
S2J9j4vI46VxPjle+uH9x0d9+Rf9//gIdPhhdYrjGy8+Yt7HjZd/g94vHh/1
Rvvvjv85RfmMj/OJtbH+jemfJ8hf0j9PEL8RTzom6H7k9wQ9D9fdPUH8Y/4y
QfyjXCZEffky/OxmE+VfMY6pE2P/8mXMv4myV/Svnaj4Tn8yUfEN9/3jxJif
zyXgVg6aKH8BXh87UfEffv/0PryUee81E2P/9CX7PzIx9pffJcCbhRPFZ9Dk
7YmxvawkH5ZOFF9oHxPFJ/Jkkvwj/d4k8R1+OsftsOvKSbof4k37JPl7+KPd
JkX8/Qrmq/tNkj+FHo6aFFEPXyUwrX9NivrWGeDNpZOivvUJlzeTIvJiEfP6
ZyfF8f+uxC+9y5E3J8X53YPM3z+bpHiH8a+YJP+B2/w2KeK65FPGy20mS7/w
vzmTpX/mRZPFF6TV7ZMj8nZVCnLZbXJEO/oxdWVv2rDfZOUfDSDK5Djerklx
vpPlLyGfW4wx7/uNOV9fz3FPln8FPz6ZLPvjT4+Py7a08W+TEcG8e37g86dn
RBjXc9/E882QfOA/2zJi//8e/fWuGbH/fzWeb0Y0CQb4GMd/RIbyW+ZJGbH9
vRDzOUP8x20fypD/Rn7yXEbMp2UJmNFbGco3mA9niP+w75UZit/w579nyB7I
uyniJ36OnSL74HyN4ddapuh6zneK7s/5TlG+Q787ReOB3v45RePlumZKrL+v
EnDz106JgnX1XVPifOtTjufxKXH+tyQBfb0yRfKiHU6J5jARidfrU2J72JPr
/XVTIo7zyRTSja2mxv7tjXh9OlX2QL1MFf+hr/qp4j95MlX+n8+ZqvwD9vXX
qYoHEMcJU8U/jP/sqeInxn/FVOW35P9U2Q/nOVX8Rnh71ph8MEb8+9T3gxxX
TZW/p3/LjMjzVSnyIVP2AHFkZ2o+oHFFZrye/prxoi0z6qs/QIy7Zso+IP/9
M5VvM1/PVHzF+E/JlD4gzwszpS9cd11mbO8LYj5kyt/hxxOZiufkQ6biBfmQ
qXiBuLc8U+sv8iFT/pZ8mKb8COOaPk3+GXwumhavZ34gn+umyZ9j3t3TxH+M
f57bYY+Huh16+vs02Qf6nT1N9QWuQ6cpv8Z4bpkme6F/mKb50E9Nk73Q/0+T
vTDeTYv66knkw7RY/y/H8W668iHOe7ryc/qH6Yrn9A/TZS/0D9Olf/JhuvhB
Pfdd/xXt66jpyt/pD6cr38DvL5ge9dWTwIvrpsueyIfp4i/k+fh02RfXe8aQ
5wfTVU/BdV9Nlz0gHq01hjy3nKH1Jfg5dEbEdcjK2D/MULygf5gR5zffxv5h
Ruz/v4r9wwz5E/qHGZIX/cOM2N4+4nrjzBnKp+gfZih+4/e3zlB8h1wfnqH4
ApounCH7oX+YIfshH2bIfhgvZmh9i/H8NkN8Qj657cyIdYqlcT1lpta/6F81
U3xlPjAzjoff0B53myl+w4/sP1P2BT4fbcx6qTH9uq9HvLt+puyV+exM2TP9
w0zFS9xn0UzFF/JhpuaH8Xw9U/MnH2ZKPuTDLNX3yIdZijfkw6zYP94d82GW
8gHYY8+smD9vx3yYpfUF+TArjQ+zZD+MF7Pi+sqymA+z5I/Jh1niH/3DLNkT
84dZqg+xjmrMeDFL/p/58CzxnXLIkv1RL1lqp7/M0vXMh7MUPxgvsjQe+ocs
5VfkQ5bshXzIkr1wfZal9S/lnhVxHfdxvF7Lkj9CneqerIjrtLdS8JOpLK2P
yYcs2Q94siRL6xPGiyzZD+NFlvwl48Vs5R/cf5iteh7GXzJb/MI8G2aLf5D/
3Nlav1APs8VfXPe32bInXDbfmPHCmPUDY8Sp/xqTD7PDeLdwtuyDfJiteML1
wmzZO+PFbOWj5EO24i3uOzBb9kL/kC35wI9XZMd8eID1h7ZsxRf83CVb+TLk
uU+26kGMF9myH+aT2covYDcXZKs+xPV/tvgCM/xftvjEeJGteMT8IVv5HZ+b
LX7SD2dH3Jf4jvnYGmM8bos54jfsduIc8R9iLDZG/3r3B+3mztH9wOe95uj5
zB/maHzQ04lzZC/Q0zlzYv59ST5fOUfzh1xumyP5wL89NEf+h8+Zo3jD9fKc
sB6ydI7iP/3DHNVLqfcc2Q/0t2WO8gnWK3K03mE5IyciT95mfTUzJ8zvZ+do
vYvbFuSIf5hfRY7sCdOuyRF/YectOYpP3Bc0hj3snCP7w3V/NIZ97Ov+yIcP
9vMgnyNyZB/g9/E5snfEp5M9fua3OYovzO9yZB/Md3PkX7DPeGuO7IXxLUf5
Me05R/EG4l+QI/8GuS/MUfzB+BflyH4gprdz5C9hF0ty5E+5nswRf+D3l+do
vwrr3pU5sifGyxzxD/zvl6v4hOsG5orPGP/2uYpXkP8EY/TLzNX6Cv5utq/v
6KVhQa7sAeOo8PM47lzZN37fnKvxQQ/duYqvCFu75Kq+BzXvmRvvj3zK/YB9
c+VvED8Ozg3t5YhcrSfJh1zpg3zIVbyBPM/Ilf1gPBfkyn4gz0tzZT/Q7zW5
sh/w8+bceH3xRgJ+4I5c2RP8+X258fpqcYJuNVf8Y9qSq3o94sVLubIv9Hsj
V3yGf17sdsjnE2OO0xjy+d7XQz4/5Yb2uz43tJfN8oShxsF5ii/kWZ7iC8af
kaf5sz6cJ/thPTRP9UXotzRP9oTbRHmyJ4y/MU/6wTKpI0/rU9jLDnnKv2FG
f8hTfsF9rTzZE/zqgXmyJ8bzPPlf8PKYvKhvf5z7AXmyL1x2ap74Cvs9J0/5
H8ZzUZ74zfifp3gA+VyfJ3sA324zhv3e7esZD4y5v+nnwS8uNIZ8Fnl88HNv
58meIJ8PPT/GjzzZE/j2jeWBfG1VnuyL+Vae/BXG0y9f/oz+JF/5AfQ7Kj+M
RxPztR6Cnqbny55wDmBOvviBvLUoX+sj5q/54hfjdb7si/lLvtbTiBM9+Ypf
oMNu+eIv1vnz8sN69v7GzP/zZY+o9x7tdsZ7Y9ZLjaH3s43hH/+dr3wU/uhK
j5frJ8+H/PB8GW/yZU/kR77yYeh5Qb7qzYw3+bInxpt85XfMJ/JlX6Dpknz5
R/LD+iU/8qV/8iNf/hb3XZcvvpAfBbI35h8F4hv3ywoUz8iPAvEVl00zZv2r
QPEN4y80Zj5rDHnW+nrWQ9zOOnGB7Bvj2TltPHsWyF6Yf3j80MtBnh/jTYHy
N+7zFKgejfueXCD/xHhToHwO/c4vkD9jvClQ/s14UyB7wmNvNoZ87ixQvMJ4
7i+Qf8VtHyvQ+hi/f6ZA8QvjfqlA9ga39HqB1tew/8UF4ifjTYH4C/1+WaB4
gF9/X6B4x/y8QPzHeNa7Hf5680K1058Uhv3HFur+3N8rVL6G8c8qlL2gXpVX
qPkw3hRqvtwPLJQ8uK9ZKHkx3hSG8tyhUPLGeHYvlP3gur0LZT+wlwML5Q+R
7x5aKP1iPMcUyp7A0/mF4gvGc2qh4hfGc06h7IvxplD8A02uLBQ/uf4uVP2C
/qRQ/OZ63Bj2+7Ax/PSTxtDT84XKx+CvXzVGPfYd9+d5Az8f6esXHh/Wp996
/LjN6kLV2zDvXwplT/BjmxZJHjhv079I8oOcxxRJvtgXmVyk9RHy9xlFsifu
0xYpX4f9lxRJ39gfThSF/rSxSP4W+VRHkfiEsuhcY/KjSP4actmrSPYEfRxQ
JP5C74cWyb4wnqONmY+4P/ORItkf8xFj8trXkx/G5EeR7IX1CWPmfUWh/Tzs
+XF9UyT7YdhOk8+iItkT402R4hHjTZHiEeNNkeyJ8cb6Yr2jSPkf1zfWN9c3
xcr36WeNGW+KZV/4/YRi2RP8+7Ri8Y/xplj5ENe7xtx/KQ7trdaY691i8Z/P
Ncb4d3Z/nkfw/RlvjLneTRvP4R4vxHC854PxnFwse8F4zihWvGa8KVY8Yrwp
VrzHeP5TLPlyfVMs/8Z4Uyz7wnjuK5Y9cX+wWPqFf3+mWPkf402x7Av++g1j
xpti5YeMN8XKD+EflxWLj4w3xhDLmmLxF/sOG4plf5RbifiO9dkwY8abEvVn
vCnR/SCHmSWhveSVyN4Zb0o0Xq5vSmQv9Cclaf6kRPNlvCmRvMC33UtkP/Qn
JYpHjDclkj/XNyWyH65vSqQvxpsS6Zf+pET6Z/2qRPkJ1hMXlYgvkOdVJeIT
5HlDifjG+pYx/UmJ+El/UiL+sh5conjA/NWY65uSMN96uyQ8f7akJKw/LzWm
P/HzeCzEGONZV6J4w/y1VOOF3+lfKv+B344qlTx4/rY0tJdppYr/kGd2qeTP
fZJS6Yf5a6n0h3HVlYbn8VpLpX/WS0plL6yXlIo/zHtLxS/8ft/SkG8Hl4qP
PA9RKvuBfv9eKj7TnxhjPGcaI5+4oFT2gXleZszzp6WyJ9b13A753On78XyJ
MX48Vip7wnie9ny4D+L5I76/bgz/9p7lBXv8pFTxHrf90vKGf/u+VPaFbj9a
P1DbeuuTPCqTfwQdBpWJD/QnZYpHrJeUKX/hPnaZ+MX8tUz2Q39SJn7CL1SX
ib/MX8vEd8T5TrdjWDsZs05nDDnubcz7GPN8oTH2/Y4tk31Arv/w+OEXTi+T
f4Daz/N8kTdeUib7wf7a1WXyN9DHTWXyR6g/31Eme8J6+j7Lm/woU36AuvDT
ZbIvnncuk35ZTyuTfvn+RJn4wHhTJr5gnF+VKZ9B9+/LxC/UK9aUyZ547qNM
fAXvtygXRr/h5eI3+o8rlz3wOI8xyhhZ5bJP7F/mG0Mu5b4f8t8at/N8ernG
B/voKtf4eQ6yXPNFXrJHebh/sE+54hHXv+WSJ+Ln4eWyD9Zby5XPcf1bLv1w
/Vsu/WE855eH9aPLyqV/rn/LZT/kR7n4xHykPKyn329MGpTLnug/ysVfjOPF
ctkX+WFMfhhjHB+Xh/FqWbnsg/VW92e91c+j/yiXvWA8m1WE8XNARbgfMLZC
82E+UiF7gTxnVsjfcH1TIfnSfxgzH6mQfTAfqZD+mI8Yc31TIXtBfPhDheIR
178V4g/XNxWyF76nUCG+MR+pkP9GfJhfIX6CJ6dVyF6w3jy3QnzGNC4xpv+o
EP9xzOQGt2N7/A5j5qu+P/Z/HjXmOSD3x32fdzvW8697/FRjRbg/8ElFmv+o
kP3AP/9g+TFfrZA98Tyk5c36SKXsifWRStkT1Di2UvpnfKmU/ZAflbIf8C63
UnxiHKuUv2Z9pDKsRzRWio/kR6X4jHi9Q6X4z3zVmPyolD2wHm/M8//G5Ifv
z3y1Mnxf5FSPj+fdjcHXfxtz/VupeMP1r+XB+ojlxXq8MdaPD1XKP7EeXyl7
4vnmStkT17/WF+vxlWH+sKRS+oV8Pq8UHyCHbyrFF+arlbIn1uMrw/VRv6q0
9zmqxE/49+2rZF9c/1aJz8xXq8L1VLYx661VYT5W4Xbmq74f81VjTLvLz8f4
d6kK69d7Vml+zFerZD88x10leaDbkVWSF/T09yrZD/dFqiRv2MVZVdIP8pkL
q5S/8fxOlfSJ+HldleyJ+79V4gPymbuMef67Sv4Y6+dUlfjGfdIq2RfPw1WJ
nzwPZszzL1WyN4htaVV4vm95leyB58WqwvXVuqowXv3u61mPT+h55EdC7axL
JDRevo+S0HxYH0lovrC3AmPWRxKSD/xXXULyxLhaE5I/4kN3QvrheaSE9Id9
mD8lZC/IZ/ZLKD/B7/9qzP2ahPgDfZxojPmckhDfuF+TkP3QfyTEV+wfXZEQ
n7mfZwze3Ob+9B9u536NMfmRCPePF/p67tcYkx8J2Qv54fFyvWtMfni+rJ8l
wv3stQnZD9Yr/SLZD8SyZRSeNx0YST/g03aR9IdhDo1kP/gxMpK+wavRkfgA
/zg+El/4vlYkfoF+U43B5xmR4hVonRWJv9w/NIZ95xtDvsXGkEOZMc9LRuI/
xlNtDD3UR+F6rDmSfWA8bcaQZ9Lj5X6kMea9k+eHfG9XywP+bg/LC/qbZ3ki
nvzZ8ub5busDavpLpPwA8eGvkeIR1k+HR7Iv1I2Psr6RDx0XiR/c74zEH7xe
dHIUvk99ZiR7Ar/PjcRHngeLwvc3LzbGevJyY/jHqyLxHcO8NpI9gB83GvN8
vvtj/XG7MfKxu3x/7A/e6/Hy/VBjzPORSPaD9fITnj/08ZTlw/P/kfwT7Ot5
y5fn/Gw/6PdaFJ63f9P6gz7ejZRv8HMIxvDPH5kPyFc/M38wjS8j5TdY/35t
zHGYf9DjSvMT/u9HY/jTteY33xM05vssxohDm1brepyj29oY+e921Xo++DHE
GPwYYYzxj6rW/Lhertb8IeZJ1bIX5P9TqiUv5G/Tq2UvuCyrOrSPnGrZB+JV
gTHGUWKM+ZRXS7/YJ05US/+IZzXV4gvPm1bLXsD3FmPm08bwP13GrAdXi5/I
R3apDvd3dzfGOPasFv/Br72qxX/mV+4POR1oDH4d7P6sJ7sdfD/CGHo/xvMF
34+vln3wvGx1uN9zsjH4dZox5Hum5Qu+nGv5830E64/vaxrTnxiDL1dVy76Q
H19rfoDvN5g/8O+3GsO/314t+0G8+Z8x/Pu95ifizYNuh39/xBj6fsL8hr6f
dDvfpzPmdwyMSXtj+LfX0sbzpseDn+96PtDT+8aIfx/ZnqDvzywfxJsvjGnn
lifqc99Z3siPV1TL3yHe/Gj9IeyuNaY/SdP377YnnkerCfmxdY34hXizXY34
h/rf0BrZD8/BGzMfMUa+Nb5G/h55wSRjvl9rTH/i65mP+Pl8H9XtrNe5nXox
Zj5ijHhTVaP5s55nzHykJqxfNteE8abN7Xzft0by5vlmY/Br5xrpDzzYvUb6
5fvBNfKf4NdeNeIL5rNvjfjB+k9NyK+Da8L19aHG9CfG8G/HGHN/s0Z8hnzn
ux3+7WS3sz5gDLM4w/15nqImjJ8XGMOtXez5IP5c5vmD11e5HXq+1u30J5Yf
+HJLmnxvN2Z+UiN7QX51r/XJ/MSY+UlNeD7yCbeDL08Zgy/PpvHlBdsT+Puy
Mdbjr9WE+7dv1YT++r00e/zAGPHwY9snzy8b87yQMd/vMOb+i+0B81nl+/Oz
BJ4P8r+1afxfb4x+/WqFeX7EmOubWskf/n07Y65vjPl5jNqwnj26VvqmPzGG
P51cK37An06tDevdM4x53t4Y9ptTG+5/FNSKr3y/xRj+tNyY51mM+T0AY+Yn
vj/8Y4vbMZ8Ot2M93mUM/7iD5wd97GwMfu1uecB+9zTm+xW14Xn5fd1Of2J5
058Ys75s/eD9qiONuV9VK3vh+561YX3hJGPWj9wf9nuaMcRyljHs5bzacL/j
wtrwvN4lxpjP5X4e8q2rjfn+gftzv8MY/uhWY8znDmPkN3cbYz7318p+oJ+H
jGEvj9WG9rKgNtyPfsaY+/O1YT78kjH49qox+PamMeLxO2n6eT9NPx8a8304
98d8vrD++f6oMfj2rTHs+Yc0vq02xnx+NkZ96ldjfo/B/OR5tDph2MHWdeF+
/7bG4OcQ9wc/R9SF+dQoY8SpcXWyP/BzktuxvzW1Ls1/GDMfMWY+Ysx8xJhx
si6cf7kx8rGEMfLvGmPos8GY/qNO8sd82o25vqmTPrm+qZO+eT7KGPzcvU58
xjpyT2Oub4yRV+9XF9YzDnQ79HmwMeLtYe4Pf3ikMfR2rDHy9xPqFK8wn5OM
6T/qQns7rS48P3pWXRhvzzPm+0nG9B++nvVqY/Dt6rrw/M91lh/9R11ob7cZ
Qz93pOnnbusT/v1+Y57fMQbfHjOGvaXqwvPkT5tv9B/mN89vGMMfLnJ/5Gdv
uB32806d8jl0W2xM/2EMf/ipMfKzz43pP+rC8xrfGiM/W2HM86oeH+o1P9eF
539/NYZ+fjPGfDatF2a9tV7yw/y3rQ/PPw6pD/U5ol76hj5H14fxYFx9GA8m
uT/rI/XiF9czxnhsljHuk2PM+mq9+I75FxvzPIIx5l9ljPnX1If15gZjvrdh
DDm0ez7It7vczv1pzw/2v7Mxbre75cfz/caw/73qw/xuX2PmH/Xh/t7Bxsw/
6tPyj3rZE+sj1i/3q6x/bK+eZMz3aevD/fvT68P61VnG9B/G9B/1ob1dUh+u
zy6vF5/hD682Zv7h/jh3fJPbKVdj1GvvcH/M526Ph++/pc3n4bT5PFYfnk9c
4HaWeevD+uhCY74vZ8z3QC1/+g9j8O0d6wvzWWyM+XxofmC6nxpjPp8bYz5f
m2/MP4z5fSfzF/NZXR/695/dTv/h68G334zpPxrUH+ux/g1hPrltg+6P/kPc
H/ocYQw5jzZGmXacMfMP34/7M34e94Xdn/lHg+TD/Rn3RzzIbwjzyeIGyZ/5
hzH4WdUg/cGP1BhjPg3GfL/UmN+/8P14/qlBfOH7/w3iG99HbhCf+V6+Mf2H
Mc/j+n70Hw2hvR3g+/M8d0P4vsLfjJHfHdEQ7j8f4/uxvur7Qe7z3Q7/fLKv
h72caox+ZzaE8ekcY57nbAjz1Ys9P8j3Mrdzv8bt/H6UMfdrGsJ8/ZaG8Pzr
7cb87qb5A77c25BWDzGGfB8x/8D/J4xZDzHm9zfMZ4qtITxP8IrbMZ/X3Q7/
/JYxz5caYz5LfD3SjI+NuZ/v/uDLMmPu3xrzs4lp81nVkFYPsTx4PsT9WQ8x
5nmRRvVn/tEo+cN+BxrDHw9qlP6gj6HGPD9gjPXgmEbxg++TG6MelNEovqK8
ndkofqJeN9MY88825vklY8y/sDGsH5a6HfOvMEY9JTLm96OMkT80GcP+2xpD
+082hvG2x5j5R6P4z+8NWj78voEx5LGX+0Me+7gd8jigMa3+Yf2wntooe+H7
iI0hH45pDPlwvDHzj8awXnBKo/jF83jG4MdZ7s/8o1F8Zf5hzO/p+Xq+L+Dr
+T6j2yHn/xrzfLgx3ydoDOPZA8aY98PG8P+PN4bx/EnLD+ubZ42RDz/fGNZ7
Xm4M6z2vNYb1wTfT7OG9NHv4wPplfdR8wXp8qdtZH3U7/YH5B//2vTH9gfnK
88jGWB/8YszzyY1hfWGTJt0P64PNjdF/G2OeL2vS+MCX4W6HP9ze7fCHY435
vm9TuD7MaAq/BzitSfJFHXimMc+nGWP+eb4e5eZCY/Cm1P3xs9KY/qApPO9a
Z4z5NDWF64m2JvGR/qAprEf0GCP+7uTrkd/s5nbY8x7GiL/zfH+eG2oK10f7
G0M/BxlDn4f6fswnjPn+aVOYrx7fFNYj5rud+ytNYb52qjHzCWPmE01hPeKC
JtkP7PViY+YTafq5yvrj+Q9jzOfGprR8wpj5hDH3V5rC+HVvU1j/e7AptLdH
jJlPNIXr96eawvX7c+Y/7O1FY+TTrxhDP68bw/+8bQz/815TGL+WGPN7qsbM
J5oU/8C3Zb4ffn5jDP/zg8eP9e/qprCet6YprL//YvlxPWKMfHOz5nD9tE1z
6G8HN4sPmO9wY76f2RzWx8a6HeuHCcbwlxnN4iveJ5rWrHiD80izmsPzS3OM
Ia98Y4ih2Jjrj2btP7H+6XacV6nx81n/NMZ+Vosx9nM7PD+eOzNm/dP9Wf/0
fHme2vLk93Caw/x4r+Yw/uzXHMafA40hz0OaQ/0fZgz/e5Qx5HmcMeRxojHq
wf9oDuthpzaH/DvTGP7unGbxl+uNZvGX5zncjssuM8b66Wpj+ofm0J5udDv9
g9vpH4yhh7s8H75fZAx+PWgMeT7aHNYbnjCGPJ9uDvO55yx/+ofmsJ60yPpE
PHvD+uf3ocwX5LeLm8N8bklzmI99Yoz5fG4MfnxljPz0G2P6B/OR/sH85/fh
m8P921/cn39exhh836RFGPMf0KLn8fuFLZov7jvE7dgvHW6M+4xyf9YrWiQ/
1AcnGbPeaczvz7RI/ny/qiWMFznG/J56i/TJ/ZKW0D+WuT/mX2XM8xvuz+/X
tIhPmE+zMebT3hLu/yaNsR8/t0X85vdLfD3PbxjD3v/YEtYH9jJmvcL94fcO
MOb5+5awPvA3Y0znSGPulxhDzn/3/KG2k1rC/YVT3B+/P93yg5rOsr74/Xxj
fl8nTb+Xuh374Ve4HW7mP8aIJ9ebT3zf3e3Yz7rNGPK4M42v97gd+r3f7aj/
PtySth6xPeD9pwVuR/75TEuYfz5vDP/1ckuYf77WEuafb7qd50ndzvOkxqiv
feT7o/77WUu4vvrSGHpabszzGsa4zcqWMN7/ZPmAr2tbwnxtvTG/59AqzHOG
raG9DmwN68WDWsP1+FBjfu+wNczvRreG+d14Y75H0RrWvzNbw/xupvvDf2Ub
Y/8s1/35/owx4lGJMd+XaJU9Q45Ra2ivtcaIR41+Hvx3qzHync7WML73WJ7Y
39zRmOfPW8P6wh6tof+aZ4z62T6tYf6+v/XD9Ygxv3/j/vz7bK3iB9cjxjzv
1Sr+wn+daMz1iDHXI61h/ewMt0O/5xjzvJcxz3u1hvWDy9zO+mZruN97rfsz
3zBG+nBLa5jP3u77Md8w5vlRzx98fdDygt4fNebfgTKGP36qNVxfPWf5kzbW
H/LRRcZcj7SG/vht84fvvxqzvmk+ol77iTE/C2SMeLnMmN9jMGY9wxj6WWV7
4PejWpUfwp+uM4Z+Nvh61LM2aQv/ftHmbRo/rtvGGP0HG6P/MF/P79m1ST7I
t8YaQ58T28L1UEab5A99TmsL9TnL7Zh/dpv0j/VFnvvDXouMMaxS9+d5UWP8
qG4L/W99W5g/NreF9by2trBel2wL63k97o/3HXfy/VjP8PPoP9wf85nXllbP
8PWYz/5uZ77hdu6PGKO+c4Sfh+uOaQvz4eMtX57DNYb/+acxlmOnWX+IL2e1
hfngecao115oDH5f0hbuR15hPkE/V7sd9nqdMfdXjTGfW309z3eZjzzf5Xbk
t/e1hfHlobYwvjzWFq53FrTJvni+y+3YPl1ozL+3ZYz136seL/++gceDH++6
Hb9/35jnzd0f+v3M7TxvbvlCHl8b8/thbWH9boXbkR//2BbWc9fafjDv9W7n
d+Xaw/X0Zu3h+YoBbkf3QW5HfB3aHuaPI9vDfGuMMfgwvl18Z75hzHzDGD9n
tIfrq+z2sN6Xawx7L/Tz+P6/Mb834/Ey3zDm+7zG/D5Ae2jvrZYH/76VMebT
bYz1/I7tof/apT2MR3u0p+Ub7eF66c/G8F/7G4PGfzHm+27G/H5Je5gPHtUu
PmM9f5zbsf49sT1c7/yjXfaC+vy/2sP6+hm+H7/H1h7y+wJjvrfm/vz+Vnto
r1caYz7XtIf54PW+H9bztxhjvfPf9jAf/F97mN/eY/ng1w9a/jxf3i77wHye
SNPPU26HvT5rzO8lGOPHy9Y/338zn8C3t4zxnPeMIecl5jf/LqrbuX9ijPks
c3/unxhzP7U9zOdWtoffe/zJmPmGr+d+qjH8T7+OtPMYHWrH9zK2cTv3Tzok
D+YbHZIX8w23sx7qdtZDjbl/Yszvp3aE9YmZHdIf842OUJ957o/8vqhDfMH6
oKxD/MN6p6pD/Of7ssZ8P6Uj5HeTMco97R0hv5PGmE+PMb9P4/vDXndzO/dT
3c79VLdzP9UY8zqgI1z/Hez5M98wZr5hefE8lzHW8383Bh/m+3rUJ/7pdu6n
GmN/+ayOMB6d1xGel7nQ/EF8ucTtzDc6wvX81cY8D9oR5l83uZ3nQY15HtSY
77P7ep4nN+Z5ro7QPh7z9fxepNshj2fczu9Zux3r2ZfcDv2+agx//IbnD3/8
ju0FfH/fGP7rI8sX139mDL5/acz326wfrC++M4b9rrR+IY+fjPk+ijHyyfXG
zDc6w/3PzYz590w6xVfWNzrD9dVQY9Y3jFnf8P0Qn8cbY3012f2x/s10O7/f
3hmul2Yb8/tCxvyeXWe4Xiw15vmLznC9FHVKnvxurNuRjze5nfUNY9Y3OqUv
/j0fYzx2J2PIY1djvl9vzHyjM/xey5+N+fchO8U3/n3MzvA8+l87w/dbD3N/
1COPdn/+vVFj1jeMeX7L98P64tTOMJ88szPMJ89xf8S1C4zhvy7qDPPJyzrD
+vlVxvxenzHfZzPm+2zG9LudYX58V2eYT99rzPdjjTGfRzvD9fATxnzfvjP0
x88ak8bGPL9lzPNb5iO/p+F2nt/qTKtv2D74vS+3Qz9L3c73pDvD8+zLjVnf
cH9+P93t8D9r3M7zGsY8r2EM/fRLhvX+zZPh+ydbGoO//d0fec0AYwxjYFLy
QHzYNil7gz0OMuZ59KT0g+cPS0qf0M/wpPgB+Y1MhvWJUcaI12OSYb1inDHy
vQnJ8H3Wicm09VMyjD9TkmG8y0yG76NPdzvmM9PtmE+W26GfbGPEqzkeD36f
6/Fyf9mY59OSYTwrTob1z1Jjnp+3PJE/Vhojn6myPsDfyJjfH7B+UN+pS4br
rQbrG/W7pmSY/7Sk8avNfEI8bDdGPajT/SGPLmOsF3vcH/nSDsbwBzslw/N5
OyfD99V3dTv80e7J0L72MOb+uO/P76cYw773NsZ6ex9j+ON9LQ/kP/sb830i
yxf57kGWL9aPhxij/nSo+6Me9jdj8PXwZFjfPTIZ+tujzR/uryXD9dHxxpjP
Cckw/5rv++HnSW7n95DS+p9mjP6nJ8P87Exj8PvsNH6f6+fx7zy6HfWSC5Nh
PL3IGP7r4mQYfy91O99fsPywfrrSGPO/2tcj/l5jDP96nftzPW0Mft9o/cF/
3Wz98/1L8xvrkf+6HfZ6h9vhv/5nDD7c7f78Hn8yrGfc5/7gwwPGkONDyXA9
80gyzCcfTYbx4/FkGM9SxjwPmTafp435PQqPD/NZaIz5vGCM86ovGsNeXzbm
+13JMB98zRj7rW9YX3z/PBnm8+8kw/XSe24HLxcbQ78fGMP/fJgM85GPjTGO
T9P4+YUxz1eZz1wvGPO8VTJcL31njPXZ98mwfrAiGdYrVvl+rGcagw9rjLE+
WGsMta7z/VjvNIZf3eD+8N+/p8XnTbrC+LyZMeS3RZfkhfx0q66w/tPfmPmG
Mfgw0Bj1wW2NmW8Yw/8O7hI/sF4e1hW+fzDcGPF5ZFeYH47qCvk9pkv8x3PG
dYX53ARjvj9njHiWYczzJcYQf6Yx4vP0rjA/nOl2+K+srjAeZXu8kEeOMb83
7/lBD/lux3quKE0exWnyKO0K41l5l/wd4lllV1hPSnSF9lHtduTvtcawl3pj
yKOhK1xfNHWJj3xf2Jjna40hjw5j+POkMfKVbmPuV3WF54d2MIb/26krXA/t
4vHx70V1hfb/B1/Pv9dgDP/3J2P4v3m+P9S+t+8H+92nK4xP+xlDvwcYgzd/
sTy5v27M83xdYf3i0K5wfX1YV5ivHJGm36Pcn+8LmB/g5XHmJy473vzCjxO7
wvXJfPMd8fAUY/Q/1dfD/53m6+EvzjCGvzjLGPn8Ob4e4z6vK4wfF3SF+eu/
3c73mbrCesylXeF+02VuR/y4whjyu8r9ET/+kya/ay1fjPt66xO/vsHt2E+7
2e2Q3y3mC9Y3txnzPIH5BT7daczzBeYj7OMeY55v7Arzv/t9PeLBg8YQ+8N+
Pr+XbIz6z+PGiAcp3x/xYIEx9PuUMfznM2nzec7tfB/D90f96kVjzOdlyw/8
WGT58n0Nt2M+r1tf3H8whjzeNoZ9vWv9o9692PxC/emDNH586Ha+79EV5n+f
uj/WA5+5ne+XGqNe9aX7Q31feXyQx3L355/ttL3we+Ru5/vsboccVxrz+xju
z/fLjJHf/2yMeuC6rnC996vHh/xng8eP9etvxuBHv25hvt/areth/5sbI1/Y
0v2h3/7dYX1iQHdYnxrYHX5fZBtj7Hdv5/7wn4O7Q74PNUa9bLivh/2OdDvk
Mapb/IV+R7sd8X6sMc+fdYv/WL9O9PVYr0w25vtyvh7znu52HJ+YaQx+Z7k/
8oPs7rBel+N2vl+XNv98Y55n8/Xgd3F3eN6i1PpAflDudth7hdtZz3A7vz9u
jP2nGvfH+r3O+mc9ozv0503GmE9zd9p5ue4w/2vvDv8eTqfbsd/c1R3uL/V0
h/FtB2PMZ8fuML7t3B2u93Y15veR3B/83sOY38c2xs953WE+vHd3mA//2Zj1
DMsP/mt/yxd6PLA79F8HuT/WO4d0p+UXxpDHYeYHfn24MezjKPMR+fDRxrD3
Y435PpIx5HGCMfLh+caw938Y8/uSxpDHKR4P8r9T3Y5fn26MfOlMY8S3s7vD
/O9c2yv4fr7vj/zvAmN+T9qY7zfYfjCfS90OvV3udp5fTvNfV1n+8F//sb4g
3muNsd653vrleUVj5Oc3GfP7l+YP/z6c7QHx6XZj7L/daYz9kLt8PeRxT3cY
n+4zhv0+YIx65EO+H/KXR2xfyMceNUZ8erw7jE8pY8znSc+P3+s1Rv+FlhfU
8IIx4vtLljfc9SvGyHde7Q7rfa+7HfnbG9Yf/N9b3WE99x1j+L/3jOHP3+8O
6yFL0vz5R+Yn//6E+Ylun3aH9bul7o949oUx7HVZd7i++drPQ/623O08j9Wt
+jn3O9wOuawwRn6+ypj1jbT5rOkO6ztrjVnfMMZ8fjXm389Ii8+/d4fr1016
wvOYm/WE51U27wnz+62MWd8wZn2jJ8xXBhpzP6Un3N8c1BP68yE94XplmDHq
XSN6wvPfI93O+oYx7GOMMfdTjFnfMGZ9wxjfa8vw87D+nep2/JjWE8a36T1h
fJtpDP1mGUMe2b4e69+cnrA+kdsT5ucFxqxvGLO+Ycz6hvULf17eE+YvlT3h
+06JnpDv1e6PenWt21nf6JE9gV+NxuBHkzHsv6UnrAe0+X5Y73T4efh90u2w
q25j8GOuMdazO/p6xIOd3I78ZxdjyGW3NHn8wZjnadwf+c+fLE/mF8bov68x
30825n5JT1h/OMiY+yU9of881HzAeuIwY8j/CPdnfpHGx6ONUW871hj59/Hm
N/zVCcZYb87vCevr/+hRvEF+8s+ecH31L2Pun7g/rj/DmH+PxP15XtDj4/kf
Y/Dm/J4wf73QGP7uIssH8rzE8sF65DLrA+uRy3vCeHSlMc8P9YT1iGvMD55f
NkY8vyGNzzcZ832ItOtvM+b3tXvCet+dxsh/7zLGvO8x5vkCY8jzgR7FI8jz
oZ60eobHx3zCGPx83OOD/0+5HfJ80u2Q51OWF7+7bn4jP3rOGPJ43v0hjxfd
zv2StPixqCdc/7+W5m/fMGZ+Yczz2OYL3x81//g+mNuxnvkwzd9/7P6Y/6dp
1y81v/Hjc2Pw6Uv3Z/3CGPnNcmN+f8/P53lNY+hhRVr8XGXM7/Olxc81lgfy
/5/T4sU6Y/DhV2PUjzcYY1v6d+uf75vMFeb78HPD9XX/uWH+8n9zw/X11nPF
L/TbZm643thurviLeQz29ZDbUGP4x+Fzw/XXSGN+n8P353kxY543df//B8vm
pJE=
"]]},
{RGBColor[0.6, 0.24, 0.4428931686004542], LineBox[CompressedData["
1:eJxdXXWcXdXVnQjyoXEnyUQnNhn3mXefyzx/AYKUUqBogVLcQykFCkWLu0sL
RYvzBg3u7iG4RiAkISFfZq07a//O8EfTM+++e8/Ze62919nnnPsq9zi4+MeB
FRUVnVtUVPT++9P6N476esadgbUn7P/wYefP7Bk459RR7750X+DGy56cfMdf
Vgfe3Php7eYvBF7P7DFkYesK/983/OufCTTu9mByq4HvB1ZV7Xr24z9/VX7+
muj/Vq7/JPDEz71/+KW8sbHxAZ8GFrbe88wRj1b05P950UHDTv4s8HGu9/8M
6nl/Te+NvgxshQcP6rn56e7m04NfBYad3PPcNdFBPb13n3PqN4EFS2/Y2KMB
PQd++esty1/7PvDuS7+Ult7wa5nP/zGQ7e3WPSvKvP+ywKtTeu/8SbkC/60I
3Lr8tY09vz9w9bj5H07bdGXgqY2j2/fcrwOHdG7x9nV/XhnoHeV/JqwK8Ps/
BY7HyH4L8PurAofue+73xwUGes8e8ehV4+b/Eui9eue9Bnv+OAO7f/7KxicO
9qZiQKv1+bpbeh+8Vt/nONfq/vjaCesCPxzX+4efA5de0vvf+gC+3v5lYMTt
8SXHjPgtsLGx0WQ3Bcb3dv+kDYFTvi3cP/GUpWU+p8LrHc33x60sf9f7528r
PPptXZl+HODtsM28u674saIncsafNlpwgAdz3jGwZ1av26oGekPgoEE9e+O/
gV6f/dmfgd7GTmzsycAe+mGQ1+vNq8YN7FnRa9aFg7xlN/U6bkMZ5usZpOfT
7oO9TU+6IHzGn34u9/b+gvBgb3Wp90bLyi++0PvfYN+uS3x/buJd+WPvDZ8t
0w6b+P171MfVJt7Ywb0j+jyQQMc29WjPZb7/NvX43NW+vzfzNoJ1zOAd1vl2
3czj9wZ47O9m3vV/7gXCQO/CcK+BNvPo98F+Pzb3eq1309ODvYNhmM09uOGC
wd5jz/UCfnOPvBnkLe6F7+7/55Eng/x+/p//b4VH+23hHQ3A/RagXbbw+/NL
AO5ZvoWH0V61IvBbLz1rt/S/91mA/tnSI25e8/GypUc+7lve+PCNH23lj2NJ
Ge7ddSsP3e/+tjwaxNnKI49+Lp/Y+7UxW3tw9//WlMmrreVP+mUbr9gLq8KA
HuJtGx9vA3swrCu2EZ5ot229Pn73or5xt22FF9p7W+Hx8F63bDPEq8d/64kf
b4j6g+sOHuJfv5x4OmeI58eFMu0+xGvGwF8rg8/LhnjkwZ0B9n+o7IcwkRjq
gfadP/j2HOoRdyt9fg310rjhqgD6felQj9etDczsNcB7Q71JIOB6n/dDvRSI
PcADTUcP8/r4Dr/XDRMe6Idhwgvj1DDhDf282trA9bPD/OsGebD/Z8OEV8bb
YV4fr1/udd/44R7HUUE7Ng336Pf1ATz2yOE+bn9lfPnXcI+4+ylAnA738f5j
ADB5cbjXF48A1y+He4zrH/n8GuERN8/7fBzhMZ7eWqbdRgiP7NcI4ZH2HSH/
gm/3jfDgni1+LtOvI7zpIMpqP56MVHyhnUf6n1f0wD87jxReMc5DRwp/wNtZ
I/3nD+zBY2+yNp9nbeJilO5H+47yGDcrehgfRvlx5Df2Nz/KawcB1pXpt1Ee
ebbWx+8oj7hZxXj4xCjFQ/Dlo1FeXz6Fv34Z5fXlM+StoaP9ePFqGd2bM1r2
xn0io72+/Mz8NtrH+3vMc5eP9uPPdwE+d7Twz/GNET44vjEe3PH2BsanQ8Yo
fnI8YzzmGT8//neM7x8f78+PIS4vG+TjZozwjHhaOVbXs/9jvSN7afvhAOad
P4wVnkGLRWO9vvzJ8Yz1mB9/9fk51ru2lxZvrPb5OdajzlgeoB/G+fngmwDj
zjiPOF7i22Oc7+/PyuTFOPmHgme8R9z8xHg5fXyfDvDxON47FsRaWyYex/vx
aV2ZeBwvvBCP44Un3ne816d3eN/xHvP9gB7aZbxHHg7oQV5cNd6PlwN6yI8J
uh5xYdYE4Zf5d4LiL2j9+wl6PvPbBK9PXyHOTN3Ox/MPZear7bw+/QG/nbad
8Me4tJ3yE/29nexLP0+UP3j/iV6f/mH8n+j16U/2b6L8izhy7ETlT8TdCyd6
iFOZCh83Ez3mlYE+zyYKn4zPkxQ/GZ+tjbicnaT4TXxP0v2Qj++c5I+3wqN+
maT4Sr9MUn+hRwZNlh5BXpk+WfGW+JssPOL68GQ/X3wSYDyZ7MF9978UgC74
/WTle3TrwMmKB7DjMZP9+PVxGTw5fbKvv74sQ59cPdnXMd/z+gcnS5/hPosn
e5VI8KvLoN2bk108LJ3s+TrV58dkj/OIDb7erhSeaLdK4Q2wrrE28ldnpdc3
P6AfK/38vaGMuLFLpUcd8VsZ9923UnxCfDqyUnwDff5e6QEG01aXoU8vrhRf
Ob2p9OPxd2Xg+KlK4Rl2fb3S1zdvl6HfP630x/tAGf1fVik9Cnj9VukxDr/N
fLn1FA+y6+xPGX9rpvh8/TbAODxF/gdOMlMUr0K9gN1livBzeS9s950ifMVA
qCke4/qGAMc7RfoS9rl5isfrBjCP3DtF+OV4pyi+UgdaG/j4ZIr0DP00RfzC
Y9dPEf/Qz62nSl/T71N9/bLWH+9UX0+sDCB+pqdKXzA+9l3/lT/eqcI/+n/4
VF+PveLPe6Z6ffMh4nmqn09eKJMnUz3Y8f3Py4g7T0/19eWPZcDkjamaL9Gu
U6WHwe/lU6U3EAc2TBW+aMdpyu8Y7oRpwifHO036+eLeMJ+a5nGcffrE2hzv
NOGduJqm/IC887dp0sect07zGMd/LYP210zztoNB1lD/3jGNce6iVezPI9M0
Xlz24jTlM9ppmvQY4/U05T/4Yc00fz7yXhkw32y6z6+nac8R06W3qRemK97D
X9HpXt98G3KmNN3Hz7IA58fTPZh13k8B8OvP06W/YY4Tpvv6c40/D54ufYL+
XzZd/CD+p0uvMC9OFz8Q9p7qu77CIx6mC++Ii0umiz/43gr7nDidoe8TDzPE
D5ijeob/9w0B2L1jhod5xzNrA8gX6Rm+Xv+F84udZ/jx4ifmy/1mKD9Sr8+Q
XkP/T5mh+S/sef4Mf7zvB8CSa2dIjxMPfe3LyohXj84QX4iHGfIv8TDDH+/n
1K/fzFC8JB5mCD/Ew0zhC3iumukhfTauIp6bZvrxZa2vT2cqfoN3xZniD/68
x0zhH3w8ZKbyC/LF8fY57P5Pa1NnzlR+Qn9unqn5AuPDTDdfPD1T+YLx3/rP
fDfTnz+sLBMPff1d5ue7Ks1H6fcq2Y/xocrPhx/48aFK8YvxoUrxjXioUvxj
fKjS/Iv5rkrzV8bDKtULEJbOq/JYl/mZ/Lq2SngjHqo8ztvXBGDPR6rEJ873
qqSvYc/3q5RvMI6vqqR/wJPVVcI/7LnpLPEN+BxubcaHWeIH48MsX9+v9+PD
LPWH8WGW8gnjw6x+8WGW4gfcecYs8YfxYZb4A37dMsvP31+wnvnALM1n4cfF
s6S3GB/6+ncB9erSWYp/zBezfH+/W8Ztf5vl4/FT1ie2ma35HOsRs5WPcH3X
bOkT6oHZwiP1wGzNH+HH/WZLj6GfR81WPiIOZytfsNvWRty6brb4QT1rnzM+
zBZf4KeXZou/xMNs1WfQn6+tv8TDbOVT4mGO11efJR7miD/EwxzxhXiYI3uC
j6U5sjfxMEf8IR7mKN4RD3M03+V1c3y8fObjYY70GPEwR/mIfp8jvUL9MMfr
qw9Tp83R/IT5Yo7qQ9R1c3z8rPPrx3OFb+J+rvQT4+Vc8YF62NrMF3PFR8aH
ucp3xMNc6S/iYa6vR3/lfOu0ueov8TDXY510FfF83VyNF9fd1ff85axbl+fK
XsTDXMUjhrW54g/zxVzFM+aLuV5f/Z35Yp5fH3yizLg+z89HbxDPLfN8PnxB
/MTmaf4J+y+Y5+uTFT4e5nlcN/iJ8fkv8xS/McxF84RP5ot5wi/rB/Okp2C3
f89z+XX/PPGB8WGe+EY82OecL9j9mC/mib/EQ7XmV/DvVtV+3fgXPz5Uq/6F
9YSOavGF+rlaeg083qlaeg323Lta+Yb5otrPzy/7erJa83Xw9LxqP34/Tjxf
U635DNLEf6s91pGX+vmi2p/3fkV+vVitfET9UK34S1xUS9/A7quqFb/xuE3m
S9/BDpPni0/QP83zxSeuS8wXnxCfF8wXP4DnPeeLX9QP88UX4PnE+arfIsqc
NV/zLYzz8vnKN8DlrfPFH8S3++crHpA381mX3Wsl+fXmfPGH+WK+rye/9+PD
fPGHz6mRXob/Nq3x9fKbAdYranx8PMX55sQa6TeYaUaNn18/ZP6YV6N4Cvs0
1Pj1qa+pRzpqlH/A0lCN+AQ3pmqUj9CPQo3mE7hsYY34BHv+vkZ4Bmz2qRHe
oYcPqlH+gH0OrxE/gO/j7HP46eQa8ZP6tkbzG+o76w/1bo34j3nXLTX+/Gu5
n99qFD+II7MHzN9TI/4gzi2ukR5G/1+qEX8QV96sEX/w7wc14g9xViP+QN99
Y/7Fc5bXyP/MlzXSJ/BzRa3yEf7dqlb4QjfH1ErPwf6TaqXn4LYZtZpvoF/z
aqWnkIcbasUnPKajVnygX6yN5yTteuCsWCu+AGY72fMQb3evVT0D9aR9rL/g
xUG10qfEQ63qz8RDrfhDPNSKP7DnP2pVL0B/zqv18PfnltCeF9fK/rjs6lrp
A/z5plrpOeD2tlqtN6Lf99Sq/oN/H65V/Z31+lrlJzzn+VrFY/TntVqPdfsf
GZ/frZX+gX0+qRVemVdrpZcw7h9qlQ/QzZ9rVY8Af9dZG/YZVCf+wcxD69z8
NqFO16P/U+u0/sD6cJ3yDeuhdZrPwb+tdVqfgT29Oo0P/Y/XafzgWbZO9gFf
tq+T/ZAnflenfE9c10kPoJ8H1Mk/zOd18h/0xNF1vj3foX8X1cn/6M+pdeIX
+HtWnfiF/lxQJ34x/9dp/oSnXlen+hzue2ud8hX4e2ed8M18UKf8Rd1fp/wF
Oyyukx6DfV6qE38wL3jTPod9PrQ284fdD3//tk58R15aUaf8RL1VJ32Hfyrq
NR7Gk3qNF/4dWy/7wJ6T6zU/gq6pqtd8FHF4fr2vd95g/b2pXvVQ6td6P//f
XWa+rlf8pH6plz5BXCrVa74EO+5Sr3o14vQe9ao/IM/vVy89RP1fr/yFuHJU
vfjFfF+v+jbrpfXSh+DNP+vFN+DqX/Vaz0E8urxe+Y7zJ2sTH/Z95hu7P/Fh
z8d1PfUu/xdb/5lv6lVfoZ6o9/Pjd4xHH9RrPkl81Kt+TXyYfYkPsz/i0Rrz
D/HRoPod9UeD+Ea7N6ieTXw0qJ6H/s9skP5j/atB+g/9b2xQ/qKebdB6D+wZ
bhC/WA9p0HoJ7dIgvqE/CxuEf/Rn9wbxg/qjQfoNYfVAazPfNIivtIvdH/w/
uUH5ivmmQXoP/Tm3QXxivrHxMd80KH/BPjc1KH/BPrf39ecr9udesy+e83CD
6nkw/5MNqkcgPj7foPkU+vFqg/wJnr7bIH8z3zRoPg3/ftGg/TaIRz80qF5O
fd6geI7+rGtQvMc4BzdKXzGeNCq/0U6NwjvX9xql19D/OY3KP4j7dY3iC/NN
ozt/8xqVH7nO1ah8xXzTqHwFe27fqHyF/uzaqHgBe+7VKD0IvhzQKD0IXB/S
KP2Mf45ulL3A30WN0gfoz6mN0uO471mN0ofMN42Kj/je5Y3yJ+ffjcpnjCeN
ymecjzcKL+DvA42K18iTjzUqn6Ge8Eyj17dfD/H65UbN79GPtxrFP+43aFS+
AO8/bxT/MM/7rlH8AAxWWhv3Wduo/IP578AmtTGsza0NnI1vEp+g+6Y0aX4I
XM1qUv+5/6lJfAL/W5rEJ9A40KT5KPVIk/b74HvZJtUnwJMFTcpfxEeT9Dv4
v2eT6uXww/5N0ifg/yFN0i/oz1FNWm+lHmlSPKYeaeK6ce1XjO9nNYlflDlN
mo8RH03iF/HRJH6xPtHkYdwf+/Xou5qUT4DXB5rEP85vrI0w+bS1Wc9pEp+Y
b5o0/2O+aRK/mG/69efbJr8+v9yvd9h4OL+x8XJ+06z8Tj80a/7FfNMs+4I1
k5plf8T3mc2q/zHfNGu/C+e7zdL/XH9pln5B/8PNWj/hfLdZ+Yz9aBa+8O/C
Zu0v5H6EZuGT+aZZ/OJ8t1l4Rn8Oaxbe8e9xzcp36M/J1kZ//tGs/MN806z9
gcw31kZ/rmoWfzm/aRa/mW/69eeeZuUrrg/aePD3J228zDfNijfww2vNikfM
N82qDzHfNItv6OeXzapnMN80q56BuuWqZul96Jz1zf5+gDLj9eAW5TPEnREt
yme0a4vmG8w3LVqPgT1nt2i/A+c3LcoHzDct/eY3LVrvYTxpEf4ZT1r65ZsW
8RF/37VFfGQ8seuZb1rc9aS/2PM5v2kRn5hvWtz51qkt0oOsX7VID+LfC1qU
v3DdFS3KX7Dn9S2qb7C+1aL9I+RFi+zPeNKi/SasB7con1G/tmi/D+c3LdIv
jCctrr75oEXzC8aTFu1/YTxp8fr2dQNvK1qkJ9GfNS2av1C/top/yH+bt0qf
QWeMbRUfmBdaxUfGE2vDntWtqk9Qh1ib+rVV602wZ6RV9Qv8093qj3+5Xy9p
FZ9YL2lVfCEPWjV+2HOfVtmH9ZJW6QHuh2jV+gb8e3yr7M940qp8hv6c0Sr/
IQ+f16r1FODtklb5n/tPW8Uv8qpV+MFfb28Vvri/pFX4Qxx4uFX8Q3+eaJXe
4jhahWfkxVdbhXfY5Z1W5T/w8ZNW5Rvkry+sjfj2g7UR335q1XwKvFtn92M8
adPzAIchbZpvEQdt6j/rJW3KV8wrbZqvUr+2Kf8znrRJHyKuBdsUv2jnNul1
2DXXpvkXcLNjm+ZfjFNtymfo515tfvz80N8/3iZ+cX9hm/CDfSbHtAlf0Gd/
bdN8DTA8vU36EWnonDblA/jpojbhG7e9sk18gz9ubFN+QV6+zdr0i7WJD2sj
bz3RJj5xv7Pdn/W0NuUrwtL6x3xj/Yee+MrGh8t/sPEDt6vaVB/i/uk25S/k
4U3alb8Qv0a2y/64frt2+Yvbedq1Pww0n9uu+QB4V9/u11/f5Hpue7vm57Br
qF37o7k/vV3zMfCj0C5+MQ61qx6COu1u7dJbXP+xNue/7cp3yJ+HtQvvrLe2
ix+c/7aLH5z/Whv9Obdd/IU/LmkXvzn/tTbxYf2lHrHxIL7e2678zXpru/Qz
40e76odw63Ptik/ER7v4xT+3K3/hn4/bFf9I43blL9Zb2zUfY7213dWP69pd
/TioQ3hBv7boEJ4YPzqEP+qRDuET9pzdofzAeUGH8Mz40aH8Rj3SIfxTj1ib
eqRDfOH8xj5Hfvid3Y/zX3s+5zcdml9xntahfEU90qF8hfywqEN8Qr49zcaP
+ebZHZp/4TkXdWj9g/GjQ/kLeej6Dq0Xoxu3dcg/1Ksd0odY/3moQ3zjvL1D
fAOvnunQ/AG689UOrY/Bz+90KH4zv3QonzF+dCjeIz7/2KF8QL3aITxzP2SH
9BjrI53iH+sjneIf8DShU/xhful08+PsTulV5LHaTt2fOOlUf1gf6RSfmF86
NR7io1PjxXXbd8oe1KudylfER6f4xHp8p+Zf3P/fqfkx8dGpehT1aqfyF/Vq
p/Q/97t3yv/A6786hQ/Ofzs1P+P8t1Pze9ZHOj2ec/rWr8d3an4Cv9zfKf3I
cXeKf9zf3Ck9yflvp/jAery1Of/tFD9hn8+sDft82+nuv1ph32c9vlP8ol7t
Er94nqNL8QLxfUyXxsv5b5f2r1CvdkkPAjfVXa7ebuySvbne2yV/UK92yV/U
q13yJ/xb6FL8RP936hIeqDu6hBfq1S7hiTjuUrwGX47o0vwelx3fpfzGON8l
/MJPZ3apXoC8eX6X+Mb9O13iA/x8bZf4wvVfa8Nsd1ib+7/tfghbZWszjnaJ
X9wPZ/3jfrAu5SumcRsf+Ly0S3qZ679dyvfcL2b243ymS/obZt9g9mc9PiD/
EB8B6Q+u0wak/3keJSD9wvpIQPoQuG8ICE+sjwQ0n0f8igTEL+C7OyB+IT8U
A8Ir9yMFhGfMe/8QEN+gZ/YNCP/A3Z8D4h/Xa6wNf5xo12M8p9j9uF5jz2P8
CGg/OfLQZQHlK67n2XjQ7VttvIwfAeUrrtcEFI+Ij0C//YEB6QOu1wT67RcM
aP5Ftwf67R8MSP8THwGtP7N+FtB5RtbPAsILulnhiW/g16aee95zK0/4BIy2
9VR/RC+Ge8I34sZoT3zDPHmcteGHiZ74wfNanvgH+E2364HnWZ7q6cijcz3x
h+uH1h/wu95TPEC/mj3lK+zTbfMUT7hf0saP/gQ92QdmjnriE/qT9JS/0J+0
Jz7BnnlP9USuR3ryH/yyoyd9gn7s7Mn/iHe7eZqPoV97eO58/Y+e8MX93Z7m
Z+j3nzzpKYz7z57222H+dJgn/qGbR3rKb9BDx3riA9c7rQ0ZcrInPoEfZ3ji
E/B9tif+cD+Y556PvdD6g/nkpdZf2OkKT/kK+eMaGx/wcYOn+MP9+Z74hPnH
fzx3Pf8OszfWB+/2VN/l+VBP8Q/4eND8CZ31qKf4CX887kkfcv+/p/kY+PWM
p/kEx+FpPo949Yqn+Qhk2+ue9BX88bbn7gd535N+RHz+yPAPXnxq/IAdvzA+
wm9fG5+4r8M+RxxZbt9HHPnJ+IR4utqez7hg/OJ5Fk/5ClYeGFT8gF23DIpf
yGPbBqWngY9hQdWPgI9RQa13of9jg+IT58tB1XuBj8qg/Mv7BOV/xJmqoPiE
+84NCj/gR01Q+Qv5qiGo+Qf0e0tQ+MR42oOK/7hPIOjms1BQfOJ+06B7PikV
FJ+op4PiD+JPwT5nPdjuBz2yU1B84nqTPR/42t3awNeeQXd9fZ+g8hX8eEBQ
+hj4OiioeMN6clDzVeD98KD0Nnh3dFDrX8D7cUHpQ+6XDWr+xXpiUPNn4Ou0
oOZfsO8Zhgfg5eyg8hfPIwTFL57XDIpfjCdB6SXg5Yqg+AY7XBMUfoH364PC
N257S1D8wt//ExQ/kG/+GxR/wPu7g+IX/n6fXQ+cP2ht+PvRoPgFfz9mbZ6n
s/5xH5z1H259wfgFN75i40d/Xjf7IL69bfZDfHsvKH0At3wUdOPbp8Y/2OHz
oOIj42xQ8RO8/D4ovYjnLDP+4d+fgorPCBOrDV8ch/EPfttg/ON+tJDLvy1D
yh+4bNuQ+ID633Br0w4h8Yd6JCQ+Qm9NDIlviGOVdj3P19r9GE9C4hf1iPWP
51FD4hfrdSHlL9o9pPxNPRKSPZBvukKaf7GeF9L8i3okpHhHPRKSvuD+/pDi
Jc/7huRP7m8OSb/ATQtDymcY164h5TOeDw5pfQd/3zMkvGE8+4SET9Z/Qspn
GPZBIeGZ690h8Y3xJCT8I74dHRL/uL4ZEn9gtkXWRnw72dqsD9j30e1/2P25
n8L6g++dZ/2HHy8MKX4AF5eElL+QP68IiV/In9eElM8YT8yewMvNIfGLuAlJ
X1CfhMQv6Ku7Q8pv1Cch8Yv6JCR+YTyPhpTfgJfHDU/Ay1Mh8QvdftbwCD+8
YHjFfV4xPCMfvmF8Q7x+J6T5EPr9vvED+fBj4xf3L1ub+4WszfMdxjeuv9j9
8PcVIfe84s8h5V/ov9Uh6UX8uy6k+IF8WBHW+Ll/JKz8z/lNWPZEfN82LH5x
fhOWP/h6jLD8BTuPC4tfjCdh5S/gZkpY9Q7gcnpY/OL8Jix+cb99WPxCN2rC
mr9wv3VY/OL5lrDwjHjaHhbeuZ8lLD7wfQDWpj6xNuJjytoYTzYsfmE+XrD7
w07bh8Vn+GOh9Q9/3zUsfoG/u9t4eL4irPkY9YnZg/HE7MV4EtZ8jPXlsPiF
efYRYfGL61Vh1ad43jOs/IXxnBQWv9jPsOIt+Hta2NWPZ4bFL/z9HMMX8HJ+
2H2/zUVh6S9879Kw8Au9dWVY+Ob5g7A7X7oxLH4gHt0SFn8wntvsczznzrB7
nvNe+xz+ud8+B18eDrv6scf6x/2CYVc/Lg4rfoAHz4e1foFhvxxWvQN4ez0s
vQhcvBWWXuT7VYxvGM+HYff80JKw6h0Yz+fGN54fDbvz8e8MH+Dzj4Yf4G2l
4Qvj+cXwh/rUr2HpK76PIaz5DfejRTQ/A++2jAj/PJ8ZEV+Az2HWhl1GRcQf
hNGxEfENaWY7ux/wWRkRv7G+NT2i/jB+RMQn6pGIxkM9ElG9kHokonxFPRJx
6/PtEdkTeTAQkb3x91BE/oA/YxH5i/EjovoVxpOJiE+c30SEB85vIsIL90dF
hCfgc9eI8IZzw7tH3PP/e0aEV+Bq34jwjHrGARHhHf48yNrIt4dG3PnaEdbG
ZcdElO+g30+w72M8J0X6nZ+258Pup0WUTxk/IspXjB8RxQueT4oonjB+RBRv
WK+OKB4Bb1dGVD9CvrnW7M/4EVH+At9ujSh/wT+3mX8xnjvN/+jHvRF3PfQB
ww/w9nBEegh8K0eUv7jeGpGeYvyIuHrxuYjyBeLhSxFXn71mfABO3jK+4LJ3
rc34YfwCTpZYG/rsM7ue8cPuT7cZvyGLlhnfuF/VxgOZ/UtE+hB++NXsgf/9
zeyF8QyMyp6st0Zlb4x/m6j0O+47LKp8xfpIVPkK/hwXlX5hfSQqfGD8lVHx
i7okqvkH5zNRt344Nyp8Ih/URMUv1lej4gO62Rx1z2u2R939El12PcYfss8x
/pi1OQ+Lin/Q2xn7HHGnEBW/uD4dVTwA/xdGxSfcbteo+MT9/VHpP/B/z6hb
j98n6u6f3j+qfMX9U1Hxi/ojqvoG9Yf5j/WRqOrzXK+Kan6ANHVSVPNznqeN
uus5p0cVvxk/ou7+8XOibj3x/Kh7/vCiqPhF/REV3oGjK6PiB/VHVPzA/v0b
rc19pNZG3L/Nvo/x3BkVf3j+LSo+M35Yf3g+Iap8y/Ms0X7n42z8MOtisw/P
y0WV7/kexKj0N+NHVPENeHsrqvyF8bxr/sN4PjS+YbhLzP8Yz2eGDwzja8MP
9Yfhi+93iqq+hqeujGq+Rf1h+GX8ML4Bb79FNf9i/IgJ/5iPbR4Tvxg/YuIL
rh9mn8Ofo+z7uGxczH2f1HYx5Svqj5jiAddnYooX9EtM+Zr6I6Z4w/WZmOoZ
yAf1MekBPLc55p5HaY+555O7YuIT9FcoJn9iPLGY4ifPl8bc99FkYoq/3P8U
E354/j/m7udYGOv3vtOY+MT4EROeuR83JrwzfsTEL8aPmLtf/6CY+IM495eY
9CH03eGxfvUQuz/rq9ZGfF5k/UF8Ptn6C7OdauPBdWfExC/u940pX3E/Z0x6
GX68MKZ8BfteYvbmeo35g++PMn9xvSYmfcj1mpj0PtdrDA9872s/vNwdU/2Z
9RDDG+z7YEzxHfh/NKb4z3qI4Znv3zC8w2zPGj8AgxetzbBifEJ8fsPa3F9q
bYznA/s+9mF/bHzjer49H3j5Mia+c/02pvgAmv0QU/xgPcTGz3qI2Yf7Q2LK
/6yHxBSvuF8kLv1A/RFXvANut4pr/oz7DIlrfg1/DI+LX9w/EBe/oCvHx8Uv
niePK36jHjQ1LjwijsyIC6+Yls2OC894bnVcfOL+pbhbP2yMi0/gS2tc/MH4
O+x6wMSzNt8fFRefEOcT9nx0Ox1XfoVb8tZ/vl8oLr1L/RHX/JLvGzT78P0G
cfEJ9tgzrnwFe+wdl17AbfaPa72E9Y+46hmsp8a13sLziHHxifup4ppvMX7E
hRfqj7jyFccZF5+4Hy8uPsFuZ8aVr6g/4sIv9Ufcff/A1XHxgecFrM3zjHHx
AXb/t32f+8Pt/uRBXPmI59Ktf4hPD1j/EYceiWv+hHz+WFz5Gtc9FXfXC5+J
u+e5XjB+sD4al14An1+PK96xPmr+Y300rnjJ+qj5H/ddGle8ZX3U+MJ4EFe8
Rnz7wfDHeGD84X5kwy/mB2sN79yfHHfrCwMS4gtwONjauH7rhK7n/rKE+36l
kdaGX8ckxBfEwwkJ6VWe900o33I/a0L5h/vREu561eyE1qu4Py2heITx1yUU
r/BvY0LzW6wrtiaUfzCf6Ewo/zAeJDR/ht8iCcVPjCeREH543jyh+RPjQUJ6
iPEgIXwCFjsmlH+gb3axNr62W0L4R/7dIyF+8Bxywq3/7ZdQvoF/DrQ2/HmI
takn7P48f2rPh1+PS7j1iEX9xnNywq1HnJpQvKCeSEjvUU8klL/5Po2E4hH4
emFCeo96op9/rkiIT9z/kRCfMJ4bEuIT9URC+p96IqF4y/WVhOIx9UTCrTff
lxCfqCcMv9QThm/qtIT4BTs+nVD+AN+eM/7ADy8mXL69atfDrm/a54g/7yRc
vfeBPY/vU0302x9o/YfZvkwoH+F739r44bcfzT6Y/65MKB4xfph9YY+1Cek7
zkeMX4hbg5LS63xfbVL6gu8PSbrxdmRS+oX7wJLSN3xO0t3/PSmpfIN4OTWp
fAA7zbQ2vjcnqfyBfDs/6eqvemsDp83W5vwjKb6w/mlt7FcJ2fNY/0xKr8Gu
qaT4g/XcbFL8od+S7vrc9mYf1j+TytfcT2325Ptwksr3XD9JSg8g/+yb1PwW
fjogKf7Angcn5V/WP5PiD8LgkUnlI9jz2KTyEexxYlLxHPf5a9LF36lJ4ZPx
IenqubOSwjfnG0nhn/s5rI2vXZJ0509X2ueMD0mXTzdYm/HB+sP4YP2F3e5I
Kh5QBySVn3Cf+5LKT7DnQ0nxB399NCk9DHs+kVR+Ag6eTkq/MT4kxR/uF096
zu/fvGb+5vuhkspP0LfvJhVfGR+Sir+MD8YvjOczwx/w8ZXxC/r0W+MX44Ph
nfHB+MH3w9vnGPda+5w/L5NU/oLdB6T0Oca/Rcp9/982KeUfzO+HWRu6fmRK
8QH5fGxK+Zf1ipT4BNxXppS/qatT0nd8/0xK+Z/nq1KKX6BxTcpdj69PSV9Q
h6TkXzy3LSV9gvF3pcQn7t9IaT7E99ekxCeMJ5ly32eUSQmf3L+REn6xHr8g
JT7x/SXW5v4Na4Pvv0+JD9y/kRJ/WK+wNvTW/nY999/b/VjvTCkfYjhHpJQv
uV6SUnxAPj8+JT6BryeZPeCHU8xemJecnhKfcN2ZZm++P9/8wffrmL/g34vN
n7DjZeZvzMevSolP4N11KfGJ591Tmh9hPevWlPgEe9xueARe70op/sO/96ak
r0CDB1LKF5yPGP6B456U+II4/aTxhftJ7XPErxeszf1fKXe/3+v2PO4nTbn1
xfetv4gzH9l48L1Pbbzw7xcpxRf49xvjF/drGL94Tjql+AW7/5xy3/+zOqX5
E8azLqV8xfc5dCtf8Xxtt/IVA2S38hPrE93iE98H2y0+8X2H3Vof5X6NbvGJ
5x263f2rU7rd99fM6BY/EL9mWxvxq7pbfMH6Wa21eX7G7od+ttjzeF7C2sC3
1y3+Y5xhGw/uG+8WnxC/u7vdekuuW/MnhK9St+ITurVDt/Zbcv95t/jE+Ui3
9DfMvUe38hNwsHe3/Mv3xXa751kP7HbXnw7pFn7o127NHzgf6Xb133Hdrv47
sdtd7z25W/jmfKRb+Of5UmvDv2dZm/u9usU/7veyNucj1mZ9057Hcz/WH+qN
bvEJNLi5W/oPj/1Pt/IV9Ua38hX3j5q9YPb7zJ7AzUNmb9LG/IF4/Hi3+AS8
Pt0tPrG+aXyCHn2pW/Umzke6pf85H+l29ye92y39w/qm4Q/D+sTwCf8sNb4B
d19293ufmPGB9QzjC/yzwvjF90dZG2FvjV0P/6y3+/FnhNLKT6jvDU7r+ej2
1mnlJ1w/NK3x4PoRaXf9bWxafIIumZAWn+DPyWnFJ9htalp8gj9nppWf0M85
aeUnjL86rfyE+UVdWvUnDLMprfkAhtma1nyB+0XT4hPibzAtvOG+0bTwCP2Y
TEtf8fxKWvkK/cqn3XpeydrI0zumxQ/WM9LiF+OHtTGePex61jPsfhjPfvZ8
6g3rH9dHrP+w6+Fp6VnEsaPT4hPrm2nlb/LA7Ace/C0tPiHsnpZWfsIDz0yL
T6D1OWnpd9Rrz0+LT8DBRWnxCfi+LC0+wT9XpjVfAF+vTWs+zvVVwx/Gc0ta
fOL+rrT4xP1daeEdz70n7eaX+9P9zr+nxR/u77I293fZ9Vg+XWz34+9tGZ/A
m5fT/X7fJq18RR1l/afZbXzcb55WPIF/PzV+cb+52Q/2+Nrsy/eHpVWP4H7z
tPIV9PFPadWTqDfSqjcBl+vSqkcxbmeED57Hz4hfnK9khC9cPiQjPCK/Ds8o
/nN/aEb4Bh7GZ4R/4GFixt3vN8Xa1BvWxvhn2fd5/tLaiN+1GTcfNWbEH57/
t/7xfTMZ5VvqjYz0Hs/zZpSv+X4AswfPb2ak9/j7VhnFL/xvMaP8BD/vkFF9
ArDaKSM+8Rx7Rnyi3sjI30i3f8xofoD4tV9GfIKZ/pQRnnjeLeO+D/TQjLtf
58iM+IS4fGxG+IYZTsy4852/ZsQP1Of/nnHr6/+wNt/HZm2M5zxrMy1n3Hr5
xRlXD16eEb/Qz6ut/xjPdRnxCfP5mzPKV+Dhv81e0IP/NXvCP3dlNJ8CX+/L
KF9xf3lG+QrjeTQjPnE9NSM+ga9PZZSv+L6EjFu/esHww/Nvxifg7Y2Mu970
jvELPPggIz3I92IZvrl+klH+wHi+zPRbTzW+cD3V2tBzy63N93Vk3N9zWGP3
53qq8Q3drsiKX9yPkVX/ca5166zGy/WTrOxBvZF195OMzSo/Mc5lpRdYD82K
T1w/ySr+8f2pWcVHvv8hK/9Tb2QVX7l+klX8Be+bsuITeNaWFd4w3+nKCo88
L5sVn3g+JSs8c/0kK7yj3JOxNr6Xz4ofGE8pK77x/TTWBi53seu5nmptrqfa
87meav0DLPfPuutpB9n4qDey4hP1htmH+7my7v6S47PSf7hukdkffv2b+Yfr
qVnpC4SpM7PSH9Qb5n/Y43zDB/LLRYYf6g3DF/dzZaX/uB/U8Mj9oFnxh/tB
rc39oFn3/YV3ZsUH7ifPil/cz2Wfcz951n3/c0/WPX/8ZNat3y+252E++7z1
B/592fqPePxaVvEC8fgtGz/+fS/r1ic+Mvvh+5+afYH3L7LKV7Rr1t0P9n1W
8yn0c7n5F/b4OeuuR602fCBgrjP8ME7khC/qjVy/30PLCZ+sb+Tc/afDc+55
4dE54Z/1DWuDxRNz7n7aKTl3/WqG3Y/vb8+579eYl1M+Yh0+J73H99lZf6k3
cuIT91/kFE+oN3KyB38fIKf5FB6byCk/sb6RU35ifSOn+Mff88kpP/F9Zznx
CfbYOaf8xPP1OeGBeiMnPvF8fc49X75vTnjj72PmlI/4O1Y5xX/489Ccux/1
qJzyB39vNCc+sL5hbe7fsjbscmrO1ZNn2P1g/rNy7vvYzsuJP7DDBdY/1n1y
4hO6f0VO8YLv68uJTzzPlhOfeJ4tp/xOnpt9ud6ac99HfHfOPT91X07xEON5
yPzL9dZcv/P2OfEJ1z2Vk/5jfcPwxf1bOek/yiDDJ9+nYfjl/q2cu1/hA8M/
3/dlbfhnqfGHfsopP1FvWJv1jZyrJ1cY3xB/VtnzuV8j555fXp/Tei78U5HX
+GD/wXnFE1hh07z7/qrN86r3Qd9tkZf+hvu2ykvvIT9skxefMOwhefmT+9Hz
8jeePyIvPMA/I/Oaf8N+o/Pu/puxeeEN+Xp8XvMR8Gy7vPAKmk3KC8+g4eS8
+EVe5F19Ni3v1htmWBs6oMraeO7svPiF8cy1+8M/1fZ8+HV+XvyHXWvz7v7e
+ry7P6/Rxo/41ZzXegPjZV7xiPvnzb7Qj515xTPwtsv8A/x6efGJ7x/Ii0+Y
50fyyk+IF7G84i3ckMi761UpwxPskTa88bl58Qnfy+XFJ9ijkJfewnyxlBe+
0c/t8+IT4sGOefEB/l1obeB157x7Xn/XvHteZDe7H9fH7fl8f0pefAK/98qL
T5hv723jQzzex8aP++6XV77ieSLjF2TBgXnFK7j94Lz0AXTDIeYf1MP+kpe+
AK4OM37hz0eY//k+cOMX19fyisfwz3F5zdcxnhMMf6DRIsMn8vtJhl++D8nw
jetPMz7g+tONLxj/GfY58P1P+xz4Ptv4SB7l3d9HP9/4jXx6QV75CPHrQusv
/HJx3t3ve2ne/X31y80eGP+VeXe99+q8e97wWuMT59N5V+/dkJfew19vyqs+
wfOXxifEzX8bHsDX2wwvMPN/88pPuO+deff3NO4yPgE39xhe0a3/5d39Cvcb
3oGHB40PyLcPWZu/r2b8IUytzf2Qdj3G84Txle+jsOdjPIutfxjPs9Z/yNjn
bHyw2ws2fp7vyit/sx5g9sN662vGJ54/z7vnq98yPgFG71g85O8jGZ/g3/fz
0vv43od5dz71seEHeWuJ4Qv4/Nzwx/1VhlfqRssX3G9l/ID9vrc2+vGDtVm/
NP4A3yvsc9Yz8+5+wVV5d7/eamvDrWvybv1knfEJ/6y38SB+b7DxAg8DCrIH
379RkL1gv00KsifyyGYFzZ+oNwriE/VGQXwCHrYqyJ/AxTYF8Yl6o6D8BJwP
LSg/od8jCsIP/D6yoPkT8vPoguYfsMfYgvDK/ekF5QfsT9iu4P6+wqSC+MXz
cwXxA/lsqrVZV7E27DLD7of8XFVwzzvOtucjfs21/iF+VRfc8yg1Nj6+b76g
9TnksXqzD3DSZPaDPZoL4hPXjwrSB4jn7QXxCW7qLIhPsEegoHgJfgQLiqfQ
7+GC8hP4EjX8wB6xgvQPdF+iIPzxvHBB+OT+2oLyE+yRLbjzqby1oVeKhX7r
Vdbm+0kL4g/MsKO1+XuX1ubvRRXEJ4znd9bm7zVY/4DrP1j/4aY9bHzA+V4F
6WH4YW+zD88rF7Qegfvsb/wCf/9k9uf6uvGL+/kK7nnDQwrS92DdoQXpf54P
MHzAv0cW3P03Rxfc90sfW1D8pi4yfELHnmj45ft8Dd/Ih6cY/nH9qQVX751W
cPXeP4x/iBdnWht6/iy7P+pp59jzgafzCtJ3sN+/CspHPM9UkL5D/ri4oHxN
OxVUH4UdLiuofgr7XWH2RP64quC+v/aagrvee11B81/c9/qC1kvQ75sKWu+H
/W4uuL+/fqvhh/sJCqpPAAa3F1Sf4P6CguI/+HGX4ZVxvODWB+41PgEH9xkf
EC8esDbfl2xt1H8ese8DV2Vrw+499jz49/GC9B/s+qT1F/88XXDPJz9j8QP1
q+fMHhjPCxZ/gI+XjE88r2H8wXhetfjG9YeC6km47k3jD/j1tvkb9e53jT+4
7n3jD/DxoeGL5z0Mf4gXS4w/mA98anjl+dKC+3taXxje4b6vjA+wxzfWRn3j
O+MT30dubZh9WcGt9y0vuO9HX2nP4/ky6w/0/S8F6T3UA9dYfuL7M2z8uO96
y9fw828Ftz5RUVT+5/nWovQ2/h1clD/Q702L4hf8u3lR/IJdtyiKX3xfdlF4
4HmWoviF9e5ti9I/iJ9Di+IX8D68KH4BZyOLwivsMrooPMMeY4vCO/w7rig+
IN9PKIo/3H9WdN/XObmo/IX5yhT7nOfl7P78vW/rD+w42/oLfM8tKh/hPtVF
8Yf7XYvKRzxfV5Tew/jri8r33M9WlL7GbZuL4hPw3Wr+QVxrN/+B7x1F8Yn1
DPM/3z9eFD7wb6go/GD+HikKX6xnFMUvjCdRFJ8wnmRR8xfWk4uu/ssUXf2X
K4pPWG8uWBt6uGRt5Lft7fsYzw5Fd//uQmtjvrdzUfzh+5Gsv8D3bkXxiX6x
8SLM7WH2wLD3KipfwQ9/NHuynmF8Qvzaz/yB5x5QVPxjPaMoPQ9ZcbDxifqi
qHwFexxqfEI/DjN8gR9HGv64b7UovQS+H1N0zxceZ3yCPU4wvMPsi4xPuM9f
jR98v6S1YY9T7HrY9VTjF+Y7p9v10Etn2POR3/5ZdNefzzZ+Ae/nFpWv4Lbz
iu5+x38Vtb7A8w1F5SuM52KzJ/58aVH6j/uXzR98n6X5C/HrqqLmV3jONUX3
fZrXFaVfuF+xqHyF59xYdPf73WL44+/DFZWvkJ/+Y3jF+tvtReUHrIfcYfzC
be6yNn9/wfgC/v6v6L4f7H5rQ788aG308yFrIz89Yvzi70lZfzCex6z/fF+v
jQ/XLy5K/wEPz5q9YPfnzZ547ovGH+iAl4vS3/DDq0Xpc962KP2B+75h8RTX
vVV0z2e/Y3wCj98zPqEe8EG/eP5R0X2/ySeWD/j+CuMP4t9S4wNw+Lm1Ybcv
rY3xfG38gH77pujW27/rl89+sO8jPy0zPkGfr7D+sb5h/efvYRTd34ddbXxi
fcPyFcbzq/GJv59h+Z7vE7X4BTsOKEkvQJ8PKilfIX4NLsm/XI8tKX6yvlFS
fGV9o6T4y/pGSfGZ6yklzZ9Y3ygJj+j2sJI7XxlREn5R7xpVEn9Y3ygp/7C+
UXL5Md7aXE+x77O+UXL3E1aWxB+8r22qPR/z3+nWP+BypvUfZq2y8SG/zS4p
nsC/c0uKN7BHdUn6GTyoKbn1idqS6kP8uWDzD+sbJfGL9Y2Sq+9bS4qfiIrt
JcVX1jdKwg/f31wSvvj7WiX3/UDhkrv+Gy25+i9eEr6Bj0RJfAPqUiXxAeNK
Wxu3yZbEH8T1fMldzy3a9cDHArs/+r1DSfkJ+WDHknvecKeS4gX8uEvJPX/4
Oxs/99OYfaB//lBSfKK+MPvi+n1K0n88n1xSPOR6ifmT+qLknoc/uCS9x/WS
kuIx5hOHlqR/YP/DS+55xCNL0lP43lEl9/cyjjE+QH8fV3LP955gfMJ8c1HJ
Pc/0V2tDn/zN2phf/b3kvo/5NHs+f3+zH7/PNP5wv2DJrUecU3LrEecaf2DP
840/iHcXlJSfYM+LSqpHYD5yifEH85FLzV/IR5cbf7h/qKT8xP0AJXf/zLWG
D+Tz60tufetG4w/PQxge8f1bjT98v3bJrffdbnzCc+4wvMOedxkfuL/A+AJ7
/s8+x23uL7n18Qfs/tQT1h/g85GS9CnCRrkkfQd7Pmb8gT0fL7n7+Z4sKX9D
Hz1t8Yfv8y4pH8Eez1k+4npJyV2Pf8nyEb7/ivmb+6GMT9QXxif2w/IRz49a
vOZ5MOMTf4ejX7z/2PCM8S+x/IHvLzU+gOefGZ+Apy+szfqFXY9+f2P347ax
krv+9YPxG/FxmfUPeFhRcs9/rTQ+AQ+rbPzIGr+YfagnLP8AD78af1A/Xm/x
DOcHN5Skv3neZIG7njhogfwLmG2+wD2/8X8LFG/B5y0XKD5jPrr1AvGF7zdf
IHyCZ0MXiC/QL8MXuOupIxe4em60tfl+jgXu71+NszbjtN3v/wE8RlJg
"]]}}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0.},
ImageSize->Full,
Method->{},
PlotRange->{{0, 80.448}, {-2.3845, 2.622}},
PlotRangeClipping->True,
PlotRangePadding->{{1.60896, 1.60896}, {0.10013, 0.10013}}]], "Output",
CellChangeTimes->{3.5664161416479053`*^9, 3.566456512630571*^9,
3.5664633433127747`*^9, 3.566464587337265*^9, 3.566465753995263*^9}]
}, Open ]],
Cell["\<\
Es mu\[SZ] eine St\[ODoubleDot]rung dazu gef\[UDoubleDot]hrt haben, da\[SZ] \
nach den ersten Perioden die Schwingungen sich gegeneinander verschieben. \
Daher betrachten wir nur die ersten 5 Sekunden:\
\>", "Text",
CellChangeTimes->{{3.566416159938919*^9, 3.566416208774136*^9},
3.566417332380496*^9}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "asym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "asym", ",", "1"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "5"}], "&"}]}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566416210895996*^9, 3.566416261044602*^9},
3.5664173353662987`*^9}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "asym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "asym", ",", "2"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "5"}], "&"}]}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566416210895996*^9, 3.566416271659527*^9},
3.566417337909851*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{", " ",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "asym", ",", "1"}]], ",",
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "asym", ",", "2"}]]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Full", ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "5"}], ",", "5"}], "}"}]}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.5664158836474*^9, 3.5664161291092033`*^9}, {
3.5664162781397667`*^9, 3.566416278683469*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {{}, {},
{RGBColor[0.24720000000000014`, 0.24, 0.6], LineBox[CompressedData["
1:eJxFVAloVFcUHSeTZJKMk5k/oWpcWq2tkSCiVEUk3OuGcQl1w4qISEgliJrW
brZuiIiIiErrGqxLiaYiIlJURLxTa9VotC5pJQaJmoTURM0kEyezx//uffN9
MPx5//1777nnnPuGllbM/9Jus9nKzJ96Fnwxsu2zogtg45Xntxdu/6D+3kX4
tePUjdkTgvTvupefjnHWwsQ/bn1/9egbelRS6lk8sQ6mLG+5P6yhhsYtuzzT
ZW+AUMHS3dfePoM7x6dfCCaegdoVLO0Ec1O37uULCKh0OyIwd9eBNcbWZvi6
KPvxb18loCGyaeWVb1v1+yRUq88m/w+zXApJAlT2wu1t0K/+Xs+Cpgisbo39
3vnwNXD63d0g9TugfO/rDTCuTecJQNmkxs93HfhP99UFgvs6Hcsf/XR4RhBu
qjLLW0hwBOGgGeW/3UkS3w3JOtV4mCQ+BNva510asi1BNSYL+aN7dH82/18K
xrUeMIPNzm3+j7mhMDDcql6Km2hLSqNwsvL6R+fWxonbqo/Ch5ywhxSLkU1x
kLgAHT6kVkL394Lyzs54/lNeEk6rNJ5qGqjgb+mFAY5F7lHnn8IY55lBS8ps
OIL/vIJXCma7DVP8SN0+eELJUheGaTtXmQz2QZP0n/s74jCSG7Gj1I/DCl52
lO9iIHjsOHiJYjQGC5uqzIxpmNKjS8FanIacblEImD5/GgrOoMbtsPCpt/um
OvAbFqwF7taq5cA5LMd9rWe6jq8Cbm9SOqb8Jnyn44/Klmeaqdhk5+yMDFRq
rzHatX4Z+LfZdfneoNY7E1N8S75MHR8lwZuJXLYwQfunqsYzUfyTJJkDJzId
nUmqUDY57sTzR9RBL/2pZA86kdM2Jkh8lYWbmeA4iU5Z+Ilqe2eYhL9sFL+8
JX69KhvFJwGSOtnIdl7WRuLDHHyjtpfrSfTJwZSfRZ8ciy9mcZgLeVzzG7VP
XSg4W/QcuZDLtnaA4OyLEhfUvu2LDPNcCMTvbjSLmSnD2m9u5LEpigK3d8SN
/6iwyqiet1zrXPrIRaZ7UFj7I9fK/52yjduDpVygS87RY+Hj9BUeyy/spz0e
FLs8AbmvPLieB+UXuVcCHssvgt+L4rsm4jrFXssvwqfX4l949KL4qIuYx8Ne
Sy/28ROv5ScuE/HifDV286LEvulnINN1NSb6jzUwNf/iG8Py2wM1/isNTN0v
7I9j7883KtlrDBTeY8TPZsOqJ/etgan7inUY6EPJGyLGPd6HnGdmNzFdP/is
/oQ2n+U38avP4ouv27s+7Y8GEl18en5q6R2yoAPT
"]]},
{RGBColor[0.6, 0.24, 0.4428931686004542], LineBox[CompressedData["
1:eJxFVA9oVWUUv+/eu//Pt/fuG6kztJqYISEVJiJyTizxX2pqyAgREYsR1tY/
WzENGSIypKSWqOiU0mlIWIwlIfuuaer831qISbW1jW2tubf39ra57c3uOed7
1w/G3b3v+875nd+f78nNZWvfMA3D2OL90XNJedGdqup6MHgVuOac3Y/dvfkj
nDh08Ykz743A7xU9s57Lvg6/rdwcLlkQ188WGN3x1rkPvrgC8zb+tCxo3oOh
2Rs++znZra4dW9yQSLXChSR9GFbeS0tFzz9QsqD+yrZGw3117/53nKoO+Hs1
/WO59x5QoS4IcmPLPXlpxfw9L3WDU+VePbbYcqn6nN3/wmvtxz1EAfftrrFT
A819cPfm8Lr242NK+vfDKoJVH1dSPwa/PkWVW5XMFYdvB5o95GfhaOHcP2dm
JuAXb7rSfT3w7qLcO1+XJ4CmPP34EMj5QdjOk01oXobg/dJ9fZVgYtO2xtrC
ucNAu1/fYqOeEzZ13vY62ljEA434v4+fosaj/nmZc9Svz8d2jMP9SvqQhIMH
aKWAjy/sgoLvlrR9UjAB3otHWR1MI/g7H8Ku3jVnp+9qV9LHQJqmrzKh/qPP
vQaKbuNKdAzg+tCzPxzuN9yXq7d6DAaQ6Txjus+QbLNNDLNAlvsmLxPT/Ase
Ez0QHhLTFR0sJDVrC003TrSWWBirI+EeKqbPtfz+wruNmTtriqu3JhWhrym2
cWQdFYqpG9dp2ZrXNq1nBh7pp4JNSnjI0Pgata8ycKpNE3XCUgaWicJnTOuX
idJ3ROudhZ5Zp9jrxzWvWSjnAih4s/CbcjKCiV8VE0FZKLrbGkc2Ent1l2ws
Y2KykWWosfH8VTJ8NkpuLLxM9t2Ug5ITS+PM0U8Dhb9c/JgNNwHCS67GMwws
z0Au8rS1cZhoISLz9LkOEH3yUHzTrP2Sh5LHUuU1934K6jnaFMu7IYgMf0Wv
mszBCaLkKKk+pWNTJiHL3fBASa4m+XqKLiFcS7ZaE3DFbyHtN9PlsQ6HfD8J
b/mYzje5ft7GfN8vwne+78cPSZZQGF/glRL/YNjHw/vKwnr/gPjp8zDqe0EJ
72Gcz4M3K85zLIySg+9B8Ed8/viaWBpBjv2i+5rPCIrvEjpfEXyFCw4B4z4Y
Qdk3Ck8TAX9EcAYHMKVzH8HlHOwAckwnO5jOO+v+vOP7QXRwfL/IPeX4fmOc
Rx+9s6+bHL3PQua/w/H9Kvetg+lc3yL5pkVR5jCExxejKLqngNt+FNW+HZP7
5csoiu8GQXwa1X7vB7bJjSim7yO2a1cU5V7/C/4H0NLUGw==
"]]}}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0},
ImageSize->Full,
Method->{},
PlotRange->{{0.067, 4.976}, {-5, 5}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02], Automatic}]], "Output",
CellChangeTimes->{{3.566415989290249*^9, 3.5664160451145153`*^9}, {
3.5664160765050173`*^9, 3.566416097838374*^9}, 3.5664161297448053`*^9,
3.566416279233487*^9, 3.5664173408305063`*^9, 3.566456512821259*^9,
3.5664633434150047`*^9, 3.566464587445489*^9, 3.56646575414968*^9}]
}, Open ]],
Cell[TextData[{
"Nun bestimmen wir die Frequenz ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "2"}]], TraditionalForm]],
FormatType->"TraditionalForm"],
" anhand der Daten von beiden Pendeln."
}], "Text",
CellChangeTimes->{{3.566416291402357*^9, 3.5664163272865877`*^9}, {
3.566417437987132*^9, 3.566417437987214*^9}, 3.566417678885417*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"oben", ",", "asym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "asym", ",", "1"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416344367093*^9, 3.566416404499189*^9}, {
3.5664164749772043`*^9, 3.5664164803566027`*^9}, 3.5664165186680202`*^9, {
3.5664165522816677`*^9, 3.566416554473386*^9}, {3.566416667930216*^9,
3.566416697488927*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.733`", ",", "1.907`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.27`", ",", "1.796`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.827`", ",", "1.663`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.566416365943509*^9, 3.566416383937974*^9},
3.566416480807665*^9, 3.566416519318247*^9, 3.5664165549251204`*^9, {
3.566416668287786*^9, 3.56641669808327*^9}, 3.5664168622938766`*^9,
3.566417345454031*^9, 3.566456512877421*^9, 3.566463343445711*^9,
3.56646458753297*^9, 3.5664657541864157`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"oben", ",", "asym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "asym", ",", "1"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416788206684*^9, 3.566416811680894*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1.485`", ",",
RowBox[{"-", "2.089`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.079`", ",",
RowBox[{"-", "1.956`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.604`", ",",
RowBox[{"-", "1.845`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.566416813683556*^9, 3.566416863962236*^9,
3.5664173476919193`*^9, 3.566456512961362*^9, 3.5664633434823914`*^9,
3.566464587632518*^9, 3.5664657542329597`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"oben", ",", "asym", ",", "2"}]], "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "asym", ",", "2"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}], "[",
RowBox[{"[",
RowBox[{"2", ";;"}], "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.566416884021413*^9, 3.56641688700436*^9}, {
3.5664173643089952`*^9, 3.566417366486847*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1.485`", ",", "2.622`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.027`", ",", "2.597`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.604`", ",", "2.5`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.566416888434183*^9, {3.566417357006805*^9, 3.566417366938409*^9},
3.566456513044203*^9, 3.566463343532186*^9, 3.56646458767927*^9,
3.5664657542873783`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"oben", ",", "asym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "asym", ",", "2"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416895715335*^9, 3.566416898579172*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.733`", ",",
RowBox[{"-", "2.481`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.27`", ",",
RowBox[{"-", "2.433`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.875`", ",",
RowBox[{"-", "2.384`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.5664168993845367`*^9, 3.56641736972589*^9,
3.566456513122692*^9, 3.566463343587088*^9, 3.566464587729267*^9,
3.566465754386959*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["periods",
RowBox[{"oben", ",", "2"}]], "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Flatten", "[",
RowBox[{"Differences", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Part", "[",
RowBox[{"#", ",", "All", ",", "1"}], "]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{
SubscriptBox["max",
RowBox[{"oben", ",", "asym", ",", "1"}]], ",",
SubscriptBox["min",
RowBox[{"oben", ",", "asym", ",", "1"}]], ",",
SubscriptBox["max",
RowBox[{"oben", ",", "asym", ",", "2"}]], ",",
SubscriptBox["min",
RowBox[{"oben", ",", "asym", ",", "2"}]]}], "}"}]}], ")"}]}],
"]"}], ",",
RowBox[{
RowBox[{"#", ">", "1"}], "&"}]}], "]"}], "//",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"#", ",", "\"\\""}], "]"}], "&"}]}]}]], "Input",
CellChangeTimes->{{3.566416950448785*^9, 3.566417094263796*^9}, {
3.566417128819862*^9, 3.566417220526993*^9}, {3.5664172740031776`*^9,
3.56641728085063*^9}, 3.566417453279512*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"1.537`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.557`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.594`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.525`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.542`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.577`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.537`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.605`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )]}], "}"}]], "Output",
CellChangeTimes->{{3.566417037145218*^9, 3.5664170852269993`*^9}, {
3.566417129680561*^9, 3.566417140647348*^9}, {3.56641717581981*^9,
3.5664172224107037`*^9}, 3.566417281888981*^9, 3.5664173767611523`*^9,
3.566417453831401*^9, 3.56645651320175*^9, 3.566463343687694*^9,
3.566464587817647*^9, 3.566465754658132*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["T",
RowBox[{"oben", ",", "2"}]], "=",
RowBox[{"Mean", "[",
SubscriptBox["periods",
RowBox[{"oben", ",", "2"}]], "]"}]}], ";",
RowBox[{
SubscriptBox["\[CapitalDelta]T",
RowBox[{"oben", ",", "2"}]], "=",
RowBox[{"StandardDeviation", "[",
SubscriptBox["periods",
RowBox[{"oben", ",", "2"}]], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.5664135644395313`*^9, 3.5664135932825413`*^9}, {
3.566413840931016*^9, 3.566413846450987*^9}, {3.5664172409639*^9,
3.566417250652793*^9}, {3.566417447558818*^9, 3.5664174599257507`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "2"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]"}],
SubscriptBox["T",
RowBox[{"oben", ",", "2"}]]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413595788748*^9, 3.566413604730227*^9}, {
3.5664138496182423`*^9, 3.566413852914188*^9}, {3.5664172604677753`*^9,
3.5664172659954042`*^9}, {3.566417462405601*^9, 3.566417465982563*^9}}],
Cell[BoxData[
TemplateBox[{"4.029620206624715`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.566413602619113*^9, 3.5664136050051537`*^9},
3.566413853330969*^9, 3.566415031488805*^9, 3.5664150943028173`*^9,
3.5664152865403767`*^9, 3.566415352194001*^9, {3.566417267815569*^9,
3.56641728474636*^9}, 3.56641738194198*^9, 3.56641746640886*^9,
3.566456513312286*^9, 3.5664633439513063`*^9, 3.56646458791125*^9,
3.566465754770454*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "2"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]", " ",
SubscriptBox["\[CapitalDelta]T",
RowBox[{"oben", ",", "2"}]]}],
SuperscriptBox[
SubscriptBox["T",
RowBox[{"oben", ",", "2"}]], "2"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413681720048*^9, 3.566413748696438*^9}, {
3.566413855794153*^9, 3.566413863833433*^9}, {3.566417287240891*^9,
3.566417295474732*^9}, {3.566417441918975*^9, 3.566417475309024*^9}}],
Cell[BoxData[
TemplateBox[{"0.07617363813198384`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566413749146556*^9, 3.566413864296844*^9,
3.566415031562516*^9, 3.5664150958247833`*^9, 3.5664152921305733`*^9,
3.566415353714468*^9, 3.5664172959548683`*^9, 3.566417383528458*^9,
3.566417442368752*^9, 3.566417475991418*^9, 3.566456513462309*^9,
3.566463344103518*^9, 3.566464588066247*^9, 3.566465754971373*^9}]
}, Open ]],
Cell["\<\
Wie erwartet, ist diese Frequenz etwas gr\[ODoubleDot]\[SZ]er.\
\>", "Text",
CellChangeTimes->{{3.566417980407929*^9, 3.566417988841546*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell["Schwebung", "Subsection",
CellChangeTimes->{{3.5664180333680267`*^9, 3.566418034246147*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[", " ",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "schweb", ",", "1"}]], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}]}], "]"}]], "Input",
CellChangeTimes->{{3.5664180434247513`*^9, 3.566418047212668*^9}, {
3.56641808286226*^9, 3.566418086236058*^9}}],
Cell[BoxData[
GraphicsBox[{{},
{RGBColor[0.24720000000000014`, 0.24, 0.6], LineBox[CompressedData["
1:eJxcXXWcXdXVjQcrEjxY3H2STGQm747PJCPP3xt/7w3FvUgpXkqB4hQrUNyK
FC3FygwOBb7i7u7u+iVr3az1u+GfcOZdOWeftfdee599zh1b2jP52yGDBg06
aMygQav+Pftv+C82ccQRp9cc91L/Tqd8fHBswZ2xx8e9+P2hu7zWv99ftxiW
Xf/RGH7e7dV+XvdULHnLtkd9mHiu/7jd3v3xH5+/EDvv08vvX1H+eP9l59w7
5rp9XovV4ofr+89d1dzp9dh3qTcvPefegfC5b8Way4+tKrz9WOyKlXcdW/Ve
bPulr7adcOYzsZk3/H3lkz6M8ecXYi9PWPXCT9V+aP87zx89+/PYkQP/vbDu
5idjZ+0xauX/fh7bAf/dH173Reynf3z+REup0M9+fhV7sqW0YX7xvf0nnLnq
hq9ie1eu8+zFez3dv/uq7j/xtcaHP1d+Ezvp7q+ndJ30Rv82Hat69m3s/Ulz
17p663f6H31k1X/fhc97r3/I9KM3e/7/vo+t6v0eoz4Mn/+D2nh8y0+xsSul
cMrH7/Xvuaq7F/6s59304KoB/Sp5r+zsyh7/qv7x/YMCyvGu/u1wweAA3X33
9hj/Pjjge56IXb31qhsGB3zuqzFMZ8+QYMuVszjzhtdDOQ8J4ujoW7EHVom/
MDS4a5U4v3w7RjwMDboggHdjxMMw/Q5x3jJM9/PvwwLO42sx9nd4cMjKt97W
9FLsnw2v/2GTfw4PVs/3laumZcMRwer5Yv9HBCEO+1ehZMx1I4LV87XyIesN
mT4yuPnLn5/6/fvP9HNeRwar52s2ADIyIE7e7Mdbxq0VrJb35FVi7lgrOGiT
VT35qH9VbxpeXysYv0rcd3zW/8vKp06au3ZAeX/eT/mtHUyFAL7ox+3brxOO
94t+iPHv6wQh7vrZr3X0PMp73YD68HE/x71uwL9/EM73euov8bCexnPAKni/
vF7A9/wvfP9vAqjFin/3U06/CTjue2K8/jfBan2gXNcPVuvLJXutGtj6mi/K
f4OAOH4vvH6DgHr+cag/GwQrhb+yq5/EWldNw/wNQ7x9GiPO3IZYT9swuGeV
utz9cYzzt2E4Xx/E+J4NA773PeL8gw2D3wFYb8cuGL1qJBuFeH2T+l+/UYj3
58P+bRSsmtUXv/8/oGq9P24U7HLHvit7fDP16NyNhB+I6/aNAqjxOg/0b7Xq
8YNHBavt26pR3bndqOBA3PhWqO+jhJf1Vil0+yjN3zerhrXfqIC4+6yf+B8l
fKAbz4wK8f5VP+T2zajgi1XDzX/dz3FvHI7/G+J7zsYB9fjbfsg77jbndeOA
9vKb/rJV/924sZ4H/frfxgHn9at+9nvj4L5V4jrly/7PVnV77U2EV8i/eZNg
OQb2eWiPNxEeoV5HbyJ58LmbBKvtEWBw5ybSP9z3yurrHyF+x24q+eP6ZZtK
36l/m8oeUJ6bhvr/Rozj3VT2Bvp4/aYh/j8M7cumwiPGudFmAXC3yRe8fu5m
QTUA8mXolzYLaLe+in20ypzuulnY/6+I55vcBp4f9fWU52YB7ciXMeJo8+CT
VeK67fMY1G3C5qG9/SwG9a3bXP0jTjYX/nH9JZvL/lJtNw8G4b/nQnu9ufB9
xiq1+nFz4Rvy2XQL6T/G2blFsNrf0q5tIXty2Kobz9pCeCZ+tggwjed/Qrw9
toXsHeW4ZQBxf/plP/V9yzXwuWU4n9/1ExdbBnB7337fD3N/wpYhHn6gvb7K
beJ4y1AffyR/WHe0fsdrJ48O5/v7/kYY6NEB5/W7/s1XviXVN1r6ALEdPlr4
pzxHh/L4sh/+7LXRsvcQw0+jA/q5t0P7u5XwzXnfKljtbyH/g7aS/6E8twr1
/RH6w39tJTzT/28V8N83Y5TjVrKvHO/Wso/Ez9YB7NiQz4m33bcWHmmntg5o
R7+JUZ6r7/825FFbBxfVrbrjuxjk86bb6O8W26iN62u30f0Qb3EbPZ/j3Sag
H/o6BvmcvU0Au3nElzGoy4PbSN+Iz21CffkgfN+2st/8+7byP9THbSU/6uO2
oT29LkZ8bit+w/u2DfH3ej/m5bNtA/LJ9/vpALYLAL/Up/0Y/sTtAvrBL4i3
2u2Ch1eZjZ+/6q+HYLcTnr9aJebLtgvoV38M8bldQJ7xc+j/twvn/xfibdCY
UP9+pf3dYEyA9176az95nH+H3KrGBORxP4f8b0xAXvxTyA/GSB/o98eE+vt9
iL8xwjt4xl/GyL8Qj2Okv+QdY4LVfBL4eXiM/B3M/vNjxCfQ77fHyF7DfH0z
JtSfh2K0O2PlfzF/G40VvgGHhWNDeX0a2r+xwgvnZazwlF41jMLq531Le733
2IA8/vsYeMBhYwP4ha9/iGGYx48N8fET9enasaH/+jnG8Y4N+dZPIb/w9cDh
C2MD8tAfY9SrsQH15Hvy1+/GhvL6LuQf4wLi+usY7dE42X8Mu3xcQD/2UchP
xolPQc/S42QPMO7iOPFbwHbvcZI37dc42W/az3GaL+rlOPlj+t9xmm/6q3Eh
3/ua+Htp9f2hff5gnPAN/H83TvhG/0eMF14xXxuPD/3voAH4uSXjQz46eIDj
Gh/2f/AAeYjbHKevh7/+3fiwf4MGgOsjx0tf8L6/jpd+QQ7/Hi//Ar25b7z4
DuzOU+PFZzAvb4wPYEc+/Di0D+NDe/NOP/D06/jQf74Sxq8TxFcwzq0nBKvj
Q9iJygmaP8xHywTxEfrbCcI7cTwhoF38gnj6/YSAfutr4uPPE4QvjndC8L9V
wz/nB/KDiyYIv+QFE8Lx/RIDPgYmhHzuV8ah/5sQ+udfY7Bjr0wI6EcGBaTt
bgMmP/t66Md6E0P7+Av1Y/TEEE8/054vnSh9hL1ZPjGA+LLfhOOfKP2GPu08
UfKAfhwwUfKCPv15ouLBHw5dNRMTFZ9imi6aKH5DvjdRfB3z1z8x1L8XQ7xP
lP/Ge16aqPkH7j6aKPtP2E+U/cQ8rTVJ/ALXz5gke4x5qJgUgDcfO2iAejEp
tEeDB4Dz9kmh/xkyAD+206QAfqts6ADnf1LYv6ED5NOTAur10AHYh9P8O+ff
z+P8TwqY9xg8wPzBJOkPxz8p5IuDBshvJkmf4ZY/mSQ+xvFP0vjpLyeLHxH/
k8UHOf7Jsj/Ug8nyx7isY7LsGed/svw7/etk5Qc4/sniOxz/ZOkL7NIlk+Uf
cN+Nk4U/dPfuySE+fgrj0cnSD8bvk4V33Pfp5ODpVXRxrcHUq58mB7SbgwM+
cEqIl8HUi9luU/+nhHxmMOetZUoAOn7oIOpt5xTpD3njFOkvUHrgFOpd5Q/h
+KeIXzHfMkX6AzFeNkXxAsc/JYC6Xv5OyO+mSL7MT02R/IGfN6ZofqA/n0+R
vhAmU+U/aP+mKp7l/E+VPcU4l00NyNN+IF6apwbs9y/0L11ThUfgbtep0g/O
/1TpA/Bz7NSQzw4dIF+ZGtqbYQP4+z+mhvx42ABw+2+3AYv7pob4HDZA+z81
5EfDBsD735wayn/oAPOPUwPynCEDjPenyR/Rv02T/4G8y6bJ39BOTVP8w3hn
mvgl+dq0kM+92w+x7DFN8gZ+DpmmeAHjOH6a8jPk09M0nxz/NOkL5HfLNNlT
2M/7pwkv4D3PTAvzM9+GedNp4kuwH19MC/NRP8cwr0Onh/M5iOPYeHrAfOZg
3rdgesh3hlDPaqeH9n5oAHudcpvxl6/nPE4P7ecQ6tmh06VPmIYTp0sfgbdz
p8uf4bqrpku/EafdNl3xCvzoA9PlT4Gf56aH/uXzcPzTFX8w3zJd8TXmafgM
5R84/hlh/uWKfvK5GdIPXF83I+zPZ/3kczMUPwBvfTPEz/GefWaI30ONDp8R
2q9BA7T7M6QfiCfOnyH9QLx3zQzhmeOfESAumTR8APr3yIzQ3gwfIJ+dEerv
COrP+zNCezCC+vedfye/mxnan+G8fupMPR/XL5oZIC4+eMgA5qlxpvQbeMvO
1Pg4/zPlX3Dd/jPFz2Cv/jRT+U/6+5nB6vw4+P8FM8XHgJsbZob5iTsYL901
U/EH+c7McD5fjsEOvDpT9pH+bqbyL4zvZ0bzOb+ZJX+CeZ4xS/ED7d2skP+t
zpvPCuObIaG9nxX6jWHs5+6zQn0exjzQH2aF/m0Yrzt+VmiPh4W8eFY4/mGh
n58Vjmco/37rLOkT/f4s+SvmE2dJfwGDt2aJr9HeeXzox5DZ0hfifbb0BfO1
cLbkSX2frfibdm624hFoTWm28knA0V6zlU9hvDZbfAJ26cTZiq/Jc2eH4/kx
zAfNlv1lHm22+A78xUOzxZdAA5+dLX/APPNs6QPe++3sgDxpxAD6O2RO6E9H
DkDea7sNXG49J8TbCMYj4+dIX2h354T2fjj52Lw50k/GQ3MCxolDB8BbquZI
X8Abm+aIj8GPtM2RvcA05ucoXwWx9M6RvcFtO84RvwW+95ijfCvzpXNkvwCD
Q+aIT+O5R85RfI7rT58j/oVhnztH+R/410vnROPnq+cIb9DfG+fIngOnt8+R
P4B/uWeO8M75mxOQBwzncx6fE8738NAvzwn56wjO22tzAvKa4dTrd30/8PTJ
HOkb53tOwLzMUPKyX+bI/8CujZgb5n8HsZ+bzRVfBF63m6v4HvKePDe0J5/R
nsyaK/uC+xfODVavR5LXzQ398aX0P3VzQ//2FOOJ5rmaP5j51FzxB7y3c678
CfrVN1fxCPn0XMXD8JN7zw3XRwYTf3+YK/8B/B0xV/qB+4+dKzxDX0+eK/xD
rmfNZZw4cy3yowvnBuE62ADsxuVzA+bF1xqAnblubkAeu1bIz+aG/GXkAPV6
bhgvjxyA/O/3+yHP/5sb5rOHDUBsT8+V/tAMzQ24Pjp4gH56bji/P5M/fWT5
oF9fzZX+wA79YPkCJkPnhf7pTfrnUfNC/vhEmJ+bJ/4FvZswL5zP95lfnT4v
IK/7gvnIsnnSF9izpfOUX8Lfq+dJXwCP5fMC5kGHhH+fJ3sP+efnyV8AloV5
wjtwtNO80F6PIE/bc15oX0bQz/5+Xpi/GhHyLV/PeHue9I32eF7IZ4eRh5w+
T/oDvT93XsC83RD6+UvnhXxoEHnz1fPkL2EmbpoX4um7MP82T+sttAfztH4I
eT48T/lgiPPJecr/Io/2wjz5f8jljXniB7Df788LVq+fk9/Ok7/B/T/M0/oA
+PvgMtlfzn+Z7DPwMrpM9hxufVyZ+BPeN7Us1M+RA9C/uWXSD0znorJwvWBt
xt9BWWgf1h6AmBv8O/7cWhba67WpP7ky6R/0urdM/gjzt0NZaK+GD3D+y0L5
Dxug3MvCeGPIAO1/mfJ3GMafy5RPhlk9oUz5QZiR08u0fkl/UCb+C7lcXCZ7
BrW+uizKD24sUz4Y8357mfI90Mt7yrQ+xvkvU/yL+XiiLORBP/L+F8uUn+L8
l8nf0O+VhfxzaEC+UyY8Qyzfl0X9yaD5IV5GUv82mh/GfyNpV7ecH9rTkQH4
6Jj5Yb5nBMc1Zb70B/M2Z37U/5TPF1/jc+YrvoH9q58f4vsX+pPW+eJn0L/M
fPFTmIXu+Yr/gfvt58t/Aye7z1f8Atq173yt/0H/Dp4vfaH/n6/1XOZx5isf
Rj4+X/qCcZwzX/rCfNx82WPEkVfOV74Kf79hvvgR+O2t80P9Hsl81t3zw/z4
WtSnh+aH+ZC1B8gH5of5qLV5//Pzw3lYh/mu19zGfLzn6zEfn82XPkHvvp0v
f8R873zylr+OYP5t5AL5H9qlBfKfXP9foPFDfyYtUL4MsJ69QOvlXO9YoPwy
x7VA/IzrAQtCfnwa1/NaFkhfgKPMAtU/UG8WSF8YXy5QfE/cLlB8zPlfIH/D
9yyQ/eb8L1C8wvlfIP8C/Tt1gfAO/TtngfQD+nfRgjBeHUkcX7EgWF1Hw/lf
EPL1kZzn2xZInzj/C0K8j6CeP7RA+sr5XyD+CH18foHiL/jh1xcov8b5X6B8
GvN7CxTf0M8vkP5w/hdoPYY8Y6H0B2LbYqH0h3xwofQFejxlodbXsG40e6H4
B+d/YWiHfuH6YGyh4nvAqGGh8l3k5QsVfzOeXhjyl5ED8DPdC4Vn2J3fLhTe
yf8Xhvx+nQGIeb+F4byvMwA5HeLfIbY/LQzzSWszf33cQukf1x8WSl+Yj1ko
faH+L5S+UP8XKp/GeH2h8uO47taFId/5if777oXSH/jB/y6U/nD+F4ofc/4X
yt9Q/xfK34CGvrdQ6zFc31mo9XTq/0KtR0Off12o9UXAbmS54hvqVbnyucDb
2HLpC3A1uVz+BL2cUy580/+XSz8Q5y4rD9cX12IdVIPbEFurr4eaZv084q5c
+oL5275c+oL+7lEe+pOhAYaxb7n8Df1/ufJ9wPlR5fI3zD+Wq54FZu+v5Vq/
JP8rV74MenNxufKVsB9XlYf87iHWR95QHqyuh6T+l2v9APi5u1zxDfW/XPki
2I8nyhX/M59VLj6DaXijXPlhzPv75SGfGRHmd8ulP/T/5eJnzPcukv7Qjy2S
vtBPLZK+kP8tEn8j/1uk+Ad4nbtI8RPjskXSZ/ipYJH0HbhrXKT1UOh1fJH4
GfnfItkTzv8i2RvgZ8dFyq8AR3suUv0D9Gj/RcovE8eLVC+E+49eJL7N/Osi
1ecBf2csEv/A+89bJPsKe3nZItlf1msuEh8Djv+1SPEDYHnH6vGFdZ33LZJ/
oZ4uEt7J/xdJH4C/lxZJX2BG3lokfwNcf7BI/gb3f7lI/A64/HGR8gfMfy1W
PgL9X3+x8nlc71iseIbx32Ktb+J90xYrH0CesFj5ebxv6eJQv57m+n7VYq3n
Az9Ni7V+hvghsVj1KqwnXKx6QZiZwuKAea5vuT6502LxEerBYsX/4J8HLFZ+
jPHfYvExxumLxccw/hMXi49h3GcsFt45/4ulD1yPWj3+dei/rnGb9U6LpU8M
2xbL3+A19y6WP8O0PbxY+go/8+Ri6Q/WJ19cLP3hev5i6Q9w9P5irT8x/lus
fBqu+36x1muo/0u0vsX4b0mIj9eZLxi9ROtn1P8l4gvU/yXKJ2Pa5i7R+iTt
/xKtt1D/lyh+wfw1LlH8D5y0LZG+4O/5JdIX+sEliu8h5h2WhOMfGdrBJdIH
ri+7Dbtw6BLpE/Xf91P//Xza9SXig5z/JcpPU/+XKJ/G+V+i9VXO/xLxUeYD
lyi+Y73GEvFZqMEjSxQfch6WSH+4fr9E+sP1vCVaT2P9yhLVLwI/Xy6R/iAf
8+MS6Q94w5Cl0h/4y02WKp7BY7ZeqvUP4HXCUuWvuD6wVPkuyGHeUukL6yOW
Kj5BHqZmqfSH+u827k8ulX5w/Xyp+BjwV1qqfAPt1lLxMc7/UuX3IKcDl2q9
hnmrpaoH4PwvVb0P+MvJS8N8xDfMP5+1VOszcBvnLRUfY/5vqfgY7PK1S5Xv
hP24eanyZ7j/zqXiY5DbA0vFx2h3l4qPcf1yqfgY7NcrS5VvAv7eWap4hvnf
pcIncb5U8Tlg8NNS+Rv4n+EVimeo4BXyH/SjFdIP4qBC+oH3zarQ88mbKvR+
+O3KitAeDOF1dRXRfFlzhcaH+zMVyh9i3roqlF+EOvZVKP+I5+xWofUZ1k9V
qD6G+d8Krc/QblUof4N5/kuF1hPwmlMrlP/h+nOF6m3J9yuEH8DyyorQHw8h
/7m+QvkyrldVaP0FuBmoED+CXj5YIf2B/3u8QvkwbhOqkD6Q77vNeK9C/I12
tUL6Avv5XYX8GbtdKX/H9c5K+UPYuS0q5S/BE8dWaj0Tej+1UvEK7X2l9nNw
3isV77Oes1LxPuPQStkv5FUSlarnpr2vVLwPfemp1HochrdjpfgH+V6l6hXR
7QMqZX+53lYp/8J8b6Xyy7T3lWG92XDynDMqFV9Q3yuVP2b9a6X4GXD5T7cJ
u0rxLcz7fyqlb3SjlfIn6PajlVF9fbpS+oJ5fLlS6zP489uVWs9k2rhS+WXi
olL1D1zfrVR+GXIZtkzxC9R83WXy73jMtsvk/4GPScu0XkB9X6b9GFzvWSb7
CfVftkz6gffVLpN+0M4vk37A7qWXST/wb/cy4ZPx/TLhl3ZqmeIX1Bvsu0x4
p513m/WTvp7x3TLlk5l2WiZ9ZH5nmdZjWG+1TPU0tAPLVH/G+H6Z4nvy+2WK
75nfXSZ/Qj1ZpnpU8vtlqo/hPC8L+cDz/Yzvlqnekv59mdbXyO+Waf0N3fxh
merj+W9MfIz+PaZ6Srxvq5jqt+jfY4qf6d9jWn+hf48pfsBlFTGtp3B9PCb/
gNevcBtxYtrXw+53xaQPrJeIKR4BPneNKR6hfXd/ad9jWq/kfMdUr8x8Tkz5
L9r3mPgq87kx7afCfRfHxLc4zzHJn/Mdkz1jPB+TvWM+L6b5ZTwf0/wzno9p
fZ/xfEz6wnx+TPrCeC4mfcH7v4gpHuB6Tkzr+bCngwPlq6AfwwL5F9qBIMrX
RgWKNxjnBXoe5Ds60PoKeNc2gdZXLmO5tfIRy1m+qXoe9G9aIPsA2M4KJA+M
d14gedGeBKp/Yf1AIH2gfQm0no/pqQo0X7i/PtB8kl8Gqg9jfWIQ5mO+CvdX
BGusNwSyr4w/A+W/uP4UiO+TjwTKhwGmOwbyJ4hrdw2Eb/jnPQPpD/EciD9B
jw8IFO/g/oMCrafg/sMCre/g/iMD8T/w+qMD8StM28mB/AP89mmB6klZXxho
vxXuOzdQ/TH4ygWB8lu0h4HqjWGHLg+0Hwj6fHWgfAxxGqhekvURQcjHvw33
Awayl3j/HcYP5qnf+KI9DRT/kj8H4i+MnwOtT3K/X6B4Bdc9af3A/c8a/7AH
LwbyB6yfsj7AXr8ZyF9hffm9QPEGt18HWv9BHPtpEK2n/DJQPhzz/W2g+lGq
SaB8IPOzgdYfuV5fJXuDaRhZFazeTw55b1il/D3EukmV9IH5/Crlt9Dfraqk
D7h/TJXqCdHf8VXi57hvcpX4Ff1DlfJdzP9XyV4zH1QlvsV8QFW0/quiSvlb
9tNtvL+mSv4A8m708/DeFVXiS7SbVfIPmNdUleonIa9cleJx1qtVab8B7u+t
En9ivUmV6oHIP6uU/wBedq2K7h/fs0r8lvpdJfuFOPH3nj/0/6AqxR94/2FV
mn+M/8gq5YPBS46uUr0H5H98leJ1zmOV+AnXL6pkryG/s6oUz9P/VQnPuP/8
KvEfTN/FVYqvyTOqpF/Az1VVyjcDr9f6+ZD/jVXyX7js31VaH4F9u939x/39
VarngfzuqZJ+4P0PVCk+o75XyX/AbvyvSvkPvP/JKq33YvzPVal+gvm0KtVX
QP6vVoVx82vk029WaT8t+v9uleJ16nuV4hH0/9Mq8Q/g5Msq5U8x/9+toT8/
Vam+GPP6q/GM9w+tFh+jvlfL/gOGG1ZrfRD2fZNq3Q95bV4t/YSd2rpa/gxy
G1Ot9RDqe7X4IeQ1pVr5KtiBGdXyH1zvr9b6CP6ZX631eNj1RdXyzxhvRbX4
FOQVq1b+hDipVj0S7m+sVn6S9fXV2q8NOxuvlj9h/XW1+BXrB6tlb8k7q8P5
GRTWk1QrP8T15GrFv9T3auEXeNm1Wut9GNee1fI/1Pdq4Z/1R74eeDmoWvqI
bh5WrfV1/HNkteo78f6jq7W/DO8/rlrxOFjjydVaH6G+Vys+o75XKz4HDs6p
Vn4d83pBtfQD/15SLf8Oe395tc7LQD+urlY+i7ioVvwBud5YrfVl2O1bqmVP
MX93VCu/xf1K1coPQ6/uNR4x/w9WK18Me/VwteJhbsuslv4gvniqWvE+3WK1
+BHzp/4d971arfphrqf4+bj/vWr5D+D3o2rpM/r/abXWg1hvZ33hfknrC6b1
x+roeQ+DauSfoedr1aj+Abhcr0bzgTzqhjU674L1yjWaT+p7jfKV9Gs1qjfn
dtwa7d+AvCfUhPP5E/VtSo3W3yDv6TWyz9C3OTVav+d+9xrZc8RZ5TXiP+hn
RY30CbgMarT/hP7d14MnN9ao3hH9b64R/+P6YI3q02BH0zVa72C9YI30n/Fl
jep3uJ+2RuuH6Mb2NeJX1HfLE+/frUb8Fu/fq0b7IanvNcr3kufXyN7hsoNr
dF4D3n94TfR8gz/VKL+F+T+mRnyM9fE14u+Q08k10hfcf1qN9IX1qjWhvfw1
rF+ukb/hfoIaxQeQ/8VuI4/xjxr5B8zbNTWqn2F9a43WO8ETb6qRPlDfa6QP
zH/VSN9x/4DHx/UPjx+PeahG/oT5sRrxLfT/McsX9z9do/oHyO+5Gq2/c39v
jewb9Pj1GuVbMG1v12g9Hrzt/RrVSzJtVqN8J+Kiz2vERzgP1h+8/7sa+Rvc
/3ON7DfuG1yreABqP7xW+Ea+fX238e+oWvkD/LtZrfQRuBxdq+fDD2xTK32A
XMbVKr6CXk2q1XogeNbUWsXjoM2zalX/hrB2Xq3kA3ktqNV+eYh5ca3kC1q0
rFb6AXlX1Uo/GJ/X6rwdxue14luMz2u1PoL3J2sVv8NtZ2plTxmf1yq/hfxG
T634POKEUq34DN6/Q63qkQHTXWoV77N+pFb1iNx/7jbkt3+t9A3yO7BW+Gd9
Sa3iC7z/j7XSB/z5z+4f84buP9efPT7g5ZRaxWusR63V+gfs2N9qZV+4Plkr
/UD/L6zVegj+uaxW9RCIS66sVXzC/VW1Wh9hvms1/j5kPvjmWvFt1jPVKl4B
7O6sFR9jfUut9IX784xH5sdqFc8A//9Xq3oX3P9ErfIBEMszxjvzZ7XKvyIO
e9nXc33czyNNqVV8wXpp9wf9/6RW8RbzbbVaL0X/v6lVPT305gfLA2b6l1rx
Vczr4DrFe7BL69bJn1Df6xQvUt/rVJ9Cf16n88jA37aqE9+C3Lark70kf6+T
PUU/Jtep3hx6ML1OeAMfmFMn+wwxzK9TPgy4K68L5fs9+V9FnfQJ/CWokz8C
/67x76zv8f3k73XCP3hPW534Et6frlO9DeKCfJ3W/wDDzjrlb1kPUqf9jBh/
X534FMa/Y53q4bheaPni/r3qVH8K/v27OvkP1g/UST/wmIPrtL+L60t14gvg
Q3+qi553dUyd8l/MR9cpfiV/r5O+gD//tS66/+msOq0/sv6wTnjF+8+v0358
vP+SOq3n4/4r6uSfyN/dxv3X1okvsV69TvXwPF/C/WF+rk771RAv99dF93ve
4/GSttZF9/M8bHkxP1eneI/xep3qgZifq4ueP/FSneJHyO+1uuj5K2/VaT0R
+HmvTutdwOWH1h9c9lmd4nvy9zrVMwH/3xp/mP+f6lQfSP5eL30C/ofWKx8A
P/qbetUn8/wt/47nbOr7oSdb1gv/uG2besVP4LFj61UvgmmYWC//wP2q9bIH
sOcz6zVe8Je59fK34G/z6+UvcP/ieq0Hcv2+PrpeW1Uv/UC36uqVfyR/r9f6
IfW0Xvl8THuiXvlh7heuV7wCPW2vF//A+LvrZW8hv2K94luuD9bLPqNbO9cr
vuF+gHrFx+jn3m5zf6DbcOMHrnH/IX4+94/VC/94/1H10mfg+th65ScAkxPr
VX+D8Z9SL30ADs6olz5g3s6uj56v9/d6+Qvg+KJ6rT+x/qhe8SH3x9dLP6DX
/6xX/p7+vF7rh7j/5nr5F/Tj1nrlbzDOO+vFx+jPjS+M+/568TPM63/rpT98
jvEK+/ZkvfgN5Vqv84Kg9y8a77j/FV8PXL3h5zE+r9d6J/TzI/eHeYN66Tdg
91W96gvI1+sVX3C93PJAvDWoQfrB9bQG2RvWSzYon4h+jGrQ/jmeP9cgfgy5
jW6QvYNd2LZB+kG+3iD+QL7eoPww19MalM8BPmY2KF4BPuc2qL6P5xU0SH+o
3w2y1zxvsEH4xfur3cb9dQ3KH3C/3hr3t/p9eH+iQXgHDLINqmdnPVeD8A/7
0N0gfsn90w2KzzDtOzTI32L8uzTIPwCfezQEkfNo92mQPsCM7d+g9ULI7Q8N
4sOsB2xY43zMBukH5PDnBtUX8TyxBvFt4OKkBvEN1os3CF8Y1xkN4iesL2iQ
/kB+5zUoXwb/cbHbzL81KF8E/brSbdaf+HnA8Y0Nwjvm7ZYG6S/9d4P8AdfX
GoR/yOXeBvlL6NeDDeJPzLc3KH6DfjzWIH+BbjzVID4FnD/bEKw+z5jT1qD4
A3J6zfrCfHuD6hm5n6FB9dwwix81yD7i/Z9Zf+A2vmrQ/kf40++tT4gvfzb+
UBYwuFH4hJ1dx22eh9Aofg98jWqUv8I8beY29btR/I/9bozW+49rVH9w/6RG
7adhPXWj4gXur27UeDFPZY2SB2Be3ih5we4tbVQ+HfiMNcpfU48aZa+A84ZG
+QuupzUq30t+3ij9wPykGjX/wFGuUflK5Kc7G2U/wY8KjcIT+NX2jfIveP+O
jdIfyHE3t5lva1Q9OfNtbsPO/L5ReCaP9v2Q4+F+H/NtjdJfyOmYRq13M0/Z
KH2HHzrF4wMvOL1R632Ayd8a5Q+od5Yf4+9G5T/gPy5plD7w30bZK+Dgn43S
B17WGPX3NzfK/uG+2xrFDzCv/2mUvYS/v7tR9aq0s8YX4+/GIHoed6PWz8jj
GqVP9NeNstfElX+H3F91m/psfHP9rFF8B27iI78fePnM/SMfN/6ZT2/Ufhrm
0z1++usmxWuYn7Wb5B+oz02yP+jGRk3SB8zPJk3iu/h3yybNH/NrTdH5Hduk
+QeNn9ik9Xfm15qkL6yfa4rWb81rUryC+xc0yd5ifpe4jfuXNQmf3E/h34GP
+iatz9BfNwm/3F/pNuut/X7ut2sSvjG97R4Put3TpPVS3F9qEr/kfmzLB35g
F8sPZmQPy5fxdpP2FwJX+zfpfC7g66Am2S/kOw5r0nmcrH/x/HK9zPPP9bIm
6QvizZOaxMe4XtYk/GAez2xS/MJ4u0l443qZ29z/7Tbi8ivc5nkAbkPM1/n5
yCvf5DbwemuT7Dvs0X+atN4Df3WX+w+x3ufx8jyRJtkLnn9n+QAvjzfJvmBe
n25SfA29fL4pao9esX4A7697vlh/3iR+hX580CR/gnn62POPcX7RpHw9aPq3
xgvrF40nroe7jfuHLFeb62PLxT8gn42WR88b3nS59JP72X09xrWNnwc/MNZt
/DvRbcBw6nL1Fzx45nKNh/H1cvEfxIcLlksezJcvF/4R51Yulz8A/6xeLnnD
btQvlz7gvqblsl+wB61uQ0uTy6Uv3D+5XPoCftGxXPMPftC7XHwBdrvk35k/
Wy788Py65cIX69ncRpzxO1/P/JnbzJ+tcf9h/p35M7cx7mPcP+SPjnP/gLuT
3abY3YY7O3O56v953v1y4R3vucBtrodZfuDPVyyXPrC+zW28/zrLn+thnj/W
ty2XvlCfl69xfpfb4Cf3Lo9+r+Ah4wOXPeI29dlt+I+n3eZ6mNvIZ7y8XPqK
fMjrbtPOu8158v3Mj7vNz4X4etjvb/w79dnjYdzoNvV5hdrA17ordD/Pi3ab
692+HvO6udvcr+g269ncRnw13s/j+RVus77F1wNHs1dofoCv+W4jPlnkNuvZ
fD/PO3Gb9fBuY34afT/mp8W/8zxF/876abdxf35F9HyLLv+O+wsrZD+Az+1X
CK88j3VFFN+7rYjie68V0gfW27vNeja3uf61QvpEu79C9gf4PMptnnfpNsZ/
wgrpL89fcBv+5owV0mfg829uM55eIXvB82LdRj7jUrfh96/08xlP+3nQr+vd
P8RrN/t32NPb3Ea8dqev5/k+lgfFavnyvBfPB+vX/Dv3f3r+yL9XrFG/tkL6
R/7tNvcHrpC/YT58hfwT68JWyD8zH75C+RHyb7d5fsCKYPX3iHhe7Ar5Q7x3
ULParF9rlv8k/3ab+fBmPQ/+clPfDzmMbtb7ga9t3Ga+rFn9h7+b1KzxYdxT
m+V/yb+bJQ/8fV6z9J/5smbpE+vPmyV/8u9mzQ/5d7Pmm/y7WXgi/26WPyP/
bpb/I/9ujp6Hkm1WPM98WbP4K/dDNYv/cVzN4oc8D69ZfJb8u1l8EvjYs1l8
E+/Zx23qs6+HPT3Yz+d6l9v01+4P/bX7T3/dLH7KenSPl9PULH0Efz+zWfqE
vNW5ljfs2QXNwj/r1Txf4M//aBb+YU+uMR5QP3Kd8cP9ucYf+Pstxifj6Wbx
R/rrZuVDYA/vbVZ8R/7drHwx+Xez4j366+Zo/v0ZtzFvL/h+nlfuNv2126gz
fMfvhz34sFnxGvOyzeLDzJs0i/+iXutb6xvM1E/WJ54P1RLdbzy0RfLm+nWL
7D/s3cYtmj+uX7VofYjnh7QIn5DfhBblK9jPFsX7kN/MFuUvmN9uUX4Aw1jY
onwx9dVtzF+l28xvtyjfQH11G7hs8vPJr9d4f6JF+Xvy6xbFd3h/h8fHepQW
6S+/b9AifcD9O7QI//j7Li2yJ/h39xbhH/x8H8uf+e0W4Rv4O7BF88nzDlqi
6z9/bBF+uR+yRfiBvflLi/IBmN8TW5Rf4P6pFuX3GC+3KH8Gf3aO2xjG+S3K
/wF/F7dE829XuM15dxtyvdZtnjPSovVL1pu1KB/C/fXuP+vNWqQv1PMW6Qfr
yVuk38yTt8g+8DLjH39/qkX2h3WPnh/y6xbZf8jhdc83681aZD9Zf2L8IN7+
ZA28fW788nsjLcqf4bk/tCjfBjH83KL1Ve7vb1X+mfy6Vflv/H0D/4752bhV
3wfg55ta9TzAYOtW5f/Ir1vVH+4fbJX+sJ60VfrM/SKt8i+wL3Na5T8wP/Nb
ZS8wP+Wt0geIvaI1+r2boDU6P7Wt0XrAxtZovqC5VfPP/cetyodx/3mr8A27
0N4q/PH8uVblk6nPrco3g9/+tlXnNwAfO7dqPYjnU7Wqfgvx/j5ucz26Ves1
3N/o++EmDm1Vvpvr0a1av+H3M1p1ng3Xo1ulL9zv3Cp95npVq/SD+twqfwF/
ck6r/COuO79VfIr63Cp9YLzs+cL9V7UK/6w3aY3yh5tahX/8+d/GD9dVWpU/
hhwGWrV+wmk1flkv3ho9r/GRVq3f4P7HWrU+yX1Orao3wHrR862qX0G8/nKr
1ltZP+o2ceTns37U70e8+7H1Dbj+3PoD2HzdKv/D85msL8DLL9YXrnO3SZ78
PlZbNP5Zv036gPhh4zbNH/W5TfhnPVmb8sU8369N9hv+fnyb8AS1nNIm/LGe
rE3rm/w+X5vWI1kf3qb1TPCccrcxzIo2rddDjoHbmP7aNtW3QD5Nvh/4aG7T
eifjZfeH9SVt0h/Mb3ub9AXz290m/cC4i22yB9Rnywv6tHOb/Cv1uU36gPv3
blM8B7O2f5v4P/zEH9rEBxgvtwn/1Oc22XueT9omvGDe/9ImPMEenNgmPMK/
n9omfDNeblM9Cuz42W1av+d+rzat7/M8Q7e5v9Ntnm/WpvoA7vdqU30B93u1
qR6A+73apE9cf27T+irwMtAm/UV9yD1t8meYhwctD56P06Z4BW7+MesD8PKU
9YH5r7ZofualNvkHnp/YFs0Xv90mPo55fN/6wOcYP3jOF8YX5vubNq3PM/9l
/EKPf2lTvQr45uC46lnAo4fGVW8G+azlNnmGrwf+14vreZjv9eN6H+S3YVz9
oVzj2n/A/aFxraeif5vFo/xqi7j0gXYgLv5IPhCXPKGX28aj+akxcfEhzNu4
uOJD8v+48I9xTopH7eHUuOw95D49LvzAbs+My37jutlx4ZHnEcZV3w5/VBZX
vSXr2d2GfyuPq94LdnRxXPtHYE+Xus36OF+PccT8Ptj7qrj0h3FOXPqB++vi
0fPNGuPSb9jR5fHoeuqKuPghzFxrXPEG+HQ8Hl3vScSj+b10XPEC4pNsXPhn
P+Piz3huh/EAP9JlvGC+e4wn7q+Jyz5jvktx1SMz/xhXvRfWd3aMq54S9nnn
uPaHgJ/sGlc9JHjRbnHVS3K/bVznO+D+vX0/xrlPXPVkwMl+1h+eDxdXPTHr
/+I6LwV4OSguPgY/cEhc/A96dlhcfAp24oi41k9Z7x9XPIF+Hh2XfcL8/iUe
5UPHx7W/Anb2xLj4N/f/xFVvAr071fiH2z0tLvuOeTgjrnpF6PFZcX3vDn7j
7Hj0+17nxlVvDDd8flznNwD3F8bXOA/JbZ6HHo/uV77c7wNqr3B/yA/dX8D2
mni0fvjauPgU9PH6uPwh9OlG6wPPW4wrnsD6wb8tb+jjrXHFz/RHccUHkMN/
4rL/0IeBuOw/v68Vj9aj3GP8A8b3x1X/iH49aPvNNElc9fiYx0eMX57/H1d9
MPT5sbjq86GPT8Sj3zN9Kq56eu6PiKveGGJ8Lh49r/EFvw927yXrI+zqK/Yn
sAuv2X+AL75pfYBdf9f+AcN63/LkfknLG/34xP4A8v0sHuW3X8Tl7yln23+M
65u4+A7rQeLaz4f5/T6u/VpQm5/iqufl/oy49qMwv5UQviHfIQnV0wO2wxLa
bwv5jEiovh73r5WInp+/ju8HDtfz83H/+gnpB/CxYUL+BHIelZD/gN3cJCF/
wXqzRPR71Fsk5B8gl9EJxQ/8HG4imj/eNqH4DGIZkxB/JQ4S8gesL0/IvsHe
Tk6I//C6hPg2/OP0hPAPHMxMCP+MMxOy5zw/LKH9H+B/ZQnhmfn4hPajwK6X
J7S/Hnx8sduQd4XbuL8yof0n3K+SkD5hvqoT+r4JcFqTkH5y/T2h/f6ATWNC
8Qn8yPKE9AHXNSeUL2B9bELxNcQWTyj/inlOJrT+gHGnE8qPw89kE+K73N+a
ED/CfHUkxJ/hX7sS8gdc30+oXp7+2XjDOPsSst+477fGL/1zIvp9lZ0T2l+I
+3dNaL8w7PfubuO6Pd0Gjvb2/aznS2g/CqZtP+sLz8NJRM8vPTAR/T7jwQnF
N5ivQxPyj6AxhyeUPwAM/5gQ3wQ+j7K8Mc5jE4rvWD+UUHyM8Z2QUL4HanRS
QvEnzOopxj/PzTCewItPT0S/l3tmQvt7gYO/JbRfEOM+J6Hz7cDvz0to/yLr
kdyGfC9MaP8hz+vx/bCfl/n5kM8Vfj/3A7p/rF9KiD+xPjEhPgc8X5dQvA88
35CQfwSsbrL8eB5mQvlW4PGWRHT/220J+Wvg+Y5EtN613/jH/QMJ1cdDzvck
VA/P/cXGP8Z5v/HE/cYJ7afC3x9OaD8i5uvRhPYP4u//S2j/Iab18YT2o8M/
PpmI7kd82m3Mw7MJ7U8E7p5PaL8w3v9iIvp90lesn/DbrybEpyD3NxKKx8Ef
30qIP/F71Qnlc7n+mxC/BAw+SETX6z5MaD2HND4RXQ/6LCF+i/d/kVB+H936
yvaQ+WrbS35vz3ji/smE+An3XxiPmO9fjVfM96Ck8M14Oan9t7Bfw5Par4vn
jHAbdmLtpPb7Qr/XTUb37/4mKX2BvDdI6jwkiGWjpPqLOHPjpPQbPHbTpPSf
+zeT8o+sJ00qn8b4Oal4i/tBkooXwI/GJBW/MV5Oar54PmNSfBjjm5oU/jG+
6UnZS557mBT/gB2bnZS9R//mJoVH4KwsKbxDHxYkdX4K9KE8qf3osD+Lk9rf
jvcvTeo8bsbLvh79jPn5sH9VSfkH5vOT8g9cr0uKv4E/NXp8kEpTUv6A+cGk
7AP9cVL1zeAB8aTiZ/rjpPgRxpFOih+xPjap/Af0IZ/UegHj5aTy/4yXk4qH
Ycd6ktrPRH9sPOH+kvEGPdreeMRrdzBeef55Uucfsj4vqfNKYP92d5v7ZVbj
41fyt72SOs8B/up3a+jDfknt78U8HpCUftIfJ+UveF5dUvEEun1IUvrP+l3L
h/nOZHR/85GWL+zMUUn5B57XnFT8ABwcmxQ/wjwfn5S/R79PSIovQ59OTio/
xPqipPgQ/v7XpPgHhnlGUvwHYj7LeMV8nW18Y77PTep8FMj7vKTOc8R8XZCM
nu9wkduYhkusP1D7y61vsJv/SMof8XsjScUn+PeapPwF5H1tUvkt6NF1ScUT
GOaN1g/ESf9KKv5i/japeBpx8K1J1TMh/3+77RXj56T4Ls/zSkbXo+5Kii+x
fjmpfAzs8oNJxbf8HorxB1r3iPHJPIzxSzuR1HknyJs8kdT5JZDrU24zb5fU
+UJcz7V+MF62v4BcXk5qfzuue9X6wHg5qfga8n0zGc1/vZVUvgB27t2k8kn8
fof9AfTxw2S0/unjpPwzcPVpUvkjnk/i+cM8fZVU/gR84puk4mXWfySVv6Sb
TWr/N/Tgp6T4ELrxS1L8hfVeKeGV35NICc/gI8NSOl+L/jil830YP6d0Xh3u
WyclfcFz1/PzYRbWT4lPQR82SslfYb5GpcTn4O82TYnvwQxtnhJfAl62SCmf
wPNwU/KnwNU2KdWnML+dUr0G5nFsSv6B9aUprRdhviamlD+FnZicEj+C3Zma
Uv6R62kp5UMZP6cUrwIms1PiQ/zeSkrnM2K+56ekD4yfU8I37N+ilM73gf1b
ktL5P6xfdZvfd09JX3h+U0r6we85pqQfsH+1Kekr7F99SvrM/eEp8SXo9/KU
+BLX51NaDwfu2lLyD1zfSyk/wfPeUtH650xK60HAdy6lfAj8TXtK+ST8vSsl
vgR896RkL3F/b0r2FHy3lJK9BUz6UvIHwPNOxi/r74x36P9uKZ33hmHv4d+B
h71TOk+L+WvrE3CzbyrKvw5IKb6Gnz8wpfiB+euU+B7XG1OKh6Dmh6W0/oD3
HpFSvhl4PNLyw7weldL6Ap57dEr+mf44Jf9Nf2z883yblPgw/MNJKeUb6Y9T
yg9xf47xz/VM44v+OKXzeOiPU+I7zGcbv/Ab5xnfsBMXuM31z5TOfwOeL7G+
4P7LrE/A8xXGP+bpylT0PLurU/IPmJZrU1qfoD/2+AGLGy0fwOhfKcVX6MfN
ti+Q062p6Hr/7SnxI3TrPynxI563lxI/wnzflRI/YtrW9hHvvy+l9QH880BK
fBx2+KGU+Aj3B6fE76HGj1ofeN6H8c7vm6V0/hvrq9wGXp5xG+N61voBubxg
/WCa0u8nbbF+cL+x+4/r3rB/4Pkh1g/I5Z2U6juAt/dS0f26H6SUn+D3d1PK
X/D7eymtj1LMKfEj7p9IiR+xHiSl9Sd+vzml/CnPK0hFzxv5MaV4gTBMKT5m
/JxSfMDzwdPiR+DbQ9PCN+S8Vlr4R7/XSev7aVxvTkufeP5BWv6GcksrHwV9
HJVW/hX6uEla+V7ms9OKF/j9iXR0/XB0Wvk2jHPrtNYbIJdt08rXQb5j04qX
Me7xafFXqPmEtPJHPB8pLf7L+DktfgQ5TE8r3wIYz0zrvBy8d3Za8SrePzct
fgJclaV1fhvuX5AW34E+laflD3Df4rTwjjzaUrehT5Vp6Q/sbywtfsX15rT4
EnGdFl9j/JwWn8M8NKbF94CrprTW58D/mtPyj0hbt6blP8En4uno91SSadXv
MX5Oyz9jXrNp+QfEv/m01tcw3x1p+X/ms9Oyj5BjT1r2E/IupsUveF5zWvyc
5zumFS/wPIm0+AvXm9Oy/1xvNv6B692Nf643+3fYkb2sP4yfrV+Mn9PKP2Ee
Dlgtjx+5/nFgWv6B50Gnpd+wu4ekpf88LzatfCuec0Ra9gM4/lNa9oX+Oq38
Heb7mLTyG5j3v6Rlv1ivn1Y9J+b7xLTsH/Tu5LTqGdCPU9Oyn5jv09LKJ/F7
KmnZX543nxZ/gf0+Ox09T/Rc6wfkcp71A2bsArehT5e6DVxcnpY/AK7+4fdB
vlelFS9ALNekFS+wnsn6jvuvT2t9muvNaa0vcD9+WvkkyPeWtPJJsIO3pRUv
87604jncf2da8R7kO5DW+hqec3c6+r3je9Naj+L349PKvzB+tr3l/iLbY7iV
R22ved6e8Yr7Hjee+X0S4x3XPbWGPjxr/WH9pJ+H+1/0+2DGX04rXmH87P6y
vjKtfBjk/WZa+TLM99uWB/j5u2mtN7BeK631BuRzPkxrPRow+Dit+jzud0pr
fZTrz2nVnwK3X6a1vsZ8dlr5E9jl79KKn7n+bHsK/vhTWvkj1n/ZPzCfnZG9
5vpzJpoPGpaRfce8jMjI/vO84Iz4EOznOhnpD96/Xib6vd0NMtIH8IGNMuJv
4P2jMoofIO9NM+J/0K/NM+JHsCtbZrTeCLu7VUb+ATx1m4z2S7C+NKP4GfIa
m9F+HX5fMhPdnzApI/6L50zOKH6GnKdlFD/CLM7IKH6G/ZqVkX/geeUZ+QeY
1XkZ4ZHnH2bElzBfCzPR7xUuyoj/YL6WZKQv6FeFf4d+LssoHsF8BX4+5r02
I/1k3iijeAf2pykjfgQ8r8gon8q8QUb5VOA5ntF+CJ6fmtF6G89vycgfs/4r
I3/N89IzqqfBde0ZrR/B7nR5vsmDM8q/o9+FjOJN5rMz4tu4bnvjjf44o/Uz
6MNOGfEl8OtdMoofWP9lvEMMe1o/GD9novH3PsY/67+Mf9Z/ZfT9HZ4nY/zz
/AmPh/VfHi/rvzLiR6z/srx4nrvlifcflVF+Arzx6IzsEe1CRnyW50VmxHdh
x07IiA8DlidlonzglIz8A3D+14zykZjvMzLiGzxfMqN4levPGfElxs8Z8SXG
z8Yz42frB+b7oozsP9zCJb4e03aZ8Q9/dYX1D/bryozyW+B/V2dUDwJec20m
yv+uz4gfAmY3ZJRf5f6+jOoxeJ5lRvVdmO9bMvLHjJ8z8teMnzPR/Y/9GcUP
iLvvyqheE/N+T0brT+AF92XEp4GjBzJav+L5O8Yb+vFIRnyJ+wetH7jtsYzW
G4CjJ4xv9Psp+w9M8zNuA0fPZfS9WODmBT+fbtD6wP2HGcUL0M/XMlof4fm6
Gfk/6OFbmWj997sZ8SVowXsZ8SX43Q8z4ksY1scZ8VPg5ZOM8quQ6+f2D/y+
qf0DxPx1Zo3vnWdUD83zwGxP+T3UjPgG9OvnjPgI5uvXjPg6/h2clX7g/qFZ
8XvYwxFZ8R36uazwjnlf29dDT9fLKn/E/RtZ+QN+3yMrfWA8nZU/A0w3ySpf
xng6K/3H/Vtktd7C+rCs7Ae/B5KNfp9026zqk+DvxmRVvwd7OD6rehmMc2JW
/p3nmWVVj8bzSLPKL7E+LCs+zfrtrPg27NTsrPgTz1PJKt8K/1eWlf+AfizI
Cr+w++VZ2XfWh2WVD8I4lmalP7hvWTb6fYMgK34GnFVlpY+Qa202Wg9Y7/7y
eyVZ6QPmabnHy+8ZZLXegPtbs8q3Iv8Rzyqext+Tljfjac8H7GEuq/09PA89
K3+B+erMan2J31c0HvD3nqzWpzDuYlb5eX6PL6t8Deu3s9IP6NWOWekH5mvn
rOw57OGu1hfo/e7GO7q1p9t4zt6+H/r1u6zWvzFf+2dV34f5+r31AfcfmJW/
g1wOzip+Zn1YVvWs/B5DVvED68Oy4k9cb87K/mAYx2aVX8X4jstG68lOyCp+
Zn47q/U3nueelX+gf87KPzC/nRXfgNzPyio+RV7gb1nZY8jpXOsD1Pa8rPI9
sD8XZKPr1RcZ38DTJf4d/bgsK/sP+3GF34e4/kr3B/bjaveX/jmr9RP652w0
n3ZjNrp/41+2F/TPtif0z8Y//XNW+0sg7/8Y/7D3/Vn5d0zDXVnlR1ivnVV+
HX7zvqz4NHD2QDZ6/v5DWeVjMN8PG2+Yr//LRutLH8sqvsC4H7d+8HzMrPKz
4GPP+HfEJ88Z75DLC9lofetLWeV76Z+tn/w+sPWX/jkrfgQ5vZVVfpn+Oav9
fIjn3s+q3pf57azW2zBfH2e1fwTz9WlW/hrXfZZVPA2a8GVW9Wbgz19nFR/i
/d9mlV+C/fjeeIG8f8yKb2Pef84qHoWe/5oVH6F/zineoJxzir8hxuE55X/o
n3Oy77TjOekT8irr+nrKLSe+xrg1p3wwz//NRfdTbJKTfsP+bJZT/Qn9c07+
gDjNKX6g3HLKR0Bvts2Jj7J+Oxc9b2Z8TvYKZnRCTvPHfHdO88vzUXKyf8DZ
9Jz8A/6dmVN8Db2anVP9HuQ9Nyd7y/g5p/0H9M85xRvA6aKc9IXnG+bEb/h9
sJzwjvEuy0XtfZBTPTjkVu33wR7W5qSvmM4G9xfvbcppvR04XeHxwi605MSP
cH/bGvJKWJ5IK6Vy0gd+PzSn+gzYsVxO9XqMp3Py75BXV072j+ch56L7Iws5
8Wl+zySn9TniPie+Qd6WU3yB+3cyPsmzc8rPQq92y4nPYJ72ML7hH/fy7zwv
xvoFM7xvTvrH8xtz8geQ94E51VexPiyn/BHs2ME5xc+Mp3OKFxhP57Texu/7
5uQfWL+di673H235AwfHWh+gd8fllA8BrE7Iif8C3yfllH+FPp+ak7/AtJ+W
k7+gv86Jb9Nf55R/Qjf+Zjwyns4p3mB9WE7+hN9nykXrny5yG/K+xG3oweV+
HtejrY+Qw1W56P63a9xf8L9/ejzgJdfnFD+zPiwn/gg1+5flBT35d07r0dCP
W3Na74RdvT2n/Ab04z85+XPAuj+n9Wnur8opPqS/tj3Eax7MiT/hvv/m5B+A
p0dyiieA5/+zPcZ9j+dUz8F67Zz4O+TztPGM257NReOR561fwNOLOa1/8Psz
1kd+TzIX/T7A69Zn8IQ3c/J/gM07OflH1mvnVM/F/VU58U3oyUc55e+YFs9p
/RP3f5bT+g9w80VO8TPG+VVO6w/48zc55Uu43pxTPA278UNO/AH9+tn2FP3+
1fjC/YPy4iNcb84rXsU8D89LP4DbkXmtZ+Dva/t3yHtd38/zxPLKB2EYG+YV
3yO/MSqv+kLgceO88A692Swv+8/v4+aVT4VdHp1X/Qrs9dZ58Uv69bzsCczG
mPwa+6nyskeA5YS87BWmaXJe62+Yp6l5zTfPA88rPsTfZ+ZlH7nfOa98LOQy
N694E3y5LK/9ZNDTBXnxc7iF8rzwCnwvzkt/uJ8qr/1z/L6Xf+f3O/Oy75B3
dV58B+t5tXnZe/SrLh9dP2nMq/6I+6nyipe4n8rjZ/12XnyI+53zsh/AdzK/
Rrxs+XP9Oa/1Bu6nykfPl+3I6zwkrj/nFQ9y/Tkve4hxF/PSD+6nyks/uP6c
j9Y/75gXH+f6c176gvfvklf8AT+yu/GM+d4zL3vO+m1fz/XnvOJdXLZfXvE9
5H5AXnwO832g+wv9Oiiv9Xf4x0Py4ofA/WF55du4/pxXvgHv+VNe/IjfR8nL
/mC+j8lHz9f7S171MvyecV7xA3jQiXnVX0I/T7Z+gC+fmle9Jtef86rnwPrL
GcYX/j0rL/8Be3Z2XnwcevT3vOw15ut86w/uvyAvfwNeevEa+nVpPlpfd7mf
B//4j7ziG9x/lfUXZu6avOIByPtajwd2/vq8+CL+fpP1Afr1L9sTnj9re4P7
brO8IZY78oqnAaM788qH87vnnk/g8+68/AVgc5/tI957f178CXJ+KK/zMeBW
H7a95Xp0XvkYjPd/eeVrGT/n5V/gF540fjHep/07/bXbzG+7DXv0Ul7rx7j/
5TXs/2vWZ9aHGf+Mn/PyjxjvO3nFB8xv235AXh/YvuD+j+wf+H34vM6zgj34
PK94judl5+XfGT97fvl9qrzia54flBdfZn47L/4EfP1s+8r42Xhj/Nyu/WPo
9/B28XPkfdZql/3m9zLapU+wd+v5eu539vNgbzds1/sA21Ht8mes125Xf1mv
3a7xsF67XfqP9bWt2mUfYC+3aVd8DP3ftl31qjzfuz36PYzx7dH64Ynt4q/A
4+R24R+3TW2Pfs96Rrv4MPRgZrvsI+pk5rRLH3jef7vyLcxnt0s/YIcXtot/
Y9oXtWt9j+cbug2/UeE25LSsXXjGawM/D/NV3S77znptv5/57Pbo9zMa25U/
gx9e3q56bMi5uV32n/Fyu+IBvCfRLvxze0a7/AHsXqY9ep5zrl3rbzzfuF3+
nN8X8fziPd3t4sN4f2+71lthb4vtyscCV33t8heQ02+NN/D1Hdu1nsd8tvEJ
GOzWLr4OPd/DbczXXm5jvvZxG3Z13/bo92P2b5d9x3z93v0BTTioXfae3yNr
1/ojv1/k8UIPj2gXH4K8jmxX/SPuP8ry5Pqz5c3zmNvlDxgvt8teMV5u1/o0
4+V28V/Gy9YPxsvGB+4/3fgBfzurXf4D7zm7XfyK+6msP4yX22WPGS9bn7if
ym1+b8Vtxsu+n/Fye/T7TVe1y77jz9e4f7An/2wXH2R9mMfH+jDjn+eRWD48
j8Ty4/fWLF/643b5A8jrP7ZXmOcB2zPcd3e7+BJwe0+7/APgdb/tI8T4YLv8
BfjPf21P6ffaFX/zPGrjD3z38Xbxce6vcpvfk3Ab43y2XfEs6zb8O3D+op8P
s/Cy7T3ii1fdH4jh9XbxHeD2rXblg0Cj37E9gLzfNf75fYr26PnDH7WLD8H+
fmJ5A1+f2T7Bfn7h+QK+vmoXX+L3LNq1fsqwqV3xNubpx3bxA36Pqj0af//S
Hs03Du6I7o8c2qF6WeBreIf8DfRxpNtcb+6Ixq/r+X7Gz27zPBK/D/Ia1SH/
Bnlv0qH4l3nKjuj5Flt0CP98TofkAbO3dYfkRf/cIX/A88I65I+Bz3Ed0gee
R9IhfsR8dofW4+inO8R3ud7cofnn9/I6VG8A/jW7Q3jheSQd0hfIu6xD+Vp+
z6ND+sPzSTuER9y/2G245YqO6Hl+y9yG/Qt8Pex2tZ/P/VPuD+x7k/sL+77C
4+H3AzpkDyCmtg7hHWnBhOUF+57qkP1nHrFD+TrW+XYI/8BVR0f0POjODvEl
jK+nQ/aN9WAd8v+8rkP6wPjYeIH/3rFD5wsAFzsbX9zfbPzh/t06pD+Mj93G
uPd2m98b8v2wK/v5+fj7AR3ST+jPge4fcHRwh/gg+nmI8Y387+Ed0fPr/2j5
IH45skP2A/b5zx3R71Ec0xG1N3/xfMAfHu/54vlgnk/Yq5M75B9w/6kdih9g
Rk8zPjDuM60fGOZZbkNe53TInzA+7hC/YHxsPAKfF7oNO3qx70e3LnWb50sa
v7B7/3AbcriqQ3wP+neN+wf9u9bj4flgHi/Pl7U84Fdu7lD9Kf2x7QntRofs
P/zDHbY/uP9Ozw/ioQHPH+b7bs8vpule2zf4l/s7oudLP+g289kdWs9mfNwR
/R7S/9wGDh8z/vi9iA7xDVz3tH9nfOw289luA1cv+fk8f8T9oT9eA99vuA1e
+5bxzu9DdWh9DHJ8z/LBPH9ge8L42PIETj7pEB+lP+6Ifu/oi47o+dtfe/7o
jzui69Pfdcjfc/9UR3S/3M/GC/TjV7fRrcGdsqf0x53CG9eXO+V/gM+R/h3j
XLszis/13IY+r+/nM5/tNv1xp/rD9eVO4Zn1X50aD/dTdWq8sJ9bdUoeUMNt
OqP50W07ZV+4v7lT8oU9GN8pfcC8THSb8XKn5gvzOLVT8wmcz+hU/hXymtmp
+Qf/mOM267M7o+d7z+8Uflif3Sl8gX8s8u/QpyWd0j/go9Jt3L/M98N+VXVG
93PXuM3vXbsNMTa4zf1TndHvr6zw78g3tXg8rNe2fPBPojP6PaJ0p+wN/EXW
8sW8591GHq2jU/oBfHR5/ljv1Rn9nkbBbZ7X2Rk9b2Z74wNh1A7GB+KBndfA
x66+HmnN3Xw9/MKebvO85M5oPuZ3/h35mP2MV9jrA/w76718P/JdB7kNe32o
+wd8He429O4IX48/H+026xQsT4zvOLch9uPdpt9zG/pzitvwU391G+M7fQ39
OdO/c/3YbZ4H5jb05+9uw96c7/EBZxf6d9ibS/w+2JvLOqP7Ya7ojH5v4kpf
z/PA3Ob6se+HvbnOv0OvbjA+8c9NbmO4N3dGv6dwq9uI+293G3zvDusD/GG/
29Dfu3w9zwPz7zCb91m/IO8H3Ob3W6y/0P+H3Yb+Puo2z5+2PuMxj7uNMO4p
X896L78P/Po5t1nv5etJa/w75uuVzij/eK0zyj/e8O8MW/w73Pw7ndHvi73n
+WK+2vPJZSHjgctYa9iPz6yPwPeXbiO+/dr6xPVl6zPk9L39E+u97L+Yr/bv
+Puvvh/6O7hL15NHdckf0h93yV/y7/6d4+iKfl9wXbchr/W7ot8b3LBL/WE9
tn+nP/bvPE+7S/IAf9miS/IAfxndJXkCtlt3Sf7c39yl+YG9HdslfNMfd2l+
ka+a6Dbj4y7hkXFLV/T7X9Pd5nkjXdHvd8/uEp9jvVeX/CfsbVmX+Cvz125D
Xovc5n6pLvFF8L0Kt1mP7Tb3S/l+5AOq3R/wlzq3YQ8a3H/0s6lL/hf2c0WX
9AvDaLG8MI9tbmOaEpY/5jHt+QE/zno+cX/O84157TAekA/oMr5wf4/b6Feh
S3yQ+6e6xCe5f6pL9WTA1w5uQx936lJ8xPXkLsVPPA/MvzNedpvxcpfiKfz7
Oz8feref24yX3T/Gy13iq4yXrX+Mlz1e/Ht4l/QZ8/RHyxNpvSOtH8g3/dn4
B987pkv2jN8vMt7hL453G3z+JOMF/uYU4wvjOtX4Q7x7epfiIX4fpSua3zur
K3oezTldym/gvr+7ze8hdSmfAP5zoX/nOnRXdP380i7Fc4yX/Tvy7Vf6d/j3
q91fntfp8QBW13m8wPn11md+j9j6wu8dWh/g32/pivqL2zw/uP8Ozyf8Rb/t
I/jUXcYH4pF7uqL74R4wHll/3aV8APdHdSl/wP1RXco38LxstzGOJ7qUPwOe
nnQbz3mmK5off65L+Q2e/+XfwWdf8u8Y9qvuH/D0uvvP+mvrC/D0tvUb9upd
6wP9seXH878sX0zTx8Y/5Pqp7Rm/L+P5Qz++8nzz/C/jA/mq74wfluEaX/y+
o/GKeP6Xrmi+d1B39Pt1Q7qVb4MZHNat9RGe/+U29y/7eu5fdpv7l7v1Pshr
A7eBp426lS/E/aO61V/8u2m3xoN1ns27NX7wvS27JR/Yka26pQ947jbdsh/g
19t1C//Qv3Hdsvd4zYRu2Xvo36Ru4Z3fz+kWHsD3pnXLPjM+7ha+kR+f1R39
Pt6cbuWjoT9l3coXs+60W/ll8POFbqMfi7uVb+b3LPw7/q10GzCM+XquE3Rr
vRF8qcb9YX1Xt/SP8bHHw+9ZdEs/YMCaLQ/8ubU7+v3ouOUJeSW7o/Ym3S37
z/qubuGf9V2eX8irs1v2G93u6pb9xXt6u5X/hbyKxjf8YV+31kOgh7/tjp6P
vmO31gehjzt3az0F87hrt9ZnoE97dGv9BXZgL7fRr73dBq3Z18+HP9zf/YHc
fm/9wZ//4PGw7s/jhR4dZn3Acw63vDDeI7vFp8Dnj+qWP8Bj/twtPgQ9ObY7
yueP6476/xM834jnTzL+uT/K+EE/TuuOfu/kDOMTfPqsbq0PMj7u1noi/v73
bq33o1/n+3e870L/zv3K/p37lbu1Hsn14m7VE/D7Fe4Pv1/h/mJ811p/mY/u
Fr+Cf/9Xt+w/67VsT3gedrfsPfPR3VE+098tPoP44C7jG/N2t+0h7MN9tp8Q
+wPGD3D2kPEKfv9wt9YP8e+j3aoH4Xle3dF6+Se6tZ4Oe/iU2/zeqa/nfuRu
rffz+6d+PvT7pW6tx/P7FO4fz9u0P4H9f2MN//GWx09/2x39/vD7xjv9bbf8
KeVufLNey/imvzW+8dgvbd/ob7vFFxDvf9et9WrkC7/vjn7f6ifjC/bsF+OP
54X0qD6E+ece1atgPkf2qJ4E87m2f8d8rtuj80wwn7/p0fo8v7feI33gfqYe
6QPil016pG+I9zbrEd4hty16NF7M5+ge4Z1+qkfywrxv2yO8cz9Tj/AO/jWu
R/ac+417xGf5PYoe+XfcP6VH9o7rvz3R8xNm9gg/8E+ze4Q3fl+2R/jk9+t6
VC+CeVjYo/pw7jd2m/VZPaqnYn2W24xv3eb37npUn8L6LL8f9Ri17h/sbX2P
9JH7mXqkv8gHrOiRfoOvNvfI3qObbZYf/FvC8sU8pXrkT7mfqUd8FH4w1yP+
yv1MPVH+0tUj+839TD3CN3Fi/PC9xhdwsL3xyPi2J1oftVOP6hcx7F16VF+F
x+7mNs/rchv6vrfbiDN/16N6LK4H+32Mb61vjG+tH+jvwR4f5HWI9QH6frj1
AX77jz3yf4j3juxRfMT14B7Fv4xve+Rvkd//S4/sFdTmeOMftOgk45/xbY/4
CePbHvEJxrc9sr+YtzONd9ZL96geFnI4pyd6PuXfe1RfyHH0qB6R+We30e9L
elSfiMdc5ja/H2r9gD5c2ROtv73a+gH7+M8e8Smep+nxQu43WB+wnnGT5QV8
3Wx5oj7iVssb+nB7TzQ/d0eP/DVg398TXX++y/PN/Us94ufo5n09suf8/rDx
zvNA1rDXD/dEzxv7vx7VszPe7VG9Lc/T7FE9OezPU27Dfz7jNvLHz/WoPpdm
xPrBeLdH+xEZ77p/jHd7VM8F+/Nmj/wXcPOWx08zafkQNz2K/3H/hz3R/O/H
PfK/0MdPe6LnzX7eo/Vpnndte0c72SM+wPO6jH/YkR96onzjJ+MN4/6lR/Wy
wNegXuEd9w3p1f4J3D+sV/XlsD8j3eb3J9zGeNftVf07XvObXukLxrtBr/QN
49qoN6qPG/eqv+CTm/aKL2HYW/RG68m27JU+4DVb94ovolvb9kbPCxzTG61H
Gdcb/T7ChF75A+5n6o3mQ6b2yh5yP1Ov8M/zP3qFf+Bjdq/sL/oxt1d45Hma
vcI/z9PsFZ65n6lX9eno1+Je7e/g+dZu0x/3aj8G5BX0qp4dfqm6V/rB+uje
qD9p6o3WM67ojcbTLb3i/6i3b+sVPwSuE72yJ6zH6pW9gT/K9EbzD7le4R38
rKNX+Q/E45294juYz55e8QUMo2C88DzrXuEberp9r+wxcL2D8Yn4Z6de7c/g
PPdGz+/ezW3gbE+3eT5Xr/ZjsB6rV/ujMI37+n3AwwHWN+5Xcn8xjoN6FV/Q
/3q84GeH9Yofcb+S5cXzrXuj6w9/trwB62M8H/yedq/yOazH6hX/4X6lXuVD
WI/VK3vIeqxe8QnWYxnvEMOZvdofAXmfZTzCz5xj/NL/9uo8TuSLznOb+eVe
7UcCDi/275jnS3u1XxDyutz6wH5bv9DPq41/yPEa9x96fp31AXb9ht5ofHNT
r/gheMfNvfKfmKdbeqPfi72tV/EA7N4dtk+wG/29yl9y/df2Dfi6p1f5Ep7H
1Sv+wPjX9pT+1/gnTbC9hn191HjmeVy92l8He/FEr/ab8jzr3uh+62d8Pf2v
2xjvC34+3MrLvdHvx7xifcC/r/eKL/G8TI8P/vNt6wO/N9GrfBbG+77lh/5+
1Kt8D+b3417lO3lepu0VxvmF7Rn04ave6PcSvukV30e3vuuN1o//0Ct+A372
k+0txPCL7TlwN6gg/GJ8gwvafwcxDSlo/ynsw9CC9utBH4e5jfEN9/2Q/4iC
9uuB54wsSB+Au7UL0gf445XtSDyxbkHxNeZ1vYL0H+Nb2V7Nh8A/1i/IX0IP
NigoPub3mwvR/P9GBcVr/F5kQf4b9mzjgvg/8LVJQfEu+rtpQfiAndmsIHuK
8W5eEJ9Bf7coyN5DXlsWoufVb1UQvoGLrQvaf8r9WAXtTwVetnUbz93ObTxn
TEH6AH0eW5C/wDjGFeQfMN7x7j/un1CI+oOJBcUH/F5WQf4R9m5yQXwR/ZhS
UDyAcU4riP/w+9OFaL3BjILiOcB8ZXs1vwXPmVXQfh3M7+yC+A5eMKegeBZ5
qrkF4Z/1bwXhH3pbZnwCx/ONZ8BmQUH7uzHehYXo+YPl/h04W+Q2+ZL1AfhY
4vdB/yvcH8i9siA+BilUejzQh1hB+g6/GFgegFmV5YXn1hTELzFPtQXl46CH
dQXl79C/+oLsPfhPQ0H8Hv1qNN4RPy0vRPdrrzCeMIzmguwv8istBdlzjKvV
+Eb+t62g/dj8npjb6EfCbe5PdxvzkfLz8feM3w9+li2IH+HfXEH+CfmpfEH5
I8C+vSD+j+d2FKLfE+osKP5lPUJB/hT97S5E6096bI+gb70F8R3oS6Egfg87
XyxEv49QKiheBG/pK4jf4K7tC+I30Nff2r4DFzsYj8DPTsYr4oudCzp/AHq+
S0HnE/D7pG5D33bz9dxfb/3BtO7h94On7VkQ34I93cv6Cf+zd0H+C/5nn4Ly
Q/y+aSG6v2pf4x3/7FdQ/AQ92b8QrX84wPYe83Sg7T34yIHGP2ByUEH+Hvb4
4IL4PvcPFhRPws4fWhC/gJwOs/2F2h5u+w6YHFHQeQSs1yjofA/y6YLOv4FY
/uQ2ePVRvh7v/bPtP+zx0dYH4PQY23/Y479YXzHu46zPiFePL0S/T3y8/R/3
S9g/wg6fVFA8hXGfbHsDPTiloPw0hnGq7T38zF8L4rM8f8DzDX063fYe+nSG
8QL7cab5BNezjDfGIcY/3nt2Qed1AGbnGM8Y77nGO9zYeQWd38H4wNfDf11g
feL33a0PmN+LrA/o78W2/8DFJeY/4KOXFhTfYLyXmf8AH5cXtP6Beb+iIP4P
+/EP239+387+F2b/qoLiNQzras8ncH9NQfkO2MtrC8pvwgxeVxBfxjxdb74D
nnWD8QYc3Wj8w17eZPzz/ELjGWp5c0Hn0cBf/9tt2I9bCjq/hucl+X7Ej7cV
ot97uN18C/HgHeZjiNv+Y38AGnOn/QGG3W97APtxl/0B/MvdBfF/1uMUovtR
7y2I/3P9sKD4F9fdX4juN37A/Bb3PWj/j/seMv5x/38L0fPjHzbfBj4eMf7x
90eNV57vZLxDb/5nvOO6xwo6n4nrk/4d8/uk74f9eXINfXi6oPgZ+HjG+gl7
+6z5D9czzX+gFs8XtL6BeX3B/hL5oBftTyGmlwqKr3ielPEPHL9ifgq7/mpB
65vg668Z/5wW4x/9e6ug/CLm423zDfT7HeMdsHrXeMd8vGe8Ql/fN755XqTb
hGUh+r2rj+wP4Pc+Nt6B30+Md5iJT4132PnPjHfwuS8KWn/DfHxp/kMYGe/8
vpLxDr3/pqB4l+dpmP9AXt+Z/8D/fW+8M39cUH0Mz9vwfENePxkPPL/S/AHy
+sV4B3/91Xjj+VlF4ZFyKcp+w56vbK8+3wxyGFYU3sFfh7uNfowoCu8Q20g/
H3q5VlH6BnysXYzmS9cpSl/x3HWL0mfIab2i+A/40W+Kkg/+vn5R9UDwnxsU
JV+eD1KU/CHmjYqaH9Z3FcVfgY+Ni5pf+M9Nior3gPPNitH9/5sXhR/8fWV7
Nb/GuLYsCn8Y7+hi9HylrYrCP6Zx66LwjX5v4zZ4yrZuQ9+3K4r/87wwt7H+
PLYo/sP9z0XpJ+zT+KL4D+QwoSj+A7WdVJS+A2eTi8p/AV8r26vtBcY7tSh7
wu9pFGVvgJPpRdU7AKYzitH89cyi8p2Q16yi/D3kNbuofAimcU5R/B/3zy2K
T2Bc84riG6wvNx5x/3zjn9+3NJ5hRxYWZd+B23LjH/hY5N8xjCVF8SnIa2lR
8TLktdT9gbwqi1pv4/pBMZr/iXm8kFdQVP4Lj60qKj/G9YWi+A/0ocby5vks
xej5NHVF8R/Q9vpi9Hu7DUXxXX5v03hAvNBUFP/neS5F8X9MwwrjH/6kuSh/
AHvbWpQ/4Hkvxi/PY7N+4D0J4x/2J+k2+EJqDX1IF+UPME8Z4x/jyhaj3//J
FaPn3eSLindgP9qLygcAdx1F5T8hr86i4ime91ZU/h9y6CkqHoOce4vR8yt7
i+L/PD+9KP5Pu18U/+H5cEWtp8K/bG97inz+b21vcd0Oxj/PW7e9xmN3Mv5h
P3Y2viG2XdyG/djV10MfdjP+Mc17GP/o755FrQ/AzO5lfUW/9y6K/2C8+xj/
rK8oKh8AP7Gv7QXwsZ/tCca5v/EPPTmgqPw/5PV745/fT7M9g738Q1H8h99T
K4oPQMwHF8UXuF5k/MC/HGp/AP9yWFHxML+Panxy/6DxDr/9pzXwf5TbrO9w
G+M72vrF/f/GO+sp3R/ubygq/w97cZz9G+bzePs/4OGEota/8M+JReU7YedP
KkbP3zi5GK1vPrUoPgq+cWoxWo9/WlF8Fnb5dM837NbpRa0PAXdnGi+YprOK
yv/g37/Z3kJeZxcVjwIX5xj/PB/IeOY8Gu/o53n2F8Sl7wcML/DzgfMLi8p3
Ag8XuX/A/yXuP+R2qfkP5Hqpx495vtz8B7ddURR/hL1Z2Y7s/77S9gbjuqqo
eAz4utr2Cji4xvYM9/+zqHgP4ri2qHw4xnmd7T/uv972FDC6oaj4F/K6sRhd
r7rJ+Iee/cv+APb1Zttz4PLfxeh5lbf4euDzVj8Pduh2vw84uMP4hxxXtiPx
+p1F5f8hr/6i8j88L8n+EPU9d1leeM7dlie/32N5A1b3FrX+Aj9yXzF6nuL9
nk/wlQeKin8BiweLigegzw9ZHyD3/xpPjH/NL4DTR2x/WX9rf4Bx/s/2mt8f
sD3n+RBucz+M8Q95Pen7WS9k/PP8CPsj7l8tRuP1Z81/uH+mGD1v8HnzH/jB
F8x/YH9eLCqfBn14yfaf50/Y/kPOrxRV7wy79JrjAfjf1x0PwH69YfsPvvGm
7SXw8dYa+vC2+TXj4WL0++zvGp+Mhx0fYH7edxvj+sB4B5/80G2M9yPjH+P9
xPwL4/2kqPiX5zkXFb/zvEjzf36/0PrO7y8Y/7DrX5kvYn6/Nv7BN74x/jHe
b41/jOs7x2uYl+8dz2HYP9gfwP786HgA0/hTUflQqMEv5kPA86/FaL3BoJLi
Y8hrZXs1PtHPISXFy5DT0FIUz8NKsu/Q3+FuQ49HlKRP6O9IPx94Xsvv5/kd
JcXvGO86JcX34FfrljQ+4HK9kta7+L3kkvKfeM4GJfF/4GrDkvwtxruyvdof
4z2jSsI/xrtxSfhHtzYpReudNy3JH2C8m5WED4x385LwA3u1RUn44v6okuwv
xju6JH4Cu7BVSfpAu1cSnmHftymJ3wBG25UU30IftvP9wMeYkvQNuBtXkn+C
XMeXxNcwLRNK4nOQ88SS4h28Z1JJ+Ec8Orkk+wB5TSkJ/5DX1JLyDbB300qK
h/Ha6SXZJ+jDjFI0fz2zJPsGfzirpHgA+JhdUn4E451Tkj/APM0tKT6GvMpK
4h8Y5/yS/AHwsbK9mi8BFwutD+hXudvAxSK3uR/M97N+vSR7j/hqqd+PeLKi
JH+Feag0/iG3ZcY/4rBYSfYffrrK+Od54SXxf9DSauMf/qy2pHwQ7F2d5wfv
rS9p/Qb2rqGk+i5c1lhS/gPjbSrJH+Cf5SX5A+jTipL8AfShuSS+ATPWUpI9
Rj9ajVdMa5v1g+efGt/cT16SfQfPS/l+zEPaz0c/Mn4/7su6f/z8h/GP+c2X
VM+KeLLd4+f5MCXxH9zWafuB+KGrFP2eSXdJ/pfnxxj/jH9L8t8Yb7EkPgS1
L5Wi59utbK/mQ3jt9iXxBczvb40njHcH443xb0n8CALZqaR4FPO7s/WDdt34
5v4745vfP7F9x/27+3mYxj38PvDhPUviO1wPLml9G2Leu6R4H3q8j+0/zM6+
JcW/mNb9SoqnIMWV7cj+6ANKigew3v/7kvJBmN8DS4qHob9/KCm+g50/yPMN
e3dwSfkQ/HtISXwZ9x9qfYAcDiuJX8PeHW7/AFwcURJfgp3+o/0F9OFIt3H/
n4xv+Iej3Ob5O34e5u0Yvw929FjjH/N8rPGPeuvjbP/BQ473eMH/T7D9h16d
aPyjHyfZvwIWJ5ei+8FO8XxArKeWxIegj3+1PYP9OM32DvzhdPsDrgdbH4DL
M0vKnwAmZ5UUX/L7b9YH6NPZJfElvOcc22vg6+/GN/J35xnfmJfzjW9+L87P
g5wvNN+BvC4y/iGvi41/XHaJ/RvkfqnxD3xdVoquf11eUv4MPOSKkuIrwPwf
JdVbYV6vtD3C/VeVxFf5vdhS9Py6f5aUH+L36cyPeH5gKbqf6nrrA557g/WB
38MxX4Ka31SK1if/y/Ya47i5FM1X/rsU/f7gLW4zHja/wXhvs/6BL93u92O8
d7h/0JM77d94/oL5D+zOgPEP3N1te4Hx3WN5Ql/vLUX3995n/wz83m/7j24/
YPuPaXrQ8w17/t9S9Hzhh80XMI6HzYeAw0eNf8j1/4w/jO9/pej662Ol6P6A
x0vR+v0n3AZMnvT1jH9LikeAv6ftj5BffKYU3X/5rPUX/Og56zf07nnbe9b3
2t5Db1403nH/S/avmM9XzP8xTa94fmAfXzP/gb6+brzjujds/7k/x3yA68HG
P8MC20/I4R3jC/h9txTd3/ie8Yh4/33bZ8RhH1g/8JwP1+BXHxnfGO8nfj7s
7Kd+P+T4mfvH+Nf9R9z2RUn5X9inL0uKdxn/2t6jX1/bf2JevrF88X2Ob21v
gLvvSqpPwXi/t7+GHv9g+w97/qPtP/T9J/Mh2KdfSsoX8rxJ8weM+1fjDXnM
wX3SD8RHQ/qkH5DXULeRVhzmNuQ+3G2YiRFugy+M9PMxD2v1yb4z/u2TvsKu
rNOn+B73r9un8QHP6/UJ/5Dbb/qi51us3yf8w85v0LdG/Nun/AO/59Sn9Rno
/8Z9Wr/k+dR9sv8Y76Z9ige4X7lP9h/x0eZ9so+AzRZ9yp/Dnm/ZF+VHo/sU
PyM/slWf+AfPt+4TfiGWbfw75nVbt+Emt+uLfn9zbJ/Wr2BVx/p9/P5yn+w7
zxtx/6EPE/uU72f82yf8M/7tk73neSR9sh+Mf/vE/6H/0/qEf3R7ep/q4TDe
GZ4vfv+iT/4AZmdWn/wB/Nfsvqg+zDFeML/z+uQfMN6yPvEJuK35fdIH2hG3
ef5Yn/gT8FFu/GJYi/w73rPYbfR3ifGN+V3q9wMGFcY7/HVln+w9rlvWFz0f
JebxY7xBn+wD498+5f8x3po+2X+Mt9b4x3jr+sT/Md76PvFV4KTB+Ed/G/ui
3+dr6lO9HIa93PoAfKwwnnB/c5/sK9SixfhDfNPaJ3sMHLdZX6C/cbchhoTb
+DflNuL9dJ/iV9jptPWR8W+f+Dz0N2e8w47l++TvQBParf/4c0ef8j38nojt
B+Nf4x8o7u6LnkfQ0yf+z/jX+AftK9qeYb296PkGHvv6xHeBk+2NF9CO31of
2M8+8WeeL2P8Ie20k9vo58590e+l7WI8A+e7Gs+wz7u5DRzu3id/BNzuYX3k
+q/7h/Hu7f5jvHt7fNzf1ye+g/h13z7lyxj/9kW/Z7F/n/wr5ucA45/rv33K
xwHnB3q+4H//4PnE/Qd5vsFTDrY+QGyHWB/wnEOtD7DDh/WJLwHPh1s/gKsj
jEfY2SOtL7CTf3Kb31+x/kD//2x8g4cc7ecB8Mf0ic9gvMca7zwPwHjHeI/z
eHj+XV90P/QJtve47cQ+rf/CXp1k/8r9i8Y/+nuq5wN68FfPF/BxWp/4EOzV
6Z5v8J0z+lTviPvP7It+z/Ksvmh9wN+ML+DobOMP/Owc21/M27nWF/Tj725j
3s5zG3z2fLfRrwv8PMzvhX3R76Vc5P5B/y/uU74X8rqkL3o+3aUeL6bhMvtH
2LsrLC/Yuyts/6EPV9re4DFX9UXrIa72fHE92PMJfPyzT/wW+Li2T/WP6O91
a+DjeuMHdv2Gvuj+mhv7FD/iPf+yvgAfNxufeOzNxi/0/xa3Mb+3uk276fv5
vXe/j+cfuT8Y73/cX4z3To8H89tv/cd4B4x/zM9d9p8Y7/93dY7hlh1NG04y
sSbGBJNMbCcTvLFte7bP1sS2bXNi27Zt29bEme9cd33T9+7161zP6dV7dVc9
VV3VWg8Py89bP6K/ob+PDUv5MP19XP3w9wnHA3jypOM7/X1K/TN+P61/ZHx4
xngBuT6rffDe54yfsN/nh+XzKS/IT4bVFy2P+4nF8f0e+U0/XxmWz0++5vvi
/ib5jn9/w/ai3zfle3zvR/tHzm87Pobc9P/Y/7v6E+T1nvJFTu8Py+/L/sB4
iP9/6HjAvz/SHrDfj7UH4sZPtAfGw08L9vCZmHzlc/kGP77Q/yKvr+Qn8vp6
WP79km98Hp58azn9/c7fj/VgMe3+wXgGs/lxWH7f6E/2h9f8bH+JZ3+R74wP
vyofeP/bsDTfSf2R8p989nflH99TUD+09y/1By/+Gpbm75DX34Xx4V/5QHz3
n3xBTqO0D+x2jFLC0GusUvK38H9AKfGRfo1TytcjxhXT7vFKOX/H9/fQ5wSl
xOf43mEptS/2P5fy+3knLiV7j/3PpeQPYv9zKfl34ouBpZRPEZ9MVkrjK/nF
5KV8/WWKUuI78pyylPwV8clUpaRP+jtNKcVDxNnTlhIf8Of9eHS+QL3pS8lf
0o5BpcQneDpDKc2f0M0ZLWd+YibL+ZmZS/n3rwaX8vXqWcS0Y1Yxch3i78d5
X9sLf2cvJX8e328sJX4z7zqn8oDHcxXkNbfyRF7zlvL9Jv14tL9nvJ6/lPge
95eU8u8nLVhKfGe8XUj9x/ctSon/uL1F5A/8WlSMGS1WSuMFfnLxUson6NYS
YvzbkvKT/i5Vys/nDxUTry/t83He1/fh9pe1PfBzOflN3Lq8/WE8WKGU/Dnz
kysqD+x9pVIe36ys/GL/cym//2pV7YG4fbVS8j/87Oql5J/iu/fqN/LfUprP
i+9zlNL4gJ2vLT9i/3MpzwfXFcf+Z/nGeL2B9kQ/NrSc+eeNxPjxjcXEN5uI
Y/+zOPY/+3788eZi7GEL2x/7nwv93Up5xP5nMfW3KeX3w2+rPCP/LeXfU9hB
fRCW7ShmvN9JfcKbnUtpPIAfw+QDaiiJ6UZZ/sT9M/KL9lbFrE/UxPSjLqa/
Dfka67+WEwU1LWe8b1mO22qX8niuK2aZrGv7yZt3KfR311J+P/Bupfz7CLuL
iSf3UJ7Yw576H8x0L/VBf/cu5fef7yOGX/uW8vu791PftHN/ceS/8offOVB7
ify3lN8PcrAYfhwqH7H/wyzHPA8XR/5bys9fHWl9/n2U5djD0WLs4ZhC/WML
9n9cKcUzsR9ajL88QXlF/qt86e9J+pvIf8WR/5by+1FOU1+R/+rP4PMZ6jvu
+7Gc3zlL/sCPs/WX5DfnWI49nCumv+fJR/p7fik/T3tBKd+/caEYuV/s8/i7
EWJoeYntj+/J2H76e5nl1L/ccsbDK8SMh1eK6e9Vpfy+/6uVL/29Rvmi9mst
j/O/6i/uBxTHem9Bvzeqf/h8k/ZCvHOLmH7dKo781/ro93YxfLzD59HPnWLm
ee4SxzgrP+nvPZbH92/E/LlPHN9v9/38faCU568PieP8rxh/97C/F+d/LWd9
4THlR7z+uPKP87+Wo98nLcesnxLD56fVZ3wfXkx/nxXH/mcx9vu8GP2+IGb8
ftH3Id+XS/n3ql4Rx/pvKb9v5zV/L/Y/Wx77nwvve7OUn198S34Tv79tffzN
Oz4f+58tJ756v9DeD8Sx/iuOtEUc368Xk0994vsYZz8t9PczcXzfXn3G93St
H/ufxcTPX4vxb98o/8h3C/7xu1J+3uR7ceS7vj/yXcvx8z+JY9upz+MHf7Gc
8fpXy4l/fxOT34/0efj0e8F+/tQ+sJ+/Cvbzl+X09x/LI98VR75bGK9Haf+E
JWOU8+/VjFnO8/Oxyul92M+Acu4vxi6n30de41hOnD+u5fR3PDF8HL+c5IN+
Jyzn+VE/zvKjictJfviLScq5fif1efQ7UIx+JysX7rsSx31XYvo7ZTnZF/nJ
VOU0/mB/U1tOe6cpp/Es7rsSU386MfodVE7jY9x3ZTn2N6OY+YKZynl+M7M4
7ruyfXHflfWRw6xi9DvE5+nvbPYn7rtSHnHflTjyX+Ub912pj7jvqpzHN/Oq
f+x3PjF8nl/+wecFxPR3wXKKvyL/Lad4kvm9hS1Hv4uI6e+iPk/9xcopHsR+
F7ecuH0JMfa3ZDnFg8RjQ62Pfpa2PPJf68f5X9vD+Lec/SP+/J84zv9qT8wn
rqC8iNdXVL7xfUnth+dWKef+f1X1jb2tLh/i/m/5xHNrlvP8eq1yyk/ivisx
+cQ65ZRfxfqumHhkPTH6WL+c8qG470pM/zYs59932MhyxruNy/n31TYp5/Hm
ZrY/7ruynP5ubv/Rx5Zi/MtW2kPchyr/sbdtlD/+Zdtyvn64XTlfT9++4E93
UN/QZsdynl/vJGZ+b2f5hb0NK6f5qPieZjn/Hk+lnOYPiDerYvhbE6Pfejm/
r7Th7/H/PjH9borhXcv2xDkN7YP6HdvPn679w78MVz7U36Wczw/vKr+Jh3Yr
5/HiHvIde9tT/dHfvcr5/P/e8oP6+4jjviv5R3v3K/B5/3L+/dwDymk+i/jt
wHKa76K9B1ke+a3l8PmQcpovY/72UJ9Hv4cV6h9eztc7jrQ98Pmocr4+dHSh
vcfY3/j+qPZBteOUH/09XvnG+m45z59OVB/I6yT5jX5PFsd98eqf+OBU+cLf
0+UTzThdfsb6rph84Kxymr+N/Lac5pvp7zli/NW55Xw/y3nlNB+MPz3f52N9
Vxzru+V8fu2icj5ffLH2QX9H2B/0e4n9Rb+XOj7E+q72EOd9tYc476v847yv
/gl/c7X6g8/XyP9Y39V/0ozrCv75+gKfbyjw+Ub5GvltOa1nxPquGP3eUk7z
w3FfvuWxvitmPesOn6edd4pjfVeMXO+2PbG+a3tjfVd7gMf3Ffp7v/Kgvw8o
L+o/qDzjPn7tgfc8XM7j+0fKeT7/mPqN9d1yPr/1RDmf732ynO+/fUr+4Z+f
LufnC54RMx49W07rI9jDc+W0P4V493kx/X3B+jTrxXK+XvmS5cjr5XK+fvKK
mP6+pn3xO6/ZH/r7hvaB3N8s2P9byivWd/Uf6Pkd7SHWd+U/fu494x36+77+
jfZ+oP7JZz4s5/O9H8kf/n4s34g3PpGv8PnTclo/ZPz9vJzW++jvF+W0Hkh/
vyzn64lflfPvC35tffr7jc/HNizfBw+/sz2x7bAwnvxgf+K+K+0Bnv/keEC+
+rP8j3xX/tPe38r5foWR6oPnfldf0OaPcn6e4g/9Yazvyg+68bd8p7//yC/e
+6/8pNn/yWf886hyWs+O7xtV0no3/x+zku9HGUtMfweIY723kn6P+HdcMf51
vEpqT/iRSrKXuN+5kuyBfk9YyceziSp5fDVxJckLXk5SSfKEz5NW0ngLnwdW
Ev8ZjyarJP7Hem8l6Zf52ikqSf9xv3MlPy8/VSX371NX8v1V01YSP+nmdJXE
37jfuZL2dzAeDRIjrxnE9HdGMf2dqZL2g8R9V/4+7R0sjny3kuwj7ruqJPuI
7z3ZH/zzbPaf9s5eSfYPn+espPGA9s6lPPk7dyXfPzuP+oC281aS/4rvIVeS
f0OP86v/ON8rP2J/s/yhvwvJr7jvqpL4Ht+Xkq/0d9FKvr9qsUraH0I7lqjk
9zUuKUa/S4np71Dr09+lfR88XUZ7oF/L2r74PkYl2S/9/V8l2Tc/u7zy4O8K
lTQ+xv7mShpP6e9KlXz/wsqV5J8i/63k+eBqlTx/Xb2S4hvijTXkP+sPa8of
1pfWkl+kN2vLz/g+RyXtb0K/61by+4vXE0f+W0n7o+jvBmL884Y+z/i7USXf
X7WxGP++ifbDeLap7aW/m9sf4v0ttIe477mS5wtbVdL4iH/eupLGg8h/K8n/
U21b9RH3Peu/kPP2leTv475n9U1/d5QPNHsn+U9/d5Zf6HeY/MYNleUndlmp
pP2Dkf9W0v6/ON8rjvzX5/mZhpj29vk8tGxqH/CxpT3wWNv2Yl+7VPL4Z1f9
QZzfreTzX7tX8vncPZQ39fes5PH8XuoLP7a3/I77q/TfjAP7yg/OG+8nn2P9
Vj7hdg6Qn8zHHlRJ+2Xp9yGVtL8VPRxaSftf+f3DfJ5mHi5/md84QvuBz0fa
Huof5XiDlR5d8O/HVFJ8hn8/tuDfj3P8Y/3jBP059nBiJcXvzL+epD6w/5Mr
+fryKY7XjA+nyl/4dZr8jfua5QN6OUO+wq8z5Vvc1yzfqHd2Je1nxd+dU8nv
Xzy3ku8nP6+S9pPH+VzLae+FYuRwUcEeLq7k9xmNkN/Uv0T/Trsvtf/8/7JK
vr/kcvke53OVL/HKlcqf/l7l+Br3Nas/+ntNQb/X6s/o1/XyG/3eYLyAfm+U
b+j3JvlIf2+u5N8zvkU+x/ncSjq/QLduE9Pf232e+b47LMff3am9wOe7tC/s
7W7bx997bT/z1fdqD+jlfvsf369RPhxzf7CSz+c+5HgZ53WVP3p/RP2QXz0q
/+O8rv6bn33c8R15PWG8Qn+f1F8znj0l39HT0/Ibf/hsJb9v8tkCn58Xo98X
Kul8A+PZi2L6+5J8Zzx72ffR3lfEyOtV/Tu/85rtD7PQnuO8rvyP87rKh/6+
pfwQy9vGM7zmXcfP+D6e+sEO3jd+Qc8fVPL9/h/qD8n3PyqM/x/LH+a/Pqnk
+7k/lY9h1/KX/n4uf+O8rpj6X1bSeSFe+5Xl+KuvxXFflRi/8F3BHr7THuKa
h0r+veMf5T/2+1Ml7ifYaJEH8c8/Kx/8x0jlG+NaJV//+cPxGX39KZ9p/1+V
fP//35X8+9f/yOdYf5VvuLFRlfy8/BjVdH4n7mOupvM6/B2rms7zwO8BYvQ9
djU/Xz2OGL6MW03vi+8FVvPzEuNXE79jP3I19SfuY66m/nIeZqJqyk+wj4mr
KZ6DJ5NUU7xHMyetJn5jXwOryZ9Tf7JqGn+xr8mrKX5hf84U1Xw/9JTVxO/4
/lA18Tnuo6rm5xemqSZ/Tv1pq4lfmOF01cQ//k5fTefTqD+oms6v4b9nqKbz
+Lx/Rp+n/kzVxP/Yn+zv8/7B1TwemqWaf89h1mqyR947xP7At9mqie/xfcRq
infQ6xzVFO/x3JzVfD5zLuVNfDF3NdkD89XzVFO+Sv15q8k+GDfmqyb7oP3z
V5O/I/5doJriAdq/YDXFD4hxoWoe3yxcTfbBeuki1eSv8ZOLymf6ubj8Zz/o
EtoL97X04DifK8Zehoqxt6G+Dz0uo73Eeq3t5f3LaR+sD/7P/mLvy1dTvIe9
rKC80MOKyhN/tVI1X+9duZrie+qvUk3xPTxeVX2yP3y1ahrf47yufMBu1tA+
6Mea8ivuq6om/8p5zrXlZ+Sz8pfxf135jp9dT/vAXtevpvOhNHuDan6+eUPL
MZONtCfqb+z74Nsmtge+bGp7qb9ZNf/+5+b2N+5vrqZ8h6e2rOb7cbdSnoyT
W2sf5A/bVFM8FOd31Rd2vp36xE1ur76x2x3kA/HpjtX8/M3O2kfcX1VN8Xd8
r1o+4p/L2gP96MHECVX5DQ9q1fy8cw+m/XUx9tJnfd7frObfc27ZHvx42/bG
97C1F8aXrv1lfBpeTeMp/9/F8QS97ao8GR920x/Bg92r+X67Par5/v49q/l6
7V76Q+rvXc2/p7lPNcVH6GFf7QO+71dN8T98318+Mh95gPZANw4sjA8Hyf+4
z0rMc4cU7OVQMc04rFD/cMeXyJcL9nJkNZ8/Oqqazx8drX3QrWMcT3nNsdUU
L1HruGqaD8WtnKC8aecJ6oP/n6R9xPfBqynexT+frL5jf7PxBXw5reBfTzc+
4f9nGL/E+q/8xKzPkr+cFzpbjH88R77H907FtPs8MX79/Gq6fwD/eIHjD/7x
Qu2P+hdpH/TzYtsL30ZoH+jhkmrKH+DlpdpH3G+lvHjt5cZb8OUK7QO+Xak+
0NtV6ot2Xa19xP1Wxlf452vlA2K7Tvtg/uh67QN7ucH4JdaD5WOc99U+2C92
s/YB326p5vcb3Sr/ef9to+XxXcQjt4vZD3KH9kGz7vR9+Me7bA/vv9v2xn1X
2kuEQdWUXzCe36+/IGx9QPug/gPV/LzHg9U03xz3XTmeo5dH9W/4k8fUL/x+
3PECf/aE9oBYntQe4OdT8gu9Pa09oJ9n5H+c95XfPPecONaD5Tvtf0GMnF4U
Ey++pD3w/pd9H/x6RXtgPvpV20u8+Jr9Yfx+XXtAv28oD+T7puMr9d9SnnH/
s/4n9j8rf/T7rvEU/HxPe4j7r9QvzfpQ/cPPD/Wfcf+z/pV48ZMCvz6Rf4zf
n+m/yU8/l/+8/3P5Tbz6pfbA735leXxf1/LYD609ILZvtYfIr20PvPre9uIH
ftC+Yz+09sD4/ZP+AT/0s/JCLr9oD4yfv1bT/AVi/s18g/ePVF/409/VZ1y7
b35B/T8dLwib/tI+yC//Np6iG//IN8T+r/aBnP6Tr7x/lPYAX8eoJb7zO2OK
sZexaul5/j1AzPvHriX7IL8Zp5Z/L2TcWrIP+DJeLY0P8H78WuoP4++EtWQf
+KOJask+qN+PR9sH4+8ktSRP+DZpLcmb+gNryT7Q+2S1ZB+Mn5PXkn3Aoylq
KZ5iPmLKWrIP4uipaokv8H3qWrIP9DRNLcVPcT9WLdkD4/d0Yuavpq8lPiPG
QbXE9/hekjjWj8U0eybr8/6Za8ne0Pdg3xfnhWvJPvCvs9ZS/Mf4PaSW8nH6
OVstjY/Un1158LNz1FK+QTvmrKX5V+rPVcvPZ89dS+M39edRX4xf89bSfHrc
F11L4wf+af5avl9ngVq+HrVgLfnbuC+6luJ3ur1wLcUzyGUR+Rv5eC3ZC2JY
zPK4L1r+044laun+JeZNl7KcfgytFfJx38//l6nl6xXL2t7YP21/4vtJ9jfy
8VohH9c+iDdX1D7g20rKm/eurH0wHq5Sy79XtWot+bs4P1xL/hCxrF5L+Th8
W0P7iPPD2gfxwFryDbNfu5bPH61TS/4cmq9by/OD9eR/rC+LY3+1OPZX1/Lv
R2zk7xPvbqx9wLdNtF9ou2ktjR+8f7NaPn+1ufYB77fQPtDDlsoL/7hVLeXj
cZ64lsYP+LpNLa2HIpZta4XvKdVSfMx6/g61NH4QT+ygfcR90rU0nx/5eK2Q
j9fS+MF6UalWyMdrhXxce+D9VXHk4/IfudUdT+L7wrVCPm593t/0fZGP1wr5
uPYR31eyP5GPO35EPq59IL9d9CfYy67aR9yvVUvzuXG+WH9F+/eo5ecx91Sf
vGAvxw/4vnctxRPY7T61FF/F+WL5xHv2q6V4HR7uL//g6wHaC/Z2YC3/PtRB
8j2+N6w9MJ4fYjntP9T6kY+LcUuH1wr5uO0h/j3S9sb6tf0hfj3a/sb6tfYB
X491/IjvLynPyMcdP+DbieqD+ifqz+K8sfYR319S3/D9FPkA306rpflN+H66
fKJdpxf4dqb+mvj1LOMd3n+W/EWO59Ty9Y1z5T/vP0/MfMD5Pg9fLvD3Yj27
ls8HXGR76MfFtfz+yhHaP3y/xP7GfdO1fD/4ZbX8PtfLa2l+A75dobzR45W1
/HzOVeorzh+rT9RwjfqO88fyAT93nXyJ/dnyicduKPDtRvlI/Zv039jLzdoL
/v2WAt9vLYwvt1nOfMDt4rh/Wnug3XeK8aN3+X74frfjXZxHNr6K7zHV8u+Z
31fL94c/oD+h2gPGV8S/DynvOI+sPuJ7xOoL//yo/o749zH1TT8e0z5iv7Z8
4d9Pyif4/qTxCXJ6Wv7B92fkK+9/1ngIvj8nhu/Pi+HrC9oD86UvWg7fXvL3
8Wsvaw/xfSbHN+T6qvlHnE+2P/D1dfsLX9+o5ftz36zl54He0t+glrcdr5nf
eKeWnxd8V31FM2v5/vz31Xd8n7iW5q/wjx/W8v2fH9Xy76V8bLxFPPGJ/KP+
p2Likc+0D+z8c/kO374Qw4sva4X1b/lOvvWNv4d/+9Zy/v2t7+d3v9e+mV//
wf7Qjx9raT0w8vNafh/iz8an8PUX7YP6vzpew/ff1Ad6G1nL99v/rn3E94u1
j8jPa/l5m7/kS+zndvwg/vtHvsX3i7WPyM/lJ/5hlHymm2PUk/+HV2PWUznr
NwPqKT5CP2PXE/8Z/8atp/ex370fj24PZjt+vbA+Xk/5BX66H4/uH3nORPWU
X6DfieuJ/+i3H4/mP/HapPUUz+IPBtbT+jh2NFk95Rv4g8nryR5oxxT1ZA9x
X3U95RsMI1PVkz3As6nr+X7saerJHnj/tPXEP/Q+XT1f/5i+nviKPxhUT3xH
rzPUE78jH/f5yMfraTyK/dxixp/Bvg/az1LP7/eetZ74H/m4/cMfzFZP8WTc
31VP9hD3dym/WB+v5/edzKX82Q8yt/qBZ/OoP+L2edUvz82n/unH/PUUP8CX
Beop/8CfLCifYn28nuwj8nH5GPl4PdlD5OP1fP/e4mL4uoT8j/PM4lgfF8f6
uL/P+DW0no9fy9Tz+/6XrafxgThmuXrKL2J9vJ7GS/YfLa98Ih9XfvB1ReUb
55mVP25l5XrKx8kPVqmn8QI5rVpP8RTPraZ9xPeM5UPk4/XkP2N9vJ7vJ1lL
/sG3tbUX8oN1CnxdVxzfcyrwfX3tAb5uUM/XTza0PnzdqJ7iOf69cT2/T3MT
2wdfN9U+4Nlm9g++bK5/oP4W9ZR/w7cttQ/4tpX+h/pbK3/cyDb1NJ8b3zeu
p/yQX92unuJjzGqHen6+bcd6Gi/o947aB3zdSfuAZ8PkG3wtyc/Y/6290M2K
fIav1Xq+/6kmhq91MeNDQwxf+xwv4EHT97Ofo6V9wOu29gCvOvaP+l39A2If
Xk/5GPHaLtoHz+2qfUDj3bQP6u9eT+M3fNtD/0Z8vqf2gX/cq57yjbjvS/uI
/eL1FG/D133rhf3i8o14a3/HF8bvA+p5vHWgOM5Dy/f43rEY3hwi3/nZQ62P
XzlM/iPXw8XE90faHtR0VD3fP3tUPT+vd4z2AV+P1X/EfnLtg/zieOUb+8kd
P/hzovaBGzypnuIp4q2T62m/XOTj6pt479R6vn/oNP1p5OPyi3pnaC/w9Uwx
+cFZ8jXOR2sv8O0cMf71XDH1z7M+YjhfjH+8wOfxjxdqD/DlItsD3y62/bx/
hP2Dr5foH8gPLq2n/IL6l9VTPIqfu1z5wtcrlH98/0n7gK9XOX7E95+0j1gf
r+fn76/VX6Kv67UP4sfr9bf87o3aC/++Sf6xH+Im+Ukcfot8px23ynf80231
fD3ldvlO/TvEcR+2GL7epb3C07ttD3Z/j/YQYtMf4Nfv019gn/crL2jwoOMF
8urHo/ML/jykPoiXH3G8oJ2P6t/o5aOOH9jX4+o/zEx/Gfm3/EFeT+lv6e/T
8o12PSMfkeuz9fx823MFf/684w9ye8Hy+D5UPf8+xEv1/PvZL/s+8t9X6vl8
06u2l/+/Zn/Qy+vaQ+Tfjqe8/03tIfJv5cl48HY9v3/kHe0Bmryr/+Kx9/Rv
2Pf7Bfv4QD7E+WntI/Jv/Wnk3/Irpr21D/zxp/Ix8u96nr9/rr3EfWFi+Pal
fI/8u55/D/cbf5/44duCfX4nRk7f1fP703/QHuJ7yfY3vhelPJDjz44X+ONf
lCeP/aq8iR9+0z4i/67n+6d/V5/U/8PxIvJvxwv09Vc931/3t/yJ/Fu+Rf4t
H6Htf9oLzR5Vz/ejjNFImGaOKSavGKuR832AOO4Pa6TfJ84ap5HeH+vjYuYt
xmske2C9c/xGfl5wgkbqP35jwkaSD+P3RI3kT+L7yY0kT2g6aSPJGx7043x9
vJGff5+8kfwdfO3Ho+dX4NuUjcQH7GCqRuIP7+/Ho+2D/GqaRhpPIh9vJP4x
nzBdI/ETvk3fSHxGroPE/J1BzLg4oxi5zlSoP7O/j74GN9J4FuerbV/cJ2Z/
aOeQRn6/+myNNH6y/jJ7I81Hwcs5lBf+ac5Gfh/ZXI1kH+h17kZ+P988jWQv
xA/zqk/sZT71Tf35G2n8oB0LNJL/jPPWjWQv8H2hRj6/uXAjxeu8Z5FGfh/G
oo1kT/zuYvIXvi8uxg8s0cjv41iywPelCnwfKsZelrY97A9YxvbH95W1B+ot
Z38Rw/KNfDxdQXmhhxWVJ/65H2f3O6yifRAfrqr+4ntS6hcerN5I/jD2p2sf
8HPNRvKnsR4un2J/eiNfT19H+4j96eJYD5e/sR4ujvPWYuLTDcXwYyNxrIfL
f+aLNrF9sR5u+5HbZo38PMbm8j/Ww5UH79+ykd+vu5XyjPXwRn6+fRvlj362
1R6Q63bqj/h0+0Z+H/kOYqrtqL+M/Fu+xHq4/Irz19oH/CrJx8i/G/n57Yrl
9KvWyPOZuvbDek3DcuKuPuvT/h5MfNuyPfjTtvynfsf+xHq4/cWfDm/k3zfY
RfnF/vRGyi+IF3dT3rE/Xf9EM/ZQX/jDPdVn3LetvmM9vJF//3SfRn6/+L7y
Ke4jszy+N9XI8/cDCvZyoBh/dJB8Zn7zYMvje8ti4q1DfZ5uH6a90Y7D5T98
OUJMHHak7UWvR4kZd49u5PejH+P4GuvhjRQ/oafjG/n9fCc4XvD+E7SPOM+t
vmJ/uvqlHT0YvpyqPyRePE1+0P7T9J/w7Qz5Rv5+pvYC384Sw7ezG/n3hM+R
v/DtXDH1zxOTv5/fyPcPX9DI7/+/UIx/vKiRfz/gYu0B/zbC/jD+X9LI7yu5
tJHmK2J/eiPPLy5v5PnFFY4X0P5K7QM9XKV+4nx3wb9do77xb9fKB8a/67QX
8vfrxfD1hkb+/asbtR/4crP2gn+8Wb4ih1vFDAO3iclHb7c+8d4dluO27mzk
9+nc6fsj/xbDl3u0B+rfa/vhy332Dz3crzzILx5o5PnFg/ob4oqHlDd8eVh7
QN+PqD/y0UfFsV+9oO/H5QPj4RPaC/WflD+06yn9Lf7pafmGf3pGPjI/+Gwj
v0/vOcsZT58Xw5cXxPDlResTn79kOfp+2fcznrzSyO/TfLWR75d53f5Q//VC
vPSm8mE8e0v58f4ejH95R/nTjne1j/hOuv4Mfb3fyO/z+0D9Mh592MjP938k
ju81yx/s8xPjj/hecyP/fsxn8pH3fy5GX1+I4/y3GL595e+Rj34tZjz8xud5
/7fikEsjX///vtD+H+wf84M/ivEPPzXy+45/Vn7xHVzly/zgr418/uM37YXx
cKT64md/17/F+fFGft/ln2L48lcjv+/ybzH+6R/5Bi3/a+TnG/6zPOZd+xLG
P43Zl/gMz/rxaL7DlwGW41/GFsP3Hhznx8VxflzMeDh+X2offJugL/Unzo/3
JXvAT04khq8T9+X3q0wijv3qffl90QP7kn3Ec31JP/inyfvy++mn6Ev6xk9O
2Zffbz1VX+JHnB/vS/4UvzyNOM6P9yV+Ea9P15fftzN9X87XQX3592VmEGMv
M/YlPtOOmazP+snMYvg6WIx/nMX6+MdZbS98HSIm/ppNDF9nt//4pzn6kj+J
+72VJ3ydSxxxufInX5lHvH1sYE36g67z9+X20o+z++4X7MvvO11IvlB/YfnF
+skifcn/En8tKh/xr4tZjpwWt5zxdIkCX5e0HL4uJYavQ30+7j8T0/5l+vJ8
YVnL4/4zcdz33Ve477svPw+zQl8+Hq8opv5KYvi2cl9+H+Aqffn+qlXF+MfV
tAfqry4f0NMaYni3Zl8+n79WX56fri2/OI+yjvYCX9YVY37ri9HXBmL0vaH8
xr9t5O8Tf20sju89Wx96bipG35v5fHzv2f7F957tD+a1ZV/+/ZitxOhr6758
v/M22gd63FZ7wO63E5M3ba8+4MsO6o+4ZUcxvNpJ+8G/7az+6cYwMfVL8on3
l+Uf+q7IV+pXxZhNTRzfvxLH/WjiuB9cDN+avi/uBxfj39q2j/mqjhj/2u3L
x9PhYvi2ixi57Gr/4etuygv/trsY/7aH8mWZYE/1wXi4l5hp0b3VH2rety+f
H95P/TON14Ph+wHyBb4fKKb+QWLs+2Ax8j20MH4dVhi/Dpe/7O86wnL+HGk5
/DhKjN6OFqOfY6yPPzrW98d+dDH+5Hj7Sz52gvJB7idajthPsjzybzHx0inK
P+4HFxOvndaX3493hvrnNWdaTj7Yg4nPzxbjv8+RT4xf5/bl+4PP8/fxR+eL
+Xt+Yfy60Pr4o4v68v34F2kv+JMR4tiP7u+Rv1/al+djl9l+6l8uJr6+oi//
XsSV1ieMuMpy7PlqcXwPS3nH+XBxnA9XX3E+XIw93yDm/Tf25fH1TX15fH1z
gS+3iOHLrdYn3rhNDF9uL8Qrd8hPxp875Tdh7N1i6vfguG9NTBxwn7+HP7mv
YM8P+Dx8ebBQ/yHbhx982Pr4/0csj/vWCvHtY2L8/+M+H+fFC/Hxk/o3/P9T
4jgv7vPw7RnL8b/PFsaf5wp8eV4cbkJ+xf3hlsOXl/w98veXxcTXr1if+PBV
Mf7/NTH+5XUx+n5DjH29qb3hH962PYjtHZ/HPt+1HH29J47718TkQx9Yn/m5
Dy0nPv2oLz/v/LEYeX8iJu39VEw+9JkYf/65mHjli4K+vxRH/i1fGO6+tjzy
b3Hk3z7P/N538ov5nu/FkX/LX8aTHwv2/ZPl5P8/9xXyb3Hk32LG29/68v05
Iy2P72eJ4z5x34++/7I+//67UP9vn8ef/2s58eV/YuLLUT4PX8ZoJnkxXzOm
mPeP1UzyhS8DxPBlbDHz0eM0c76M20x8Qt/jWY5/GN9y/MMEYuQ9YTPxE/ua
yHLsc2LLse9Jmnk+MWkz2Q/2PVBMfDdZof7kYux7CjFx+JTWhy9TWY6+pxYT
301je+N70pbjz6cr1J++mdv3DMorvqfVzOf/Z/J59ifPrD6oP1iMvmcp6HvW
gr6HiNH3bM3EF/Q9ezPxCb7NIWY8mFOMvudqJv4it7mbKR5j/J7Hcux7XuvH
feOWw5f5m3m8uIDl8GXBZr7+vpCY8WBhMXJcRMx4tKjvJ35YzHLixcWVB/58
CTH6XlL5sd6zVDMf/4c283hxafWJuS0rJt5btpnHe/+TL8R7y4upv4KY/G/F
Zr5fcyUx8w0rN1O8hr5XEVN/VXGsh4vR9+r+Hus1a1ge+9Etp99rifHHazfz
/G0dy+P7W2L0vp79I15b33LGgw2UV+xHV55x/7iYeG1jMfNLm4hjP7r6iv3o
4tiP3sz98RbNfDzYUv6gr63FPLeNzyPvbcXoa7tmHu9t30z5P/a1QzOfP99R
+6CdOzXz+cCdxeRjw8TIseTvYZ/lgn1W/H3sq9rM87Ga7Y98W4y+G9oL/rRP
eSKvppj3tJp5fN3Wn0W+rb740y340+Fi1lN3kR/oa1fLef9uYvLdPeRnfI+r
mc9/92D84d5ixt99CvX3bebzefuJsa/9xYyfB1gfeR8oZj7uIPkf+bblcT+b
GH96qP3Dvg4TE18frnzQ1xHKO/Jv9UH9o5r5fqaj1W98f1r94x+OLfDlOPnE
/O/x8pH4/oRmvv//RDHr/yf5PN04WYw/PkVMv05tpvk05ldOa+b73063nHXP
M5pp/g59nylm/D7L+vDtbDH51LnNfD7uPDH2fb4Yf3yBmPoXKk/ee5Hyj/vN
xfiXEc18Pu4S7SPuNy/o+zL1HefB5RP+4Qr5g7yvlN/Ml1zVzOfjrhYjx2vk
M/Z1bTPNR5P/Xmc59n299Rk/b7CcbtwoZvy8yd/Dvm+2Pv78Ftsf3+tq5vnU
7WLq3+7z6OFO5cX4e5fyivvZlDf7He9R3sRL96of4rX7mnn+fH8hXnpATLse
lA9x37n8wh4eaebnYR4VM949Jka+jzfz/QVPNNN6DM1+Ukz/nmrm+xOeLtjD
Mz6PfJ8VY0/PNfP9pC/YfuYXXhRjTy8W7OFl5RXfoxZT/1Xlj3xeE+M/XxfH
97rUH8Pxm+qf+m+JGe/eLsQX78gvfvdd+Ui++Z58jO91iWPbkc+Tf3zYTOuR
cey9mdZDqf+xmHzzE38vznsX7OkzMfr+3PfFfvNmvl77peWx39zy2G9u/+O8
dyF/+VZ5xnlv+Y++flD+sd9ce4j95vIde/xZHPvNm/n9wb/KF8a738RsKxop
39DX7838e6x/NNP6PP//0/K4j62Zf0/qb8vJH/6xHHn/K98Zb/7zefzPKHF8
v6uVMPYxZivVx/+M1cr3iw0Qx/p2K8mD+GTcVn5/ynit3D7GbyV5M95M0Er6
iPvYWrm+Jmrl3+eeuJXbxyStPP6ftJX4Eue/W4l/5GuTien35K3EZ8abKVqJ
/+hrylba70I7pxLTzqlb+X7nacTYx7T+HvKerpXb1/S2B30NaiX+x/q2mPh/
RvuHP53J/vPczMoLOxjcyr8PPovyjfxafaDvIeoL+5pdfTJezNHK4/85xch7
LvmBvuaWT4xX84jpx7xi4oP5Wvn+lflbuX0sII7vV7fy/S8LtdL+L+xrYTGv
WcT6sb+8le8nWMz2UH9xceTXrWTPrOcsKf+xr6XEiGWo8sGNLN1K/gR9L6P8
Gb+WFaOv5bQPqv1PfeIPV2jl/nBF+QGvVhKj15XlW+TX8p/4YFVx5NfymXhu
dfmLvtawnPh/TXHsN2/l3z9eWxz7zcWRXxfqr+f7Yr+57UNfG9ifuA+9lceD
G2kfzJ9trLyYv9ukledbm7by9cnNxJFfax/Mn22hftHXluL4vpd8YP/t1vIn
8utWil8iv27l90NvL1+xqx3kc+TXrbQfkvFnJ8uR986WI+9hYuRVauXnA8q+
j/G+Io717Fa+P62mfZAv1e0P3WzYX97f18rzpabyQl+tVp6vtbUHfqej/+L8
RrdVyK/VL/HhLq3CenYrP6+0m/xB3nvIt8ivW/n9I3uJacZe8jXya8vje9eF
+vu18v3K+7fy/cYHtPL7vA/094kPD7J91D9YTLxxiPZB/H6o/cWfHaZ9EB8e
3srzpSOUJ/Z1pP6G+PCoVr5+dbT6wb6OUZ/o61jHA+zrODHxyvGtPL89QT7h
D0/UHuK+NflHt09p5fvje3DctyZm/Dq9lfYXc164B6OvM30eHp8lxh+erX0h
t3NsD/XPtf1x/7ntp/75lhNvXKA8GL8u1D5Q20WOF+jrYuWNvkaoH3hyifrD
vi5t5fs9LlPfxOOXyw/GryvkD/strhQTH14l3/BnV8tv9ntc08rvT722lfbX
sx5wveXI6wbLkfeNliOvm/x9xp+bxcw/3SJm/LnV9uHPbrP9cU5Se8cf3VGw
jzsdL9DbXa18/ebuVr4+e48Yf3iv+sGf3af+sI/7W/n+kQfUP/J6UHtAXw+1
8vPhD4uxj0da+Xn6R8WMP4/Lb+LxJ8SMP0/Kb8afpyxHjE+L4361Vn5e99lW
fl73uUJ89ryYei9oD/DyxVZ+Xucl5UG++3LBPl7Rv6C2Vx0v0Ntryp+ffV39
8J431G98T0x7YPx4Sz6wf+Ft+YO832nl+3vf1T8j7/fFcf+5/Izvicn3WM8W
87Mfy3/is09a+XmVT0fL4//PZ31meewnt36sZ7fy8+xftvL7xb4S8zNfax/4
/2+UD/7kW+XHeP9dK19f/N7xAbn/YPzEv39Uf8j7J/WL//5ZTH77ayvfD/xb
K8+PR7by/Pj3Qnzzh3zFHv9spfNX2ONfYuzxbzH+7x9x5NeF8eY/fx//N8py
+DVGO9kj/RrQTu3FfsZup3iJ/ZDjtFP/Y726neSFnsZrJ77zM+O3C/lzO/Gd
/SsTtZP/5+/E7aRP1DxJO/E9vn/dTvzmfQPbib/of7J24hf+afJ24h/jyRSW
M55MaTn6n6qdny+fup34jDynEWNv0/p7xA/TiclfB4mJ12awvdSfwf6wHjJT
O/Gb+aGZ7T/z24OVD/H1LO3Eb8ajWdv5fQJD2snfwIPZxPzs7OoP3s7RzueH
5mwXvifWTnxH3nO38/OI87QTv+K+tHb+/e352omv+Kf52/n9hQtajn/qx6PP
H/L/hS1HXouIYz+478c/LSbGvy0u39lvs0Q72WvsB7e/rL8sJUZeQ9v5fNrS
7Xw/9TLyH3ktK8bel2vn66v/a+f+afl28l/MZ60gH5DXiu3k73ntSu08H1il
nfvzVeVffA9bTLtWl+9xPlsc57PFcT+a/I/1aHGsR/s8elvX9+GP17N9jH/r
t5N/xx9sYP/g14byP9aj2/n6x8btfP1iE/0L/nFT/Q/x4WbtfD5pc/WDf9yi
neIf/OOW7Xz/+tbyAXlvI3/i+2HyC35u187PD24vpv4O7Txe2VE+Y887yf+4
r1wMP4eJI18WE4+X/b3Il30/8q6Kmf+rac/4v7r9w54b7Xw9pK+d7/dvKj9e
21bexCtt9UH+01VfyGu49hD3k6tf7HlX7SHuJ5f/xBu7yyfq7SFGznsW+L2X
GHveWz6T/+wjjvPY7XQ+Pc5jW47d7i/GHxzg7yPvA8VxHlt7YPw/2PYyf3eI
/YPfh7bz9YzD9Bfw+3DHU+R9hBg/f5T+h/nOo+U/+ebR7Xz/27HqE70f187P
Vxxf8J8ntPN4+kQxf06Sb/DiZPmP3ZwiX+H3qWIeO63A79MtR6xn+Hs0+0wx
8wNn+XzIzXLadY72Sz/PbefrEec5/mGPFxT8wYWOD7H/2/EVeV3czvePjVAf
5IuXaA8EEJeqX157mf4v1p/lA/OdV8gX+nulGP95lXyjv1fLR+z5GjH8uE4+
k99eL//J124Q8+dGn6e/N/l7yOvmdn7e/RbHB+KZW21f5MftfH72dscH8q07
lAfx+J36i8iP5T/2dLfyZj34HvWBXu/VHuL+cfUX+bH6je+BaQ/w40H5Qn8f
lv/Eb4/Ir7j/rJ3np4/Jb/rxeMHfPyGO74OJkddTYvzP02Ls4Rn5z3jxrPyH
H8/ZPuKR520//ucFcVxbI//5/0vtPF96WfnFeet2vr7/mvpgfHxd/4+83hDj
799Uv7H+LP9p99vyHXm9I2Z+8l35hr9/Txz3nYlDbPIZXn4o34lnPirEQx/L
71h/tjzWn8Wx/lzITz6X//DrC/kf952183z+a/kf689i5P2N8iKf/055xvqz
8kfeP7Tz/as/Oh7EfePql/myn+U/7fpF/xj3nWkPkR/LL+Q9Uv7j/34v+Os/
5Gvkx/IZfv7Vzr+f8bfPx/lqy+P73Jbjv0b5Pv4/RieVI68xO/l81Vid1B/8
14BO6i/rt2N3kjz49zidfH/WuJ18v+x4nWQP8GP8TtIHj03QSeMB8deEnTQe
xPe/Okm/8GPiTrIH4oFJOon/6HdgJ/GH+GuyTuIb/n7yTj7fP0Un8RU5TdnJ
78eayvI4T93J459pfB7/M63l6Hc6y7Gn6W0P9jDI9sZ6sxj9ztjJ10dm7uT2
MFh5IYdZOvl5kVk6+f77IZ18P9hsnXw+b3Yx8ccc6pvloDnlQ+TL8iXyZfkU
+XIn8Z92zyuO+8U7+f1x88tP+LxgJ/8+xkJi8r+FxexfX8T6jOeL+vv0dzHf
D58Xt710awn7w/mUJTv5+vhSnTQe8P+hygv9Lt1J/gX7X0ZMf5dV/tjDcuor
7i/r5N+zW0H+4+9WkA/kEyt1UryAv1hZ/qDPVeU7f1cTQ8vV5Sf6XEP+os81
O2k8wJ+v5fPoc20x7VvH34d/69oe7HU97RU/sYGY12wov7HXjTr5/teNO/l5
wk2UH3LdVL6jx82UN83cXP+EvW7RSfE/9rql/oz3bKX+4c3W8iPuK+ukeAG9
bCe/4N/24rgvXH5GPix/Ix8u8HdnMePHMDHxc0l+x/5s34c/rnTy+dmqGP3W
7B9irHfy/X2NTn5+vq+Tr7c3lSfusi3fmd9q69+x1676ivvJ5Ds83kV9069d
O/n+gt3kC/5pd/mFf9pD/0qz95Sf6Hevgj/eu8DnfcS0e1/tATvYz3L80wHy
nXiwB9Pfg8SMtwfbfv4cov2yHneo/eUFh8l34rnDlRf9PUJ5xn5s+R7noR1/
kdfR6ifWiwv6PVb+o+bj9P/Y7/HyP9aLO3m8f1InX+89Wcx7T+nk85enyl/s
/zQx8/Gnd/L5zzM6ef58ps+jvrMK9nC27SN+PaeT7zc6V76TX50nxt+dr3yQ
1wXyn3zywoI9XKS8sYcR8p/45JKCPVzayc/TXKa/j/PP2gP8uEK+MH5dKZ94
71Xyn/5eLf/i/LP8pb/XimP/tc+jp+stJx67wfK4f6xTWB+2nP7eon0ip1tt
L/29TUy/bi/09w7lA+/vFMOPu+Q/65V36//Jn++R77TzXv0V9n+f+kNe98t/
eP+AfIj1YfnDzzykP8XfPSzfmG99RL5j14/JT+r1YPr7RCff//Ck5YyHT4mR
19O+j/HhGTFifNb2kT8/p7+P72MX7OGFTr5//EX5Dz9eUl7Ery8rT/jxivKO
+8Y6+fz0awV7eEN98t435T/+4y35wP/f7uT32bwjf7CHd8V08z35F/mvfIWm
H8hXxpcPxfibjzuF9WDrM5/zqb8Pnz+znPzxc8vRzxfab6wHd/L9sF918vmv
r5UPzfimk583/VZ5xvlm5c15uO87+f6tH9QPPPixk++P/KmT7wf6WUx894v8
QL+/yh/Gw5HyjfzkdzH33/whZvz/U77i7/4SYw9/i9HvP9oH4+G/Bf/+XyHe
GSVmPB2jm3/fvh+P7g+/N2Y39Rf77cfZfqCxuvl92QPE+Jt+PFre0HDsbvJH
/Gw/zs7Tj9NN+kTP/Xg0/5mfGLeb+IA++/FovuCnxusmPjEd1Y8zfzp+N/GP
3+nB9HeCbr5/qB+P5jv8m7Cbr69N5PP0twfz2on9ffLjiW0P/Z3E9jN/1IPh
5aT2F//Tj0fzn/4O7Ob7DQcqT3gwmfKGJ5OpD/KFybuJ/8yn9OMs/52im8/v
TSEfsK8p5Qt8n6qb33fcj0fzjfxs6m7iJ2LswcQ704iRYz/O5kun7eb58rTd
fH/PdOJYnxfjj6bv5uNVD8aeBtkf5D7I/tOtGeQ/8c4Mygt+zKg8GZ9mUt7s
7+rH2f6ImdUfYp1Z/pO/DxYzHzZY/eOPZ5Ef9HeWbr6felb5hn5nlY/87hAx
+/mHyF/+P5sYefVg+jt7N5+fmd1y+juH7yf+m1NMf+e0vYhtroI9zKX9I9e5
7T/zBXMrH/Q0j/JEXvPIf8K2ebv5/ul51Rf6nU//hf3Pp77JL+YXo98Fuvl5
mgXkf9x3J794bMFufv5gIcvp70LyHx4uLH/J1xa2nP4uIsYeFinwedFuvl9v
UcvJFxbr5ufZFpP/MR/Uzde7lrD/2O8S8p/+LtnNzzMvKf/p71Lqg/72YPQw
VP9FPDW0oN+l1X+cX5Av6HeZbn4echnL8e/Lyj/024Np73KOH3HewXLi4//J
d/KV5cXIsQdjvyv4e4itB9PfFW0f41kPJn5cyf4Sz6+sfOhfD2a9eZWCf1lV
+cf38+Q78eZq3fw8+mrd/PzU6t38PHAPhg9riLG3NeQT/mnNbp4f92DGn7W6
+fxRD6a9a8tf/Mva/n6c1/B5eLhuN9+Pt67tY7xdTz7T3/X077R3ffkc9yeI
ia836Ob7BTdQnsS/GypveLih+uH/G3Xz8/Ub6a+w443VNz+7if4P/7JJN5/f
3lS+0M1N5Rf1Nyv4080sZ/1tc3F8v0DMfqktxOi3B2OXW4oZP3ow+dVWvp/+
bmV/4PPWYvjcg4kvtunm55G37eb3X2yrPOHxdvIfe91OfcR3fLv5+YDt1Sfx
9Q7dfP6nB9OuHeUL88s9OO6TkJ/EBzvJP/zTzvIPee3s8/wZJsY/9WDG25L8
Rr9ly/GjZX8fflTEpMk9GH9ctX/wowfDj1o3z29r+gv6Xe/m91XUlS98bujf
sYceHPdJqj/2o/SpX/rbFNPeVjc/L9XSHvDHbfmDP2/LP/xVp8DnHoxcumL6
2y3kF8MdX4inhnfz9ehdxORTu/g8ctm1m69f9GDq72Z/2M+zm/4Bue3ezddH
9lB++Ls9lC/t2FN9oNc9C/awl/qL+WD1S/y4dzef/9lbPuPv9rE8+mk5+f2+
8g399uDYT9XNz/fuZzn+bv9uvh/vADH2f4D18e8HWh/7P9D2kT8eZP3YjyXf
ee5g+c7+h4MtRz+HWB7frxTj7w7t5vsLD1Uf8Pmwbn5e8nAxfD684O+OENPs
I+QH9nCkmHYeKZ/Ip44S09+j5CP+/Wgx9Xsw7z1Ge4CPx8hvxH6sz+Pvji3U
P87nae/xtge59GDkeEI3n885Qb7DyxML8f2Jyg+5n6T/xz/3YPK/k7v5/M/J
8p149xQx8cYp6h+/e6r6Zv7mNPkV+9XkF/OfPeX8zOmWMx92hph8uQcTP55Z
qH+m5fT3LDH9PcvnqX+27ee5sy2Hz+fYH/zVOQU+n9vN58POVT7Y33mF+P58
5Y3az5f//M4FYvTbgzGbC9Un49GF6jv218kPxu8eHPe9iOn3xdoH/R0h3+Dp
CPka59XE2G8Pxn4vtT7tvawQn/Vg/NXlYtTUg5HXFQX7vcL2098ru/l+8SuV
D/Z7lfKj/lXKn/5eXYhHr+7m+x2u6ebnva/Rf1H/WjF/rivM710nP+jv9WL4
cb38o94NYv72YMajG+Un+X0P5u9NYvhxU4HPN2sP8Plmfx/93uLz9PcWy9Hv
rbY/7qMt9Pc25UF/b1d+9LcH4/fuUN685w71hf3fKYbPPZh84y71T/0eTFp0
t3xgPeZu+UM77pFv5JP3yDf2c9zr8/i7ey1nfuA+MfZwn8/Tr/stZ37vAcsZ
f3sw8nrQ5/F3PZjzfA/5PN3swezne9j+k08+XMivHlF+5I2PKH9+59Fufv7r
0cL83GPqm/1Sj3fz862PF+a7nyjkzz2YeONJ+cL4+6T8wn6fKuSTT8lH4qun
xdjv0z7PfMYzhfnIZ+Q3/X3WctaPnuvm+zmes73Ez8/7+/x53nL080Ih3n+h
EE++aDnx84vKm/e+JCZ+fqmb78d6WX3G93vUN3x8RczfV3ye9axX5Qvx1WuF
9YQejH5fL8RXr/v7xJNvyE/8zRs+j37eFOOv3izMV70lRl49mHjjbd9H/Pt2
ob/vFPrbg5mPfNf+M568pzz5+57yRq/v+zz9fd9y6n+g/ujvB4X5jQ/VN/H9
R4X1gx7MsPmxGH/8cTffT/eJmHj308L6w6fyF//ymRj/8pnPk+9+Lmb/9+c+
T37/hXwmfuzB9O9LMfr80vbD/6/sf9wHVRgvvxZjr18rX8afb8T40x5Mf78t
xEPfFeb3vrMcf/q95cRT38sP/NMPhfGjB9PfH8X0twfD35/kK3zowfz92ecZ
f3pw7A8W099fbC/j5a+W09/fuvn6bQ9GvyML/B1ZkNfvhfnlHkw89YeYeOqP
gn/6s+Cf/vR5+vuX+qe/PZj+/q3+oVEPJr74pxBP/SvGz/wr/5hP/09MfvGf
/MY/jerm+zdGWc7vjjE8v9+nH48uj/ush+fjTz8e3R76O9bwPB4ay3L80wAx
+dDYw/PvAYxtOflQTzntHWd4kjfjz7hi7LcH097xxPG96OGJD/B5fMuZz+jH
o/WHfifwefrbg7HfCcX4qx5MuycanvO5BzO/N7GY1/Zg8vtJ/L34/pXlyGtS
y9HvQNtP/YHD83x3MjHz1T2Y/k4ujvVdcez39vfp7xSWE19MaTn9nVL5Yr9T
iRlvpxbH+q76hkfTiLHfaeQHPJ12eD7+TDs8j6emszzuLxPT3+kL9af3ffB5
kL9Hf3sw9juD9dmf04NjfXd4br8zifHPM/l7sb5reazv2h7+PVgc67viOO8t
jvVd5ct+r1nVD/bQg4kvhgzP490hltPe2dQ39ju75cQXs1se67tihtU55C/x
1Jxi3MacPo9c5hLztwej37nF9Hduf4/+ziOGzz0YPs87PI8f57U/8Hk+y6k3
n+XY7/zD83hqAcv/DygIHoY=
"]]}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0.},
ImageSize->Full,
Method->{},
PlotRange->{{0, 274.816}, {-2.8000000000000003`, 3.039}},
PlotRangeClipping->True,
PlotRangePadding->{{5.49632, 5.49632}, {0.11678000000000001`,
0.11678000000000001`}}]], "Output",
CellChangeTimes->{3.566456513818742*^9, 3.56646334445967*^9,
3.566464588454891*^9, 3.566465755336771*^9}]
}, Open ]],
Cell[BoxData[""], "Input",
CellChangeTimes->{{3.566457168123908*^9, 3.56645716813968*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[", " ",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "schweb", ",", "2"}]], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Red"}]}], "]"}]], "Input",
CellChangeTimes->{{3.566418094323538*^9, 3.566418098142885*^9}}],
Cell[BoxData[
GraphicsBox[{{},
{RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJxcXWWAJNXVXYcVbPHF1oV132Wla9xnukfbprune4MHCxo0IZAQNCRIgCBB
gwQnWJjBIUBwCe7u7nzsOTXnfDX8yOZNd3XVu/eca+++VxOKe7b+YsigQYMO
Hj9o0Np/z/gr/ov9779ftb124QOxnf/0wSGxxbfFmosbJpdf90xsvz9vMaxz
/Ydit+679v98H5sy4jenVBz7ROydqfPXvXzrdYJjd3/ru3988mxs7guTf/5k
dHDRmXeNv2qfl2M3fPbDEwe+s15w1trhzq/Esife8cX07Jjg0YnPfXPYrq/r
+kvuaVh6TNnbsc3xAD/EZl/zt48uvue98PuvxfCzFR/FygtvPDLxuTd679//
tnPGzf0kdmrF2jv/0Hv6HmOP7PvPJzH+fUTfzz/28zc/jb3Ucvxpe4wd1dd6
47ZHvZf4PPbLtY/52Oi+tX89su/z2PLr7vv5itF9/PsXMdy2YWTfqlFPn7/X
qi9jk9Y+5q3r9G2TXrPipZavYmulcd/+Q/seenDtf1+HchjUN2Tm7zf733+/
iX39s/TOvOvjXv7+tzHc9sb/xvDzTd/HLv35f4sbfh3bc+3jnvdDjHIYGuAx
xv0Uq4bA1g3WXrXtUT+Fchgd8P6Dgpvrxvx8q/WC7fCFwQGmObFfvoMDPseo
4PKt114wOOiXL9SZGxL8+LM2ps4fFqz9teNPGxJsBYX9ELt3rfgLQ4MP137t
5i9ixMPQYK20vznssRAPw4L18UBv9nJew0K9fd57+3/Oq7rhs2HBDChsUCiv
4cErv97knzWvDOn7+X9+/n/Dgy+nr/3CiD7KYURw+K5rETWyj88/IhiDCYzq
WyvF8VeNCPCYe4zuy2Hi6wRQy6jRfd+vFWdxnYC4GNVH3K0T9OuPclk3eGDt
Y/0wvG/aWjGk1w369cfnWjdYiP9+6KVcRoZy+bKX8hsZ4vSJXly+ZlTQz4+f
yfCzJEYFh64VV93HIc5Hhbj/OkZ5jw4qQYzBQSMAOTrg7wwL9T0m/HzdgHgY
Ezy89ufPHBUcsBbGL4wJ+vnC69YLeTYmoH7W0+f8/npBP/92xH/rh88/Krhg
r7WIXj/Ez4iA8t8gGIT/hoXf3yCcz48x8meDoBaC+op2YNGGwd1r1fSnJ0M8
bxj+/oO9a6X5679sGAB+X33US/1tGBBXX/WSLxsG/N3ve3HduxsGUMdtg/rO
Hbf2yTcKyNehfYBZ9UYB+TSij8+3UciLdfvWPuWY324U4mtkH3B+Vv/1o/og
rls2CvU9qg84HzxWn+O2240NonwfG7TjwdftAw5TY4VX/Lvf2ABwHTa8j/gf
G0BtVUP78Oenxmp+uO+XY4UnynvjkIcfUz7zNg7n81ovrotvHKyV7geHPNxL
PW4cUM53xADTazcO+JwfxsCvhzcO+f1lbAIu3DgA7Y7/Lvbxz7NaOnKTkN+D
Asi/cZPg72vp8MSQ0F5sEnAeI0JcbBLiaN0QL5sE1MuoUE+bhPZjNOfx4iZB
v30CfidsGup/NL+/elN9n/zbVHikPDcN9saERoa43TSg/V+H1129aWjfRgS0
L5vKfgGHG20WXv9TjH/fLJzf1zHa+80C4GTIZ7H314p5t80C4GLFW6Ff2yyK
54c2C+ppgHopz81CubzbS7uzeaifz3ohpsmbB/ze173EweYhL3/opX3aPICZ
+GhQH75/weYB/cywPkz3zs2Fb9qbzYU/+rXNA/zsDevSvm26hfAKP5jZIqBd
Hdl3MAi4RbDWG+3+1rp9sKunbxH0+y/iZ4uQj/3+cQvhGZdvsmVo34f2ke9b
hnj9McTnlgHn/TX5u+uW4fw+6SXutgz183YvxH7ZlpIn57llaD/P7IXfHD0u
2BKG9I0YfmbauODxprU3/jRGuzMutI9fMS4ojQv93g8xmK0jxoW/P5h+4M7+
64dyni+PCxivjKDevh8X9PtX2t+thD/6t63C60cFkP/BW8keU57+HN+/fquQ
JyNDv7uV+EO5bBXOb52A8906tN/DQzluLX8AHP1y65Dvg/j9Y7cO7fO3Mcpz
6wDm/sTPwzhj63A+H4Rx09YB46BXYvSr28hf4fuV24TP80IvxNuzTeh/3+/l
fLeRP4d8ztgmjDu+6QVd7ttG/pL43CbE4xDibYttQz82rI/y3Fb+l3zcNvh8
rZucuk4f+bhtOM9+fG4r/BOf24ZyXKcPevrY18NNjdku6I/3MM8p24lfnO92
ss+U03Yhnwb34Xcu2i7U17chPrcL44svQv+/XTjfj3qph/Gy15DLBuND//ho
L+3w+ADzeu/qGOxu2Xja3QffDv3leNkj8mp80B8PQgy7jxe+qY/xob4GUa9/
HB/ibUiIx/Gh3RwW8ny84j3I9YHxwjtpOD5gHD+SuHhjfPArKGok5fKlP6dd
mKAx9LfRhHC+YRy1ZILwTDlPUDwBN9DWf/0Q6rUwIYB4nw7t9d4TAsZ138Xw
HIdPCOIInL+MQb/H9X//kxhwcOWE0F6/E8blE0L/fluMcp4g/wn8PjtB+mJ8
NiHU9/uMX7+eEMbJn/XSz00M8fh1L+3RRPlz0HvpROGH8clExZPwO+0ThT/w
oGdiyMfhfZDT3hNlf2m/JgbfHrZW0iP6aD/9OeOnicI3pzkx9P/D+uivJgrf
0PvzE0P7P7iP8dXEAHHAMT/1AgdfTwyeXGue1/2+F88/YlJw51pzcsdXvdDX
xpMkD+QBO0yS/BgXTlK89+la2CYnhc97d4zx2aTQPr4cg7/+1aTQ/r7L/O3I
SQHzrU9juN+fJ4Vx8Zexs9eakX9Nkj/Hfe+eJPzAPz0xKbTHQxkXvDopxM9w
XvfxJMULwNNPk0I+jgh/Z3KYz6zDuHnrybLPsFOrJuv70EfTZMXL9LeTw/hq
eBg/TZb9Bp4OnCx+Qr5HT5Z/4nwnB/35LeKDv08O4+5vY3yOyYrngI++yQFg
vu8nMdj9hycL/7ATL04O5f9CDNP7YLLiRYjxh8mhn7mH8feYKaH+XiY/xk0J
9f8O7fmKKbJ/wG39lNA/fNvL+U8J+vNt8GmXKUF//gt+HDBF+AOfjp4ifBLn
U0I7NJT52d+nhPndsD7Ge1PEH+iv12PifYr8C/T3/BTxAY/x/hTxEWr5bor8
E/zXulMVj+H7s6YGzNN/7IU9WTk1QHnhmy97ed1UxTeI61JTFQ8iz915aiiP
V2hPDpwqf8DvTQ3j71NisA9/map4k/qfGuL/9VD/UxXf87mmhvj6LIxPpyof
Y3wzVfE+wrcPp4Y4/ynG+U8N8TYooL+cFuanQ0L8TwvjlqH0HyuniU/k+zTh
HXhJTwvlNTyg/v05/Yyv5/ynKV7n/KcpPsO8LpgmfsNeXDtN/g6Pe8e0Afno
tIBxyLcx5n3T5C9gJz+aJvuC+Xw/LcTje/QnY6aH8dOr9Cdzp4fyfyRG/k9X
vk/+T5f9g93JTA/x90EY/06nX0x82gvcHDQ9jCO/DPU/PfQX3/QyD5wufwLa
XzQ9tDc/sX5y7fQw/hnM+OWu6WGcOiSsT00P/dsQ1j9ena76CuT8yXTxjX54
hj6nnGeID9T/DPkzwH71DD0P5NU4I+Tn94xvsjMUD0LPu80I+fkF/cuBM8QX
6O2YGYovGa/MiPrjf8wI87on6V//NSO0f5cyn7p7RtBfP6P9nyH/Ajv72gzl
c4xDZqgew3x/+wDTnv05/c3G2yvewn0Xbi98Me7dXnxhvrN9GB8NCfOg7ZU/
Uy7bB/31O+Dn0O3ln2Bvj/OY8bTHnP/24gPkd+P28h+wn/dsH8Yrg+lHntpe
/oS43V7+Erz5dPugvz4LXgydqXyY858Z0G9/EUP+vXhm6C/fi0FNlTPDfP+V
GOx120zJn/nXTOVvvO/MEM+P9cLsHjYzjFde6YVdOWGm8kHg7ayZiqeBs8tm
hvj+rBf5680zxR/YuXtnij/AzzMzFb9w/jOVn7LeMlPxDnA2fFZYdxjUx/nP
Ur2J8dws+QN8v2qW/BnjuVniA/RSmqX7Qd77zNLzwAwdMUv+knZxlvwJYHrO
LOVXyPeumKV6EOc/S/4YsHxwlvwL49lZ4gvj2f759Ibx3Sz5f8Z3s4P++j3p
OTu0L6+zzrxstuILzKN2tuq/wFnnbOGH+p8tfwO97D9b/IG9+t3skL+Dwrh2
tviE+547O/Rfg+mHrpmt+ij4ervHjHdmh35lMO36Sx7T3/n3md/PVn4BOaw3
R/HWQWsfbNYcPT/t3RzFW5TbHPkP2vs58sfMz+fI3kBOv56j+Iv5yhzl26wD
zRFfOK854gt4f9Oc0B6/xHj8njlB//oG64n9n7/HetPrc8L895Ne2rs5qkcB
N0Pmqt5IvM9VfQr6WjJXeCXf56pexXzNYzxmca7iPcBmL3/OfG2u/AP8ywlz
w3r8d/SXZ84VH1i/mKv8ijjz8wJH989V/kE9zg3611Pox+fKnyBf+GpuaA/f
4PMOmReuPzxPeY+cp3wQ8cDW86QfPOekebTD77zI+srMeWH8+Cbt6YJ5AXBz
+fvU9w7zxBfEAWXzVI+B3ambp3gEdqVlnvgDO5qcp/gFOMvPk73G7Xeap/UY
4HuP/vv/SHu93zzFd8DlofNk/2GfjvQY3z9lnvgJOZw1T/iHf71wXsB1jG+Y
P18+T/El+HvtvDC//5z1iFvmqT6Hed45L6xnfBSj/uYpP0Fc9Og82RvG/fNC
Pj3L+PZl6wNm+K15ipcxzw/nKX+hvvv1+XQv+PvjvDAefbUXvBgxP6zXv03+
bDY/xOeHxOt28+VvIO9p8wPWXb7ohbznzBcecf2S+cqP+dzzhV/4n6r54hf+
3Ogx3Fybx5BfZr7qp5Bfyb/PeHq+4inIce/5YT32c/Ll1/MVbwJ/v5mv9RZc
f8x82QuI/aT5Wq+D3Tx9vvI/yPm8+fIn0PvF80N+30T/ftX8EC8XxxifzVc8
QL8zP7S3z8Ug/3vmS9+Q53/nCw9Q65PzVa9kGXK++ER/Pl/5DvD4/nz5I/ix
z+erXgB/+e18rbcBNUMXCM/g79gFyq9p5xeIfzAjk/05+e/rGacsEH9hz1Ys
ED+gt/IFej7Ao35BuB7yWbj+sEB8wbyT/Z9/RPwXFqg+Aru88wLJD3ZlzwXy
L4jbDlyg9VjGWwvk75lvL1D8THu8QPUa2oMF4g/s4VkLFK8h/rlwgewp8Hz5
AvEJerpugepnrL8tUPxCe7BA8T/k+cAC8Q3ifHyB7DvismcXCN+Q56sLVH+A
/X7HnzO+9RjXf+vfQ1w1eGEY73zK749dGMaDnzC+GrdQ/gN2a+JCxae434yF
yk+A2/kLVS+HOpctlP+GXoKF4XrinawX1iwM456de2FGmhdKP+BP10Llm7BH
+YXiD/S348Kgv9+B+l8Y1lPfDvsOFiqfpf1fKPsLGB+9MPQPnzCeOX6h4hnE
1acsFD7pDxbKf4E/5y8UnuE2Ll+o+Ahm5lqPEafc4jH8z50LlV9Q//59yPGx
hcrHGOf4+ah/Pz/9sudHP+T5A6bfLFQ8Bj4NWiT+sF69SPki/t1ykfwNv7dI
9XrU86Yvkv1DnjhvkfgD/7N0kfjDvHCR4jfYv+pF8kewf82LFM+BRx2LxCfA
qnuR7DVguWaR+AUx/HKR/Bfy330XKX8C/w5ZJPtP/+8x/ZS/T1z69+CPzvT9
WI/z86D+d+ki5SO47JpFob98i/WwmxaJL6hH3LFI/gV8un9RqN9nexkPLBJ/
cP3/FgWU6/3Mn162/KGPtxfJ/0AfHy9SvRl//mqR7CHrvYsUX7BdZLH0T1wt
Fr+4/r9Y6zPgz9TFyofxtbmLhT+udyyW/eZ9Fofx2cfMt6oXC7/w+02L5d/g
/zr8OZ/D1zO/9Jhy9v2p/8XKR7jeu1h8oP4Xy99S/4tlP8C/kxer3ghcnrlY
64XQ898Xyx4hjr5kseqV1P9i2S/Y35sXa/2F+l+s+I3675//taH+Fyueg17+
t1j1Ulz3ymLxi/pfrHie9b3F4htxvlj5MfW/OIyPXg/Xc5bIn+HPWywRHxkP
LlF8BP873Z+jzjXXY+rfvwezE1si/ANvNUv0PLT7S8QH5tNLNB/Ui7qXaL6w
S79Yovoj4/8lsj8wN/stkfzA20OXSL74+++WSP6Q07FLwnrXjeF6yxLxh/WY
JYrnyP8lYf326Rj5v0R8Yr6+RPkSxHLTkih+7lgi+4vn/s8Sre9T/0uUX1H/
S4RP8t9juPG3l4ifXN/xmPz3GCj8yddz2Xip/AN5t1T3h5wmLNXzAofTlmo+
gPm8pZov/f9SyQPrL6uXSl7gYc1S2SOkO81LJV/k351LJX/GTUulH+hvzdJo
/rPHUtUPqOelso/0/0uFB/DyqKWyp6w/LlX+Czfw56XiG+O/pYr/Eb+dv1T9
GrAfl3mMvOSapbLn5L/HwM8d/j75789hPx7z5/yz7w879+pS4R/55DtL5S/o
//389P9LxQ/We5cpHuO/y1QfYxy6TPJk/LdM8Rrjv2XyN8Dr/GXSD/3IMukP
uAn6r7+P8UPtMukb18WXhfWWJ8L4b5nsKfW/LIqfnZapXgf7s+cy2WPIbX+P
ibNlyg9w/e+XCa+sv/pz4O9Uj3H/sz2GvbzIY/YV+X6IW673GPbj1mXiA/B3
t8fkpefH+N/zB/6et3wQ/7y+TPwBD9/1GNd/ZvnCLn9n+bP+tVzxNp5//eXy
T1zvWK54j/nfcvEN99t+ufDAuGm58IL7rVgue8v6z3LxEfip8xjzTHjMfsLl
wiPMVGG58Aq17+wx6zgeg9cHeMz8z2OuNy2XPcD8T/AY+DnV36f+/Txcj/Lz
Qo5XeL7sd/IYduXW5co3kbff5TH8zwOWH+T6uOULu/yc5c/1/OXiH/K2d5aL
f8z/rE885zcek/87aMz8bwfhgfnfDsIL+b+D8gHyfwfhC/Zm/g6Kd2j/PSb/
dxA+ob9ajxGvtOwgfCPvTHpMnnmMMGTHHcQP6t+fc33ZY/ifwzwm/z0m/z2m
mD2m/j0m/z2m/j0f6t/zZz3QY/ZreIzw80GPWdeyfBkGWf5cz7N+2L+yg+wt
/v6Z9Yl6zHc7ROPPISuEF+B0kxXiO/C69QrhDXidvEJ45PrACuEX8c4Cj9kf
sUL8wLpCxQrxgfxfIT7h+tYVUf+TXiH+AX/FFeIn+0lWyH9T//4c9z3IY87D
v0f9ewyxn+TvQ+6n+3Po9WyPWf/z88L/XOn5wn7c4Pni+tssH9ifey1P9hVY
3ly/9Bj3edH6Af7eXCF9sv67Qvpm3rwiGr9+v0L4Ac6GrxReSXCP2Ve3Uv6I
6ygrg8j+ljkr5b+4DrlS/hBh7CqPcd+qlcovWf9dqfVTXN/hMfCX9RhSKPl6
4G/3lfLf7J/ymPVf35/rDB6DL3/080OvJ3u+XH9eKfvCeN9jXHap5YX45+qV
ki/Xq1aKn7hv30rpC3nNfStlv/G7j66UvoG/Z1YKL4z3VwpvzPdWCo+sI64U
H2A/v16p+I9x/irFi1zvXKV8CvXWLVYp3sRlE1YpHkV8OcNj2vtVys+oF1/P
fk6P+Ry+H+qICY9p7/18kGtulZ4f09tpleJzxnurxFeI8YBV4h/X21aJf6z3
rory7YRV4hP9/Srxh3xfJf2x/3WV9I260D9XCQ+oS9+wSnhCvvnvVcIj4oV7
VgnP0PtDq5RPga9PrlL+h995YZXyMaw/vbFK+Rv71zxmXrBK9XGu765SfQNy
GrZaY25D8Bi42na18j3gY+pq1T/I99WqB3G9Z7XmA/qvXq354n6VqxX/Uq6r
xS+UY9pXS56QV/dqyZv5/Wrph/Wd1dH+sH1Xix/ExWrxgf2Tq4UX5nerhS/u
v1ktfLK+s1r1a/ZbrVY9gnWm1apXMr9frfoJ4/vVqnewvrta9RDmyR4zvveY
/3rM/M6/R/++WvUTxnero/0O3/p5WQeLqf5D/x4Tf3GfrWKSD/17TPaF/j2m
eJT+PaZ4AfNdGZO+uD4eUzyE2zfEpH/4jfaY8IJ8JhsT/tkvERP+8Ny7xaL4
/lVM9Uba95jWx6jvmOp9rOfE1N9E+x5TPZH1XI9x//M9Zv9BTPVF6tu/x3w+
pvom63l+HubzMdUbmc97PlRDTHxnPT8mfjGfi8nf4f6fxmRfuJ4TU7wIezo4
kP0CP4YF0frI+oHyf/ze2ED457+B8A/5jguEL9TftgmEx4vYbq31oHq2b6rf
E8+3faD1I9jLOYHq55jvgkD9gbQnHrN/wN+nffEY6inz7+P6at+f8WWg9QP2
JwbiF3kbiE9cbwjEH+aflg/Xnyw/xiOB/A3Ct50C+XPUg3YLFH/BP+8ZyN4R
z4H4Af92QKB6Gq4/OBAfcP3hgfCP648MhHf8zu8D4RV26qRA+yfQF/KXQOtJ
7C8MtN6E687yGM99bqB+BtpDf85pBlofA58v9/3Yjx9oPZf9EX4+5jWB+IO/
3xpE1xN6PX/aU8uH8bPlx/zZ8uV+P/MB9dzHA/l/uqFA/gI4fy5Q/Yz9U4Hs
Jez1a+YD1u3eNh+4/dr4g9v+KND6Ee7/WaD1Juj7q0D9Sew/DrT+yvpsoPVh
rteXqZ8B816nTOu3kPeGZfo90GKTMq03s55fpufB825VJv7g+vFl4jMec1KZ
5gc7Nq0s6g9nlYkfrP+XKf5kPahM/pn1gDLpA2Z0ZVl0PSpWJn3i/hVlsoeQ
d22Z7CfigoYy2Vv22ZZF14fayrReit/tKhP+2a9WpvVbXJ8vU78C+03K1P/K
+NNj4GA3j6HvPcui/bK/KtN+PPjFA/37eP6DB9z/8DLxDfM/skx8glx/7/nh
3+M8f/KyTPEi1y/KxBfI7/Qy+Q/6vzL5D1x/TpniLajv/DLFz1z3KVO8APxc
ViZ/ATlfWaZ4CPK/1niC/P9VJvsO+3ZLmfjAsMP4hvzuLFO/Au5/b5n6Hcj3
MvX/oH70cJn6kXD/x8vUT4r5P+PPWU8rUz8T5P9SWXR//mtl6sfAbd8qEx/J
9wHP/5H5BPx8VhZdL/u6TP0j0N/3ZYpHMc+fymSPcP+h5fIn5Hu58kvY9w3L
xQ/Y903KFf/jvpuXy76CN1uXyx6jXjK+PNrvPalc/XiQ1/Ry4Rn2fVa59ldy
vb9c+9HgHxaVh+sT39G/LCtXvx7mu7Jc/XTMgn09+yDL1V+E62vLQzx/Q3vR
6OeBf4qXiz/sv/Z82D9Yrv1wlFO5/CX9ebnsCdeTy7XfgXwvV70Dz7FbuewX
9Lhnuewb+V6ufJX9R+XKj6GGg8vFD8z/8HL1C4BvR5ZH/cPvy8UH3P/YcvXz
QA0nlUf7V/9crn458r1c+w/A6zPL1R8Oe39uufpN8c8FHoMWF/v7mMbl5ern
o38v13kFiJ+vLRefUJ+4sVz+Cfq7tVz+iPuVyuUvkY/dVS5/g+e4r1z2Bfbq
AcsXPHy4XPYJ93miXPEW6yfWH9VQHu0Xeqlc+S/XU8oV3+P6t8tlf4Hf98vV
v4Pn/8h4ZL+d+cH9ksY/9P9dufqrIb9BFepXBU7WrVA/KuzsmAr1ryJP2tDf
Z79yhfpfyfcK8YvPWaH+PG7HrVA/IOQ9uSIaD06vUP8F5D2zQvkL5DqvQvUA
7nevUD0NellaEa1nr6xQvAU5BRXyH/TvFcpP4cdqK2Qv8fyNFYr3uT5YofgI
f26vkH9gv2CF+MD8skL9pNxPW6H9y5jnmgr1d5PvFdqvjfvv7jHuv1eF9iOR
776efrhC/dy4/pCKgH0n3/L+R1SIP+w/qND+Dej/D/3y+Yx8Oa5CfIGcT6pQ
PoPr/1KhegT7VSsUj7FfrUL+hPsJKuTfIf/zK5SvQ67/qFC8ABxdUSF/wv7W
CuXHyC+vq1A+QL5XKN5h/atC9hzX91VovzbXP4xnPPb9FdrPz/pYRXQ/xCMV
2s+D65/0GPJ7xmPu763Q/jjw/JUK7bcAbd6oUL838rh3KuS/WF8zfxAXfFIh
/0g9VKj/Fvf/ukL2A9f/UCH/Ajs+uFL1Meh9eKX8OeSyfqXyS8BsbKXyDdBi
s0r5C3xvXKXwgefcplL4QT1iYqXiH9RdplbKHyAOmFEpvOJ35lQK77B7Cyq1
fwfyWlyp/UL43eWV2u+D9dPVlTrPCPIu8/eZn/v3mJ9Xik/MzyvFT9y/tVL9
3pBTR6X8H/PzSvlH4DJXqfgSei9WRveH7Fgpf4wwYNdK1Y/ZP1Kp+hb3n1eq
Xgn57V+pehXkd1Cl9juwv6RS8Qbu/9tK9Xfi/kdXqv+acqkU3rj+XCk+YF5/
qtR5NOxHrdR+IODsr5XaD8r1yUrtV8Xzn+cx7n+Rx4ibLvX13F9VOWC/ke8P
sd9QKb6wn6lS/gZm9zbPj/0tlYrPuD/P8mF9rFL5PvD/30rZH6bhlfInqAM8
VSl/wrS8UvEA7MYLlYqvuT5eqf5LupVKxVfslzZf8PwfViqeYb2tUvYbz/9l
ZfQ8pm8rw3z7J/YX/Fip/XPA4eAq7U8FDkdXhXgd3Ee+V2l/HfleJf7Qn1fp
98Gzrap0f/i97aoUrzF+rxLfkS9Oq1L+gnx3ZpXyf8QD86rkb/Ezi6rED4ht
aZX4wXpvleJfTCuokv+HXiqqVK9hf0+V8g/G71Wyl4ifWqqUD+P+7VXabwC/
lKwS3vAzmSrhkf0gVdrvifmXqrTfFPPfqUr7RbleWKX9pLh+L49h9n5Vpf2p
7B+oCv3jUO4HP6RK/OH6UpX21yEe+l2V/Auu/0OV4jPWo6ui8dhJVYon4ef+
XKX8jOvPVYq/2H9YpfgV9z+nSv4b97+gSvkirr+kSvxg/F6leieuv7JK+Sr7
1auU3/J8iSrF86zPVSmegh/prVL8w/pclc4HAM/vNb4Zv/fffzDPu3u4Svu1
ma9Xab82zW5VwDwj3H/9vL8P+b1cpf3YjN99PzzX21XyP9Dze+YPrv+4SvkN
4/cq1RMw7a8sD+j/+yrlK4zfq2VvgP+h1Ypvgcv1qqUfnr9VLX7Anm9aLX7g
ObesVjyOf7epVn6BOsqEavkLyHFKtfIF7letlv2GnmZXa3804pf51cI3eLKo
WucN4Prl/c8zjDhdVR3ak2H8Xpk/B6yrfD3j92rxjXaiWvvB4Y8S1YrnuF+4
Wv4OPE9Vqx6A+XdXyz5Afj3V4gfXB6vlP/Ccu1RrfYn7Aaqj6/N7V2s9i/sD
q1V/QTxxULX4gesPrVb+wf1j1bKn+J2jqhWfwJ8cUx2Np06oVryD+f+pWvul
4Y9PrRZ+4TfOqBb+oda/Vet8P8QTf6/WeR3sP/KY++P9ffz5n9U6v4D+vFr+
B9ffUC1/g+e/qVrxH/zTbdXiB/15tewB/n5PterN8JP/qVZ+wn6WauV30Pvj
1aoPMw6oVr4OuTxXrfUuXP9itfJz8PLVasUPzM+ro+cfvV8t/0HeVit/hhv/
3PxgvG5+cL28Wucx4bkG1ei8KK6n1ei8DvZL1oT2eDjrBGNrxBeeP1ej826g
33E14geea9sa+S/G6zXyH4zXa5QvcT2tRvvrgI/ZNcq/gM/5Ndr/wPMKarS+
SH7XKJ7leYM1Wh/E/ctrtP6B66tqlF9yv16N+IDrm2tU38H9EzWKP2AnOmvk
H9jPVaN4Bvahu0bxEfdP1wivUOOONcIz5r9rjc7bg1z2qAnPaRnG8z72qdH5
Nkg79/fniCt/XaPzPtgP6PvxfEw/D752tJ+X54l5PrD7J9aI/+wXr1E9Ao95
quXF/gLLE/I7u0b+Gf7j/Brl56y/WV/g16U18h/sP6lRvgkeXFuj9QPkHTfW
qB5F/12j+hPX12pkj+E/76pR/AR+3Vcj+856u/ENfjxSo/NtgPMnanSeFOj/
dI3OE4TdeN6fw6+97OtZb6+Rf+F+BvOFaZb5gvt/XKN6Af78eU3YL/k9/ek3
NcpHEBf9UKN6Hs1AreIr+IFRtfIfPA+hVuu7wNfYWq1/QQ+b1Uq/5Het+EDe
1iqf4Lxr5R9w/dRaxUvsp64V/ri/ulb+APpdWCv8ww4urdV5UJjWilqd/wR8
xmp1/hPv6+8jTKyp1flSXE+r1fk3jM9r5Z+gn7baaH7SVavzDGDmMrWKDzGN
Qq3yK8hlTa3yc9x/p1r5W9Trdq+V/WG9rVbxLOtttarn4jkOrFV9hfepVX0K
v3NEreJr1ttqVY8Cj/9QK//A+9Qqnodd/FOt8Ic89JRa2XPI7a+1sv+M62uF
b+bftTovFry6oFbnpbFOVit+IE74Z63OB8S/V9fK39Bf1ypfgZm7uVbxFeT+
71rlR8D9HbWqP5NXtYonmX/XKh+jvzYfiCPzgX63Vv0+rKvUql8Iz/GS+UE+
12p/JNfPzA/I7f1a2U/g5WPjifF4repLrKcbj6yn18o/0F/Xyd5DPyPrhH/y
uU7nt0K+G9WJL9DPJnXyH+D9lnX6fdbX6nR/XD+hTnzAbabUyT+wvlanei/7
5+rEB56XUaf8C9cvrlO9D4+xQ53qgbh+dZ3qU9xPURfdD11dJz7QX9cN2F9Z
p3iJ/dZ1ire5365O58FAvak6nS8DveTqlD/g+mKd4iPux64TfuGvdq3TeYBw
G3vUCf/Mt+t0/ibwuX9d9PzAg+vEJ/jVw+vEN/a/1Ok8Nq6X1Sk/53pZnfiA
fPPEOsVTXC+rEx8Ql55WJ//AfLtO9W+ul9UpPuX+7zrFr9DjJXWqt/M8gDrx
AW74qjrxAeu119UpnwBeb6oTH2CP/m08wS7fbrxhWncbjzxPxHjl+XfGM/Dy
qPEPe/ZkXbj+MJzx///qwnMah/fxvOoBfHmlTv6D/ed18keo871bp/wcfPmg
TvkOePZpnfIL6Pkr84P9i+YH18Pr5F9x/ZB6xU9cH6sXPyCfjeqj9fVN61Wf
5X72euXX4MM29VpfRn48oV71GvwzpV7xEfgwo175AvrhZtcrX2B+XS984rLF
9bLvrJfXC++Y16r6MH5Zh7gr9xh6ra6X/4A9qqtXvAReN9crXgJPWuvlH7h/
sl7+DPFFul7+DvFBvl75EtRarJe/ZP2sXv0mPL+uXvkE+9nqVd+AXH5Vr/ya
9bN6rUexflaveiz72eq1fsH6Wb36O4DDP9Qr/4RdPLZe+TR4e1K94iX289ar
XgSzcFq98Mnz7uvlD1A3Obde+OZ6WL3wj/j5Eo/Z31Yvf4H7X1Wv+InrYfWK
n6i3etW7yOd6+TOe31UvfgPmd9Urf4K+769X/Ql4f7Be6z/kc73ya0zryXrZ
H66H1cs+Qe0v1Mufow7wivnBOnu94gHyqF7xM+vj9YqvgbdP67W+BjF/WS/7
Sz6bHzzX2vwgnxvED+BrdIP8A8+LbhAfuN7dID4An5s3iA/cr9ggf8R+tgbV
bxG3TGpQ/s/zKxpUf2J/S4PyJYQ1cxu0fgN8LWpQvgXeLGtQPsZ+tgblazzv
pEH5NfvhG7R/F/qpbVC/A/TT1CA+8DzFBq13sX+6Qet3uD7ZIHvK9e4G2Vtc
X2iQPQY+1zSoXsTzWBtkzxl/N8gfMP72mP32DeIL+9kaxAeufzXI33DeDcq3
8e9RDVF/dUyD+ID5H98gPvD8hQblT8DtqQ2KH4HPvzYofmI+3aB6LM+LbVC9
CfWMCxu0fgG/cWmD/Dnz6Qb5e/Dr6gbVGyG3GxpUj4Q9vbkhun53W4PiJ57v
06B8lfXwBsVPPO+lQfk0+9eMZ+7/bFA8xN81/tm/Zr4w/vbn3B/o32M9vEH+
gtc1RNdDPvbzMv72fHh+QIPiRZ4X26B+EuBlUKPqc+xfa1T9jvF3o+TPenij
6q/wG5s2ar0WMBrXqPNYgKttGtWfx3pZo/wD/p3aqPP28O+MRq3HMf5u1HnL
uH5Bo+Il1ssaZc/Zf94ofjD+boyeV17WKD4w/m6Uf2H83ah8hPG378f4u1H+
gfWyRq1XsF7WGPrT78L9UI3iA9+X0Sg+8Dy8RsWXjL8bFX8CH3s2RvsL9rE+
yOdG8QH29JBG8YHrXY3qp6W/blS/B/11o/JN+utG4Yf96I3CF/11o/gAO3da
o+w38pizGnVeMmB2bqP8BfvVGsUP6O0fHsOeXNGofARxwlWN8j/cn9uofB52
5MZG+Qvm043yF/TXjVpvgT28q1F8YPzdqPyK8Xdj9PzDRxt13gbw8lSj+nEh
h2cbVe/geeWNqg/SXzdGz+97s1HxMabxXqPiZ8YNjarH0E41Kr/G737VqHwC
bvD7Rtlnng/VpHgK9mRok/DM9esm8QPz3tifc/2qSf6G54c06fxYyG9yk87L
5HM0yb9BfrOb5P9Y326Sf0QZZ0mT7AX52iT/inmvalJ/JuvbTdpPTb42qd8T
/qSuSfEQ4+sm5YOsbzcJ74yvm2T/cf90k+r37EdpUv7M9xs0CV+4fscm1Vdx
/a5N8gcIq37ZJPxDzPs0KR9mfdtj4O8gf5/nHTTJ3sPe/LZJ+TL3QzapfgRa
/7FJ+Q70e0KT1t+5f6pJ8RHz5SbVmyGmM5uUL0DP5zSpHx1yOr9JeIccLmkS
3nldk+p/0MuVTcI77VyT8M5+syblz9xf36T8mf1mTQPeV9Kk/IH95E1aL2bd
pEnxEp+jSfEL7M0TTcon6Cea5C8YX3sMP/WKr2e/WZPquew/adJ6HJ7rwybx
EXj5pEnxHd83Yn4AL982KV8CXn5o0vmv3N/fHH2/0OjmaL/+Bs2y/9DPxs3q
v+Hrm5rFB8Bg62blB4yvm1U/4f7B5mj/9/Rm8YH7RZqVj0Kv85q13oDnXtQc
recsbZY/gNxWNqseCv0EHnP/YbP4w/i6WfYd1zf697n/2Pfn/nM/H/xgqln+
i+fPeX7kc7PsAfT8i2bZC+Bgl2btz+D5VM3q38D39mlWfxPXo5uVP3N/Y7Ps
GezsYc3KF7ge3ax6Ot+f0az1J65HN4sP3O/cLD5wvapZfCCfm5U/QGxnNis+
QXx6TrPWy8jnZvkH5svNim9w/WXN0fWEK309+dwsf4O47F++P8/LbI7m+33N
Wj/h+6uaFQ+xX7xZ9oD5suWD6x+x/Kj3ZsWfiLv+Z/mDZi80q3+A/aPN8hfU
m/nB/lHrH/nuB83KF8DzT5oVLwBvXzRH+1+/aVY+Dbz82Kx4ib/bIv/B92O1
KH6HHVu/Rfk28oeNPSafWxRvsZ+sRfUsnu/Xovvh75NatL4GMzW9RfVT9pO1
qJ+J7+drUb7M/vAW1Z9h5pe2qD6Naa9sUf8Y7HXQonoF1F/ZovUFyKeuRfUk
4KOxRf6f+XKL+tvYX9KieAj6TbWovgL9dreovw/2uqdF8Qj53BLtj9ilRfEL
+dwifuD6vVuEb8Sp+3sMO/3rFuUfzJdbVL8in1uUr/B80hatD8Ie/LFF+THm
eUKL4jv495Nb5A+YL7dE+zPOaFH/Evd7tShf5nmGLepfoltuie5nvaxF5x1w
v1eL+mG536tF9o77vVrkL7j+3CI+4LK+FtUfEXfc2aL1afj3+4w/no/TongK
sH6kRfUm4OUJ84P1rxat38HgPm/88/xEfw4+vuHfw9/f8f0o5xbxE/710xbF
R9D3ly3iN+tfLfIP4M2PLbIPdDNxyQs4HhqXPPlat7jWe6jXePQ8ujFxxUfQ
9/px6Rfy2zAu/dMuxxVPc39oXPuF8HybxZVv4vot4sqnaVfj6odgPBAXXqHG
bePiB+Q/Pi58I2+eGB8Q//t64HlqXPkvaD7D90d+MTMu+w87NdvPD/81Ny78
8zzCeHR/7cK48mP2s8e13gYeLI1Hz1tdHlf+AHu6Ih59n+2quOqp4FMsHj3P
vSyueJjPHVe/Dq6vigsfwHNtXPiBXOrjwhf8bUNc8RT8YnNc8TpwH49H841E
XP3dwEt7XPE+/t7pz2m344p/wJN0XHhHfJaNKx6CvnNx8ZX7a+JaX4e+i3Hx
nfXHuPaLI07ZKa56KvS+S1z5AuKT3eKqR8Bv7B5X/sb9tnH5a1y/t/kBe7eP
9Qu87Gd+8Hy4uOJl9v/F5S/wHAfHtT8H/v7QuOJv2PHDzRfY/98Yr+z3j8t+
47l+b/5Av3/05/CXx8UV7yAuOiGuflXu/zH+YX9Ojsv+g0Z/iat/Ffo5Na79
EeDz6XHFQ4jzz4jLf8K+nhVX/zfkdE5c9VPEy+fZHvE8pLj8Ac9Djys+wnUX
mw+YxyXmA+PDuPJH+MMrzAfg7ErjCXK9Oq71B8jh2nj0fQ/Xx+UvoKd/xbX+
CzncZL7QH3kMmP/beAcf+sw3vl/L9+P+ZD8P9HaPnxf6us/zgZjv93zBxwfj
qg/x/P+4+lnB50fi0fNhH4ur/wW4fSKu/I37I+KKl4CrZ+LKH6DvZ+PR9dPn
41pPQlz1ovkAHLxsPiBefM34wm3eimv/Aeb3jvnA/ZJx1ZvAhw89hnw/Nr4h
30/9OZ/beIed+tL8Yz9IXPE/9PuN7T/Cuu+Nf+7PMP5Z30po/wPkOySh9TTw
YVhC9gTyGZHQflNcv25C8gduRiW0/gOxjElIf7h+/YTqqXjuDROKj6GHsQnZ
R9Bwk4Tqiew3S6j/k/45IX8B/Y5LKD7n63AT8h8Ie7dNaP0Xch/vMXGXiL5P
coo/h72dltD6OO1EQvkw/OPMhOpD+NrshPDPODOh/IDnhyW0vgIeLkwM6F9N
yB/ArixNaH0fv7s8ofwZ8l6ZUP8krl+V0P4V7ldJKH+AvsoT6j+D2CsS6l/m
+ntC+QRgVJsQnhCP1ycUTwFvjQntP2V/bEL5N9QYT8heA2+tCeEZZqU9oXwE
T9mZEL+4v9XXY9bphOIf4CKbUH7D9f2E+ED/nNB6Aex+KaH1FfjHXySi55fs
lNB+ddjxXRLyD7h+t4TWEwCbXya0Pwty2DOhfjHgcO+E7Bf7+cwP2I39EtHz
Cw5IaH8Ez3NMKH5mP0FC+8ugr8MSijcAwyMS6u+AGn+bUL4BfB5l/AKHx3jM
/qGE9rdhfscnov3lJyaU/+K2fzLeOW/zF3o7xfzmeof5j+v+mlD/HezemcY/
4syzE4o32Y+UUP8F5HteQv6Z5/Uk1L+K+1yUiJ4HeEkiet7TpYkB7zMxHtif
aLxgWlclFF8DB9ckVH8Bnq8zP3geZkLxFPR+o/kCPN9s/ALPt3oMGPf6+7i+
LyF/BDzemdD6IPcXG+9Q2z1+Xu43TsgfQN4PJFQvhb4eSshfQg0PJ3QeEJ7r
UeMfdufxhOJRPNaTCZ33CJ4/bX3Bjv3P9gz3fy6h/hrEAy8aD9DbS+YD4sdX
bT8xz9cT6m/i+6oT6ufh+q/xCbvwbkL9HYiT37N/wWN/6DHk8LH5hPt/6uuB
l88T0fWRL31/vm8vofyH+ycTqg9w/4X5AH3/lNB5HdD3oFbVj5gvt8p+wH4N
b1U/JOQ+olX+AfZrZKv8A247ujV6Pvx6rap/QN4btIof0PdGrfIXqHds3Kr4
AfW+TVuVX3L/Zqv2m7KftFX4Y/7cqv4e7gdpFX/gJ8e3Kv5ivuwxz2dsFb4x
vxmt0fNCZrZqvYy4aNX6CfLAua3iN55vfqvyAdR7FrYqfwIfFrfKfwIGS1uF
f9if5a2Kj4gTy5v5cqvyZ+QHsVbFS8BNWavsG+v5reID1+tao/FTbaviBTx2
XaviadYHW7VeTX/cKvuL+Cneqnic/rhVeAWe21tlv9kf68/x52Sr4hnmy/49
5sut4iPislyr8E5/7OfF9UXPBzhf0yr+wwzu2Bp938POrVpPYH9eq+qpwOkv
W6Pn+e7Rqvoq/PherepPgr/6VavyB/Bhv1bVQ4CXA1pl/+iPW1U/5Hl1rfIf
8JuHtsqesn/X/GC9s1X2Fzg5slXxFuznUeYPz2s2noHzYzwGXo7z9xHHHe/f
g55Oao2eD3Cynwd8/nOr8iHI4VTPB/o+3XyAvs5oVTwEfZ/VqvUEyPvsVsWf
0Ne5raonMX82P/C9C1oVL8GOXdyq/Bp6+ker6iF830ir8m3o+wrzBfK+0nyB
Hq9q1XoFYHhtq/wJ7OT1rcrPWb81PuFXb2qVv0H9/xbzi/mzx4SRvw9+396q
/iD2L7fK3iPvuM/Px/ehtKp+gOd4sFX9dlzHM/6JU+MfcfRjrfK34PMTtj98
jlbFSzRrrYpfmS+3qp8S8n2hVfET7NdLtofMl+0vIN/XjBfY79dbFU8jjnnL
9pbv7zBf8Bzv2T6Djx94jHjiI495PonxCzl+3qp8BvHEl/599n/Yf8HNfuvn
g5363s8PHP3Yqn4i9nu1yR7wfRJtshfwS8PaVD+iP26Tv2X+3BZ9n8GoNuXT
0NeYNvlv2LH12+QvcN1GbfL30NfYtuj+303bFB/gss3bhB/87BZt0XhiqzbV
X+Ant2mT/WV9u034RNw2oU3xCftL21TPx9+n+Puwn9M8hh5m+Pe5nuYx82c/
H+A+18/P9614fvjdRW2yB8yf26LvQ1xm+QGnO1i+7F9tEz/4fvc2xa88v6lN
/OD7HNvkL2D/Kttk72D/qtvEF+4Pb9N538BRfVv0vKLGNtlT2K+WNtVjuL7X
JjzyvLc2xecw6x1tis9w3y6PYfdT/j7klfXnwHeuTf4M1+fbxGfEu8W26Hlu
JT8/fnfntmj9eVfLA/zfvU3xEWi3h/EPPOzdJnvE+nWb/DVwsK/1Bfkc0Cb/
gH8PaoueV3ew9c/1xjb5D/DmcOMF0/hNm+wp8HhkW/R88qOMP+Dx923KT+mP
PaY/9pjn23gM2JzYJn9Ff+wx9+f4/lzP9PPSH5vv9MeeL+vZbeo3gp7OtrxQ
VznX8uT6p/EPPF9g+eP6i6wf4PkS8wG/cmmb/DvKOJfb3oF2VxoP9Mdtip+R
Vl9r+4n46XqPYf9uMH9gZm7yGM9xi/GIef/bn/O8PY/xtds9Zj+Fx7j/3W2q
HyNPubct2i9xv/HO/cFtyp8A64ds/3neR5v8Kd9vZvmwv6pN+TPw8pT5Abw8
3aZ4CTh51vrg+q71BT6/aH1yv7H1jed4tW3A+5TMH8jxTfsX4O3tAf7mXY/5
/l3jj+/fM98g70/alO9z/4Q/Zz+Ix3x/s8c8r8DXQ9/fDeD3D34e5s+eD88H
b9cYchzaLj7gd9Ztl3ywvjSqXfLjenO74lOef9Ae9Q8btqtfADgZ2y79gY+b
tIsvrGd7zPdPtMs+oq4zzmPYz63b5W8Q12/bHu0PmdAufiFvm+QxeDm5XXjk
+Uj+nPmzx4gHZnqMec1uj74/Zq7HuP98Pw9mvdBjXL+4XXgHn5Z6fuDT8vbo
eaIr2sUHiHGV5QX7G7N8ud7cLn5w3cT6Yf7sMcxqbbviLfjHunbxB/Ffo/WP
Za3mdq2/Ip6Ie8z8uT16/mN7e/T8rs528Q12Pekx9J02HlnP9ufwlzl/Dnn3
+HOe1+wxz3f0mOdJtEfPO9ylXfkx15v9vIj/ftke9bd7er74816WD/Nn84P5
s8ewBwd4jDrBQZY3z4P2GG7wUOuH58Vaf8infuMx7Nfv2mUP6a+NB+j7D+Yn
3OIfjR/26/tz6PsE4w31kpP8fcRDJ/tz6PsvHvN9Kh7zvHmPYb/PML5hl87y
GPM622PY33Pbo/15F3qMuOBi8wf50D88hhwuG8CnK/w87Gfy/HD91R5zvdny
4X78AfK90WPYz5s9Zj+j9YPrb7P+IN8+j8GnO6x/ns/hz/n+eOOJ+bPxw/1F
xifyoYfao+dN/tdj8OFR45vvJ/EYdvCJAXx42vxh/+QAPj1nvsG/veDPmT97
zP5Kfx/yfs18h9zf8PcRd7zlMfu1PEY95z2PMc8P/Pzc7+T5cf3ZY5YJLR/W
sy1f/Pu19cP1Z+sH8eP31jf7v4wH1rM7NOb6c0d0v+AwjzGPER3CM88L7hCe
YT9Hdcif4P5jPEb8uUGH/BHigY08Rr4xtkP+DPLe1GPwa3OP8Vxbeox8YSuP
Iedt/PvsL/UY8prQEY3/JndE39c0tSP6fo1p/hz2a3vLA/5qluUF+zWnI/o+
7Hke4zkXdEg/PP+wQ/qDvpZ0iF/c79kR9Xc7dAhPiP9Wdghv4OfqDuEX+go6
lH/DXlZ2KB5jHN2hfAX2p65D8R3w3NCh+I+48xh4jvv7PD+1I/p+tDZ/zv4v
34/npft54F9SHiOfyXrMumuH+Ar7VfD8Wc/uiOZTayxP+uMO8Ql82Nl8QHy9
q/XJ/q+O6Ps79rT+mT8PwPM+HdH3P+/nMfu/OpR/8TyZDuUzPH+iQ/kO+788
Zv+Xx+z/8pjnuXuM+x/VoXwKMPx9RzSfOsZjnhfp54EYju9QfoW63Ykdimeh
rz95fuDjnzui67+nWl48X9Ly5Pqz+cD8uSOa/55tfTJ/Nv7x3H83HnCfC4wX
ZKUXdSg/gb+6xHiE/bq0Q/k84r/LO7QfBfHTlR2qTyD+u7pD9QE8xTUec39f
h84r53mWHaovQN83esz82d9n/twRPW+z188Dud7uMXB7p/mG9bK7PV/Yr3s7
outd93dE888HbV+4f9Dyx98fsX6wXv+Y+YF61hPWL3jwVEf0fYHPGB+I3541
/nk+V4fqDdx/2KF6AOT6ckf0/dWvdqgehu+93qF6Gc/76YjW797uUP0Y60Xv
eQx9feAx8PKhx7Cjn/j3+H5TPw/qeF/4eblfeQC/vjF/+D5U84dtTQP8zU/2
r9DX4E7JG9cP7ZQ+YA9HdEp/1Gun9At/N7Iz+v67MZ3CB/dvdAr/fL9Hp+pd
zKc7hU/oeZNO1dOYT3eqXozrt/CY/WGdWg/i+0A8Zn+Yx6DteI9hDyf592DP
pnRqPZLnmXWqPsjzSP287A/zfNi/3an6Buzc3E7ZA56nYnnB/y3slL0BPxZ3
Kv5CfWlpp/wH+8OsL+BmRaf0i3hudaf4wPMaOmVvsSxT1il7DX1VdgrvsIfV
ncIn31fSqfo06on1naovQ1+NnVpPxL/NnVp/Qf0j7jH8V2tntD+33dfDHnZ5
zPPQfT9cl+mM9j93d4o/4FfO8wE/ejrFH76Pz/Jg/3ZntP6xU2c039qlU/EV
9LCb9QN7+EvzA/zaszNqD/c2H8CvX3XKvkJf+3fKXkNfBxp/uP6gTq0XIt44
pFPrLewP69T6DN/H0Kn1dvaHdWo9lOvNHkO+x3iM+R3r36N/7tT6DevbnVpP
4nnufl76Z/OD9W3PF27sdPMB9Zm/dkbfB39WZ7Q+c3ZndD//ucY//XOn/AHw
dEGn7D/s/UWdspewH5d0yr6iz+dS4x124PJOrRfSPxuv9M+dOu8Hf7+2U+uR
wOP1nVp/p3/2mP65U+ub9M8eY1r/9hiw6/Xvo75yu+/Pfm0/L753d6fWe2A/
7u2U/8L37jf/oe8HOuU/oK//Wp7Q1yOWN9ZzH+1UPsHzMY1/xGNPdSo+gh95
xvYQeHy2U/EH4oPnbe/pn22f+X5g45H+2XgFH17v1Ho+/XOn1uPx3O90ar2e
9W2Poa8POrW+D3195M+hr4/9+2xz6VQ/AXD+Raf2e+C+X5l/sB/fmC+Q93f2
J7AfP1gesEs/dUb7gQd3Rfuvh3VF3yc7vEv+mn65K5pPjupSPAC7ObpL+mef
Qpfwwd/pkn3l+b9d0f7JTbqi/cSbdem8GvrnLvWjsO+rS/0qtKtd6rfE727b
pf4W9m97zHq3r8e8JnvMerfvz/NRutQvAHs/s0v+B9Oc3SV/An7N9fwh7/ld
8hfMn7tkT+ifu+QfwI9lXfLPPN+wS/aL7wez/jDf1V3iA/1zl+wl8FneJXsP
e1jZJXsPddZ0RfcX1XUJ74g/G7rUT4z4s6lL/Vr4XkuX+hUhr4THYHlbl/q/
+P5Qfw69dHWp34z5tO8HeWW7xB+eh9wlvvD81C71F/B9Jp4v+8i6xA/uO+mK
+o+du2RfqJeuaD6+u/WB39nDfIB/3Mt84Hkx1jf+3bdL8QTPb+ySfYW8DzL+
2R9m/CGeOMT4ZD7dpf0nzKe7ou+/PNJj9m93qd+R+6v8OXh1jMeIH4/t0vuj
IIfjzR/g+0TzEXo6uUv+BXbnL13yJ/TX5j/9dZfiKbjBv3Ypn2I+3SV/wf6w
LsVLfD+T9UN/bf1B3hd0RfPhi61/rkd3ReP1y7pkX2G/rzD+Ef/9s0v9iMDV
1cYv+8O61F8PXlzfpX5I5MP/6lK/Pfhxk8fAxS1dOh8KOPh3l/onoZZe/z73
V5l/9Ndd8jf4mfvMB9QL/tOlfAR4erBL/gFy+W+X4knM79Eu1afYr238Qz5P
dkXX557ukr8HHv/XpXgIeHrO9pHvnzE++D7JLsUz4P8rxjviv9eMR+SPb3ap
n5f92v33/yzcX9Wl8x1g797vUn89+7W71P+O6z/292HnP/XvQe+fmx9ss+9S
PyXXm7vUL4z471v7C24zsr+DnfjJ9gDXD0oqnuR6c1L5A/z58KTwD9ysk1R8
BB6OTEp/kPfopPJHnieWVDyNfzZMKv5BfWNsUvYUz7VxUngCTzZLql8X990i
KXzjOcclo++n2Tqpfnfus0qqHx6XjU+qX55xjMfAxeSkzkvBvKb59xF/zUiK
DzwPPCn/gdvNTspfcL9zUvEdpj0/qfgJcc/CpPwl/l2cVLwEOSxNig/AzfJk
tB6+Mil/wPd7JZUPMqpNyt5B3uVJ2X/guDIp+49+sqqk7Cv7t5Oy99xPlVT/
O/dTJYVn9m8ntd+D+509Bi5bk9pfwnw5qf0iXH/259xPldT+KK4/J8UXrj8n
5V+4/pxU/z7qzT3J6Pn+Jc+X68/J6P6RnZKyH1x/Tsq+4P67JhUv4Tl/mVQ+
B33vmVQ9if3bSfkDrj8n5Q/gH/dLKh8Fzw9Iqt8Wcj0oKfsPfh2cVDwDP3So
8Qk5Hm48c/25n3/fcr/i75LaH8X3oySj+2H/4M95noU/5/uMk9pPBbtygvkC
NZxkfkKMJyflr7j+bH5AT6cm5f8gr9PND/D4jGR0/8jfkloPgb7OScof4/pz
ba8QL5+fVP0I/LowqXyB/dtJ5ZfwK/9Iyj/g+suS0fO/rzC+cJsrzQfg8Opk
9PyG64xn8Ov6pPbD0o4mtf8Q9uzmpPYLQl+3+nOo5bak9lsRt+YX/r3DfASM
7k7Kf8Ae3pNUvgJ/e39S/g8weyAZPe/0oaT8Beb7sP0F8+ek/DHirMfNB8z3
yaTqIfTX5gPr2/YPsEfP2z/g+heSylchr5dtb9kfllS8wvzZ+Md83zReWd9O
aj8u5PVuUuch4vr3Peb74T2GPfgkqf2HPC/bv8f82ffj+6nMT54fZP6yvp1U
vgF8/ZBUPsT82Xxg/pwSH2A/hqfEB+B03ZTWi/i+jJTsF+Q4JqX8kPudU9I3
5L5hSnjAfcemFH+zXzsVPc9y85Twzn7tlOw5YLZVSngGD7ZJaX8seLRtSvtr
eb63x8gnJnnM8/v9e7jPNN+P53+nou9Dm5VSPAW7PzslfwY9zEuJ3zzvP6X8
mvXslOwD7PKSlPIF4HFZSvjn+YYp4R/+cWVK/gBmYHUqun4QpIR/6Ks8JXvI
fu2U7CXr2SnZUzxHbUr7+VCPrk8Jf5BDY0r4ZL6cEp4RzyRS2o/O7Rkp7R+H
ve1I6fwQ+Lcuf5/nG6e0/5bvF0nJX4AP3SnFX7h/PhXNR3pSiu8Qf5ZSyn8w
j1+klE8ABzulVF9jPTuleAn2cveU1h9Qz9kjFX3f3l4p5cvQ1z4p9eMCBvum
FA/QT6cUT+PvB5oPkOvB5gPfR2b88f1FKdl72MHfpHSePuZxZEr7x3H9USnt
L+f6c0rnK/A8Zn+f+XJK5+syXx7AjxNT8j/Ml1PyD8yX/fy4/pSU/ANwe7rn
j36pMywf7qdKqd7AfDk14H3GKdVXuZ8qFe0fvMB8YL5sPjBfNh/wWJellB9g
XlekZE9hT/6ZUjzC/rCU4h/2hxmvPI/EeOd5JCmdx8D3rXlMf+wx5PVv8wN6
7kvpvBHI6w7fD7C50/yEWO4xfyHX+8xvxD//Scn/MY9OyT/yPOqU1lsQ7z6a
Uj7G/VUpxUd8n0RK66WA6dP2D6SB/QP4+Jz9A8T0gv0D9PBSSvEQ7O8rtrew
v6+nFJ8gP3kzpXgG8n4rFT0v892Uzj8EDd5PRc8X+dBj4Otjfx/281PzB/j6
3P6G77Owv4CZ+Nr+C7z8LqV4ie+jSqkegLDrx5TiQ9ivwWnVl5g/pxUfAV/D
08rPcN910tF+tJFp1Y94Hkla/p35c1r+n+eRpJUvQ15j04qH8PdN0qrnUG/p
aP67RTp6/tm4tPCK59w6LTzTP6d1vgjPC0vr/BHgc6I/53kkafGD9ez0gPNI
fH+uN6fFB74vLy3/gMeemxYfeB5JWv4B8l6YVj2Z7/NIiw88nzQtPuD65Wmt
NyCvWpkWH+C2Vqfl32H/grTW04Dj8rT253H/VFr4h12rSytfhdwb0sI73x+Q
lr3GtFvSwiumneh/nu9o39vSOk+Qftuf0+6lxQfMO+3fw/WZtPCP+eXSyh/Y
D5YW/nleeVr1LubHaeXPmNZOaa0fQq+7pJUvc39zWusLuH73tOJR5seWP8zY
3mn5b75vKC3/jufeLy17B/4ckFY8BP4clFY9Bvw5JC37D/4cmlY8AlodkVb8
Aj391ngFj480vmGfj07rfCmen57W+VWY5x/9ffjD49I6f4rngxn/4PVJafkD
XH+y+Qk1/cX8hX0/La38H38+Pa38API6M616MvPjtOpvzI/T0f1n56Xlj6HH
89PR/eQXpqP9bxen5e9x33+kFQ/A7FyWVrwAXF6RVj4MXF2Zlv3n+WBpxUO0
e2nZf4QpN6Rlz+mPjX/q2WPA/FaPcf1t5gfipD7/HvR9Rzp6ns9d5gPs2D3p
6PmE96VVX2I9O636GPPjtPIFnj9iewF790g6+v7Ix9PR/vYn0/LPzI9tr1jP
Tqs+CFw9n46eV/yi+UB/bD5gHq+aD6hHv24+8P1Qtv/A99vmA+bx7gB8v5/W
+YLg0Yce0x97zP1T9g/45wvzj/7YfGA92/6A+6fMB+6fSmv9Afz4Ka34iMcq
ZqLr00Mz4gPXlzPiA/S2TkZ8AD5HZsQH4HNMRvkB+Lx+RusJrGdnxAf644zq
81xfzogP7P/KKD/gfqqM8gHYz60yiu9xn20y0fdRbpvR+Wvc3+wxaDgpIz7A
fk7JiA/Ml/37iDtn+P7486yM4iNcNzujeit4O8/zY392Rvkz15cz8g/sz87I
P8COLMuoHgc+7ZBRPRt6XWX94PrVGdWL8PeyjNZX+T77jOIh8Kkqo3gIMKrJ
qB7J/VMZ2Vv2a2eEP9SbmjLCJ/u1M+ID34+dEb55XmdG/gG46fTn0EMyI/4A
J2n/HsSezYh/7PfKiJ+AfSGj9Qye15lRvsN+r4zyIcx7x4zsA+KUXTIDzuvM
aL0eetg9o3wZPNkzE91fs3dG/hx//VUm+j6r/TKyf7CrB2QUL7DfK6N4AvWu
gzPKP4Gjw4w34OsI4xF29zfGK+T6e+ObvzsA/8eaL/Cnx2Vk/2kHMoq/IKY/
ZRSf4b5/zshfYX6nZJQf8zkz8ndcP85oPYHngWVULwJ//paRP4WczsmoXoR/
z8soH8B9LsionofnvCijfIDngdm+YdqXZrRewPPAMoqXuX6cUTwNXFxlfCFO
vCajehDkdV1G8Qqme0Mmev75TRnZc/DqFuMddvhW4x2w6/X14O3tGeUXPA/M
+Mdld/v5IO97M8qP+f6WjOpF4P8Dxj/4+5Dxz/OnM/KfuO7RjPr1QMMnMgP6
vTLyz+DZMxn5b/Z7ZaLnTz5v/ENfL2YUHwC3L2eUT9IfG/8Qy+vGP6b9Zkb1
G9arjX/Wq41vqOED23f40488xvUfewx8f+brYfe+MB8YBvn+wOc35gP7vezP
WK+2P4AefsqoHwP8HZyVv2S/V1b1IvrjrPwteZ2N9h+NysofsN8rK/sFea2f
VX8B/UhW663sx86qvk5/nNV6Ac/Tzsq+gmdbZLX+BZ6Ny0b5sXVW+OX+5qzw
DXs7ISt+0B97jHrVFH+f+bF/j/mx7wc5zMyKDzxvJKt4jueNZOUP2O+VFR9g
bxdmVT9l/Tqr9Uf8zrKs8i/ul8rKHyDeW5mVP2A/dja6HyfIql4EOZZn5f+h
96qs+AB7UJNVvozfrcsqvsBdGrLiA27blBUeMa+WrPCK2ySysu+Qa3tW+EZ8
3OnPcX1XNpoPpLPiF/KsbFb5Aa7PZZUfQF6FrPJl7p/KKj/g/qms/APwtWNW
/gFi3TmrehHXk7OqF/E8sKzqRcyXs9pfwnw5q/478PlXWfkHqGG/rPwD8+Ws
8kXmy1nFz8yXs9H3YR2a1foZ+HhEVvER6gO/zcpeo555pPGLOPnorOIb/Owf
jHe+v8hjzPM4Xw+/eaJ/H/7mT8Y/5nWy+Qo9npKNvg/1tOyAfDkr/wh/cabl
A3z9Lat+JL4PKat6HOz0eVnVK/geDuuHdjWrehHz5azyP9idS7PyD/jdy7OK
j3heZ1bxEeZ9VVb1U/D56qzsL99HnI2uB99gvMLv3ZiN+oubs9H3K93qMWDU
6+/jOW737wFnd2aj6wn3mq/sv85qPY37o7KqD3N/VFb1Y56XnVU/CvD0mO0J
8PR4VvUi8OeprPwzz8vOyn/z/K+s6n14zuez0f7Sl7LKD/EYrxj/7L/OKr+E
XN4w/hk22x/QH9s+8/yvrPIF4OkD4xn25iOP+X4Zfx/y+ty/x/O/zDfQ+uus
8mGe/5VVPMf3O2YV7yGf/zGregDPz+6W/ef+5W6tr0BMw7q1/sLzv7qj/Svr
dis/4/7l7uh5UmO6Zb8grw26hX/gaaNu1Utx/dhu+QPIfdNu4R/9ipt3C/+w
I1t2C//A1Vbdqh/hz9t0K18Az7brln8A/yZ2C9+A3WSPwb+p3aqP8v053cI7
4r3tu+WPmB93K36DH5vTrfgO8prn+YE/Cz1/rsN1q56G+HxJt+Ih2Pfl3Vo/
4/ssurV+Cdis6hYfcN9Yd3Q/Vlm3+AA/U9EtPrC/q1t8YH7cLfzwfRbd8gcw
443dijeA0+ZurafhOeLd6ofAc7d2y34DH+0es7/LY/Z3dQv/kFemW+sDeOys
7wf7nu+W/Ye8erpl/4GDUrfsP/T6i27VB9jf1R3d77NLt/IDxA27WZ7gxR7d
0f2Ce3UrHkJcsHe36hmoR+5rfcLu7W99Iy86sFvxAJ7j191aX+J1xhP84eHm
Ax7ziG7VjzDfI80H4OQo4xdhy9Hd0Xj+GI+5P6pb/gR8Or5b8Q78wInmH/dH
dUf7m/7SrfwY8D61W+vjiEtO71Z9jPlxt/wB9PO3btWHoN9zLE/c77xu5QPc
r9ytfkjuV+5WPsD14m7VO/j+Cts/vr+iW/YR87vS+Oc8upVvwmxf3y37Sxx0
R/ODm41X1qM9hv56PYYduL07mn/f0a16FOzD3d2y71Dzvd2q54Lf93ervoX4
/oFuxTfA1UPmO8/zsjxgDx+zvGAPn7A8+b5T2xvuR7Y94vtPuxXvgN/P297z
/RTWL8/b7FY+CBy9anywX8t452PaviLve6db9Xj62271M9BuG6/s17K9pr/1
94G/zzymvzWekUd9bb7Bjn/j5wPvvvfzAwY/Gt88LySn+bP+nFO8A32uk1P8
iHmOzKn+A32Ozsn/Qp/r5aQvvm89p/yN+5ly0jfs3iY5xfvAxWY55b+w41vk
oucpj8sp/qEdzcm+gl/b5oRP7mfKiQ+IvybmhGfuN/bnfB+Ffw/XT8/Jn3D9
Nyd/w/w2Jz7iZ+bmlM/y/bI52XO+vy6n/lmodYnlw/3GOdlz9mflhHf2Z+VU
/2d+m1N/L993l1P9h/1Z1ifqDpU52Xf8bnVO/p77mXKK95EWNuRUL8GfG3OK
fzDvllz0/emJnPgAe9+WEx+4nykn+wzcd+XkH7ifyd/nfqac8M39TL4f5ZRT
fs714Jz8E+S+Jie8M7/NKd/n+Zo51cdgJnbNKT7EfXfPyZ7wvK6c7A34vndO
+RZ+91c55WNcD84p32V+m1P9h/ltTvYez3tITvEO5HWo+QC+H5FTPoC46bc5
2Vvke0fmZI+5Hmz8Mr/1GHL5Y075A3B0XC66n+BE4535re/H/Nb4Z35r/OPv
p5nf7Jc2/2Fvzswpvodc/5bT+gl/x/Jk/Tmn+Ab4uMD6AE4vyine5/tDrU/8
e6n1DXt+eU77C8Crf+ai9Y+rclovAm6vyUXfB3md8Qd83WB8Qg035VR/BB9u
yUXfJ3qr8Q0a9HrM80D8fe5fMv9gt+42P/n+4ZzieZ4HYvzT/xr/3G+cU/2f
+W5O64c8TzOnfBf25wnbG3zvqZzyLcjpmZzqcfjfZ23PmO/mVL9gvms+MN/N
qR4O+/NaTvECvvf6AHy9lVN8wbqg/QWufy+neiPFklP8Ddh8ZHzT/3rM8679
feLCv8/zunx/2J9vc4rXeF6X7T/k9aP5DjENymv+mNaQvOSD64flVe+E/Vkn
H+2PGJmXP8Z8R+dVj4B/Wi8v+4X5bpAXH/j+ibz8A/i4cV7+AfHkpnn1j4Gm
W+RVL+H7J/LCG/z51nnFG+Dhtnnxg+93zkff7zIxH41XJudVn+R+przwzvc3
5lW/4X6mfPR9Q7Pz8l8Q49y88I88aH5e+Od5mnnhn+dp5hXfcz9TXvEjnmt5
XvaF51vnZX/oj/Oqf0JeQV7xEfRQbn2yPzov/8B+rHy0H6AhL/uJfLopL/8A
O9+SFx+Au0ReeGQ/Vl72Gf6ow2OIvcvfh59J5+VfkI9n8spPMe9cPlqvKfh5
eJ51XusZgP0azwc83jEf7ZfdOa98lrjMK36k/82rfgw97ZlX/wnP58rL/rAf
K694FTDYNy/7hXkfkNf6Jvcr5bUegL8fnNf6D/1vPrpefLjxxP1KefkHnm9t
PgAPR+ej7/v6g/HK92l7zH6sfHR//gn+PfZj+X7sxzIf2Y+VVzwHsZ2Wl3+D
vE/PR9+vcabxTv9r+wCenp1Xfsv6cl72H/w5P694FGK8MC//DHldnI+ex/IP
4x/TuNz6hx27Iq/8Dzy6yvhB3HFNXvYT9uI68wNe64a8/AV+9sa8+i9ZXzZf
YHdvzUfPn+jNK97i+q/xDrXcabzzPC7fn/lvXv3f9L95xfswsw/a3gPHD3n+
PI8rHz2v47G81td5nnU+Wk94yvaf/jeveg/m+6ztFcTyQl790zzvIx+t571i
PvC8zHz0PPw38gPeN2F+YL7v5BU/EabmC57zA+OV52V6DP1+6jH48LmvB86+
zEf3N3xt/4T6xLf56PvYvzef8Zg/Gv/IlwYVhH/Mb3BB9h5yG1LQ/gvYh6GF
6HkGwwqy/5jf8ILsP+Q/oiB9wS2uU5A+oaeRBekbbunncb8/gJ8aXRAfgJ8x
BfUTYX4/j/v5gfhj/YLiJ/B7g4Lwyfc3ewyYbFRQfML3RXoMe7axvw98bVKI
vh9pU98P/ngzPw/mu/mA593C84G8tvR8uf+qoPo+/ObWBfUXcj+W5Qm8bGt5
AwbbFVR/Q7w6viB7heeYUFA8BLVPLChfxnwnFaLnc00uKD4CrqcUVD/i+7IK
4gfs3bSC+IE0YHpBeITcti+IL3z/dEH4Zb3en4OX/2+MOH9OIfo+rbm+H9Q0
z88DuzK/ILyz/60gfgO2Cz1f8G2R8Q+cLjb+8RhLCtHz7JYWZG/Ap2WF6H6B
5QX5A+Bjh4LiV/B/5QA+rBrAh1UD+BArqF4CnAYFxROwb2UF9RcjrqwoKN8E
/is9Bq6rPMbzVRu/iH9q/HvAQa0/B07rC9H3vTQM4GtjQfYdcWxTQfkt+Npc
kD/EdS2WB98nVlA+Bf+bKCj+4f70gvwv9NFWUPwPeXbYXiE+6yzIn4PGXcY/
8tak8QC+pWwfwbe08YP7ZMwH9iMU1C+A5+02HhEH5Qqyx+Bb3p+DL4VC9P1w
PR5DbkXfD/Ftyc8DMa0ZwNdfFOTfYI93LCi+gd53Lig+BE13sX3A7+5q+fH9
pMY7+La75c/99dYPfmePguJ/2KU9C4qHYE/3Kig/hv/Z2/jHz+5jvPD9puYD
399S0PoZeLef+QF/uL/5AXt8gPGKeRxUiMYjB/n7eMyDPcY8DjG+uX/Qz4O4
67CC8lfYp8P9/LCnR3h+EONvjHf2a1g+jKeNf+jhdwXV22CHjrL88e/R9sew
x78vRM+3/oP1CXv8R+sbdvJY4wHTOs78wPXH2T5yv4TxBTt5YkH1E8jhJOMR
8/6T8Qp7frLHWE/+s8c8f8D8A59O8Rh8OtX3g15OM765nuXnp90uKP7DNM6w
PUDcdablgec+y/KCHTy7oH5D5geF6Pke59r+8/3u9s/Q79+tTzzv+fYHwMcF
xgPs4oXmB+Z7kfEDfFzseAH24xLjDfbjHwX10/P9dh6DxZcZv3isywvR9xNd
UYi+D/FKj0GLqwrR9+Vd7efBNK6xfYe/v9bzgb28rqD6Js8vtL3AMsUNHgPW
/7I/hf240fLleUmWP3Bxs/kA3Nxi/SFuu9X8wHr7vwvKFxBn3WY8wL/0Gi+w
H7ebL/Avdxhv7MfxGHK7y/zh+qHHwMc9HgMf93oMf3ifx5Dr/f59XP8fPw/r
nX5eiPlBj+H/H/J8eb6Tx/AvDxv/4M0jlh/XJy1f6Pdx8wH25/EBfHjS9gv4
eMr+gmbP8S3XM80P8OJ/to/gw7OF6Hnvz5k/4NPzHvM8KcfTsBovGo/wLy/5
c8TrL/tzXP+KP8fzve4x9PGGnwf6eNPPi3jsLc8HX3vb+AZf37F94HmRheh+
o/c8xtfeN/4Rb35g+UOOH1o/LEsWoue/f+x4Cbz91HzAY3/meBf+/nPjg+9X
8hj+78tC9DzbrzyGvL4uRM+H/sZ4ZP24ED1v/TtfD3l9X4ied/WD7w95/ViI
nm/ykz/n+Vk9+px5XI/mC3v+87gf3+DrsB7JC/HrcI/xvCN6JF/YwXV65I/R
77Wux8DHyJ7o+uWoHvEBvzq6R/YN+cQYjxEfrdcjfCAfWb9HfIH/3KBHeOL5
IB4Dvxv1CH/s7/IY+NjYY/iBTXw97Ntm/hzxwuY90f1Zm/v7sOdb+vkw33H+
HPPeyp8jDt7a84Of28bzR7y/reUFvm/XI/zzvDCPUTec0CP7w/3PPdHzrSf1
iC/Ax2TrE/0GU61v2LdpPdH3+0zrEX8w3xnGD9+n4THiwZkeg0+zjD/Md7bH
kNccj3Gfub4e9m1ej+wzrp/v70NeC/x99pcPuH6Rx3y/pecD+7rEY/iDpR4D
H8s8Rny0Q0/UH6wYIK+fx5HzAVdZ/lw/8OfMd80XyCuw/hBvlFnfXF/wGHyo
MF54Pos/B5+q/DluU90j+4q71njM9232RM+/rfPnPM/FY/Chwd+HP2n057C3
zcY3z3vpifavxf192NuEP4f9afUY8UKbvw8+tPv+4FWH548wutPy5Ps9Peb7
uP19/D1lfcDepnui79PK+HOe92b9wt7mPIb9yHsMeeWtf56f3hN9/1NxAD5K
xhf8yxrjD//+wmPEgzsarzxv3WPwYWd/H/ZjF38Oe7ur7wf7sZvH4MPu5hPs
xx6+Hs+7p8eIn/caYD/29hjz3ce/z/4Kj+Ff9vUY+NjPz484cH+P8a0DeqL9
Ygdannx/mvUBe/lrf873qflz+OlDrH+uF1n/8C+H+XP4l8ONR74f1WPuH/QY
9/ndAPwfZbyzv8P+AvP7vT/n/n9/zn5K+xvub/DnsBfH+nro87ie6PmZx/dE
1/dP8OfIH0/0GP7kJD8/z/Px54g3Tvbn7M/0/BEvn2L+YX3h/43hT06zfHGD
0y1/+OW/eox/zrD+EIedaf3yfCDjj31hHgNPZ3vMPNxj+J1z7Y+QT53nMfDw
d/sn4P8Cfw4cX+gx6p//bwz8X+z4DfHZJR7D3vy/Mcz7pb4f5HWZx5DD5R4j
PrvC88H1//QY4rjSY8jrKvMJ119t+cJeXOMx5HWt9YH89TrrD/nY9dYv7OsN
xgPs478G4OtG4xn4vMlj+JNbHG+hD+RWx2uA8c/j/vwE8cptPcqXIK9ef87z
kjxG2nm7x4j/7+iJvg/1zp7o+7nu8v1Rz7m7J9ofcI+fH/HKvR4DB/cN4PP9
5g/k+h/Li/mv5Yv89UHLn/231g/ilYd7ou8ffMT2ledDDLDPjw2I7x43Xtkv
ZDzy/IieaL70VE/0fW9P9yj/4f4ZjxGv/K9H+RPijWc9hv15zmPw4fke1QN4
/kRPdD//i74/9PCyx/C/r/h5Yb9eNV8Qb7zmMfDxuuXBfNj8YD5s+WK+b1kf
zIeNf+jnHesTWn/X+Ec8+Z7xgfm+b3xhvh8af5jvh8Y3z3P2mOdFesz3F/Yo
v2cbSI/qAfAvn/eovgX9ftGj+hzijS/9fcz3K48x3689Rj77je/PtvWeaP3g
O88PeP7eY8TfP1oewPNP5gv8y6Ci+AJ5/Tzu5wf0M6QofSA+GloU/oHnYUXp
F/wdXpT+sT4yoii84HnXKUbxvG5R+OT5HUXVY3HfUUXVsxBfjS5G689jiqp/
8X3JRdV7Md8N/Dn8w4b+HPPdsBitt43172O+G/t58LybFKP1ik09H8x3swHz
3bwovsMObGH5cH9UMfq+5nFF2R/kV1tZH7yuKPzDvm9TjOYL2xVlP8GHn8eR
8+3HewxYTSwKz5jXpKLwC8BPLgq/+HeKx5jv1GL0fORpxej746d7DHnN8Bj2
bnuPIa+Z/j085qyi6sfgw2w/H743x88PfMz1GPOdVxQfYD/mWz743kLLD/hY
VIzmZ4sG8GFJUfYL9n2p9Qf+L7O+uR+sKPvJ/nXjBzhbYXwhn1xp/CHeWmV8
wr6vLmp9BfXJWFHrHeBlWXHAeeFFrY/ADvy/MfxZpa+HvavyGPOt9v1g72rM
H/C/1s+L+dZ5PqjX15sf4FPDAD402n4g32iyfDHfZvMB/qzF+uD5p9Yf95Nb
v4gP24qyl4h32ovR/okO4xn2vdP44+s/jE/oN1nUegieM1XUejbPhylq/RHX
ZYpaH8R1WX8OPHZ7zPNj/HvMf4taX8F8ezyGvSv6eXm+TDF6nuqaYtSf/cLy
wHx3LMo/MP81/vGFnYvReuUuxWg+uavxz/13xej7cXc3/nH9L4uKPxAP72F8
4y57Gl9cDzYeIaa9jW/Me5+i1geRP+xb1Ho41mP38xj4+H9jyOGAovrfYRcP
9O9hngd5DP7+2s+D/PBgj2HvDvHzwx8eaj7g+sPMf9i7w+0vYO+OMB9g735T
jL4/5rfWB577SOsL1/+uGI3/j7K+ef6O8Q8+/MH4R/3sGOMd+doxxjtgfGwx
2o94XFHr4TADxxe1fg77foLHwNeJHgNfJxXVD4X5/smfo954sn8f9/1zUev5
wNlfzBfYlVP8/FwP9vzgT08rKr6CPz3d/pDvf7P9AJ/OcHyE9b4zbX+Ar7+Z
D/BTZ9u/Q+7nFKPno5xr/MP+nGf8Q15/L6rfBPI6fwC+LjAega8LjWfg66Ki
+kNgly8uqr8Ecr2kqP4S2Nt/FKP7mS8dcP1lRfVL8X2x5gvszz895vvp/Lw8
P9B8gP25uhhdn7zG8uD7cOwf4F+us33BfK83HzDfG4rKD/C7/yoqvgVubzT+
mQ8Xo+t9NxsfmPctxg/me6vtM/zpbcYjz18wftE/01eMnu90h8eY351F9b8C
dnf5c8z7bv8e8HuP+QB7ca/vD7tyn/EPe/6fYvT9RQ/YH0AfD9gfoL74kOMj
4O+/9qeY38O2N/B/jzj+B+4ftb2H3h+zv8e3Hre+mf8a38Dfk8Xo+w+fMp6g
56eNP8RHzxifiJ//V1S/H/t7PUZ98bli9Hz854vqH4Q+XyyqfxB280VfD/v4
svkDvr7i+wO/r/p5uT/H+Od6sPGP69+wPPC9N+0f8fe3itF6wdvGO/L9d2x/
0K/8rvWFeb1ne4bfed/2DvP90PjAvD8qRs+n/Nj2nfmv8Yf616fGK3D8WTHa
T/h5Uf2v+OeLYvT8ii+L6pfFuRpf+XOsb37t38N8v/H9EF99a37Ann83IL76
3nyFffrRfOZ5k5YH5PWT+YD66uCS7D/+PKQk+wJ5DS1JH5D7sJL8NfQ7vCR9
Iv4dUZK+ES+sUxIeENeuW1I8w/y3JHsOWowqyT7j+tGl6P6FMSXhF9Ner6T+
WdST1/cYPNugpP0QzH895vucSuIH+L+xf5/nU/v+mO+mJfGB+5VL4gPyo81L
4jcM1BalaHy0ZUn2H/Z8XEn2H/WRrUqyNzzfuiR7BPuxTUn4R76wbUn2Hs+x
XUn6xu9MKAn/mNbP43688P3LJdlXnjdSEt7Ahykl2W/mvyXhnflvSfjmeSQl
7f9h/usx+L+9x8DpTF+P+c4qiR98/4XvD/8wp6R+XOhhbinKh3kl8Rv6XVCK
8n9hSf4Q015Ukj/gPvuS4h+eP1aS/YGYl5ai9aBlJcU7iOeWW7943h1Ksv/Q
74qS4hngfGVJ9h7+epXxBjmtLsmeY74x4xXzDQbgubyk/ReYb0VJ+yUw30qP
Md8qfx/zrTZ/wL8a3w/PW1uSfwBu68wHwL6+FO0PbvD8cX1jSfkBvtZk+wE9
NZcU/+C+LSXlw+Bv3PqBXhLWH+pfbdYvwvh26x92p70UjR86S7L34G+X8YX1
xaTxDlymjFfoN13S/gi+T6Sk/RPMf0vajwT+dZe0fwjPlfPnzH/ND/y5x3zA
vHtK8hfAY8nPD96vMb8Bm1+UlD/z3INSdD/pTpYf9L5zSfEk8LyL5Q+c71qK
rn/tZvxDTrvb/gPHvywpPkC8skcpmr/uZXuP+e5t+4v57m08cn+f8Qu/v29J
53Uw/y1p/xDilf1L0fdFHeDvc/3XvwdaH2Q+4O+/9v1x/cF+Psj9EOMf9vlQ
+wPY58NK0frV4cY/8HyE8Q88/8b+FXbhSNt/6P13tv98/4rtP/h/tPXL942X
FA8Apn8oKZ/EfI8x3nkegPGF+R47wD4fZ3xDTscbv+DDCR5DLica79y/WIru
Fz3ZY8j1z74e+PiL7w97dYqfD/HOqSXFS7j+NPsD8Pf0kvJ5XP/XkvIf2Okz
SoqHEJ+dafwDH2c5HoJc/1ZS/gt7d7b9N3B/ju0/cHOu9Q/9nuf4B/H/340f
8P984wvPfYHtO66/0HhF/H6R8Y1pXlLS/lDc5/+NwYdLS9ofDXxc5s8x38vN
D64H+374958D+HCl/RWe9yr7M+Djas8XVuAa+wPM+9qS6kPwq9eXovtVbrC8
Md8brA/w/8YB/vsmxz88p6IUrdffYvzz/CPHO5jvvx1vYL632f5Cv73GJ+bb
V9L+Uujn9pL2i2K+d5S0vxT6vdOfY753e4z53jOAD/eab/j3vgF8uN/Pi+f6
j+cDPT7g+UK/D1oeuO9D9pfg738tT8z34ZLqbbDTjzj+4fnE1hff32P8A5eP
G/8Q25O2/zy/yfYf9v1p4x/6fcb4pxsxPoHnZ41fXmd8g//Pl7R/GvJ6oaT9
2HjOFz0GzF7y9ZDXy74f5vuK8Q/+vurnRZ70mucDf/i65ws+vGF5IF950/4A
+HjL9gTyesf+FvJ61/EoYPBeSfVP5HHv255hvh+UtJ7E9WDHB5jGR6VoffJj
4wlq/sTxCOT0aSm6P/Qz4x84+Nx4xjy+KGk/NY+5Mh+Qz37l6/k+BV+P5/3W
fEP88K3vD3l9Z35ivj/YH+C+Pzq/gX5/KkXP1xi0Rv4S8BqyJor/oWuU/wL3
w9dIP3i+EWuEd+BgnTWKd4DfdddI/5jGyDXCB993uOb/ujrHMEmypg3v7qw1
a1uzmLVt23Zlubqr17Zt27b9rm3btr1fX3d8c+46+WfmejozK09EPBEn4ijz
8yjGqSS+x3mVlRTfY/1zJfE91j9XEl+Jq0Mr6fwA7DqBGD+YsJL8gVZO5PPo
c2LfR34ySSXlQ8g7me0l355ceYjnk1dSPY++pqykeI+ZplJf9BNTq0+6kWkq
Kd6jh2krKf6Qvk6nfcjXp68kvsf650qKb/B3xkriO/3BTJUUH2O/byXlE/B3
lkrie3y/sZLiMXF0tkriJ7cNqyQ+o6/ZK+m8DPQ1pxj+DuIR/kB/Pdzn4/yS
SvIH8rJ5Kon//My8lRT/4/sWleSv6GH+SvJn9LxAJdU7jKcuWEn5D+NPC1XS
+Bn6WriS8h/i2yKVfP5l0UrKT+HnYpU0/snfF6+k8f3Y71tJ4yGMTy5ZSfkO
7VyqkvIH7LSM/Ie2y1ZS/GV8cjn5j78vL3/pD1aQ77H+WQw/VhIj58qVFP9p
5ir+ftQxvj/qX9sX3+eopPqc8ck1Kin/ifXPyk++sJb6ifXP6o/3rFtJ8ynw
cr1Kqr/wi/W1D+OTG2g//GRD7Rvrn7V/rH+u5PNNm8gf/GFT+RXrn+Uf8m4u
/2P9s3zm+S3lO/F8K3HUv2LiyLbynzC9nfxHrdvrf/jvDvonZtyxkupz8rmK
/g2fC+WP82cq+f7BmvEDNdYr+fq6RiVf792slOZ/K6n+5bF2JdW/xM2O/QH9
dF8l1YfYtyv/4cEgHpFfMBy1UyXl31H/yk/6sV2M5/BjV/lMPrmbGH/YXf7z
nj18Hnn39Pcxy172B8i9t+1B7/tU0vgQYXbfShofivpXefl/f/uDqH8rKf+P
+tf+AH4cbH+A/x9if4CaD7U/iPq3Uqp/K6n+gx9HVFI+gJ2PrOTji0fJf/5+
dCXlG/jDMfIz1kPLX+LlcfpD1L/yHXlPqKTzlqL+9fmof/WvqH99X9S/lfy8
zNPkf5z3U0n1PPnrGZWU/6PHMytpPAA7nlVJ+T/+cHYlzQcg7zmVfD/RuZWU
/+MP51XS+EV8L6aS8lnuu7CS8l3i3UXmB7z3YvkS35ORT8h7qfkHz18mP1Hr
5cZ/2nmF/EbeKyvpPDL88Cox8l6tf8CPa/SH2P/r++J8QNsT8722F/veoDzw
+UblpV+4Wf7Dq1sqpfq3kuop7Hub/IePt1fyeuyOSr6e+M5Kvl7tLvmPvHdX
0vgI77lHvlDf3FtJ+TTy3if/oe399gex/1f+xv5f+U+8e1D+x/5fMfMLj/g8
zz0q/2P/r/Ef+z5eyc+veUL+w+cnK/n881MleZ+W/7H+Wf7jv89WUj2FXZ+r
pHoLPT6vPdDvi/If2r1k/x7zv/b/sf65kn+f+1Xjf6x/Nr/gfa+bf9CON+Q7
vcqb8pV481YlP5/ybTH51bti2vuez8f8r78Pjz/w/Tz2oe1DDR+Z/5BPfqx8
yPtJJY3/xPft1U98T1f+x/pn8x/y5y/Nf2jHV/bPUe9W8vVt31Ty9W3f2v9H
vVsp1bvm//Q7P8gv5P1R/mPHn4zHqOln+Uv++4uY+v5X/QE+/SbGf/6o5OM/
f8p3ePin/oa8f1fy8Z9/KqV61/6NOPGf/g/NRiry8zdGLvL95KMU+X66IUXK
f2jXqEWyD/oarUj8px2jF8m+8b3CItkfPo5ZJH5g37GLxJ/4XkOR8h+aPW6R
8g3ixXhFykeQd/wi8ZfHhopRyARF4nucd+X1OO+qSHxH3on9fXgySZHiPf43
aZHqX9o7WZHifZx3VaR4z/NTFCn/w75TFSk/jPOu1B/+N02R6ivMPm2R+E99
M532ifOuiny//wxFGu/BzjMWif/oYaYi8R95Zy4Sf+K8qyLF0zjvqkj8j/q3
SPyM866K5A9x3lWR9wdzFonv0Gwur8Pn4UWe38xdJL4j7zxFPr82b5H6J8b3
5ivy8ar5i8R/5F1A+Xl+QfmP2RcqUv1EHF64SPOL+N8i6p+fXaxkn8WLUv0r
/2P/b5GfB7OU/KddSxcp/sf+3yIfT1xW/uEXy8nP+L5kkfIT/r6iGH9bSYy/
rSKO87+LFN+x82q+D3usXuTnBa9R5Osz1ixSfh/zu0V+vubaRcoHscc6RaqX
4ryrItVTyLdeke+3Xb/IzzvcQL7T321YpPGeOO+qyOf/N5EP/M4mRX4e42by
ifiyuXyL81DlO89tKeaGreQv/NtaDI+38X7k3VZ+42/b6V/Epe2LFN9JK3co
8u8j7Fjk5+lVipTfY99qka//qRVpPgQ11It8vqRRpHwS/jXlO/K2jPfUE235
zvxwR75HnC3y7wf0y3fk7cofeDZQpPyZ53eSf4wP7yymH9tFvqKn3fQH/G13
+Y28exT5eNGepf5jL/uXOO/K/of27mP/FOubizR+FeubizS+S/62v/ynvQfI
/6hvi1TfwueDilRP8dzBRco3se8hxnv+fqjxCr883HiP2o8o8vnOI4uU/9Le
o4z38f1R4z3vOaZI4yvIe2xRmt8VI+/x8ht9nSDGbid6P+89qcjH70/W39DD
qfojYedU/TXmd+U/vD6jSOO7Ud/Kf+Q9q0jjAcSrs+V/1LfGe/5+rvyP+V35
H/O79tc8f4H2Ja24sEj1LvJeZHzEvhfLH+x7ifyK+V39Ifb7Finfjv2+8jX2
++oP6Pkq+c3frxbH/K73Q7tr/X3se53vx77XF6X5Xf056tuiNL9b5N+PvblI
4/1xXr7xP+Z35T9h73bzTfKDO+R/zO+ar5If3KV9Y363SPM7Mb9rfKTfv7fI
1xvfV+Tjn/cX+XjiA8bjOI9fvmLfB8Uxv1vk9fEj8j3md/WvmN8Vx/yu8T7m
d4tUnxOfnyzy/QVP2d/RjKeNB/jDM8Z/ePNskZ+v95z6Rd7ni/w8gxfMd9DX
i0W+X/cl7Yu8r2h//PcV4yPyvmZ+jH1fN3/m+TfMN2J+Vz4y3/OW8Tnmd+Uv
ZnunyNfvvCumve95P3HqfX8f+37g+7Hvh0U+v/WR7YfPHxepvqf//VT5+Z3P
ilTfIu/n8h95vyjy/dRfqn/k/apkn6+NX/D5G+1LM74t8vMiv5Mfcd6V/MEs
P8gv6tUf9Yeod/UH2vuL8Rk+/6p/IO9v8hk//F2Mvn73+Zjfle+89y8x8v6t
vyLvP/ZnyPuv/R3x+T/5H983qubnl41cTfqL+d5qft7NkGqKPzHfW83n30ev
JvvhRmNUE/9j3LSa1vvG+c7VfH/h2NXUH8T5ztXUHxCfx62meIvax6um/gE+
j19N/ITPQ6vJH+DpBNXE55jv9Tq8mKj0/MTV/LzsSar5+OWkto/nJq8mf8a+
UyhfnO+s/MTBqdQP+ppa/SHvNNV8v/y06j/Ou6om/tPe6atpfDrq3Woa/4nz
rqqpvovvPVVTPoBeZq6m/oD2zlJN/gCfZ6smf6C9w6rJH+Dl7NXkD8TnOcTM
T88pju8hi8krhotjf2+1tL65ms9Pz1tN9Uucd1VN+U58X6qa+jvkXaCa7+9Z
UP3Ax4Wr+XrBRdQv9l20mq83XKyan6+zeDWNT8PnJar5ftclq2l8I76PUU35
EPIuXU35AvIuU035BM8vK99ifXM1xV/kXV7/gHUryN+of+U37V7Z6/jvKj6P
Hlb198mrV/P9iLF6NcV7+r01qvn3UtZUPuy7lvIj79rqJ+pf9Ye86xpf4OF6
1fx8jvWrqR5mPm0D+U9837Ca73/ZqJryIeTdRP6T728qf+K8Z/0hznvWH4jP
W8jHqH+rqX5AjVuJ47znaorf5N/bVPP8alvv5z3b6W/Em+19P/LuYPuw747V
1J8Rp4pq6u/oVqryP+rfahoviP291TSeEPWv8R/7NKsp/6e9rWq+3r9dTfUA
fOxoX+Tqq6Z6AP/aSb7E+VXyPfbvyr84v8r4G/WtmOd3l7+xftnr2H1Pfy/O
r/J9sGpv+x/q4n1sX8zfyufQUzXV93SzBxjPyUcPMp4zH3CwfOb3D5HP2OFQ
4w3d1GElPh8un3n+CPmMWx+pvfn/KOMf8f1o+U18P6aa8gX+fpzxFH84Xn4z
/nqCGDc+URzztdV8feXJ/h78OsX3xXnN1Xz90WnVfD7udP0zzmuWv/jDmdV8
/+ZZ5i/EqbOraT4Eec+ppvGc2J9bzedPzq+m+Sv89AL5HPtz5XPszy313xcb
3+DfJfKFdlxaiu+XmS/E/txqPl54RTWvJ68Ux3nNYuS9ulran+vv8Z7rfB/2
vd72YN8bbC9i3FhN+Try3qR86PHmaqp3Yn+ufCcs3FrN66Pbqmm9IDy4vZry
eeLaHcYb+Hyn8Yj/75L/2Oce81fsco/+gP/dpz/E92vkF/OsDxgvse//5Gfs
1xVDi4eq+fr5h42/sV9XvpN/P+r96Osx+Y68j/t++rMn9FfmT56spnydn31a
+ciTnlYf8b064wX2fc54wn3P218i7wvag/7sReM57X1J/qOvl7U3/vtKNdVv
2PdV43vs1zXfjf268gl536jm55G8KR+R921xfB9PPtNtvVvN9xe+5/2Y+X0x
fv2BGH19WM3Pb/hI/uN/Hxvfw07VfP/ap9XSft1qGr/k+c/lPzz/wvjCW780
/sd5VcYn7PCN8Qt/+Mb4Rrz5zv4b+34vP3DTH0b83rAHiM8/yif84lf5F+s+
xOj79xI//xDT/j/lK/L/pb/F+VO+L+ZfbR9x+z/jN/48Ui3l33Eecy3xGb8Z
pZb0Ab+H1JK+sPeotfx7E6PVEr9R0+i1xO/4XmAt8TvWI9fy70GNVUvxPs5j
riX7sx9mnFqKh/jHuLXEd/qp8WqJ79Q/49cSv2j30FriP89PUEt8xL8mFPP/
RD6PFBN7Pb4/5PU4j8r2wNfJbC/PT15L/kr8nkL5yM+nrCV+8/xUtcRv4trU
tcRv3j+N+uX5aWupf431ybUU77lr+lqK9zw/g/ZF/hlrKf6TD81Uy89zn7mW
+BPfR6wlfjHuOGst5Qusr5itlvhIfjGslvhKvzC71xmvnqOW8g+en7OW+I7d
5vI67R8uJv+d29+n/fP4+8SteW1v7M+tpf4MvcyvvOT7C+gfTNsspH9Ag4XV
H+e1LKx/xP7cWor/+Mtitfx860GcfS92Ce0b87W1VJ/x/qX0F+YHl5Yv+Psy
+g/+smwtHw9aTj7y3/K1/PshK8hfnl9RjBwreT/rFFau5eenrCKmf1i1ln8v
YbVa6bwq24dca9RS/xb1rPLQ/6+l/MTltWv5+Rfr1FK+z/rydfUP+of11Dfr
y9Y3fvH8BtqPv25Yy8+f3Uh78/zG8gHebSJf4vxm+cRjm+k/xPfN5R/5xxa1
/HyELcWxf1c+c/7s1vobfruNmP5lW/lOfrqdvxfnV5Xev0Mt7x8qtdTfEZ8L
5aPuG8Qj+kfqwZrxA77Wa/n5qHXjD+1v1PL97C39g/e3a/n55B3tSbP69Jf4
HrZ8QO9d4yf904D+At93kl/EkZ3lH/3DLvITve5ay89L2M14HuuZS/F9j9Lz
e/r78G0vMbTcWwzf97F96HlfMeOR++kPaGV/5Sc+HmB/G+dZidHDQSV/OVj/
4L5DtAfPH2o8i3q55C+Hi8m3j9D+8P1I/QUvOkr+EJ+Pll/4yzFixmWOk4/E
5+NKfD3B6/F9cK8Tn3twrG+W//DllFp+XtupYvhyWi2f7z7d9iHnGcrHvM6Z
+gPx8SzjR3zvVP2g53P0D+47V31j5/OMV/jF+foHz1+g/XCTC2v5eesXaW/4
frF8oD+/RH+J863kF/nEZbX8fM3L9Sf4dkUtP2/uSvlK2nWVOM63ku/E52u8
Ttl2rb/H+NF1tXx853qvx3yw12O/r/Kgt5uUF77drD6ol24xvvD+W9VffE9d
fbMe5Hb9g9+9Q/sQH+80vvH3u7RnnHelvYkb98gH+vP75A+8vb+Wny/ag6HV
A/pTnHclpv99WL7y90fkM/x+1OvEs8d8nnj2uBh+PiEmzj1Zy78P9ZQ49vsq
H/x6RhzzwbV8vedz6gf9Pq/+yBdfUN+8/0XtAb9e0l7ExZdr+fcEXqnl+wde
lQ/Y9zX5gn5fr+XjrW+I4/znWv69m7eMx9j3ba/Dz3dq+fet3vU69fj7YvjZ
g+P8Z3+ffPEjccwP2z7670/E1KefKi/v/1R9kK9+7nXGdb9Qf/F9XXGsh1b/
5O1fi6O+1l7w7dtaPr/8nfaNZQzan/77B/nBfM+PYuLZT2L6z5+Nt8TxX2r5
frVf9S948pvXiYe/e53n/xBTn/1Zy7+f85fX0fPfYvLFf/z9+P6vmPf/J8aO
I9WT/NRXI4vxl1Hqqb8l3xsi5v2j1pM+eW60etI3fB+9no+HjFHP65MxxfS/
Y9cTP4hH49Tz78kM4hF8oP8dz+vwbfzS80PriV/03xPUUz5H/zmhmPpoIjHj
EROLscMk9Xw97KRi7D2ZOM7H8v3wZgoxckwppv+byufje0lej/lj5Ycv09bz
7+lMV8+/3zG9OPYLez88mLGe1ycz1fN6fuZ6/n2YWcTwbdZ6nq/NJj94flg9
z9dml188P4eYdsxZT/4V50WLiU/D63m+N7fPw+p5vB7nRdfz/m8+rxNf5q/n
54st4P0Mny1o++O8aDHjdwuLGadfVEx9spj6iXpc/TH+tUQ9r0+WFMf6aXF8
P0l7RT2uPaMeF9PvLlfP99MuLx94/wr6C/3hivKLF6wkjv3DYvi6ipjfXVW+
xv5hf59+fHXvJ76tIeauNev5/ONa9Xz8aW1/P+aXxbG+2vtjfbW/T7+2vvKj
xg3E8G1DMfFtIzHv31gM3zfRHvy7qfpmv/hmYni1uTj2E/s8fN2ynn+/Yitx
fE+pnp+Hsa38Ip/Ytp6PN2/v9ajHxVGPez/zRRWvRz2uP0Q9Lub9Ne+Petzf
oz9veD2+LyyOerz0/ra/H/W416MeF8f3lfy9qMfr+XzIgBj97aT+8JedxXG+
lvaI/cVi2r+bOM7XEvOCPcTwfU/5QnzeSxz7i8XE933E1PP7lvi6X8nf9q/n
34c6oJ7XZwd6nf78oJK/HyyOerye1yeH+ntRj4vJfw/3/pi/ruf575H1PP89
yuvw9Wjli+8viaMeF8O34+v59xN6cOw3Fsf3l8TwvQfDt1O0F3w/VT7A9x4c
9biY/PWMUv9whnwjnzhLTD5xdonv58h3xgPOFcOX87w/5rPF9FsX2H8Rny8U
M350kb8H3y8Wx3nTYvh6qZh65zIxdrjc9xNfr1A+nr9S/cT+41I+cbX3x/5j
9U98vlYc67Pr+f6M68Xw7Qb5wfM3lvzlplJ8v7mejz/dIia+3ypfGQ+4rcT3
28XIf4f3kz/faf4G3+8Sx35k+yvS8Hu8jp7uFcP3+72ffOR+r5P//s/rsR9Z
HN8jFhOfH7a95L+P1PN6qwfHem31Rz7yeMnfejB8f1L7wfentD/vf1r7w/dn
5BN8f9br8PU5+cd46fP1VL/AtxfkO+M0L9bz8a+X6nm99bI49ieL4eurYrT0
Wj1fj/y6GL684f0x7SdmfOMt72cY5G3liWUbYvj+rji+T6x+iI/vqx/i6wel
euvDUj7xkZjnPy7lI59ob/LfT8Xw7TP5Qv76uTjmv+UX9dZX8pP49nU9jQeQ
z/Rg+PKtmPH17+ppfAE5vxdHfS4mn/lRDF9/Kj3/sxi+/1LP13P+Ws+/F/db
qd76XRz1ufITX/9UX7GeW38h//u7no9v/6M9oj7XfsSH/7QvfB2pkexPfBtZ
zPzNkEY+/zFqI/GP/m90MevdB/GI8QTGf8ZspPG1mB8X0//1YMZ/xhFj33H9
Pew7iEeMR5Cvjd/I168MFRMPJvB+4sGEjXz8ZCLli/Oqxfw/ifogX5q0kfQZ
51WLef/kjaR/7DJFI9kHuaZsJPsRD6ZqJPvy39SNnB/TNBLfox4Xx3ruRuIb
/c/0Yng3QyONtxEPZhRHPd5I43fEg5kbaTw6zu8Sx/ld3h/z4438vO1hXmcc
fPZGPl44RyPfrzdnIx/Pnkv5MNNw9QFf5m4k/yCezKP+Yn5cHPW4+o56XPtE
Pa79GL9ZSHvD14UbeX3Sg2N+XD7F/HgjXz+4mHyM+XH5DV+WFHPfUo00nh3z
4418vdYy4qjHxfB1uUY+Pr68mHp6Bd+HnCs28vH1lWwvfF9ZjNpWaeTjfavq
LzE/rn4w0+qNFG/g2xqNvL5ZUwwP1tJf4ntO2hO+ryMf4Ou68oX+Zz35BF/X
l2+0egP5CV82lN/wdSMx4y8bi+HLJmKe37SR5nvg22Zeh2+bl57fQkz/t6U4
vm9cev/Wtpf+b1v9G75uV/KX7fQP+Lq9+mP8aEf9Ab5WxLH+W3tQH1VL8a3W
yOvheiOvLxql/qEphq8t+cTvtOUfyyo6jXw/Yp+Y8fF++c7z3UaaDyU+DjTS
fCd63EnMPN3OYvq/XUrP7+p1+LZbI18/tLvtxQ57iOO8L3GsF7f/ga97q69Y
L268Id/at5GPd+7XyPOt/fWP2A+tfeN7x/oHfDtIfsC3g8X054foH/DtUPmG
3g+X3/TnR4j5vweTLx0lRq9HN9L6gVhPLqa+OLaR1hvEenKv8/zx/h71wQli
8q0TxVGP237yvZOVD96dovxRj6sv+Haa/gNfT1e/1AdnNPLxzjO1H3w7S/vy
97MbeX1xjvESnp2rPxAfz5PvxMfzxfDlAvmIXBeW+H6RGL5e3EjrA3jsEvnO
85d6nf78MjF8vdz74/tPXoevV/q++P5TyV+utv2xvryRfz/uOuUnf7xO/RDf
bmjk4303Go9YD3Gj9iA/v9l4xu/eoj2JT7eKyf9ukw88f7t8ifOwjcfw9U75
hth3NdL8P/n93fI35sPF9Af3ynf8875GWl+Gfz3QSOvL0FcPxj//5++RLz8k
Rl8P2x5+92Hbi389qjzY9THljfpbfaCvJ8TI+6T6Q19PqX948bT2oZ56Rvvh
X8828vnO50r5w/PyAV69IF+w14vyi/r3pUZ+Xu3L8pV+5xX5ip5ebaT1ZFF/
N9J6NN7/eiOtP4v62/vpD9709/DPt7xO3vG2mPzlHduDf79b8o/3lC/2T9t/
RP1t/xH1t/GE+dKP1C92/tj+IupvMc9/qn/EeWHGP/j2uflT1N/yA759JZ/I
H76Wf/jnNyW+fyPfY/25OL6XLL/je1H6A2b9UUw8/sn74c3PjXw96C+N/Ptw
v/o+5PzN9vH878oT9bf+gb3+tD+Br3+pj6i/9Y+ovxv5/NO/6p/67D8x4z0j
NfP5zpGbyb6M94zSTPaH70OaOV9GFTM+OFoz8Svmx5vJP3jrGM3EX+Y7x2zm
+6PGaiZ/ID6N3Uzrkem/x2nm338Z1/vJF8cXMx4+iEf4Q8yPi4kjE4qRexCP
8Bf4NrHtp56fpJmv9x/EWX01WTPFk6jH1SfjCVM08/HBKZv5/MlUzRTfsPfU
zeQfxLlpmin/Jr5M20z8iPnxZuIP9pq+mfgV+6ubiY9xnpgYXs7UTHyHRjOL
mX+ZpZnWM9PMWcXEp9nExKdhYvg6u78Hj+cQ0+45xcg9VzP5C88PVx7sNrfy
x37rZvIP+D5vM8WT2G+tPrlv/mbuLws08/H4BbUXel+omY9vLtzM118tIh9o
1qLyBb4vJr/wl8XF+OUS8jG+ryyf4dtS8h++LyPmd5YVw/flfB699eD4npSY
/HAl3x/fk7J9jAeuoj/E+nT9Hb2t1kz9R8yHGz9ifbr6i/Xpxp9Yn97MxxPX
1j9iPlz7xX7rZr5edz35gBzry5eYD5fvjBdtKI758GaK3/BjY/lLfrpJM+2P
iflwr/P+zbwe52uLYz5cTP2+pZh2buXvUU9tbXvIT7dp5vXMts0839tOeaP+
Vh8xH97Mx7t2VJ/wq9LM5yer2od4XG2m/h5+1eU/9UxDezNf05QP1P8t+UL7
W/KL/LYjJp72NfP93/3yO+bD5S/xdKCZfx9jJ++P9enNtN8Fv95FHOvTvZ/x
qt38PcLE7uI4b1t/iflw2w9f91Jeovrezfy8i32a+X6IfdUv9ft+xp+YD2/m
6zEPsL9gfPNA7Uk8OUj/IN862P4BvhzSTPk6fDlUPsGXw+Qf+d7hxmf4coT8
Jd86coQ//f9+86PEMR/u/bT7WK9Tjx0n5v3HeX/s5/b9sT5dTPtPtL3w5WTl
IV88Rf+g/afoH/DtNPVF/X66+sWOZ6h/+HZmM+VT8O0s7QWvztY/eP4c7U+/
c24zry/OM75ix/PlE/HxAvnG8xfKR5pxkfyl/79YfhNXL2mm/WCxPr2Z9kfS
f10mjvO4vZ+4cYW/T3y+spnvz7yqme8Xu9r2ovdrSv3ftc28fr/OeAFfrzee
YK8b7D/gy03GJ+LjTfYf5Gu3aD/qg1ubKV+mHr2tma//vV0+IPcd8oX65A75
FPW3/IMvd8tfnr9H/sKXe71OfXCf16kv7m+m/ZHw5gExdvmf98OXB8XY+6Fm
/n3Gh21frFfXP7D3o/o//eFjzfw8vMeb+fzNE+qP+PRkM1+v81QzHx98Wvsw
Hv6M8Y3+9FnjH3x5Tv9A788bP3nvC/IHe79oPUF/8lIz36/1snyFL6/KZ57v
wfRnrzfTfnv6szfEvL8HE1/eEsO3t/W3OIfY92Ovd/UP3P4924sc7zfz868/
aObj0R828/0JH+kf8b1m9YtffaL+ef+nzXz97Gf2F7H/2/wAu3zRzOfrvpQf
mP0r/YH3f93Mz8v5ppmfJ/qt/KT934kx8/fynfjwgzi+VyWO58SMD/6sf9Gf
/iImTv/q+6gPfjPfiv3j5oOxf1z54Mufyh/fqzJeEJ/+1j/In/5t5usP/lX/
ce5CK9mH+DRyK1+/O4hH2BcaDGkl+8PbUVspfsL3QTzCH2L/eCvlT7F/vJX4
CG3HFMO3sVo5X8duJT6T74/TSnznPeOKMft44liv3kr+RfuHiiNO+D7kmrCV
/CP0bPuJUxMrH/nTJK38e0eTqh/qlcnUX+wfb+XzH1Oof/xwylZeb0zVSv1H
fM+5lfwDf5mmlcfHaVupv2D+ZLpW4g+8m76V/CP01Er8Iz7O2Er8hK8ztRJ/
yb9mbiW+x3taaT8+cs0qjvO9vR++DvN6nCvh71OvzOH7I+608vHh4a3kH7x/
uPJh73layT+oL+dt5ftx5msl/4hzG9Uv+dcCrdR/EF8X1D70Cwu1UnyjP124
la+nWET7w9dF9Q94s5j8ifPPxLR/CfkGTZeUn3H+mfyN877le5z37fU479vr
8GW5Vsqv+H95r8O3FXwevq3o+6H5SmLi48q2n+dXaaX+g/50Vf2D7zmspn4Y
z1/deMPvrqF+2Y+ypvqHL2tpH9xvHe2HvdZtpXwKe6/XSvGR+LZ+K58P2KCV
8o/43rP+gR420j+w98byM773LH/je8/yHbVuJt+Jw5u30nkq2GsLr8f3nv09
5NzK9xEfthbTrm1sH2bbVv9gvGo75cMPtld+/GSHVj5etaP+wfOVVuo/eH+h
/rF3tZXqDZ6vtfL1fHX9I75/pf3jfDT5EeeDt/LvZ7VbKT+J88Fb+fkQfWLs
1t/Kz5foyuc4H1z+89xOYvi6s/4AX3fxefSyqzjqLt/H/PLu+i/94R76Bzze
U/nwk71b+flM+6gfmrWP+oPv+6lv+L5/Kz9f8YBWvv/oQP0D/R6svbHPIfKD
2w6VP6zvOkx/wL6Ht/Lx1CPkK797pPzHPkeJiUdHi2M9eivPt47VH/jrcV7H
Psf7Pv4/oVWqv20f+dJJrfz7ISfbX5CvndLKz984zf4V+5yuP1APnq4/kJ+f
qb6J32dpH/qvs7Uf3f05YuLRudqbfGsQj8i36b/ON57CuwtK/LqglC9dJI71
6PKT+v0ScaxHl888f5k4xBTHenQxPL7S38Ofr2rl58Vc3cq/H3iN/hz7w/WH
2B+uPuDd9eZPvP8G4wv59Y3qO/aH6w+xP7yVr4e7RXuSb9xqfwFfbrO/gC+3
t/LxmjvkD/n1XfKL5++Sf3HeWisfb7pX/tKOe+U3/ny/GL48II7vY7Xy+v1B
MXZ4yPfFeWu2J+pv/RneP6o8sV9ceeH148YL7PaE+ov94uoXvj1l/kr8fbqV
7z94xvwXvjyrPxBfnmvl+9Wf1x/gywvyhfr9xVY+n/1SK59veFl/IP6/Ikar
r7by83xfM/7jX6+LiQ9vivHLt/SH6Nb9Pez1Tis/T/TdUj30nu2nH3jf/oL8
9INWPj73ofpB3x+pvzjGU/1i5k/0D+L5p8Yr8pXPtB9//7xVqr+1P2b8slWq
v+0/ov6WX4zvfaN/MN7zbSufn/tOvtKffN/K6+cfWvl5Xj+2SvV3q1R/+zz9
7S/+Pnf92sq/J/Cb7YvzxO3/sPefyoe9/yrFh7/UF/H8n1Y+vvev/S/55X/q
H76M1E72Ybxm5HZ+fsQo7RT/4MuQdrI/fBm1nfiBGkZr5+edjN5O/MLeY7QT
/4gPY7bz+nesduIveh27nfiNFON4Hf8cVwxPxvN+/Ht8r+PfQ8WkPRO0k7/y
/IS2F/+eqJ38AbVPrHzwZZJ2yp/ifPF2fp7TZOozvifdTv5BPJ+ineoL/p+y
nfwBe0/dTvaM72m1k73R97Tt5B/IMV07X180fTvFV/QyQzvxC3vP2E7+gr1n
aufjuTO3E5+RcxYxfJu1nZ8HP5sYew8Tw7vZ24n/6HGOdvJHeD2n74/zxm0v
fBmuPNB67nbqL3jPPO38e0zzqh/6g/naabyPfH7+duov0NsC7dRfkD8sqH8Q
dxdq5/vTF9Y/sPci+gfzPYvqH8ixmHwiX1xcvnHfkvKRfG9J/YN8b2n5Tb63
jJjnl5XfdBPLiYnny4sZb1jB57H3ir6f51dql+bD2ykfxN6rtPP5mlWVN9aj
t/P17Ku3U39BPF5Df8A/11Tf8f2tdopX9L9r6x/ka+toT/68bjvlU7EeXX+I
88fbKZ5i5w3kE+NLG7bz8Z2N2vn6v43la6xHb+fxfFMx/cFm+gv22sLr5Ndb
+nvoeysx9tpaTL63je3Bv7ZVntCb8qLv7cXxvWn9gXpsR+MLeq60U3+BXQv1
j1tUjVf4V62dxkuIh3X9Iept7Y+9m/IDL2vJH/TV1j+wd0f+Ya++dr4+pN/+
BD139RfaOSDfmU/dqZ2vp9pZzPt3EVPv7qY/xPe4fD/P7257iYd7Kg/9717K
y/N7i9HLPvoD/rWv/kD/uZ/6Rd/7q3866AP0h6i3tWecz6Y/EOcONj7iX4e0
8/O2DpVP2Osw/SHqb/nH80e08/UiR7bz+Y6j5C9yHN3O861jxIz/HtvOx5eO
83nec7y/j1wn+H7ytRNtL3Y8SXmox05WfsZXTlE/6O1U+1dec5rxBXufbn9B
/32G/UWcby6mnjrb/gL/Pkf/wL/Pbefr585r5+tFzje/4L4L2vn82IXyn/hy
kXyN89na+fraS+Q39r5UHPvBvZ/4cLm/j56uEDNecqX+EPV3KV+6up2vX79G
/6D+vVZ50dt16of+83r9A7veoH/Qf95of4F/32S8Ip7frH/E97q0J/nObdqb
528zPlI/36F/0P/e2c7XF90pv1jveLf8w273yE/SoHvlc8x/i4nn98tv5HjA
63HeeckfHvL3sc/Dvp/+7hHbi34fVR7yi8eUl+ceN34g3xP2B2RxT6pP/OGp
dr5f/GnjE7/zjPYi/j3Xzsejnpf/+NPz8gF/eFH+x/eo2/l61JdL+ckrYuLn
q+L4XpeY7vh1+czzb4hx4zfFiP2WGH96W75Tb74jju91yX/86T3l4b/3lZf+
7gP5z/Mfqi/i4kf2B7HfW33jT58Yf/j/03ZpvXk7X+/2ebu03rydrwf5yngZ
+73lD89/Lb9iv7f5VHy2Xj7GevN2ab15qf74URzrzfWH2O/dzs93/8X7Wa/2
q+/HXr/pn3EeW6m/+6Odr5/9U/nJ//9SP9QPf7fz8bt/9Afi6L/qm/jzXzvf
nz9SJz9PbeRO8g/izyid1F8Q/4Z0kn/E/HYn8YX8ZPRO4hN5xRid3D/G7CT+
0d+M5fU4j62T+Iq9xukk/+C943Zy/xjP68Sv8UvPD+3k67Um8H08N6HtxU4T
dVI+hBon7uT1wyTKT702qfqJ89HVH/4xeSev16boJP3jX1N2kn2w11Sd0vx2
J/kHvJ6mk+xNPJ22k+Il+f90nXw/6/SdfL3UDJ18f9xMncRH7D2IR/AV/5ql
k/yF/mLWTj7eO5vX0fewTuI/eprd6/RXc4ix15y+n/xgLtuHvod3SuvLO/l5
CvOIsde8nfz81/nUH3afv1NaX94p1dfai+cX6qT4FvW19mY+Z5FOio/416L6
A+1YTL5Qry3eyfdjLCEf6b+WlK/Yaykxzy/dyfdDLCvfsddyYni0vPfzmhXE
UV/7ftq1ku2L+lr+k8+tonzYa1XlJ/9frZOfl7J6J68f1lCfsd68k5/3t5Y4
zkPv5POr62g/7LWu/hDnoWt/8sH1O/n5BBt0UrzFyzaUX+SDG4lpx8biqK/l
K+Nnm+oP2GszcXzfy/vR0xZej/ra61Ff+76or20/920rDjvr/+h9e+VH3zuo
H/S9YydfX1Yx/qDvQn3T31c7+X6lWicfD6lrX+qlRic/n6YpP3hPS4zftvUP
7NWRb/G9606+X6lfzP6Nbicf7xzo5OtXdxLHfLb8J1/YpdT/7ObvRX0txr/2
EBPH9rC9UV8rX3zvWn3w/D5i8o19S/6xn/olP9xfe5AfHiDm+QO1H/nGQfYf
5O8Ha3/i2SFi8sND5Q/6PqyTn99xuP6C2EfIv6iv5Sv+dZSY244u+dcx8p18
5Vivo5XjOvl6vuNL/dcJXsdeJ9neOG9NHOet2T/Qf52qf7Bf+FT9AXudbnyB
l2eoX+Lhmeqf/ucs4xXPn218i/PPtS/PnysmDpwnH3jt+fKH+YQL9A/sdaEY
e13UydeLXCxG7kvE9F+XivHry+Q//dflYpp1hfym3VeKaedVYtZ7XG378M9r
lIc6/jrl5bHr7U957gb1h75uVL/0Pzd18vNCbtYe9D+3lOLZrZ3S/m4x992u
/eN8NflBvnFnyT/ukv/Ew7s7+frse8TEs3vF+Md9Yp6/399DXw908vHh/4np
fx4s+cdDPo9/PGx76X8eFWOnx5SP/udx5af/eUKMfz2pP8T5auobez2tPeJ8
Ne0V+7vFxKPnSv7xvP4Q56vJD372RflDM14q+cfL8g05XzE/of95VUwrX+vk
+/9eF9PON7yf9QtvitH3W538/IK3S/XPu7Ynzj8Xx/fEOvl42wfKi74/1B/I
zz5SX/jtx/YP8dnVTmk9ufaI+Wz9gXz6c+2Jn3+hP9B/fKn9if9f2V8QT77u
5OfpfCMmn/22k+9n+66Tj+d8L19p9w+dfD/cj2Lq2587+f7BX0r++Gupv/rN
eI8//i7GH/9QHvzxTzH++JfyY5a/xVFfq0/a+6+Y+Pef/gG/RupL9qDfG9KX
7AcvRu1L/Mcuo/Ul+8d8dV/iB/F9jL7EH+4bsy/xK+pnMetXxhHTrnH7El8x
+3ji+P51X+I37xvq8+hxAt9PfJrQ68g5ke2lP5lYebD/JH2JzzE/LUafk6kf
/G3yvvz7jlOoT+rXqcTka1P3Jf3z/CDOzjOati//PtV0fcm+jG9PL6YdM/Tl
5wHO2JfXnzOJ8beZ+/L9zbN4Hf7O2pf4ir/N1peP7wwT8//s3h/nl3s9zksT
I+9cvp/4NFx5iE/ziLFjD2Z8Zr6+fH/W/Oov1oOrX+LTgmLi20Lag2GAhfvy
+LSI9uW9i2p/9LWY/gCPFu/Lx1eWkF/oa0kx/r5UiZ9Li4lPy8hXxrOW7cvH
s5bzfurt5cXwa0VxzEeL43vYtoc0ahVx7M9WvtifLY7z0dRHzEerv5iPFpOv
rKU+icdrq3/6v3W0D/Fg3b58v+p6ffl+1fXFMR8tP2I+ui+PjxvJN+TYuC/F
U/x5EzHxcVPvJz5uJo56uS8f793S5+P7YWL4ubXPU39tI+b5bZUHO28nxp+3
L/nHDl7n7zuKo142fpCPF+oz6uWSvmt9+f67el8+P9fQfvhzU8z4eEtMvdqW
H8T7Pv2DfKVPPlH/dL2Ovgb68vVUO8lP/Hln+Rznk3udfGNXMfFvtxK/dxcj
9x6+j7/v2ZfXP3uJYz92KR7sIyYO7qs+iAf7idH3/vpH7MdW3/T/B4oZvzuo
L5+fO1h7Yq9DtDftPFQ+oO/DxMzPHSGfGO88Uky9eaT8hZ9Hy1f4eYz8J58+
ti8fzznO59H38WL0fIKYcfITxay3OMn2xP+2n3hyitfj+9pi+qvTvJ94dLr6
oaw8Qxz9lvqEFWepf/49u+Qf5/Tl+7fP057o63ztHeu/vY6+LpQv8Psi+UW9
eLGYGy4Rkw9fWuLnZf4e452Xy2fkvaIvX391pc8j71Vi/PlqMfy41t+nvr3O
6+Rh13sdeW8QI++NYvR1k/qhvTerH/5+S18+vnprqX++Tf1jxtu1D/n4Hdoz
6mMx/nSX/GAe4G75w/qGe7we5497Pepj+RrfA/M6/HigFK8f9H7yt4e8Huef
idHXI2Li16OleP+Y1+P7YGL09YT3E3+elO/4w1Ni+oun1Q/8eKYvn+95ti+f
n3tOfUcY1R7Mf7+gvehfXxTHfmsx8foV+UH/+KoYfb0mX4j3r8u/mH8WEz/e
FPM7b/l7jE++Xcrf3vF6nHcmjvln72f9zfti8pkPSvnQh+KYfxbH/LM45p/V
R8w/i+HXZ+I470wMv74sxZ+vtAf67sHU89+U8uVv+/LzVr8Tx/e2+/LxxR+8
znjZj/IPff0kjvPO+vL9aL/IT/T9q5j495uY+PW7z0d93JfPH//p+8iX//J6
7K8Wx/e5xcSv/8TUFyP1J4y+Rhaj71H6E/+JX0PEzN+O2p/0TbweTUy8Hr0/
n88boz/ZD36MKSa/H0tM/jV2f86PcfqTf8CPcfvz+fLxxNh3qJj8awIx8X7C
/vz7AxOJ6c8n9v7YT+312E8tjvlmMfFncp/HvlN4HX+a0uvoaSpxzDf35/nm
NOqDfHO6/twfphdj3xnUf8w3az/knalk35n7E/+jXhaTf8wqPxj3nK0/n/8b
1p/XM7N7PeplMeOnc3p/nC/en39vYHh/zud5vA6f5xVT/83n/axfn9/r9OcL
+D7kXdD74fNC/fl43MLez/6URbzO84t6nf50MTH2XVz94v9LiJF3yf58/cdS
4ji/THvG+WX9+XjMsl6nnlje68SLFeQb9lypxN+VvT++5+V17Lmq17Hnav15
PF9djD3XENO+NUv+ulbJX9f2fubX1u3P88n1Sv66fslfN/A664E2FDO+upH6
IR5vLEbeTfrz+dRNtQ/+upmY/HlzMenAFiX+bul1eLe11+HfNuI4L7w/n9/a
Thz1cIm/O/Tn/ceO/ak/wEEq4lif7f3E42p/vp6l5v3Yt+51/LUhjnrY9iFv
S3mwb1tMuOwTU8f2YPy125/Pnw5oD/LBnfrz+YqdvU4+t4vXiU+7iolPu/Xn
4zW7l+LxHv35eM2eYvi8l3xD3r3FxKd9xMSn/cTkgz0YeQ/oT/kU/e2BXsff
D/L9DPse3J/XR4d4nXzuUJ9H3sO8HuuxlT/2Q3sdfR3p9ZgvVr/xvWztQ917
jNdp17ElfzhO+8b3ssVxHpmY8biT5FOcB+51/P8Ur/P/qfIxziOTv/x/utcx
3xli/OFM7yd/PavkD2f7Puqrc7xOvDtXjL7OE1NPni+O/c9i/OGi/jz/vLjk
D5f05/nnpaX++jIx/Lhce9B/XaE9GW+4Uoy8V5Xyi6vFyHuNONZfyy/se518
JB+7Xhznj3l/zA/3p3oceW/2fvhxS39e39wqxv9v8/eQ93YxerjD+9HrnV5H
LXeJUfvdYvzhnlI+dq/yo6/71F9Me3k95ofVf5z/rX2Idw+KGW99SPvCi0fk
A/VkD0bex7yf/uFxr9MfPiG/0NeT8pv+4Skx/vB0f6rPqZ+fEcf3scXw4zkx
/cPz/h78eMHr6OHF/ny84CXbG+eN2V7ue0Uc9W9J3td9PrYJ9ufrPd70fvqH
t0r+8Lb2w//fEUf9qz1pxXvygf7lfTHx5kNxzAeL+Z2PxfD5E/lJ/fhpfz7+
9Zk45oP1l1hH25+Pf30ppr1f9ef1+tfi2N8sZj/ct7YPLX0nJn/9Xgyff1A/
+P+P/fn4xk/9eb3+c38+H/ir9qI++U3M+Te/az/6/z/kA/HuTzH+8JcY+/4t
H+kP/ynF939L8f0/+UkDR+rm32cZxNn+8pHF+O8gzvxpFDHvGeLvQdshXqd/
H7Wb2sN8UA8mHxitm4/XDuIR+mF8YnSvY89BPEKfzGePIcYugzjLp8bs5vlN
D0besbrJnsg7VjfxAf6N3U18ot3jiGnWIB7BX+Qdt5vPF47bzfOf8bzO+FEP
ju+HiYk/g3jEfAbyDhXT7qHez/jYBGLumsD3Uy9MqHyMp/Rg7DuRmHxuom6e
b04shu+TiOlPJ9Ee1GeTirF6DybfmUyMP0+mvfGPyeUL+VkPxr5TyLeYnxcT
j6YU4989GH+aSv7Cj6nkP/Fzaq+T7/Rg+DGNmP5pWjE8nrbkD9OJ8YfplIf6
fXox42HTqw/i8Qz6B/L2YOLzjOoT+86oP/D3mbQX6xpn0h8Y35tZvqCvmeUT
8s4iJv/pwbRjVjH532zdfD3uIB4xv0c9OEyMP/Rg/GF2MeMFs5f8YQ4x+prD
+6l35/R6jL/YPuw7lxj/n0v+U18M7+b1+NxizDK3+o3z7rr5/HcP5vl5tQ/y
ztvN+//5xNRr88kH5J1f/uAP85f4vECJzz2Y+xYUk3/14BgP6ubz3wuLaUUP
Rt5F9Jc4777kD4uKkbcHY9/FlA89LVaSd3Fx7F9QP9h3CTHre5ZQv9h9yVJ8
78G0d6luPl6zlPwnP15aTL2yjHwhf1hGvuG/y4qpR5ct8Xm5blrvQX/Wg8kf
l/d+aLOCGPlW6Obrq1bs5uv3VhLH9/O6eT2ystfpb1dWPvx1FTHyraI/wIdV
1R/+tqr8Jj6tJuYtq2kf+p/Vu/l4Sg+mvWvIZ+LLGqV4uqZ8o55aSz7S3/Zg
+tu1xci7ts/T3nW8HucndNN6J/LrdcXIva7Pw5v1xPhbD6YeXd/2kz/2YPrr
DZSXeLih+kItPZjx7Y3kN/FlI/XN8xtrH/xtY/nN/Nsm2jO+X6C9WS+1aSme
9mDeu5l8pP8YxNn3HTb3OvJuXuLzFiU+b+Hz5Bdbym/yi63E1Cc9mPHTrcX4
69b+PvbdxvYj7zb6A/n1tmL4uK36IL/YTn0xvrxdNx9v2F79kx/0YOLTDtoL
fe3QzcfbdzS+EZ96MP1tpcSPQr6y/6+Qb/Cj6nXWU/Rg4nFNDD96MPyoi5Gj
BxOPG2Kk7MHwuVnyh6Z8j/Mku/n+h1ZJ3nY3r/c78p+7ejDxuE/9Es/7uvn8
UL/8h8/92hPedLU38nblA/IOiMmnBuQT8u4k3/jzTt38fJedS/6ws9d5fpdu
Wu/Kep5duvn+zl31D+L7bt38vM7dvB897u772N+5e8kf9rD9MR7sdfLHPZUX
++7Zzev9vUr11F7qm/p+b/mPfffWPrGeSvtRX+yjvflv324+frif/Mf/95M/
xPf9u/l68P3lI/XjAcbvWI9V4vOBYtY/HOj92Ocgr8f3K8XY4WBxfM/S9sDn
Q7r5esBDxUh5qPIR7w4r1cuHqS/84XD1iX0PV9/UU0eIadcR2ov4fqR85/kj
tTe/e5T8gI89mHh1tHwh3h0tH3n+GDHtPVYMn4+V7/Tfx4mp/47zfuL78WL8
93jvJ586wevE5xNsH/XfiWK0cqLykO+eJCbfOEn9MB51svxn/OYU+R7r1br5
+GcPJv87VfsxHnaa9qVePk37kz+eLo71baV8+Yxuvt/hDPnH82eW4vOZJT6f
1U37GRC7B6PHs8Xk22f7PP53Tqk/OdfriHWu17HvebYX+56nPPRn55fqg/PV
T6yv6+bzDxd08/nCC+U7fL5QviPvRdoP/+3BsV9Ne+O/F8sH/PeSUr16qfGW
ZlzazfffXNbN9/9cVvKHy7v5+RY9GHmvkN/Y9wqv479XdvPzN3sw8l7l/ch7
le1l/v5q5aM/ulr5ef4a9YO815bq3R6MvNfpD/DjOvmP/14v/2lvD6Y/ukH7
Ut/fIP+JzzeW+HGjfKK9N8k/xOrB2PdmMfLeLL+x7y3dfH/QLV5H3lu7+X62
20r+cJv3I8ftXkfe220v/n+H8sDnHky9cafy8/yd8p04fZf6Yz7mLvlPvnG3
9qCevFt7sZ7jHu1LvLtH+/P3e0vjIffKf+qz++QT43v3l/Lv+0v+8ID8JN4N
4uz8mv95nfn3Hsx6vgf9PVj7oNeR9yGvM57xUDffb/Rwqd7owejxEeVlvdSj
6oP86lH1h30fU7/YuQcj1+Ol/vdx7YX/PqE9ee4J7c17niyN3/Rg/PYp4yv9
71PyDXmf9jrzR8908/3Sz3g/+fOzXoenPRj7PCfmv+d8Hv99Xozcz5fyqxds
P/lzD47v5+r/8f0eMXp5Scx53C+pT+azXu7m8y2vlOzzinzHvq9q39ifqf3J
J18rjUf2YOzzemk88nX5hrxvdPP9nj2YfONN+Uv++6bXYz2r15H3Lf2F8ci3
vU5/8k4pv+rB9L/v2j7kfdf28/x7pfmIHhzfH1Jf5PcflOYPPpDv5Pcfah/i
8Yfaj/r+IzH57sel+aWPjZfEl0/kE/HlE/lGvfup/GT9dw9GTZ95P/njZ938
/IrPu2k/M/b8vMT/L0rjP1+U6t0vS/VBD6b/+ao0n9aDkfdr9UF/+436Y3yv
BxNPv1Xf5FPfluLTd2L6j++0H3//Xvsi7/elevcH+QIffpBv+NmP8ov+58du
vl/zp26+H/8n+Ut/+bMYeX8Rw49f/H3s+6u/B39/LeVjv5Xa24PJp3433yGf
+r0k7x/qBz7/Ib+R90/jCfL2YOT9y/hDvvyX8Z384m8x7f1He8Orf4yHjKf/
Kz+oL/4t1bv/yUf84T/5Sn0w0kDCyNuD4zzrgXz/cw9GjlEG8nxoEI/gM3oZ
4nXqoVEH8vGmQTyivdipB9Pe0QaSv9P/jD6Q9IH/9mDaO8ZA4j/NHMQj+A+f
xxxI9oBGPRj7jjWQ7MnfB3E2Xzr2QOIH/w3ibPxmHDF8HsQj+Mn43rgD+XnG
PRgpxhvIzy8afyDxHX31YOw71N/n+R6MfSfw9xivnmAg738mVJ6Y3x1I/hLr
vZWf2wZxtl9i4oG8Hpp4IM/vJxnI+9tJB0rzuwOJ7/Q/kw3k4xmTaX/qg8nl
R5xXNpCP30whjvPLBvLziKYU8/yUJT5PNZDXuz0Y/51ajNyDeER/EPO7Xsd/
p7U9xOceHPO7yhPzuwN5vTu9OOZ3B/L8bwb1F/O76pe/zziQr88axCPiPfnF
TGL4OJP2pL0za3/8dxb5gtyzyKeY3xUzHjGrfCSfmk2M3D0Y+w4TM74+TL7z
/+zyGXl7MPLOIYbPc/h78HlO20f+2IORay75Tz41l/Ljv8PVT8zviv8POnOd
og==
"]]}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0.},
ImageSize->Full,
Method->{},
PlotRange->{{0, 274.816}, {-2.567500000000001, 3.739}},
PlotRangeClipping->True,
PlotRangePadding->{{5.49632, 5.49632}, {0.12613000000000002`,
0.12613000000000002`}}]], "Output",
CellChangeTimes->{3.566418098801072*^9, 3.5664565141880407`*^9,
3.566463344816429*^9, 3.566464588852642*^9, 3.5664657559043016`*^9}]
}, Open ]],
Cell[TextData[{
"Da die Schwebung das Vorzeichen der Schwingung umkehrt, ist es am besten, \
zur Bestimmung von ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "\[CapitalIota]"}]], TraditionalForm]]],
" nur einen Schwebungsblock zu nutzen. Wir w\[ADoubleDot]hlen von beiden \
Pendeln die ersten 20 Sekunden. Zur Bestimmung der Schwebungsfrequenz ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "\[CapitalIota]\[CapitalIota]"}]], TraditionalForm]]],
" w\[ADoubleDot]hlen wir manuell (mithilfe der graphischen Funktion \
\[RightGuillemet]Get Coordinates\[LeftGuillemet]) Schwebungspeaks aus und \
ermitteln deren Differenzen. (Wir erhalten dann die doppelte Frequenz, da die \
Einh\[UDoubleDot]llende ja auch Ausschl\[ADoubleDot]ge nach Oben und Unten \
hat."
}], "Text",
CellChangeTimes->{{3.566418255329228*^9, 3.566418281083146*^9}, {
3.5664184416434603`*^9, 3.566418527597598*^9}, {3.566418898142995*^9,
3.56641892066775*^9}, {3.5664571761507807`*^9, 3.566457178355198*^9}, {
3.5664628540655603`*^9, 3.566462877382187*^9}}],
Cell[TextData[{
"Zun\[ADoubleDot]chst ermitteln wir ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "\[CapitalIota]\[CapitalIota]"}]], TraditionalForm]],
FormatType->"TraditionalForm"],
":"
}], "Text",
CellChangeTimes->{{3.566418529541356*^9, 3.5664185392688637`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["peaks",
RowBox[{"oben", ",", "schweb", ",", "1"}]], "=",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"24.56", ",", "3.047"}], "}"}], ",",
RowBox[{"{",
RowBox[{"81.97", ",", "2.133"}], "}"}], ",",
RowBox[{"{",
RowBox[{"137.3", ",", "1.293"}], "}"}], ",",
RowBox[{"{",
RowBox[{"192.8", ",", "0.6317"}], "}"}], ",",
RowBox[{"{",
RowBox[{"247.8", ",", "0.2222"}], "}"}]}], "}"}]}]], "Input",
CellChangeTimes->{{3.566418553726355*^9, 3.566418556862135*^9}, {
3.5664186021190243`*^9, 3.566418636734869*^9}, {3.566418686901483*^9,
3.5664186908324213`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"24.56`", ",", "3.047`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"81.97`", ",", "2.133`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"137.3`", ",", "1.293`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"192.8`", ",", "0.6317`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"247.8`", ",", "0.2222`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.5664186487621803`*^9, 3.5664186916285067`*^9,
3.566456514306575*^9, 3.566457245413279*^9, 3.56646334485135*^9,
3.566464588918584*^9, 3.566465755989271*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["peaks",
RowBox[{"oben", ",", "schweb", ",", "2"}]], "=",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"52.96", ",", "2.931"}], "}"}], ",",
RowBox[{"{",
RowBox[{"108.5", ",", "2.023"}], "}"}], ",",
RowBox[{"{",
RowBox[{"165.4", ",", "1.241"}], "}"}], ",",
RowBox[{"{",
RowBox[{"220.3", ",", "0.6513"}], "}"}]}], "}"}]}]], "Input",
CellChangeTimes->{{3.566418697494882*^9, 3.566418698883885*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"52.96`", ",", "2.931`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"108.5`", ",", "2.023`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"165.4`", ",", "1.241`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"220.3`", ",", "0.6513`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.5664186993548203`*^9, 3.5664565143639936`*^9,
3.566457246597352*^9, 3.566463345074378*^9, 3.566464588964882*^9,
3.566465756035857*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["periods",
RowBox[{"oben", ",", "II"}]], "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Flatten", "[",
RowBox[{"Differences", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Part", "[",
RowBox[{"#", ",", "All", ",", "1"}], "]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{
SubscriptBox["peaks",
RowBox[{"oben", ",", "schweb", ",", "1"}]], ",",
SubscriptBox["peaks",
RowBox[{"oben", ",", "schweb", ",", "2"}]]}], "}"}]}], ")"}]}],
"]"}], ",",
RowBox[{
RowBox[{"#", ">", "1"}], "&"}]}], "]"}], "//",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"#", ",", "\"\\""}], "]"}], "&"}]}]}]], "Input",
CellChangeTimes->{{3.566418704725378*^9, 3.566418723733201*^9}, {
3.566418774176773*^9, 3.5664187746959467`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"57.41`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"55.33000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"55.5`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"55.`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"55.54`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"56.900000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"54.900000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )]}], "}"}]], "Output",
CellChangeTimes->{3.566418725313447*^9, 3.566418775740443*^9,
3.566456514433331*^9, 3.5664633451497507`*^9, 3.5664645890868998`*^9,
3.566465756111023*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["T",
RowBox[{"oben", ",", "II"}]], "=",
RowBox[{"Mean", "[",
SubscriptBox["periods",
RowBox[{"oben", ",", "II"}]], "]"}]}], ";",
RowBox[{
SubscriptBox["\[CapitalDelta]T",
RowBox[{"oben", ",", "II"}]], "=",
RowBox[{"StandardDeviation", "[",
SubscriptBox["periods",
RowBox[{"oben", ",", "II"}]], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.5664135644395313`*^9, 3.5664135932825413`*^9}, {
3.566413840931016*^9, 3.566413846450987*^9}, {3.5664172409639*^9,
3.566417250652793*^9}, {3.566417447558818*^9, 3.5664174599257507`*^9}, {
3.5664187707838707`*^9, 3.566418783510667*^9}}],
Cell["\<\
In diesem Schritt schreiben wir in den Z\[ADoubleDot]hler nur \[Pi], um die \
Dopplung (s. o.) aus der Rechnung zu entfernen.\
\>", "Text",
CellChangeTimes->{{3.566462887037943*^9, 3.566462914347677*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "II"}]], "=",
RowBox[{
FractionBox["\[Pi]",
SubscriptBox["T",
RowBox[{"oben", ",", "II"}]]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413595788748*^9, 3.566413604730227*^9}, {
3.5664138496182423`*^9, 3.566413852914188*^9}, {3.5664172604677753`*^9,
3.5664172659954042`*^9}, {3.566417462405601*^9, 3.566417465982563*^9}, {
3.5664187883821297`*^9, 3.566418790805861*^9}, 3.566462883440152*^9}],
Cell[BoxData[
TemplateBox[{"0.05630382655314801`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.566413602619113*^9, 3.5664136050051537`*^9},
3.566413853330969*^9, 3.566415031488805*^9, 3.5664150943028173`*^9,
3.5664152865403767`*^9, 3.566415352194001*^9, {3.566417267815569*^9,
3.56641728474636*^9}, 3.56641738194198*^9, 3.56641746640886*^9,
3.56641879136887*^9, 3.56645651454703*^9, 3.566462884990739*^9,
3.5664633452880363`*^9, 3.5664645895641937`*^9, 3.566465756240288*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "II"}]], "=",
RowBox[{
FractionBox[
RowBox[{"\[Pi]", " ",
SubscriptBox["\[CapitalDelta]T",
RowBox[{"oben", ",", "II"}]]}],
SuperscriptBox[
SubscriptBox["T",
RowBox[{"oben", ",", "II"}]], "2"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413681720048*^9, 3.566413748696438*^9}, {
3.566413855794153*^9, 3.566413863833433*^9}, {3.566417287240891*^9,
3.566417295474732*^9}, {3.566417441918975*^9, 3.566417475309024*^9}, {
3.566418794301804*^9, 3.566418797517473*^9}, {3.566457436779204*^9,
3.566457436907076*^9}, 3.5664629180233917`*^9}],
Cell[BoxData[
TemplateBox[{"0.000977519567406733`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566413749146556*^9, 3.566413864296844*^9,
3.566415031562516*^9, 3.5664150958247833`*^9, 3.5664152921305733`*^9,
3.566415353714468*^9, 3.5664172959548683`*^9, 3.566417383528458*^9,
3.566417442368752*^9, 3.566417475991418*^9, 3.566418798230929*^9,
3.566456514697394*^9, 3.5664574375566387`*^9, 3.566462918574931*^9,
3.566463345471781*^9, 3.566464589731756*^9, 3.566465756390012*^9}]
}, Open ]],
Cell[TextData[{
"Nun bestimmen wir ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "\[CapitalIota]"}]], TraditionalForm]]],
":"
}], "Text",
CellChangeTimes->{{3.566419016055272*^9, 3.566419035180059*^9}, {
3.566457298016473*^9, 3.566457298016551*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"oben", ",", "schweb", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "schweb", ",", "1"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "20"}],
"&"}]}], "]"}], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416344367093*^9, 3.566416404499189*^9}, {
3.5664164749772043`*^9, 3.5664164803566027`*^9}, 3.5664165186680202`*^9, {
3.5664165522816677`*^9, 3.566416554473386*^9}, {3.566416667930216*^9,
3.566416697488927*^9}, {3.566418872129775*^9, 3.566418886836277*^9}, {
3.56641892783801*^9, 3.566418932070135*^9}, 3.5664189647335033`*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.868`", ",", "0.419`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.45`", ",", "0.73`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.051`", ",", "0.997`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"5.605`", ",", "1.307`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.192`", ",", "1.552`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.843`", ",", "1.818`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.435`", ",", "2.018`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.024`", ",", "2.24`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.633`", ",", "2.417`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.239`", ",", "2.595`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.848`", ",", "2.75`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.469`", ",", "2.861`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.566416365943509*^9, 3.566416383937974*^9},
3.566416480807665*^9, 3.566416519318247*^9, 3.5664165549251204`*^9, {
3.566416668287786*^9, 3.56641669808327*^9}, 3.5664168622938766`*^9,
3.566417345454031*^9, {3.566418938148533*^9, 3.566418990247615*^9},
3.566456514797574*^9, 3.566463345555728*^9, 3.566464589771144*^9,
3.566465756490879*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"oben", ",", "schweb", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "schweb", ",", "1"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "20"}],
"&"}]}], "]"}], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416788206684*^9, 3.566416811680894*^9}, {
3.566418975598394*^9, 3.5664189928204*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.118`", ",",
RowBox[{"-", "0.513`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.672`", ",",
RowBox[{"-", "0.846`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.299`", ",",
RowBox[{"-", "1.157`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.829`", ",",
RowBox[{"-", "1.445`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.442`", ",",
RowBox[{"-", "1.69`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.031`", ",",
RowBox[{"-", "1.978`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.672`", ",",
RowBox[{"-", "2.2`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.264`", ",",
RowBox[{"-", "2.444`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.859`", ",",
RowBox[{"-", "2.6`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.456`", ",",
RowBox[{"-", "2.8`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.039`", ",",
RowBox[{"-", "2.933`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"17.629`", ",",
RowBox[{"-", "3.11`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.251`", ",",
RowBox[{"-", "3.199`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.566416813683556*^9, 3.566416863962236*^9, 3.5664173476919193`*^9, {
3.566418983803308*^9, 3.566418993302281*^9}, 3.566456514844949*^9,
3.5664633455913477`*^9, 3.566464589817276*^9, 3.566465756620413*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"oben", ",", "schweb", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "schweb", ",", "2"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "20"}],
"&"}]}], "]"}], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416344367093*^9, 3.566416404499189*^9}, {
3.5664164749772043`*^9, 3.5664164803566027`*^9}, 3.5664165186680202`*^9, {
3.5664165522816677`*^9, 3.566416554473386*^9}, {3.566416667930216*^9,
3.566416697488927*^9}, {3.566418872129775*^9, 3.566418886836277*^9}, {
3.56641892783801*^9, 3.566418932070135*^9}, 3.5664189647335033`*^9, {
3.566418998515291*^9, 3.566419001113822*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.514`", ",", "3.739`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.039`", ",", "3.691`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.674`", ",", "3.618`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"5.283`", ",", "3.496`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.871`", ",", "3.326`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.449`", ",", "3.156`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.055`", ",", "2.962`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.677`", ",", "2.719`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.246`", ",", "2.451`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.849`", ",", "2.208`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.49`", ",", "1.965`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.112`", ",", "1.674`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.673`", ",", "1.382`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.566416365943509*^9, 3.566416383937974*^9},
3.566416480807665*^9, 3.566416519318247*^9, 3.5664165549251204`*^9, {
3.566416668287786*^9, 3.56641669808327*^9}, 3.5664168622938766`*^9,
3.566417345454031*^9, {3.566418938148533*^9, 3.566419001800186*^9},
3.56645651489573*^9, 3.566463345637734*^9, 3.566464589854108*^9,
3.5664657566703043`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"oben", ",", "schweb", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"oben", ",", "schweb", ",", "2"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "20"}],
"&"}]}], "]"}], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416788206684*^9, 3.566416811680894*^9}, {
3.566418975598394*^9, 3.566419006493784*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1.27`", ",",
RowBox[{"-", "3.478`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.836`", ",",
RowBox[{"-", "3.429`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.433`", ",",
RowBox[{"-", "3.308`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.089`", ",",
RowBox[{"-", "3.21`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.675`", ",",
RowBox[{"-", "3.016`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.25`", ",",
RowBox[{"-", "2.822`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.874`", ",",
RowBox[{"-", "2.603`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.471`", ",",
RowBox[{"-", "2.409`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.109`", ",",
RowBox[{"-", "2.117`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.693`", ",",
RowBox[{"-", "1.874`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"17.325`", ",",
RowBox[{"-", "1.558`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.885`", ",",
RowBox[{"-", "1.315`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.946`", ",",
RowBox[{"-", "1.291`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.566416813683556*^9, 3.566416863962236*^9, 3.5664173476919193`*^9, {
3.566418983803308*^9, 3.566419006927163*^9}, 3.566456514943626*^9,
3.566463345708805*^9, 3.5664645899005537`*^9, 3.5664657567068996`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["periods",
RowBox[{"oben", ",", "I"}]], "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Flatten", "[",
RowBox[{"Differences", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Part", "[",
RowBox[{"#", ",", "All", ",", "1"}], "]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{
SubscriptBox["max",
RowBox[{"oben", ",", "schweb", ",", "1"}]], ",",
SubscriptBox["min",
RowBox[{"oben", ",", "schweb", ",", "1"}]], ",",
SubscriptBox["max",
RowBox[{"oben", ",", "schweb", ",", "2"}]], ",",
SubscriptBox["min",
RowBox[{"oben", ",", "schweb", ",", "2"}]]}], "}"}]}], ")"}]}],
"]"}], ",",
RowBox[{
RowBox[{"#", ">", "1"}], "&"}]}], "]"}], "//",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"#", ",", "\"\\""}], "]"}], "&"}]}]}]], "Input",
CellChangeTimes->{{3.566416950448785*^9, 3.566417094263796*^9}, {
3.566417128819862*^9, 3.566417220526993*^9}, {3.5664172740031776`*^9,
3.56641728085063*^9}, 3.566417453279512*^9, {3.566419061101471*^9,
3.566419071899342*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"1.5820000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.601`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5540000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5869999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6509999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5920000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5889999999999986`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.609`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6060000000000016`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6089999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6210000000000022`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5539999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.627`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5299999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6130000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5890000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.641`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5919999999999987`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5950000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5969999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.583000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5899999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6219999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5250000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6349999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6090000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.588`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5779999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6059999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6219999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5690000000000008`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6029999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6409999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6219999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.561`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5659999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.597`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6560000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5859999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5750000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6240000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5969999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.638`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5839999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6319999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5600000000000023`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )]}], "}"}]], "Output",
CellChangeTimes->{{3.566417037145218*^9, 3.5664170852269993`*^9}, {
3.566417129680561*^9, 3.566417140647348*^9}, {3.56641717581981*^9,
3.5664172224107037`*^9}, 3.566417281888981*^9, 3.5664173767611523`*^9,
3.566417453831401*^9, 3.5664190738211184`*^9, 3.566456515360544*^9,
3.566463346408141*^9, 3.5664645902868347`*^9, 3.5664657570951033`*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["T",
RowBox[{"oben", ",", "I"}]], "=",
RowBox[{"Mean", "[",
SubscriptBox["periods",
RowBox[{"oben", ",", "I"}]], "]"}]}], ";",
RowBox[{
SubscriptBox["\[CapitalDelta]T",
RowBox[{"oben", ",", "I"}]], "=",
RowBox[{"StandardDeviation", "[",
SubscriptBox["periods",
RowBox[{"oben", ",", "I"}]], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.5664135644395313`*^9, 3.5664135932825413`*^9}, {
3.566413840931016*^9, 3.566413846450987*^9}, {3.5664172409639*^9,
3.566417250652793*^9}, {3.566417447558818*^9, 3.5664174599257507`*^9}, {
3.566419079227153*^9, 3.5664190868506804`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "I"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]"}],
SubscriptBox["T",
RowBox[{"oben", ",", "I"}]]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413595788748*^9, 3.566413604730227*^9}, {
3.5664138496182423`*^9, 3.566413852914188*^9}, {3.5664172604677753`*^9,
3.5664172659954042`*^9}, {3.566417462405601*^9, 3.566417465982563*^9}, {
3.566419089370288*^9, 3.566419093497917*^9}}],
Cell[BoxData[
TemplateBox[{"3.9319056991111294`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.566413602619113*^9, 3.5664136050051537`*^9},
3.566413853330969*^9, 3.566415031488805*^9, 3.5664150943028173`*^9,
3.5664152865403767`*^9, 3.566415352194001*^9, {3.566417267815569*^9,
3.56641728474636*^9}, 3.56641738194198*^9, 3.56641746640886*^9,
3.566419094127233*^9, 3.566456515582231*^9, 3.566463346722084*^9,
3.566464590416081*^9, 3.5664657571925793`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "I"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]", " ",
SubscriptBox["\[CapitalDelta]T",
RowBox[{"oben", ",", "I"}]]}],
SuperscriptBox[
SubscriptBox["T",
RowBox[{"oben", ",", "I"}]], "2"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413681720048*^9, 3.566413748696438*^9}, {
3.566413855794153*^9, 3.566413863833433*^9}, {3.566417287240891*^9,
3.566417295474732*^9}, {3.566417441918975*^9, 3.566417475309024*^9}, {
3.566419096690737*^9, 3.566419099641781*^9}, 3.566457413356983*^9}],
Cell[BoxData[
TemplateBox[{"0.07271741586007148`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566413749146556*^9, 3.566413864296844*^9,
3.566415031562516*^9, 3.5664150958247833`*^9, 3.5664152921305733`*^9,
3.566415353714468*^9, 3.5664172959548683`*^9, 3.566417383528458*^9,
3.566417442368752*^9, 3.566417475991418*^9, 3.566419100354113*^9,
3.5664565157169724`*^9, 3.566457414104844*^9, 3.566463347007823*^9,
3.566464590535701*^9, 3.5664657573150473`*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Vergleich der Frequenzen", "Subsection",
CellChangeTimes->{{3.5664192234035397`*^9, 3.566419225883049*^9}}],
Cell[TextData[{
"Aus den nun ermittelten Frequenzen f\[UDoubleDot]r symmetrische und \
antisymmetrische Schwingung lassen sich die theoretischen Werte \
f\[UDoubleDot]r Schwingungs- und Schwebungsfrequenzen ermitteln und so ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "\[CapitalIota]"}]], TraditionalForm]],
FormatType->"TraditionalForm"],
" und ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "\[CapitalIota]\[CapitalIota]"}]], TraditionalForm]],
FormatType->"TraditionalForm"],
" \[Dash] theoretisch und gemessen \[Dash] vergleichen."
}], "Text",
CellChangeTimes->{{3.566419229791676*^9, 3.56641924760608*^9}, {
3.566419301202628*^9, 3.56641932532911*^9}, {3.566420149884088*^9,
3.5664202174507093`*^9}}],
Cell[TextData[{
"(",
Cell[BoxData[
FormBox[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "\[CapitalIota]"}]], "=", " ",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "1"}]], "+",
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "2"}]]}], ")"}]}]}], TraditionalForm]]],
" und ",
Cell[BoxData[
FormBox[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "\[CapitalIota]"}]], "=",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "1"}]], "+",
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "2"}]]}], ")"}]}]}], TraditionalForm]]],
", ",
Cell[BoxData[
FormBox[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "\[CapitalIota]\[CapitalIota]"}]], "=", " ",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "2"}]], "-",
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "1"}]]}], ")"}]}]}], TraditionalForm]]],
" und ",
Cell[BoxData[
FormBox[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "\[CapitalIota]\[CapitalIota]"}]], "=",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "1"}]], "+",
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "2"}]]}], ")"}]}]}], TraditionalForm]]],
")"
}], "Text",
CellChangeTimes->{{3.5664552216800623`*^9, 3.5664553469281273`*^9}, {
3.566455455763569*^9, 3.56645545761178*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "I", ",", "theor"}]], "=",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "1"}]], "+",
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "2"}]]}], ")"}]}]}]], "Input",
CellChangeTimes->{{3.566457600153709*^9, 3.566457616332611*^9}, {
3.5664582669581337`*^9, 3.5664582872466993`*^9}}],
Cell[BoxData[
TemplateBox[{"3.9737618321017028`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{
3.5664576205921507`*^9, {3.56645826866374*^9, 3.566458288048279*^9},
3.5664633471590652`*^9, 3.5664645906007338`*^9, 3.566465757377355*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "I", ",", "theor"}]], "=",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "1"}]], "+",
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "2"}]]}], ")"}]}]}]], "Input",
CellChangeTimes->{{3.566457626926803*^9, 3.566457632702582*^9}}],
Cell[BoxData[
TemplateBox[{"0.07239173013338732`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566457633296639*^9, 3.566463347259461*^9,
3.566464590649287*^9, 3.5664657574280443`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "II", ",", "theor"}]], "=",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "2"}]], "-",
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "1"}]]}], ")"}]}]}]], "Input",
CellChangeTimes->{{3.566457640925796*^9, 3.566457645781568*^9}}],
Cell[BoxData[
TemplateBox[{"0.055858374523012566`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566457646269865*^9, 3.5664633473592567`*^9,
3.566464590700718*^9, 3.566465757524777*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "II", ",", "theor"}]], "=",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "2"}]], "+",
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "1"}]]}], ")"}]}]}]], "Input",
CellChangeTimes->{{3.566457651229074*^9, 3.566457661692594*^9}}],
Cell[BoxData[
TemplateBox[{"0.07239173013338732`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566457662260446*^9, 3.566463347526746*^9,
3.566464590749896*^9, 3.5664657578096857`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"Null", ",",
RowBox[{"Text", "[", "\"\\"", "]"}], ",",
RowBox[{"Text", "[", "\"\\"", "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
"Text", "[",
"\"\<\!\(\*SubscriptBox[\(\[Omega]\), \(oben, \
\[CapitalIota]\)]\)\>\"", "]"}], ",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "I", ",", "theor"}]], ",", "3"}], "]"}],
"\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "I", ",", "theor"}]], ",", "1"}], "]"}]}],
",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "I"}]], ",", "3"}], "]"}], "\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "I"}]], ",", "1"}], "]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
"Text", "[",
"\"\<\!\(\*SubscriptBox[\(\[Omega]\), \(oben, \[CapitalIota]\
\[CapitalIota]\)]\)\>\"", "]"}], ",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "II", ",", "theor"}]], ",", "1"}], "]"}],
"\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "II", ",", "theor"}]], ",", "1"}], "]"}]}],
",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "II"}]], ",", "3"}], "]"}], "\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "II"}]], ",", "1"}], "]"}]}]}], "}"}]}],
"}"}], ",",
RowBox[{"Frame", "\[Rule]", "All"}]}], "]"}]], "Input",
CellChangeTimes->{{3.5664576787642727`*^9, 3.566457789085693*^9}, {
3.566457819457388*^9, 3.566458019263232*^9}, {3.5664581445370483`*^9,
3.566458154319097*^9}, {3.566458249632433*^9, 3.566458258711831*^9}, {
3.566458298157398*^9, 3.5664583803127813`*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{"",
InterpretationBox[Cell[BoxData[
FormBox["\<\"Theoretischer Wert\"\>", TextForm]], "InlineText"],
Text["Theoretischer Wert"]],
InterpretationBox[Cell[BoxData[
FormBox["\<\"Gemessener Wert\"\>", TextForm]], "InlineText"],
Text["Gemessener Wert"]]},
{
InterpretationBox[Cell[BoxData[
FormBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Omega]\\), \\(oben, \
\[CapitalIota]\\)]\\)\"\>", TextForm]], "InlineText"],
Text["\!\(\*SubscriptBox[\(\[Omega]\), \(oben, \[CapitalIota]\)]\)"]],
RowBox[{
TagBox[
TemplateBox[{
InterpretationBox[
"\"3.97\"", 3.9737618321017028`, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 3]& ], "\[PlusMinus]",
TagBox[
TemplateBox[{
InterpretationBox[
"\"0.07\"", 0.07239173013338732, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 1]& ]}],
RowBox[{
TagBox[
TemplateBox[{
InterpretationBox[
"\"3.93\"", 3.9319056991111294`, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 3]& ], "\[PlusMinus]",
TagBox[
TemplateBox[{
InterpretationBox[
"\"0.07\"", 0.07271741586007148, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 1]& ]}]},
{
InterpretationBox[Cell[BoxData[
FormBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Omega]\\), \\(oben, \
\[CapitalIota]\[CapitalIota]\\)]\\)\"\>", TextForm]], "InlineText"],
Text[
"\!\(\*SubscriptBox[\(\[Omega]\), \(oben, \
\[CapitalIota]\[CapitalIota]\)]\)"]],
RowBox[{
TagBox[
TemplateBox[{
InterpretationBox[
"\"0.06\"", 0.055858374523012566`, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 1]& ], "\[PlusMinus]",
TagBox[
TemplateBox[{
InterpretationBox[
"\"0.07\"", 0.07239173013338732, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 1]& ]}],
RowBox[{
TagBox[
TemplateBox[{
InterpretationBox[
"\"0.0563\"", 0.05630382655314801, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 3]& ], "\[PlusMinus]",
TagBox[
TemplateBox[{
InterpretationBox[
"\"0.001\"", 0.000977519567406733, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 1]& ]}]}
},
AutoDelete->False,
GridBoxFrame->{"Columns" -> {{True}}, "Rows" -> {{True}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{3.566458020441966*^9, 3.566458155267816*^9,
3.566458252040106*^9, 3.5664583495151653`*^9, 3.566458380859438*^9,
3.5664629256201468`*^9, 3.566463347997623*^9, 3.5664645910715714`*^9,
3.56646575810253*^9}]
}, Open ]],
Cell[TextData[{
"Wir stellen fest, da\[SZ] insbesondere der relative Fehler auf ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "\[CapitalIota]\[CapitalIota]"}]], TraditionalForm]]],
" sehr gro\[SZ] ist, nichtsdestoweniger alle Werte innerhalb ihrer \
Fehlergrenzen \[UDoubleDot]bereinstimmen."
}], "Text",
CellChangeTimes->{{3.566455472761331*^9, 3.566455509949729*^9}, {
3.566462933834393*^9, 3.566462937259933*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell["Kopplungsgrad", "Subsection",
CellChangeTimes->{{3.5664202435408382`*^9, 3.566420263483097*^9}}],
Cell["\<\
Nun berechnen wir den Kopplungsgrad aus den gemessenen Frequenzen:\
\>", "Text",
CellChangeTimes->{{3.566420251987905*^9, 3.566420272170669*^9}, {
3.566420368620953*^9, 3.566420368840745*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Kappa]", "oben"], "=",
FractionBox[
RowBox[{
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "2"}]], "2"], "-",
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "1"}]], "2"]}],
RowBox[{
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "2"}]], "2"], "+",
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "1"}]], "2"]}]]}]], "Input",
CellChangeTimes->{{3.566455520937298*^9, 3.5664555748032703`*^9}, {
3.566463509206944*^9, 3.566463509406789*^9}}],
Cell[BoxData["0.02810804562762325`"], "Output",
CellChangeTimes->{3.566455578139165*^9, 3.566456515899137*^9,
3.566462942240469*^9, 3.5664633483428497`*^9, 3.566463517800334*^9,
3.566464591233555*^9, 3.5664657584427557`*^9}]
}, Open ]],
Cell["\<\
Mit Gau\[SZ]\[CloseCurlyQuote]scher Fehlerfortpflanzung ergibt sich\
\>", "Text",
CellChangeTimes->{{3.566456206521078*^9, 3.5664562161230917`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Kappa]", "oben"], "=",
RowBox[{
FractionBox[
RowBox[{"4",
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "1"}]], " ",
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "2"}]]}],
SuperscriptBox[
RowBox[{"(",
RowBox[{
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "2"}]], "2"], "+",
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "1"}]], "2"]}], ")"}], "2"]],
SqrtBox[
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "1"}]],
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "2"}]]}], ")"}], "2"], "+",
SuperscriptBox[
RowBox[{"(",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"oben", ",", "2"}]],
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"oben", ",", "1"}]]}], ")"}], "2"]}]]}]}]], "Input",
CellChangeTimes->{{3.566455582521412*^9, 3.566455587051407*^9}, {
3.566456219233301*^9, 3.566456292189419*^9}, {3.5664629441574*^9,
3.566462945011443*^9}, {3.5664635125996*^9, 3.566463515328165*^9}}],
Cell[BoxData["0.025747940974762046`"], "Output",
CellChangeTimes->{3.566456295268393*^9, 3.566456516399626*^9,
3.5664629459388123`*^9, 3.566463348770463*^9, 3.5664635163863697`*^9,
3.566464591695199*^9, 3.566465758878024*^9}]
}, Open ]],
Cell[TextData[{
"Auch hier ist der relative Fehler sehr gro\[SZ]. Wir k\[ODoubleDot]nnen mit \
diesem Ergebnis lediglich die Gr\[ODoubleDot]\[SZ]enordnung von ",
Cell[BoxData[
FormBox["\[Kappa]", TraditionalForm]]],
" einsch\[ADoubleDot]tzen."
}], "Text",
CellChangeTimes->{{3.566456313939301*^9, 3.566456349751225*^9}, {
3.5664635310311537`*^9, 3.566463531231793*^9}}],
Cell["", "PageBreak",
PageBreakBelow->True]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["\<\
Mittelstarke Kopplung (Aufh\[ADoubleDot]ngung in der Mitte)\
\>", "Section",
CellChangeTimes->{{3.566420415771991*^9, 3.566420421800921*^9}}],
Cell["\<\
Hinweis: Alle Rechnungen gleichen denen unter \[RightGuillemet]Schwache \
Kopplung\[LeftGuillemet], daher wurde auf redundante Kommentierung verzichtet.\
\>", "Text",
CellChangeTimes->{{3.566420425344564*^9, 3.56642048922003*^9}}],
Cell["\<\
Die Aufh\[ADoubleDot]ngung der Feder befand sich hier bei\
\>", "Text",
CellChangeTimes->{{3.566415594191719*^9, 3.566415638364727*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["l", "mitte"], "=",
RowBox[{"Quantity", "[",
RowBox[{"15.5", ",", "\"\\""}], "]"}]}]], "Input",
CellChangeTimes->{{3.5664156413819637`*^9, 3.566415677841835*^9}, {
3.566456438563306*^9, 3.566456450698697*^9}}],
Cell[BoxData[
TemplateBox[{"15.5`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"cm\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: centimeters"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Centimeters\""}], "]"}]& )]], "Output",
CellChangeTimes->{3.566415678959667*^9, 3.5664564530836143`*^9,
3.566456516627063*^9, 3.566463348945929*^9, 3.5664645918003807`*^9,
3.5664657591559963`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]l", "mitte"], "=",
RowBox[{"Quantity", "[",
RowBox[{"0.1", ",", "\"\\""}], "]"}]}]], "Input",
CellChangeTimes->{{3.5664156797709217`*^9, 3.566415691630045*^9}, {
3.566456453534399*^9, 3.5664564538511553`*^9}}],
Cell[BoxData[
TemplateBox[{"0.1`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"cm\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: centimeters"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Centimeters\""}], "]"}]& )]], "Output",
CellChangeTimes->{3.566415692080596*^9, 3.566456455717495*^9,
3.566456516684526*^9, 3.566463349044075*^9, 3.566464591834537*^9,
3.566465759194566*^9}]
}, Open ]],
Cell["\<\
Wir importieren zun\[ADoubleDot]chst wieder die Rohdaten:\
\>", "Text",
CellChangeTimes->{{3.5664157071366663`*^9, 3.566415712766675*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"time", ",", "p1", ",", "p2"}], "}"}], "=",
RowBox[{"Transpose", "[",
RowBox[{"Import", "[",
RowBox[{
"\"\\"", ",", "\"\\""}],
"]"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566415733208415*^9, 3.566415742796677*^9}, {
3.5664564628035707`*^9, 3.566456463128696*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "asym", ",", "1"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p1"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566405351112589*^9, 3.566405357447461*^9}, {
3.56640544960851*^9, 3.566405474501894*^9}, {3.566405878244103*^9,
3.5664058812828007`*^9}, {3.566406623173218*^9, 3.566406650963872*^9}, {
3.566406681345848*^9, 3.5664066820338078`*^9}, {3.566406750765345*^9,
3.566406752245111*^9}, {3.5664068340642033`*^9, 3.566406978710898*^9}, {
3.5664071823293343`*^9, 3.566407190896555*^9}, {3.5664157551585693`*^9,
3.5664157724838877`*^9}, {3.566415848992949*^9, 3.5664158492234583`*^9}, {
3.566456465923169*^9, 3.566456466306416*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "asym", ",", "2"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p2"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.56641041393626*^9, 3.566410422064912*^9}, {
3.566415777189785*^9, 3.5664157786755123`*^9}, {3.566415852231278*^9,
3.566415852527092*^9}, {3.566456469378828*^9, 3.566456469769991*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"time", ",", "p1", ",", "p2"}], "}"}], "=",
RowBox[{"Transpose", "[",
RowBox[{"Import", "[",
RowBox[{
"\"\\"", ",", "\"\\""}], "]"}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566415791171216*^9, 3.566415792488168*^9}, {
3.566456473259087*^9, 3.5664564736577387`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "sym", ",", "1"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p1"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566405351112589*^9, 3.566405357447461*^9}, {
3.56640544960851*^9, 3.566405474501894*^9}, {3.566405878244103*^9,
3.5664058812828007`*^9}, {3.566406623173218*^9, 3.566406650963872*^9}, {
3.566406681345848*^9, 3.5664066820338078`*^9}, {3.566406750765345*^9,
3.566406752245111*^9}, {3.5664068340642033`*^9, 3.566406978710898*^9}, {
3.5664071823293343`*^9, 3.566407190896555*^9}, {3.5664157551585693`*^9,
3.5664157724838877`*^9}, 3.5664158119699497`*^9, {3.56641586288662*^9,
3.5664158631188993`*^9}, {3.566456475632914*^9, 3.566456476025807*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "sym", ",", "2"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p2"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.56641041393626*^9, 3.566410422064912*^9}, {
3.566415777189785*^9, 3.5664157786755123`*^9}, 3.566415815385363*^9, {
3.566415865766223*^9, 3.56641586599216*^9}, {3.5664564778260803`*^9,
3.566456478225603*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"time", ",", "p1", ",", "p2"}], "}"}], "=",
RowBox[{"Transpose", "[",
RowBox[{"Import", "[",
RowBox[{
"\"\\"", ",", "\"\\""}], "]"}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566415791171216*^9, 3.566415792488168*^9}, {
3.566415834488915*^9, 3.56641583536876*^9}, {3.566456481090536*^9,
3.566456481525543*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "schweb", ",", "1"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p1"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566405351112589*^9, 3.566405357447461*^9}, {
3.56640544960851*^9, 3.566405474501894*^9}, {3.566405878244103*^9,
3.5664058812828007`*^9}, {3.566406623173218*^9, 3.566406650963872*^9}, {
3.566406681345848*^9, 3.5664066820338078`*^9}, {3.566406750765345*^9,
3.566406752245111*^9}, {3.5664068340642033`*^9, 3.566406978710898*^9}, {
3.5664071823293343`*^9, 3.566407190896555*^9}, {3.5664157551585693`*^9,
3.5664157724838877`*^9}, 3.5664158119699497`*^9, {3.566415845159831*^9,
3.566415872266081*^9}, {3.5664564842404213`*^9, 3.5664564846651278`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "schweb", ",", "2"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p2"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566405351112589*^9, 3.566405357447461*^9}, {
3.56640544960851*^9, 3.566405474501894*^9}, {3.566405878244103*^9,
3.5664058812828007`*^9}, {3.566406623173218*^9, 3.566406650963872*^9}, {
3.566406681345848*^9, 3.5664066820338078`*^9}, {3.566406750765345*^9,
3.566406752245111*^9}, {3.5664068340642033`*^9, 3.566406978710898*^9}, {
3.5664071823293343`*^9, 3.566407190896555*^9}, {3.5664157551585693`*^9,
3.5664157724838877`*^9}, 3.5664158119699497`*^9, {3.566415845159831*^9,
3.566415872266081*^9}, {3.5664564842404213`*^9, 3.5664564846651278`*^9}, {
3.566456547732293*^9, 3.5664565495801907`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{", " ",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "sym", ",", "1"}]], ",",
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "sym", ",", "2"}]]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}]}], "]"}]], "Input",
CellChangeTimes->{{3.566417491347795*^9, 3.566417494211622*^9}, {
3.56645655185375*^9, 3.566456554460984*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {
{RGBColor[0.24720000000000014`, 0.24, 0.6], LineBox[CompressedData["
1:eJxdXXWcXdXVDcE9IS4kE5fJJOM+8+5zdwtapLhT3EvRUqy481G0ULw4PLRA
cXdKsGAhCXHly6z1Zu3fTf5gODPv3nvO2WvtvfY+5543YZ8jcvsNHDBgwHnb
DhjQ97Pj4VeOe+amaz3Xv1hz/9EHfuI5Yqe/PPvf/3vJ49vru7cnfvZqJXDB
ofPX3PWO5+Cnjrls5GaLKodtaC1+9wvPiT9ObdjqntWVK/19H5jnuWfsrn/s
+t+6SqLtfO9e333ruf26vhuurdSeO/yTN1fM94w/++fsY+NWVHB58ifPpM9W
nXbwU4sqG26y4cqfPRc/v2z67hd/Xf37r54JG3pz6YKnKhseWtqhbpGnr1fB
R97zpPYZNLfj4UWeMXO+mLzFn3/0zMUAFnvw61d+88zYve9Ov3m+ua2vA8s9
7P+Sav/Xenbu62Z6meeonm0++seR6zyXLjjF07Ln8up16z0r831XLq/2b61n
f/xb6Vl0x3/ibeevql63ynMgLlxaHfcqz7Ho6ALP8ul9N1rtwTS8/Wn/PHiu
vQb/Knj8heuq/fmyOj/rPL9smJ2zf15QGdU33Ad/9/z2bnLDkJZV+HOAg1/f
sKoyYsOn898McHj/tZVpmMBNnP75f2tF3wA2cTDdZ6+rwIyrNnH67YFh7j5Q
93upz+yXDnQw3aesqHAeBzq3Htk30KVVe2zqoJv5hRXO+6bOe33d6vihwnFv
5jyyZN37J/z4YaXvr1f4N3MevGHhhhl7tFKH/9nMwbCv+nDDXD8R3W7g5g7n
9WtPX6v23M2dfnteeNXhGxC4uYOPH/6b50+Y6C2cyLyTht4bXuYJ4UFbOP32
6Lt6+CdbOLTrGs+NfY9t29Lpty/xsaWTwY3Xe57rg9ESa6M7tVvp82v7hrvP
Vg5/rq3icCvnlmDfg1d6OO6tHeJ+WRVnWzs7YKCLPKDT6G2q8/GTh+PYxunH
A/u7jcN+vuohvret2uOtCnm4rUO+zKvw99tWr/++suHmG2ZqOyeGGy2u2n87
2Yv8287hz5WVdyb2AXl7p290PdusqQA+t20vfLC/O1Ttub5Cu+wgPPH5O+jz
7McOwtPL8b7f7KjnwYxX7Ojwucur+BhUnd/FFdppkHPyBmvOO+mXav8Gabwf
nLDBsZw3qDo/71Q4rkEOefxABbd5epDD57zgOR4TMkj4wu23H+yQR/PI4+7B
zgt97uX5BR7O12DhC3w9dnDVXks9+PXfBzvs9wra51+DZX/iYbBDnq2uPm+n
qj3WVfG0k9PvTwCLkLUB472tTdzvJPzxeTsJf3AzX+4kvJPPOznEyQoPpnHo
EId+exn9Y/OQKp+WePrYeMGhQ4RP+tkhDnnwnefVPvPfN8Q5Fcz83HN1H/3+
O6Tav9c9uHz+kGp/9qrATJsPdfrjQwEEGOr82udGn/ikgs8fMLRqrx+r/mJo
9fpFFfZzaNW+Syrk51Dnn31/HrS8Qn4Mdda/3weElRWEmbHDnFyfe8yurhCn
w4Q/+sdhwifc9jHDhGf6t2HCM8c7zKGd1lXeeL3v3zD5U8zPjsP1PIxjxnD1
h35tuPBNvgx3QJOFSyr0Z8OFd/JtuPAO+H3bf/1XnJ9NRjiMw+9W8HP8iOp8
3FnBvHaOEN7hno8bIbwThyMc+vX5HnT7sRHV8S30gPYfjRDeMW+/jXCIg6XE
w44jnf54SbuPFN4xriNGCo/E4UjhHZ+/c6RD3Kyrxk9rwz98NVJ4pz1HCe/0
76PkvzmOUcI7xztKfOQ8jBJfqQdGaXyAz5ujHOJ2IT8/bLTD339Df10/WvPH
54522O9nq3wZLX9zc5+7PWe0/DPi4RujHeqfb+m/fhot+8J/bTVG9gfeJ4yp
8mtpBWHHGSO8M+6OcWinFRXA8JYx8teYn8oY4ZP+bozwzjg0RvjGuEaMVZu4
HavPM36Odai71vDzV42VHoA5/j1W/eFzxzrUX8uq4x1bjZ+/Ve+/s/iOz2d2
dvr1HOdzZ/kHzufO8h8Yzq07V+fv8qo/31n+BzjYepzDOPWNh/FvnOLrnX0w
8Y6Tf8O4/zDOQbcnLvFgfk4ep3hN/IyT/6R/Hef06zb613HCO3E+XngnfsYL
v9DDOWtzPq1NfI7X/YG3t8YL35ifX8arP/SvNfLncC9TazQe+Lfmmqq9fvZQ
b9VU7fEt41euRv6c8abG4bjeZP+PrNF8o5un1lTx9nIFl/2tRvbC82+vcaj7
5xFvT9ZU/dWvFfK8xqHdfqtA535S47zWF17WLWU8mF/j9Ot/zkON9ALi8sAJ
Tn8+wfFOcE6HQF5Lf948QfjleCfIf3O81uZ4Jyg+0H9NcBhn1lA/nDrBoe5e
Rf//twnqD8c7oeoPqvx8akIVj79VpvQ9/rUJGj/iz8cTpIdhxx8mSM+AN8sn
VPHwQQVm3Xyi05/fAMczJlbxdn9Vv06s6pcvPOBLaGIV3997qMMnOv35Bq+b
WPX/i6v+eqLTn5/A7KdNFP453olVPbSCeujaiQ7zilUe2O3picI/8PD6ROEf
w/7U2ujX/InCO/z1cvs7xztJ98P8TJ8kPuBnyyThH58PTpJ/53gnyb/TvpPk
3+F2jppUHe9PVT01Sf4e83TRJOnvpr5/D02SnmG+MUl6k5+b5NBv/Y/x+H+T
HMat75mPLpjkMK/5mXhaN8npz2fx620nyz9Cns2e7PTnc3C7XZMd4ngV+ROb
LH9PfTpZ+MX8HjBZ/p/xcLLwjn6cY22klVfa9dTPk4V/+OsH7Hno5wuT3fng
O5Pl/4HjLyfL/1PnTHaoq5ZUyPPJGj/4se0UzQ/HP8VhnvAd/UfXFM03xz9F
egf42nVKNT/8D/F1wBRnAP59TH4cP2Wj/HGK8ke6tSkO5+lXz9I+GN0+perP
Flf98RTpH9D0pSnSP6v75ON7/dev9EDffjXFgZ17Vnswf4unSK8gPv8+RfiG
m9x+qtr0Z1Od/noC+umd6rjrEVOVT8CP7jHVgU6ds6qaP04VXxnPporPmOYL
pjr99Q/Q7pqpiofUZ1MVL0CLR6dK/9NOUx3G0a8Y7z6c6vTXW+DWv+3v7yPV
/Hmq/Bf99zSHuuf9Cu04TfoWOGyc5mAYO/1c4XOmSR8BR9lp0kfk9zTpa8ar
adLfwNup0+S/WU+ZJjzDD14/TXhnXJmmeEIcTBM/gJ+X7e/4+bFdT/82TfEJ
Zlw6TXxhvJ6u/tHvTVf8QH97pitfJ96naz5w292nS0/S70x3+utDiNsn9v/9
dfLrgumK3yzfTXfz5Y7pbr48Ol36ifaeXuXbD1V7T1d+THtPF1/gL5dMF18w
rs1mOOheaXm1rjdD+ARuWmcIz/Av/hnCO/KKgrURd/adIb4g7h1tbcavGVV9
uYZ8udjuj2m5fob4Cr7cO0N8pl6ZoXiI4b82w2He/Fu1zjlD8YTxe4biCfKp
lTMc5infeVCH2nKm9BXvM7OqH95mfap9ZlUPvEi9G5opPQW4lmdW/f83zA/3
myn9jMccO1P1Nsz3WTOlP5CXXjpT9R7qxJnCG3h1/0z5b+J4pvAKO741U3im
/p0p/rAOOVP4B83XzhQ/GN9q9Xf+vlbXUx/Xig/gV7hW/QMNdql168MDahUv
4Z+PqVW9gLqvVvEE/vmyWsVjjr9W/obxrVZ6i/lTrfwV9MCbtfJn1K21sh/z
m1rpL9htda3sD/5uM0v4YL41S/gh32eJL4BJYpbyV+Btt1ny77D7QbMUXxjf
ZkkfMb7PEv6ZX8wSf1hfsDbzN/s8532W+ML4Zs/H/M2bJf2FeVs0S/VW2Hn9
LNWTOI46h3Xcxfx8fZ30KD7fW1ft/1eMh8m66vM+qMa3OtUzcNlhdYr/0Ecn
1ynfBs/Or3Po9z6nPri2TnqC8a3OYR3/J+rtR+qc/vUK+vc65Sf0d3Ub1Uvr
hE/69zrhF/Fqk9niD2A+YrY7HjTPVj5N/Wpt8tg+j+ftN1vxi3ifrfwD/T5r
tvIl5F1/ny39iHHfPFv1M+J9tvQX8T5b8YV4ny2+ENazpW9hxp9nq/6E+6yd
Lb6Q73PEF/y+bo74QtzOUf5JvM8RP4C73eaIH9D1B82RnoefPHGO9D7tPUf+
G/N91RzFF+D0zjnCL+PbHOGbdrQ2pvm9OeIT+21/5++tjVENrNf90a+t66vz
t5LjGVOveIJxT6pXvIR/mFmv+hv0TUO99Cny4456zRf4561XPMH4IvXK18Gv
TL3yQ+KgXvZhvaNe/o56uV75OuLlEfVaP8D1J9SrXgW7n14vfQIZcU698IXP
X10v/BEn9YovsOsd9cpnEA7vrVf9FJ97tF74B/6etr8jPv6nXnzA9W/Wi2+A
9fv1Vf6vZDz6vF78gL2/tf7hcz/XKz+hXrXxwf+u6R/fAtbbBjZU6wvzK9A7
QxpUvwKNxzRIf0GvTGpQ/gh+1DaoXoV5b2xw+tdTMV2dDcpHgWNfg/QX8BVt
UL5CPdwg/8p42SD/S7/XIP+M5x7YIL4QBw3CKx57fIPye96nQfGG6y0Nwj/H
bX+Hma626yErb24QPxCfbrfnsb5u/cHj/t2geAjaPNMg/lO2NjiME4tYn3i9
QfkK3OmHDcpXqFcaqnr2f+T7t/3Xv1tdn2mQvwJPlzWIL8ybGpR/wk9v1qj4
wvy1sYrHb6rrD41O//oscDKlUXoMv69tVP6Cy5oalS/jY92NWl9F3PE3Cs/Q
G7FG8QfjzDeKD8DfbtaG39i3Ufyg7mlU/ACvjmpU/IJfOqlRfEE+e4b1Dzrh
/EatX1BfNio/o/0bVe+i3mqszucPrF/d1Sg9C39zX2O1XvkZ9eFjjYrnwM+z
jYr31HWNqr9TnzZKL8A/f9Aoe7Ou3Sg8oDvfNaoejHj3a6PwBN4vbxTeoAPW
NQqPrE81qd7K9ZAm6TXE0/FNWg8BDaY0qX6L+862Np7Xap/H83qalJ9QHzRJ
b2Eek03K56EHCk3qH/PDJuX31BVNiqeA3aFN4gtg8qcm1Qvh705ukh4Dj//S
pPUP4PeCJukxzOtlTbIPrr+uSXwB/v7RJL4Af/9skv3hvx5oUj0U8e7xJvlb
6KnnmqTvMQ+vNEmfAXdvN0mfAX8fN6keAP81r0nxB/PyQ5Pwj34vahI/8NwV
1mZe3Kw25nHLZvEP/R7VLH6ivxOaxRfyvlnxBbeZ0yy+AO/tzfIXeJzTrPng
enCz5gt2TjdrPmGnYrP0GHi7Z7P2UzDPb67a/0ni/fBm+T/087hm8YV+p1n5
C/B3drP0Ga67sFl6BfH28mblx7DLDc3SO3AjtzW76093NwvPuP7hZuGdurRZ
fGC9sVnxg/XlZvGHes2ux3M+szbm7Ztm8RNh6qdm8Rf5zZLm6vrSkup6jo2H
8b5F/oF8bxF/0N+xLeIL4sjkFvkjxKdZLfJXXG9vEV+gqzpb5O9o5xb5Q9g5
3iL7Q2/kW+RPcf2uLeIL/X2L9D305cEt0mesf7dI/9DftyifAc/ObBFfgN/z
WoRv4rhF/AFOr2kRH4hD+zvzLbue9YYWxTfq8RbxFfHm2Rbl+9Abr7SI79RF
Nj6up9j4Yb4vW6RfifsW6VvYb2GLu76yokXri4gXv7c4/fuvUA/eolX+Dv0f
1Cr+cD9Dq/QanjetVXxhfaNV/hf9bW8VvtDf3lbhD58Ltwqf+FiqVfqI9aBW
5Te4fs9W4R3+Yv9Wd33rcGuDV8fY9Vzfsjbi1dn2PK7vtSrfgr+4slXri7DT
Da3Sn8DRra2qD1Lft0q/0i/afMGuT7cqn8HzX2pVPgOcv9EqfYZ5e79V/o36
vlX+j/XIVtVD6VdbVS9lvt6q/J/5a6v0CvVdm/wz+ju8Tf6buqhNeIUbnNYm
/cR819rgUZu1We+wNuO7tWGvVJv4AX1QsufRv7eJH/TvbeI36yNtyl/w87g2
xReM+7Q2xRfM11ltyl/o39vED+K+Tf4J83V9m/wXeH5bm/wbrv9Xm9YDWF9q
U32MsrpN8YW0alO+i/6/0ab8hvlcm/iCvOOzNuU33B/TpvyG6+NtqjfTv7cJ
37R3m/gAfbNpu9rU89bGj3Htih/IP6e2K57h97PbFe+o59qlHzHsnnatrwDf
wXbVv9DfRLvDPOYHzlexXfV3XL9Hu9YjgZf92pU/Us+1K9/n/rT2anx9rrp+
3a58n/WidtU/ae928YP2bld9mfZuFz8Yz9ur+3UWcz3lX+3iB9fL2hVfaO92
xRfM9wvtii+4/o12xQfGfWujW59bm3mlXc9pbFe+Qn63S3/RTu3Sh8D7Zh3i
C8a9XYf4Dv8/vkP8oH7vUPwgvzu0f5X36VC+z3puh/J96rcOrbfA7qkO6QPg
rNSh9TTgbc8O5Svo7x87lK+ABod3SH/R3h2qJ6Ebp3TIP4OfZ3coP0D/L+wQ
P6jfOqTHyPMO5efA220d4gPMcE+H+ER+2/W0d4fiB/D2Yoc7nr1p/WG+1iG+
AG+fd4gv1BEd4gt1T4fiCfC2tEPru8zXOrSehes37xRfaO9OrYdx/1yn1iMZ
vzvFD/K7U3qC/O7U+gLjd6fyE65fdGp9AtOZ7hT+yItO7edifaZT/GA9rlP4
5npmp+ID6/2d4gOGeYb9Hdefa9cD15fY87DedHWn4gfwflOn8nnQ985O8Zt6
rVP1ceq1TtWL4Yef61S9mHlnp+rFwPlbNr94/sed8k/Mz8weXD81e3F9oVP2
RL60slP7danXOrWfEddv2eVwX8Qv1fWHLul38qJLegt2ntml+MF57BJ+uT7X
JXyzHmdt+Mlol3s9JGNtPGYXux900j5dih+YrwO7xAfq8y7xFzr0xC7pK9q7
S/ERfuH8LsVP9P/SLukr5u1dir/0413Sr6zHdCk/ZD2mS/EdfvDxLsV/5uNd
yk+oz7uUn+D573QpP+H+3C7pc+6P6ZJ+Rx73Y5f8MXi2qEt8wfyv7JI/h5k2
6RZfmI91y/+z/tot/GPeJnZLT7H+ap+HPmjq1v2536Zb9TnEG3+36ncwQ7xb
fMC+gFy3xsf6a7fqw5infbqlr5iPdWv+aO9uzS/Mc1K39pPic2d2yz60d7f0
Fez6927pZ/Dj6m7ZH37plm7pC8z3Xd3yp6jfPdAtfKFXj3erfoTrn+8WPtGv
V7uFX+Dk7W7hm/v5uhUfuF7YLT5wvbxb8QW6YbH9HXhbZfcj73v0PK6v9Cgf
AY/H9Ki/wOGkHre+mtUj/0B798h/cH9Rj/wL+d2j9y1Yb+2p8uu2ar2tR/sf
cf1uPdIDuH6fHukF2rtH/pH7zXvkP1lv69H6PettPfK/GMaFPdJXjNc90les
w/coP+D+2B7hm+8H9Aj/eM5DPeIH47X9Hde/2CN+cf9ij+IH9VmP+Mn8q0f8
Zb2lR3qKfsDGh2lcZuOnHu/R+izrq73aD4n7juiVfoWZanplD/j7ab1aX4T/
mtMrvcx+9UofsL7WK/2A68O9ihfAXaZX+gN8mtvrfr/oD73S+/B/B/YqfoB3
h/dKX2Gej+9V/oBxntErvHM/Wq/4gn5dYp9H/6/qFR/wmP+z59F/9yqe0X9b
f1lP7VX9ATx/vlf1K/i1V3qlN/n6Xq/qWeRzr/jB/fm9is/wOz+aPXD94l6t
n3A/TK/iP/2MR/k5/bdH9idPPMpXuX/bIzxBv83ySK9wP6hHfOA6lEd8YH7t
cdzvE3rc+ULB2sy3PMI/8y27H/Mtj+IF9bdH8QLXn+pRvQqwOsujeMd8y6P1
VOZbHuUbzLc8iqfU3x7Ve1lP8ajewfqpR3qK+2w8qpdU0w7xg/m1R/yA2/zQ
o3wT13/pET8wLd95xA/g6leP8AR8r/AIb6DFeo/yc/jbTR3hFc/bwpE/x+cG
O8I3/MtQR/gHzkY64hOmeazdDz8mOO568xRH/QF/pzuKb9XtKNJPuL7BUb2u
Wn5WfWIR0zvpJ5ih21H8Rf3PcVQfxM+go/oh12sd1Re5fuNU17M/pp7KOooX
3O/mKN8ALnZx3PuH93DkT/H8vRzxA/O0vyN/jH4c5EjvM3905M+pPxz3+0nH
OcI/68PWRjdPtc/Db51p9+P6kD2P++8cxTPEjcsc1RNA46sc1eMYzxzFS+Di
ZkfxADC81VE8AA7ucLR/Dvy5x1H+zfzF7ANePOwo/4ZueMxR/g2d9JTZH89/
1vDB+Gj4gT59xfAFt/e64Y962PCJeXzf8At8fWJ8QD3kC8M70sivrI16xHfW
hn1/dKSHANMF9jzgbLEjPvL9Akf1AvB6tSM+g3frHdUbMIyBXsUH+LvNvYqn
sO+OXtVroV+GeJXPwe+P9LrfFxnrlV7C+Gq8yrehryZ7hX/YZ7pXeoHrKV7p
b+Cu3iv8w8+1eIV/8tcrvQL+9XgVL2h3r/DLeOEVvunXvW78J+3z5LHdj3bx
Kh5AL+/iVTzA8/fwqj5LnHrFB/x+fxsv9/t5FR+pL2y+ME1He+VPUJ88zit/
g7hxslf5HOLt6V7xgfz1yp8BB+d6tR4IPl7gVT5BPnvFB/ihy7yq93P/j1f6
CdNwvVf1W9j7Zq/0Cn5/q1f5BR5zh1f8gL3v8ap+BBw/YG34g4etjXjxmF0P
f/+0PQ/z+KxX/AReXvKKv/Ajr3rFb/j7173SS9RHXq2XYx4/8CqfwPM/9kov
wd5feJVP4Pp5XtVrgZfvvVrPwPN/9Cq+w48u8EovUV95pQ9Aw+XGF+4/9Upf
YNrXe1WfQr460Kd8Fvbd1id8ks8+8YV89smfU4/7hH/y2Sf8Y5rG2/XoxmSf
9Brf57HnMR/3ib+wb4NPfEA8bPYpPgDm7T6Nl/slfMqvkSd5fcqvEc8DPuXX
mN+oT3zAY5M+5des3/ikl2Dfok/7s+Bvd/HJ3tyf6lN+CRzu7RNeELb286le
C397sE94g78/zCc8wk5H++SvAetjfeIHeH+ST/4ecfE0n/AOP/Bn+zvc7rnW
Znz2iQ9w2xfZ87lf2qf4AB5caf1HnLrOxocfN9n44b9v9Sk+wF53+lSfwPPv
tvllfPa51/ce9okP3A9k9oMueMqn9SngteKTPgBeXjR8ML8x/DBtMXxh2t7x
yR+jXx8YPhF/Pjb8ks8+9376ecYP+N/vjQ+Mz9Ymn+164Og3n/J77j/yqX6M
bq62/vE5Puk/7k/wSx/CPtv6VX/ierVf/gNxbKhf+3MwvpF+1Zvgb8f6ZQ/w
pMav+M7XzfziA/TPdL/yReifWX75R/jber/0BPW1X/GC8dmveMHzF/yKF+iW
16/6DuOzX/gln/3iB+YnaW3wLGdtwLJkbdZn/aq3Qv/sac+n37T+MR/0Kz4w
DvvFB/LIr/yJ++v8yq9Ao+P94gP3r/sVf8lnv/wR60FmH+DgHL/WmzAPF/il
p6BXL/GLD4gTl/mlp6HHrva717+v9yvfJp/9ihdcz/crXoCPd/qlr7ifxy9+
gHf3+93rbQ/73esfj1kb8fUpv/QSePCc3Q94edGej8+96le8oN72Sw9ivt8x
PnD/vl/+gO+j+hUvYK8v/YoX4OPXxg/Ya75f/ojHD/lV70AesdD4gXEt8Sv+
Mz82fmCYa/3azw1+DAiofs/31wOqX/K8kID8MWAwOODmw7CAe71gVED8gL/a
2drcrxJQfoDrp9jfcf0Mux/XOwPiA66vD4gPmPbWgHs9oiMgPuCy3oD8Afkc
UPyEfUIB1SMwzlhA6xP8GdD+AviNXED5NddPA8ovWKcIiA/QrXsGtB6F/VP7
BrRfl3EqoPUK8OCQgOr5yAOPCMjf8j3AgPwx1leODwifwMnJAflz4OP0gPCM
POovAeEd+4vOsTZu8zf7PH5eHBDfEF8vDyg+cL+t9Qf9vy6g+Aae3BxQPkE+
23iptwPu/cv3BDZ6Pyqg+h3js803Hvt4QHoK9306oPwC8fG5gPwb8PKfgPwf
7P3fgPwj3z8JSE9QbxueuF4ckB6Bzv3U8Mj9XwHpGdRVvja+oNvzDe94/k/W
hr0XWhv+d0lAegyPWW78gL3X2PPQzd8D0nfwB5sGxQ/gduug6mmY38FB+QO4
7WFB1Ztg35FB8QH+YOeg5pf7TYOqd7BeGlQ9hHwOyn64bV1QegD2aQgqn6De
Dko/kM9B4Yf7l4JuPviCqm/itqGg6j3AYzwoPYX5TQfFD+jNvLW5vy0o/GN+
d7O/A9d/CAr/GMcfg4oHrMcHFb/I+6D4AP91pI0H1x8T3Oh9l6DiA3B4SlD1
V+jFP9t88n3LoOqvmO/zg6p/gGZ/C7r5cGlQfID7udLsDdhdE1S+DVzdGJSe
AJ5vCYoPoMEdhi/Ep7uD4gPfrwjKfwOPDwWFV1z/aFD8YDwOCu/cj2lt+J8X
g8I/+P+qXQ87vxFUvIKZ3g5q/Z35suEf+PokqPhHfR10r0fMCyp+Ul8HpT9x
n5+Cir8Ia78GFS+Ag9+Cihfkb1D1Eda/gqqfYF7WB931lYEh+UfmyyHV64GH
wSHhC3F1WEh4pL4OCa/UZSHxgfMYEr65v8za4NWskPw/46/dj3o6JP8Pv9oR
Ej+Bv+6Q9BD8dsz6z/w3JHzzfJSQ8i3og2JI+pN2C6l+wfgacr/PtE9I+gfj
2T+k+irm75CQ8A2zHR7S+jTs/qeQ9A/fRwrJ38P/nRrS+SXo1p9DwjP811kh
9/kG51ub66kh4Zfvr1gb473CPo/5utaeh/m6ISQ847G3hJTP4LLbQ+Inrv9n
SPEM9r83pHiH+Xow5D6/5ZGQ3rcAn5+0+cVtKiH5F/jf50Nab4O7ezkk/cr3
10PKl7G94a2Q1hu4fz6k/ADXfRRy5wefh5QfANdfhaS3uf/S8I75/jEkPQSc
LzC8c73f8Ix8e5m1gd9V1kY31xneYe9Nwoov3N8Vlr+Hv9sxrP4DT0PC8u/Q
W8PD8u+sX4WFf+4HC6v+xnw3rHjK+lVY8RZ4rg3L35CfYfl38jMs+3L/d1j2
Jz/D0sfwJ96w6qu4byDszpejYeGP/A0Ln3h+Jiz/y3w3LH7Ar+1qbeTLe1gb
fNjb2sDz/mHFD+D54LD0DfkbFj+Bq6PD4i/fL7HxMN8Ny7+zHh1WPgA8nxlW
PoC61rlh6R/Wo8OKp3Azl5g9gMvLw9KnsNfVYcVrmPl6szfqRzeFpX/Qz9sM
L9wvE9Z+WO5/DCs/oFs0/MF//DvsPm/zibD4gGl8Jiw8c39N2P2++X+sDZ7/
19oMc3Y/XP+uPQ9m+Cgs/w/efhZWPZj62MbD/Rph7f/FfM8Pq36A3/8SVnzE
fC8KKz5gvpeGpX+43h+Wf8Jt14a1/5XnF0bED3xss4j4AZjsEBEfqNMiqh/x
ffqI+ACcj4649c74iPgAfTkpIvwCz1Mj8u+ol9VG5P/5flZE+Mf4mu164Kg9
IvxzPTgiPnI92PoHvRSw/qNeFokoHoD/iYjiIeoBmYjWX+DfihGtV+I+u0S0
noDrd48oHsOse0dUr2C9KuI+H+GgiOIB+n1YRPZmvSoiPHA9KSK9AF6dFJGe
AM9PiwhvXE+KKB/ANJ8Tkb/G9X+NCP+sP0fk7/H7y6xNfWyfZ34bEf6RT9wU
UfyB/7glovjE9eGI+Aqz3R2R/ue+g4jyHfDhoYj0Hs/HjKh+wHFFVF9AnKhE
VI9jvSoivcT14YjqqQzjEcVznp8VUbynPjb7cz0povyQNIlIL8Fe8wxf4NX3
hj/uzzF8Mk2IKD7wfE/DN7q53PCP+VpjfAEOf7fPc304qvthfraLih+Ynx2j
7vOChkYVD+C2RkUVDxiPo4oHzG+j8g/o39Soe//qjKjiL+JZXVR6n/s7ovJP
3L8dVTwALjujigfoVm9U+gg/fVHpI/ifcFT+k/tBo/KvmJ90VPkA6gf5qOID
YFSOig/Mb6PCN+LRH6wNPO4blf8HHg+MCv/AwaF2P/jnI6PiH7p1TFT8RP32
BOsvdOOpUfEb+emfo+I/5vscmw/oh79GFQ+Ap4ui8i/Mb6PSo1w/iqpein5e
GxX+Md83RuXfmN9GVR/CfN9heOD7w4YX8P++qPJH8jeq/JLnl0W1vwH64cmo
4gXXgw2/uOxFa8N/vBwVH7geHBX+qROsjevfj7rPU/vYnk87RqWPuL8jqnwB
+cu3UeX7uP6HqOIDpvWXqPIp7u+IKh+mno669+etisr/ML+Nql7H9eCY8mF8
bIuY/BsXUGLSR1wPjokPPM8oJr0NXI2Oud9nronJH3N/bkz4BIymx4Rf7teN
Cd/cj29/p9+wv/N1I/s793fY/Vlvjgn/mN9ATPwkzmKKB4zHMcUD4jymeMD3
s2KKB8DJrjE3H/aMKR4wH45pvoHnA2KK17j+4JjiOevNMeXPmK8/xeT/mA/H
lD+wPhWTngCMTo8pHnD/YUz+F9efG5Ne5/meMflr8OjSmPQTZZy1oYeviYkf
yMdvsDbrzfZ57l+MiQ/wy3fFVK/i+4Ix8RX9eDAmPiP+PxIT38H/J2LyBzx/
1OYHdHw+Jn3J85xiyhdw/X9j0qd0WzHFB/q5mPI/vl8ck17i+4cx1YeYD8fc
75d+G1N9Hdf/YPgi7Y0fzIdjig9wD0tj0jOYr1Ux937qdYZ34G6TuPjA/dNx
fZ7xNy7+4efQuJ7P+nLcne+PjYvfXC+KC//cnxUX/rn+G5e/4PpvXPjn+m9c
epT7s+KKB6wvx4V/4LE7rnjA847iigfgZTAu+7OeFRc+uL8yLvywnhWXfwUM
S3HhD9fvGpc+Yj0rLvziOftYG3g6wNrIZw+JC//49RFx4Z3rRdbmelFcfOR6
UVz4R33m9Lh7f9Vf4sqHYK/z4tpfAXv9LS78w16XxKUngafLbX6Bk6vj8j/c
n2X2QVz5P7Mf+RvXfkvotbviWj8gf+OKD9yfZfghD+PSS7Dj43HpcVz/dFz+
mPUswyvXi+LKb7leZG34y7cM7+jHe9Ymf+OKB4RR3L1/9it7Pvkblz4if+Pi
M/kbF9/J37j0Efkbl54kf+PyJ+RvXPUk2G1gQnqV60MJ9/tYOyYUD3jeVEL1
cPRvZEL5Ac8bSyg/IH8TigfcH50Q/rk/OiF9gmmrS4gPXB9KKD7g+paE8A/+
dNrf+f5rQniHP/bZ/fl+ZEL45/s1Cfd+orT1n+elJ7Qfl/tobPyY590S8g+w
+14J5Qew5x8T8v+4/sCE/A/fl0+48X9UQnoW9jwmIf/G9/ESwj/fm0kI/9x/
lVD9CN0+OyH8Uz8nhC/Q9KKE8IfL/p5wv096VUL45XmGCbd/vykhPqAf/7Dr
Md47rc390Qnhn/uvrD98n8D6y/VdGw/i/dMJxQN87LmE4gH5mpAeIl8T8if8
PoSE8gPw/V2zB99LSqhehOs/TSieAwf/S6g+yPfBE4oH5KvxAY/9JSE9jecs
Nj5g2EsT0uPQkysT0kcY11rDM/iwSVJtnu9qbcbbpPAOewxJuvfHjkzK3zPe
JhWvyNek+/3vyUnpPcb5pPQ/32dISv/z/MCk9D+ub07Kn3B9KKl6KezRk5Q/
ol5Oyl9xv1VS+ofnESdVL0KYSiXlDzHv+aT0M/x8OSk88bzupPw/892kO1/e
Nyl8cj03qXhAnCXFB+QHRyWFb+iLY60Ne55g9+f7OUnpH64fJaXPeJ5hUvkw
xv1XGx/f30nK35OvSfl7nj+ZVH2B9aqk8ivompuSqg8x300qPyOOzH7cL5lU
PAc+7k+qPsT9VUnhn/WqpPDP81WS8qd8fzcp/HO/pOERP/+bFP55/orhGfP0
rrX5/pC1EQ8+tTbrzUnFG/Dg66T4hnHNT8r/s95s/QUdFhkfyNek8mHgfmVS
+of1Zpsv+IkBKa0PUx+nxAd0a4eU8A9/tFNK9mO9OSX8wx5jUsI/v/4jpf35
6OeklPCP66elpK8RpmalhH+eh5ty64/mlPDO98+tzfMBU8I3/YD9ne8fpcQf
rhelhHfq45T8PWCYTYmfXC+y/nO9KCV/z/WilPw989uU/D31cUrrj8yTUsqv
+H0TKfkfrveaPYD/41Pu801OScmemK8zUor3mK+zUm7/f15KeoHrvSn5f66r
p+RvqY9Twj/ue01K/hrzdUNK+OX71NbmeZYp9/7uf1obOL3X7gdePpQS/pnf
poR/1qdSyueRD1RsPNi/8UJK+p/1qZTwD7/4ekr5E+NkSvqf9amU9D9w/0nK
vR/+C+MD9XFK8YD1ZeMD90+llA9jvL+m5C+Bj99S8qdYT1hueAMu1xgeuX/K
+AB8bJpWGzDbKi28cz9kWnjn/qm08A57jkprvYL7IdPy95iHiWn3eXtT0+Iz
7DkzrfVijG922o3/xrT0Ic+zT0s/wp5dac0nfu1JC/883zOt+jX38aflr2DP
RNrt/zNp+X++j54WHsCbuWnhhe8npIV/+Iu90/L/XB9KC//QewelhVeuD6WF
Z3TvqLTwz/OlrM3zC6yNsuhpdj+eZ5AW3vl+Qlp8ZLxNK9/FOC5OK55xP3Na
+ofvG6Wlf7ifOS38sx6VFv7hL25NK95SH6eVf/F9+bTWjxmm04oHiJcPp7Vf
mOu7acUD5rNp4Z/5bFr6mbdNC//Ux4ZHxrW0+MB8Nr3R9wcZ3rk/w/7O8zWs
zfPQ0oo3iCc/2PPgRn9JKz4xnzU+8LWqtPJ54GtlWvqH+zPSyodgpgEZxQO+
L5hRPMDwtsxovqGnt87I//P9hYz8P/CzQ0b4hx4YlJG/g512ygj/uH5IRviH
nx2eEf7Rv5EZ4Q24HJ0RH8DDsRn3/oVx1oYdazLCN8/ztjbyoyn2eYx7Wsb9
vv30jOo7sG+t9QfzVZcR/jFfczLS/5jXhoz7vMnmjPBP/5Nxn4fQllE+Bbt3
ZuT/AbPujPv763ozwj/w4mTk/+HnfRnhn/W4jPCPeBXOSC8AT9GM9AT3g2bc
31+RzAiPhH9GeAU+shn5c+I+I3wDf0VrYx7m2uepX+x+jKsZxQOep5dRfQfj
3cv6C7+3r42H73NtNN4DMtL/GO9BGdXLcP0hGel/4OAwm2/0+4iM8l9cf1RG
9Qr4kWPMnoDNcRnVg0CzEzKKB/BHJ2Xc9cFTjA/w16cZvoDHMzJO9RzxZ7n/
xvjA98Uy7vO3LswoXjAu2ue5fmBt5HOXZaRnEI+usP5gP9aVhm+eT5WRnmO9
IyO9h8den5F/R79uzChewv43ZxRPcZ9bMqr3gy+3ZlTvgdu63ewDe9yRkb/H
c+/KSO9gPHdnFP8xH//KSB/g1/dlpB8QTx8wPAEnDxne8Pt/Z+R/4UceMXwi
3j9m+IW/esLwjWl5KuM+3/EZ4wPPz7a/w388l1F8AaxfMP6xfmP8xH1etv7z
/RsbH+bjNRs/80WbH57Pbf4C+HjH/Anqme+Zv+H5MhnpUbp9sx949bHZF/3+
1OIF7Pu54YPnv5t/RPz4yviCXs0zvuDH94ZX1pPMXwNPP2U2yleND3z/PuPe
v7ow434/ZnFGegh2WZJxv++zzO4PWC83PjH+Ztz10dUW3/D7tcYv4Gi98Quf
G5CVfoJ/HJhVPQ142iyr+UN5bfOs5hfzt1VW84/52zor+/D7P7LiF+LU9lnZ
F/3aMSv7Y1yDs8IH1lOGZJVPcD91VvhiPp4V/vDfkVnhk+vPWfELem9s1l3f
GZcV/lH/rsmKX+D5xKybX5Pt74DBVLse8zHd2vz+X3se9H1tVvxmfLf+QdfM
sf4jX2+w8fG8Khs/8NGSld4CPlqzijfgV4fNL/DRmZV/g47rzir+gF+9Zj9+
32zWvX/el1X8AQwCWcUfxN+g4YfnKWXFL/rtrPAH+8azwidwnsyKb3Ab6az7
vLJs1h1P8lnxA/GkmBX/EE9K1ka/5lobvNs1K75hnLtbm+v3dn/aISv+w677
WP8wvD/aeKBX97fx4voDjW98/9vmCzw5JKv6NuorhxnfqA/MHtDNR5m9gI8/
ZVVPx3wca/bm+VNZxTM894Ss9DnvY3ji+aGGN+7vyyqfAT7OyCqfYf0lq3yB
+/0M/6i/nmf8we//avzi+qW1MQ8X2eeBp4uNXzzvLqv4yP2+WcUr4PEK4xP8
71VZ5S/MO7LSc5i/67LSczDjDVnpOfDrRuMX7HJzVvkMpuEW82/MLzfi1+1Z
6W3g4c6se33jn1mtV8Hs92SV73B9NSv9g/m4Lyv9j98/sBG/Hsq618P/bfzC
j0ez7vdNHzd+IR4/aW3CyviA/PQZ4xPs+6y1MZ7nrY1uv2htfn9P1n0++ivG
J54vmJU+Rf3ktazyf64fZaUPUS95y/wNePZOVvEe8/Ge8Qtm/iCregDi3EdZ
5Z/cr5VVfsr3hY1f6Ofnxi++P2z84n4Qi2fA+9dZ6SHg9dus8me+z2R4hFv9
wfCL/OdHixeEvcUT6g3jA3Cz0PjCfN7amMcl1oa/WGZ8w3ysyLr150prU28Y
3/g1pVl3/Wy9xS/E1wE5+RPwYGDOfd7PZjn3+WZb5FRPY70gJ74B71vnxDek
SdvmxDfM0/Y5+UeeL5eT/+R5YznlC9QbOff3zQ3LCT98XyQn/029kRPfYOfR
Ofl/+pmc+AZ8jMuJb5iXmpz4BTxNzokfiD9Tc+Ibzz/KuePXzJybX7PsfsDF
bHsecFmfc59H0JCTf4A+abLxAJYtOfkX8Kstp3oL5qEj596P0JWT/+J5LDk3
vzw51dv4fbZmH+6vzUkv8ryWnNaL4SZDOfELeIrk3PXnWE78wrwnDG94bCqn
+AW/ks4pfrG+kBO/+D5qTviG3irmxDfu380pvvG815z4xP0I1oas2MPawNOe
dj38zV7Wxuf2ybn16x9z8gfA0/42HuoLGy95lXOfl3aozRfm43CbT1x/pM03
9nEcnZO/4/pMTv4Q+cCxOcUzwPT4nOIZ8HFiTnoR83my8Qn4ODUnf83343Py
58RtTut7rEcYv8CXs4xf1BuGd+oN4wP3W+Tc+yH/ZvxBty8yvkEWXWKfBw4u
zSleYZ4ut+dBr12RU/yCXrvK+sf1pJziF/zNdcY33OYG4xt4c1NO+pB6Iyc9
gLjzD/NfwNdtOdWLYPfbzT6op9xp9uP+6ZzW4+AX7zH7w//cm5Pegd+4P+c+
H+PBnDuePZzT/hfSPCf/z/3XOXc8e9z4BXw9afwCbp42PvD7KXOKPzwfxNqY
t5esjee9bPfDY17NKT6xXmH9wby9YXzC/L9l44E+esfiFfj5rs0H6xXGJ+D2
w5zWf2D2j22+4b8/zam+ARh+nlP9DzrlS4tXPG81p3wA8zbP8EDZYPwCHr/L
ufcLz8+pvsHziAyP1N0WD9CNBTn3+uPCnFsvLjY+8Puec269uDS3Uf3C2jzP
2z6P+Vht9+N5wMYndHt9TnqQ9Yu8+sv9c3n5C563kJc/oZ7ISz+jHr5lXvNH
PZGXv6KeyCt+oV/b5xW/8Psd8+ITcDU4L38J/z8kL30Ifg7LKx+nnsjLH/P7
kPPKv+gX8m7/PTbvPu9tXF78gr+qyQvfPO88L37x+6iszfdn8uIX+jUtL/5g
PmZYm++3WhvxsC4vfgEmc+z+fN8mL35xfdT6y/2Deeld1i/yil/4VHvezbfO
vPs8t+68+Mb6hc035sPJi28Yp8/sxffx8vKP/D6WvOIX8pFIXv6V5/sbXjAf
8bz8M65P5hXPMJ/pvJtv2bybb/m88Mz6RV76DP6unBf+4e92yYsfuM9uefEH
v98j734/8g/2ecTDvfLiL+y3nz0PeD7A+AR+H5RXfML8H5xXfIK/O9T4xPMo
8+716SPz0oO4/mjjE/zaMcYnTMNxea2H8/0k4xPsd5LZF/Y7xeyP/Ok04xPP
1zY+Ic6faXwCjP9ifIK/PNvwyfeNDb+A9fl59/lAF+Td61cXbsSHi60NXl5q
bfiHy6wN/3CF3Q/zcaU9H7262trwl9daf8GH62080EM35pVfws435xWvcf0t
edV/eJ5uXvkV10NsvsGHO80e8C//NHuBxnebPTGf/zJ7g+f3GR7AhwcML9CH
Dxmf+H0yeeVboOEjxifg+HHz91hfe9Lwy/N7jV+Yj2cM79A1zxq/WK8wfvD9
L+MP3YJ9HtP2in2e++Xs/piP1/KKn5iWN61/6PZb1n/w9h2LV8DXe3nFb74P
mle+hXj8UV75Ks8PNn/F85Dy0g88nz8vfYH482Ve+gPz/lVe+1Nw/dd56Rd+
X25eehD1wO83il8/5N3vQ/1k+OP6iOET8fjXvOpxsNPCvDsfW2x4h79dkt9o
P4LxBf5yhbWxH3SV8Qt6b439nd8PZPfDfKzfiG8DCuoP9URB+hBm3bKg8fK8
toLiE8a9TUHzBX5vX9B84nk7FBSfoIcGFVS/gN/dqaD8mO8VFlSfAh6HF8Qv
7icuiF+oi4wuiF/g5diC/DU+t3NBeIMfrSnI31M/FBSvuJ+xIPzy+7AKwjf1
Q0H453lT1ub3HRfEF8x/XUF8on4ouOv9DdYGv5vsedQPBff6cWtBfOL7gDY+
rn8UFJ+5/lGQXoZ/6C2oPojfOwXxid8HUhCfeLxcQf6O510VpC+oH8y+1A8F
+VPqh4L0IO1WkD/m+w8FxS/4h2xB8YvrHwXpJeCraPhE/C8X3Pt15hbcemxX
a2Oedy+IH5iPPa1N/VAQn7j+UVA85PcLF8QnzOP+BTe/DygoXvE864L0H/br
HGLjAb4OK0j/cf2j4N5fcZTNF9c/bD4Bi2MLG61/FBS/UK850ewF3p5UkB7E
fJ5aUD4NfJ1WUP4Fvp5RkP9FP880PKGbZxXkv0HDcwrST/CX5xUUz7jfzfjG
+oTxDTC4yPAPvl5i/AJf/15wn590mbVZn7DPQ99cVXCfx3iNtTHs64xfrE8Y
v1ifKLj3G95s4+P7YuZv4LfuMP8EnNxl/ov7KYxP3H9XkL6A/e4ruM9TuL+g
+i/PTypIv2DcDxdUPwZvHjH8wC8/VnDHqycMf5j/p4xPwPMzhl/MU8XiA/r1
nOEfdnrR+MP6hLVx/cvGH+6nsOu53lFwx7s37HncT2H8wufesf5inO8V3N8n
8b7xCW7tQ4tX/D42my/WJ2w+EX8+Nz4h/n9p/o31CbMP8Pi1xS/g8ZuC+3yG
74xPrE8YPjhNFr+Ax58Lbn24oCB9CDMuNH+P+VhccOvDJYZn/FhmeOf5rMYv
vv9TcJ+3t9r4xP0VBfd5Xus3un5AUdfzfIyi+Mzvly2qf8DXFkXFX/Rry6L4
hPncpig+gSfbFeVvMG/bF+WPcP2ORc0v/OTgouYfemZIUfbB9cOK0oPwDyOK
0oOY51FF2R/1njFF4YPnURaFH2wTHl8U3+BvJxTd5+lNLLrxObnozl+mFoVn
rn8UhX/M58yi4hfPx7M2v6+xKP4gTNRbGzhptM9z/cPuz/NsrQ0ztVl/oE87
rL+wa1dR8Rl1pJ6i4jdw7ClKL2OevEXpQ9g5aPMJnIaL4hO/P8bsxf0TRelB
PDZZdK+3pIuqZ0F3ZYviE36bMzzx+2aK4hPP0y3Kv/P7rwyvuH7XovgEM+9e
FJ/wmD2L4gOu32sjPuxjbe6fsDbi/35Fd7w70PgDPhxsz8fvD7H+cX3D+k/9
YHzi990UFZ+hT/9UVH5F/VCUHkQ3jrf5RX3rROMTcHxSUfkV7HGq8Qn+9rSi
/CXwfIbxCdefWVQ9AzA7qyh9A1ydU3THr/OMT/DXfy0qfnE/RdGdb11UVPzC
z0sM39QP1kZ95DLjB/WD8YfrG0XFL/DhmqI7fl1n90P8usGez/PFi9J//D4z
6z/03D9sfPAvtxUVr3kejPGJ76Pb/EFH3V1UvsXvDzF/Bnzfa/yCPe43fqHb
Dxq/YI+Hi6oP8n0d4xe/n8D4BXw/UXTvp3uqqPwD9apnDI+Yh4r5f+qJovQg
9PELRbce/I/xDfXsl40v0LWvWpt6wj7P/ZnWxjjfsvvz+xCMX/TT1h/qCesv
1ztsPKj/fWz84v4Ji1dc7zB+cf9EUfkWz8MpSn9D531ddJ+f9W1R+hB5yfdF
rR9jPuabvYHvn8y/4vpfLF5heAuK0kOsRxjeeL6O+Xee7150f1/6MsMz4ueK
ovQZ/Ooq4wPi55qi+33qdcY3fp9tcaN6REmfh9/YtKT7wx6blRSfYNYtSuI/
9N1WJff5TduUND5ctl1J44c9dijJ/wDfg0rKr8C7nUpaL8TPoSX5N+B7eEn+
D/nwyJL4BXyPKolfuH5sSfyCmceVxC/M6/iS9A2un1ASnsCPSSXhjfWJknt/
0LSS8ApczCgJ3/A3tSX3+lddyb3+NcfaXN8oKV7BLzdZG26xuSR+cX3D7s/3
Oe35XN8oKX5xfaPk3o/cW1J8hv93SorffB+j5M4/AyXpae6fKLnrRZGSm18x
sw/3T5SUH/M+JeXP4Fe6pPiFfmRL8rdc3yiJX/ALxZLiFz5WLkkf8ft0DJ+4
freS+zzOPQzf/P5Nwz/qAXuXxBf4qX2tjXrTftaGPfa36zGfB1qb6x0l9/e1
HroRvw4vif/UcSX5B/DjaOMX/N0xxi+eh1qS/uP7riXFL+D2JJtfzNMpNv+Y
z1ONX/w+6JL0B89vK0mfgI/nmP3Bx/NKilfg+fklxSvg9IKS4hXi/4Ub8eli
4xPC6KWGZ76fZ230+wrDP6blKmsjfl9jbdQDrrM27HdDyV3vu7GkeIRx/5/1
h+/TWxvx/9aS4hPf1zV/we8nsvFzf4T5G9DsnpL7/Zt7zV/BbveXFJ+wHvBg
SfEJuHm45H7f5BHzl/Crj5q98eNxwwOue7IkvYNxPG34Ap8qhj++32/4RLx5
wfAL+r5Ukh7j+VgWX/DzFWtjnl+zNt4nfL0kvYf3id60vwPXb9v9eV6AtTGf
75cUL4HPD62/+P1H1oa//8TGi/j7mfEJbuOLknu/4P8sXvH8eJtfnndr9iCs
jE+MS+YP+X1sFq9QT/jZ+IT5XGD+lq/JGr/g7xcZvrj/0vjF/RLGL55Pb/jl
/kvDO/C5uuTOv9ZaG/t31ht/wPcBZbW5/7Ksz8Pfb2Ztvq9Z1vO4X8La3C9R
VnzCfbctq//Q+9uXxS++71F2n08yuCz9h/sOKYtffN+j7M5nR5TlzzCfI8vu
889Hl2U/4HNs2X3e57iy7M/zVcrSg8DnxLLwg/xpcln4Qj1haln4w3Oml5Wf
IH7OLCteYT5nlcU3vu9Rdu8/nFMWH4DPhrLiDeazqSw+YRpbrA1ctZXd8a/D
7of57LLnYT57rH/cj1lWvOX7nTYe4NtfVnzGfAbK8j/QKaGy/BPmM1KWHgRu
Y2Xpb5gpURbfwPeU2Q/zmSnLf2I+c2X5V77vafjg92safoDPcln8wnzuUpY+
wrh3K8v/U08YfjGffyi712P3tjbqLfuW3e/T72dtnudo/EI+eaC1Mc8HWxvT
dKhdD799uPEL1x9ZFv+R3x9t/AI+jylLD2IYx9l4+T5oWfUM6omy/BP858ll
9/vVp5WlBzHs08taD6GeKEsP8vuLyu7zpc8uu9/vOtf4hfk83/iF+bzA8MT9
E2X3+xYXlRXP+D5pWfEA+LzM8Iz4frnhH3y/suzWd1dbGzi/1to8/87awNeN
1sZ83mxtxPdb7HmYh3+U3ftJbrP+8/uVzH8An3fZeHHd3WXlW5iPfxm/+D6p
8Qu8esD4hfl4qKx6BvdPlKU/wPdHjV/g+2PGL+6fKCv/Bt+fMn5Bbz1Tdp+n
86zhDde/YHiEnV4uu/OtVw3fGPdrhn/kr68bP9gNa5PX1gYf3rXroc/fN74i
fn5oz+f7osYf2P9T6y9o8LmNh/svLV7h51dl6UHY/2ubL9YjbD55PkrZfZ7T
fLMH3x81e+Fzv1i84v4Iszd0zELjE3i4uKz8AfhbYvGKfs7wxnqE+XueR2h4
hT3WlKXHeD6hxQ/c5vey+33mTeaKD+DzpnP1d5hl87m6HvO2pbXhd7aaq+ch
DmwzV/yGf91+rvgDt7LjXI3n/wGwIhFD
"]]},
{RGBColor[0.6, 0.24, 0.4428931686004542], LineBox[CompressedData["
1:eJxdXXWcXEXWDSG4xYgT94mM+0y/tpnWae8OujjBZXFfFl0WDe7LAsEWWfIh
izQuiy0uCyzBgyUhJISQhC9zTs+5vwp/ML9K93uv6tY59557q171hL0Pz+7X
v1+/fudu069f79+WRS8e+8SN1/iuOmzwn5/892Lf4b1//vac74alC5+PN71U
Dp1/yNe/3fGGr7j97H9ev3R5+dANreVvfuxrOs+/55f/WVu+Itj7hcW+Gbtd
9PTK6f2eTOCDL3wXXNl7w/XlqnOGffDaL1/7dtpl37b/pX4t4/Lkt77sw2PP
+i7zU7lmy7vH7LLvd77Ytv03fPXLyuc/+p64cdTcjyc/X14wYsCGRy/zvXP8
kqk1W77t69l74LyWRct8z42/76j5lyzxzcMAlvt6e7fw+RWVfvzkY79/qfxd
4cPjHl5b6cdK3wm9t7t7ve+SH072Neyxyndkx9bv/f2I332rc5/feu2zq3zj
er8+dp1vf/y32tcP/62pfO9XX+9TdrvoZ19v79v+96vvT5f3GuI736rpvR1Y
U+nn+77brn12Q0/X+q65uve/R8p4/AXrKvb5rGKfdb5lveY+b3l5ZO9w//m7
75ne2z/9S/mnN5Mb7tTP673qysPWlodv+Hbu837e95neEf1engYDbuLxb78n
X/+ldwCbeH3zsWGSJv731028vvnAP+/W3/t48uYbuvxbmXbs7/XND7r9Yn+P
87yyMh+berTLsvLoub1Xbuqxf0vKx2CCBnicvw/KvO8Ar2+8nJcBXt/8Nezx
r+i2/Tfz2I/Pfb2tqnM28wCnid9V7LKZ1zeff5zfO0Obe2l8sMrX9eCKdW8f
v7nHfq7x8bGbe33zS9xu4fXNL/Gxhdc3v0/9+2/hB1fY5+hO1ZYe7brOt7Z3
uHtvqftN6DXPD1t6nMfVvrd6p6NlKw+Xj1nl67XK+Pu2qtxvmQ90GrW114dP
zltf+51Kf7f2BrJjPuJ7Gw+POfm98nW9j5m/jQf4nfV5GXC4fhsP5oh/VyYv
tvX4nBWV+d/Wg5kaVpXJv201v29smP1TD9rOq8N/68oY5q3becTb72XeZ3vh
h3jfXvji87fX98n77T3yZn35hXjvv+zgHYeOrSkDHpfv4PXhl/gY6PXxnTgb
WPn+95X+DfT499MycHLuQC+y+MSh93S/Ub7liN6JG1ix951lTOPjAz0+9zkf
7zPQ4zy+58PttxskfE3qvW37oAqelvo4zkEe/c4K8vWYQd6PvcP510ofpuvS
Qd6dvTAYuJrz849BHu2ypoKHQR5x9FvleYM98mJdBU+DPY77d/qlLmtjWHsN
Fv543WDhj88bLPzBzp8M9tDdtl995PNgj/O8yrfhbhtuOcSDm1v+M/1O/RCP
fv0n3+ZwTEM0fvqtIR7/fuZ7qXf67x0ifDIODBE+6deGeGyWy8DlZkMr8/V2
OQ8CDPVwn7mLy/j+AUM9xpEfKv5iqEd/+FOZ/z7UY79WlnnfoR5xvbpMfgz1
TjvosaMXjFhT5rzvWPEfa8vk347CH/3jjt7PG7zCkqm/l3t79djROwqvHJe1
OV77/quv9P63o8c4tq4Mu+wwzCNPfmP8mzFM/pE8HOZxHlaViYth3u29t/f/
XKY/G+b1+XPeZ1hlPN8z3n0xTHiHfTYZLrzDHOOGV55/bRm4bB3urekd1oIX
fZyX4V5ffKG/H+5xHN9U4txw7xR42mW+DWzZQJnhwjv82E/DPdptJfGwwwjh
nXFjhNcX70D/w0d4vb0fUFxbiVMjvL74iO/fPkL4Z5wYITyDp59am/M5UtfT
v4+UPydvRwrvHO9I+X/6l5Ee/WYF74tGepz35T7A57WRHuPED/z+jqO8m3rh
tfli+uvqUYpHnNdRFX93f4Uvo7w+/YHrzh5V4fs7jIevjvLW98Kn5hv6r29H
eYzjS+m/thzt4n3CaOEdw/BGyz/S74/2elkRfvDXMtzrzaO9Pn0F+5RHC+/0
d6OFX+J2tPANeTF8jD5nP8foetpljPiE7185xjsJjmRNGdPxf2O8Kejw6oq/
H6P4wvGOUfzh/XeSHsD30zt5ffqG495J+oD23Mnr05cYzi07VfBzecWf71TB
/8vE21ZjPfqZLyq6cKz0Ank3VngHbP4wVniHfU4aK//Ox4z1+vQh/etY+Xfy
eqz8O/s9TnglfsYJ79BJWfuc9hwn/00cjBOfgLfXx0lPwD7fj5M/p38d7/Xp
S3Rr6niPfu8nH3BeP176gnF+vPw54ld2vOIh4814jzruafb/iPHSZ4inp4yv
4O3NMsz41/EVvfE/+rfbxnt9+hz2fHS89CDjxXiPOnhFGff9YLzwwvgxXnii
Ph4vvAM3/SfI33K8E4R/jneC/DPHa22O19oc7wTpHfqvCcI7xztBegV+868T
5N853gny7+DnYxOkXzCOlydU9PiPjD/vT5A/gH77pq8/i8sY56oJ8h8If5tN
9HD54GfKoOOMiR7zgoUV/Tqxom8+9oEvXRM95gVf+uBmchMr+uH7il6dWNEX
yyv+eqL8I4Zx6kT5e453ovAPPXTNRO/mcG9PVvte7u3m4339+c0HPLwyUXgG
7z+0NtLCrycqPsBfr5oo/nC8kyp4/M0H+0yfJD4ADw2T5N/x/fAk9Z/jneQx
ji2v4HmSh3ns+NGHYRw5SfGPvJwkPsAuF05SvAQsHpik+Eo/NUn4599J0jOI
x/+bpPlFv36YJH2DfqybpHgP3mwzWXyAPJszWfkU49pk6RvwJzZZ+KQ+nSz8
wr4HTK7wdV2Z8dDa0HVnWxvzcIVdT/08WfkjxnH/ZPENdn/G+gO/8sZk6TH4
tU8mi8+sA0yu5CsrysDLusmVeLOc/NhmivQ9xz/Fw2ULv6L/aJsie3P8Uyrx
+wHmI7tMkb/i+KdIn4Ifx03x+uoV1FtTKnj6hnr4simK/+jXbVOkD4iDKcov
4W+fm6J8DjrrrSnSQ4g7n07xmAf96oP9lk9RvEB8/n2K8I1+bzdV/KE/myo+
AJ/+qfo+/c5U8QF2232q4gPnbar4wXg2VXofwzh/qse8egXzy6unKh5Sn01V
vIROeWiq11enoR2myt/Az7/b9/l/GG+/mCr/xHFMVT5A/z1N+QDtNk36FuOo
nSY8MF5PE18wr5lp0s/k9zT5X8araYofwNsp06RX2K9pwjP043XThHf6yWmK
J9QB1sY0vDBNfAEP3rfP6d/s/sDRz/Z8xuvpimeMk9Ol79DfjuleX/2MeJ8u
e6B7u01XfKVemq74CzucMF18oR2mKx9m+W66y5eF06VvwZeHplf0w6eV+Z5e
ye++qsz3dMUTzvd01TNglhXTpacQ9wfMkJ6i7pmheAI7NM4QP4Db4AzhHXEm
P0P8QF6wzwzxA3HuKPuc8WuG8gPw5aIZ4gu6ed0M8RXzfs8Mly+PzpCewvBf
niE9FYCBZyg/ZvyeUYln3zKfWj1DfEGetsXMSjz6byX/nim+wO80z1R8Z/ye
WcnHP6TeLs1UfQe42m+m9DP87DEzpS9g7zNnCj/QIZfMrPjTnyv59EzxBXWu
+2Z6rFOsruTXM4VX2OH1mYo31L8zxRfmQTOFf9xmrbUZ36rUZtyo0v2oj6vE
B0x7d5Wb3+9c5erDA6oUT+Cfj66Sf6Cdqir8XFpmHlyleMzxVynfYHyrUr7B
/KlK+Qb0wGtVlXx6fiWfqlK+wfymSnoBOF9TpXoS+Lv1LMUb5luzFG/I91nC
G9xwYpbwCLztOkt4BW8OnKX4wvg2S/xhfJ8lPjC/mCW+sN/2OfO3WeIbdbrd
j/FtlvJr2G/xrEr94RfWt5fNEr+Bn/WzxH/qzNnSm/h+9Wz5D3y/c7b0F/3S
bOUjjG+z5a9wm0Nny5/hMSfNruDh9TLi2HmzK/r344q/my1/yfg2W/VR4m52
Jd9dVvHvs5WP09/NVj5O3s6uxL9fKv59tviDuLTJHPEHvB8+x40H9XPEH+rX
OeIH9at9juftN0f1WeLd7g86nTlH8Q668dI5Hud9FeutN80R/4n3OcpPiPc5
8h/E+xyPedc3rOd+PEf+B/Py3Rz5J9RL186pxO9XKnyfK77ALrPnqh5FHT5X
8028z5UeR31q17nS66DJgXOl5+GHT5grvc/5nis9hu9dOVd8gX++fa7wy/g2
V/GAeJ+reAH7vzVX/OB8zxU/aBf7Pqatf7X4iP5uVS09hvGMrpb+Aq8nVSue
wD/MrFY8gb6pqZb+gk5vqVY+B/75q6W/ML5IteIJ+JWulv5iHlct/cV6R7X0
F/VytfIXxMvDq+Uvcf3x1cpfcJvTquVv4SbOrlb+gu9fVS1/TZxUK18GjRZW
K59GOLynWvzA/D1ULfxj2I9bG/Hx+WrFD1z/WrXLr7erxQ/Q8iN7Pub7i2rp
LfDmu2rlW/ST1apXwf/+Vi3/wPmuUX0WYWZITcU/fE1/NLpG+Tv0yqQa5SuY
5qoa1cvx3Noa6S88t7VG+gv9DNRIfwFf0Rqvb/2QerhG+ovxskb+lzipUT4P
/ze/RvUjrnPVCK/Q+8fViB/Mj2uEd6631Igf5LG14Vausu/jNjfViB/A+W01
qh+wvl6jeILH/Z/1F3Z/wsYDvD1fo3hCv1GjeAp3+m6N4i31itmT82/2pt+u
qfiLhxkPV9ao3sW6TI30NPoxoFbxhflrreIL/VCt6rvwm1NqhSfopapaxRN8
ra5W8QS6ob1W8QT5eLBWeAZvY7WKB8BZrlb4h5l2rRU/4G/2sTZ5b99HHDjS
7o84fmKt9Bjy2dNrpcegP86rFV+oL2ulxzj/tcrv6TdqxRdM0x21HnX0l/Q3
99Yq/8P3Hq6VvTGNT9bKf9FP1sq/UZ/WetT9b9I/v1MrvU2/VCv/ie58WSv/
Chz9WCv/i3lcVSv/DD+1rlb6jPWpOukzrofUKd4gno6rE39g5yl14gP82Bxr
43mN9n08r6NOfKE+qBM/gYtknfgLPZCvE1+YH9aJL/xbJ74g3h5SJ/0F/P2x
rhIfv6bePKlO6x/wX3+ukx4Dfs+vkx4D/hbUiS+4/to6zR/s9Pc68QXzfGed
+AL/dX+dx7rMt6wHP1InPQI99VSd8hnEuxfrlP/Df/2nTvEG+Hu/TniF/1pc
p3oV7P5NneIP5m1ZnfgEffBLnfjCeakXX0DbLer1feBkZL3uj35NqBefuT5W
L75jHHPr5Q9wXXO96uN4nFcvvnA9uF7xBXhL1YsvwHuhXvEG+fUe9eILdXy9
1quAg8PqK/XY1+gvj62XniCP65W/An9n1Su/xbxfUC++IK5dVq/1Y9j1+nrx
Bf7v1nrxBZfdVS++4PpF9dJnkyiQhX/WG+uVj7C+bG3qtXrxB/76v/WKL5in
z+tVb4Cs/Lberd+tqJc+Y15cL/4w3jcovpLvDYq/6O+YBsUXTNvkBukxxKdZ
DYr3XG9vEF/gd1sbpMeIqwbNL+JLvEF8gd7INSh/wfW7NEif0N83KH+Bvjyo
wcO4t15ZZv27Qfikv29Q/oD1gTMahGfg99yGjfb/NIgPGPfV1iYOrM18q0F8
Y72hQXqMetyej3jzZIPyF/DwxQbxneu1DfIHXE9pUL6P6fukQfURzlNDJd/5
gvxZ2lDZ7/QR6yu/NCh/BAx/b5BeQxzbvFH6AP0f2Kh4w3XGRsUXPG9ao/wr
6xuNwg/629yo+ivu09ko/OH67kb5d+jbnkbhl/WgRuEb1+/RKPyDl/tbm360
UXzCdUc3im9c32pUfMG8nWXP5/peo+IL/MUVjaqHo35xfaPiC/zYLY3K36jv
G5XfUVc0qj4CXDzeqPoJnv9co+oriHevNmq9FzLl7Uatt1PfN2o/FOuRjVpP
o99r1HoC8/VG1VOZvzbK/1LfNck/o7/DmuS/Wb9skj5D3JrWJP3EfLfJzf+b
moR/1jvsc8Z3a2O+eprED/C+2OSur+zRJH7QDzYpv2d9pMmtXxzbJD0KP3Fq
k/iB+57ZJH7QvzcpXtPsTeIH7HVdk+ovwMmtTfJvuP4fTdLXrC81edB9Sz5h
fHmsSXzB7Z9pUnxB/19tqvCjEl/eblJ8QT793ybl/9wf0yR/zvXxJvGF/r1J
+OZ8N4k/0DebNosP1PPWxrDGNis/gS6a2qznAfdzmtUf6rlm8RvD7GgW/4Hr
cLP8A/qbaFa+AnsVmrVehet3b5b+Al72a9Z+Nuq5Zs0H96c1a77I72b5O9aL
mlXP4Xw3q97D+W5Wvs/5bnbrq7c2S+8Dpv9oVnwh7poVXzjfzfLvsPczzcov
cP2rzYo3nJdmdz/XR9bmviC7nuurdn/y255PP9CsfAV4H9CiegXmYdsWxRP8
+7gW8YP6vUX+hPxukb9hnbhF/oj13BbVv6jfWjRfwEtPi+YTvCm2SG8Db3u0
KN/HffdtUb4Cf3pYi/QX57tF+QrsdXKL8Ah+ntWi+iz6f0GL/Dv1W4v0GONE
i/gCGNza4u4/udu+T363iG+cb7s/pu1Zez7rNdY/5mvWf+DtIxsf79MivUW/
a/YB3n5ukf5ivtYi/4PrN2uVf+J8t4ov3D/Xqnom43er/CH53So8kN+trt7o
bFU9lesXrdIrMGeqVfhjHG3V+gtx0Sr/znpcq/w/1zNbhX/W+1uFf7iN0+37
uP4cux/0ysX2PNRJrmpVPAPeb7T+gr63t4oP1Gutih/Ua63KTxCXn2pVPs+8
tlXrkajvvN4qfYvnv9+q/IT5Wavyea6ftir+c32hVfoAz13dKv1AvdYq/4nr
t2gTXqhL2uR/yaM24Q/9mtkmfLLu2Sb8cn2uTfhmPa7NXY+J2uesv9r1MMvO
bYoXiAt72/MwrPnWH+rzNsUP5AknWP85322KH4ir57Vp/Oj/JW3yJ9QJbbIf
cd4m+7Ie0yZ/xXpMm9YjwatH2jR/zMfbNL/U522afzz/jTblJ1xWa1N+wv0x
beIL4sqSNukXmG1Zm/gC+69uE34RhjdpV/2W+Vi79Bjrr+3iA+w4sV3xgfVX
ux7jrmtX/YBxv139QbwJtktPYVri7RoP/GK2XXxg/bVd+Trwtne71huZj7Ur
HnO+27WfF9NzYrvyD1x/Rrv8F+e7XfkHdNSl7crf0Y+r2sUP5HM3t2v/H+x9
R7v0Oebh/nbpd9j5kXbhD9c/3S58AucvtSsfAA/+0y58cz9fu/DP9UJrc73c
2ujX8nbVB4C3X+1+xHWHnsf1lQ7l58Dd6A7t14F8mdQhPYl5mNWh/aCc7w7Z
i/uLOhQvyO8O1bdYb+1QvGC9rUP6Ctfv2qH4gev37pBe4Hx3CA/sZ4fyD9bb
OpR/sN7WIbzB7hd0CI+M1x3iB/dzd4gf3B/bIXzz/YAOxQO48Qc6xAfGa2vj
e8/a97l/0e5PfdYhvcf8q0N6kPWWDulF8rJD8RL6cmWH6n3U4x3yH6yvdqr+
gXgzvFP1LcBhfKfyQdhlWqfqWeD93M4Kvj+s7I/s1Hoj62udqnfi+u5OxQvA
JN2p/VDg07xO6RPUd//QqfwXuJnfKXzC3R3W6a5HHtcpfAN3p3cK/7SDtcGn
i+376P+VnYoXcBN/6xQf6b87xVf6707xgfXUTuVT+Pt0p/gBP/Rip+p9fH2v
U/ka+dwpfnB/fqf4ATst6dT+SNYxOqWHuR+mU3qZ/fBpvZH+26f8nHbzCS+8
j0/xAnFvlk984H5Qn/w3590nvDK/9ikfYL994gfslLc2862Nrt/Pp3yb+ZY9
j/rbJz7g+lN8qh/AT53p03oI8y2f8qsKjJV/Md/ySX9Sf/sUb1lP8Skes37q
k70rYUJ6iutlPvGD+bVPegBx5V2f8k1c/4lP/EC+96VP/IAZfvRJn2PYv/i0
Pg+zrPcJj/C3m3qqB+N5m3viC3g8yBNf4F+GesI/8DnCE/5h/zF2P/Bhgqd4
wPU2T/0Bf6d70k+V7SiKf7i+xhMfKuVnxc9lTO+0ngQ32e6pvou44nmqD2I+
w57iBddrPe2P4PqNJz5AT2U8xQvud/MUL+B3dvakL9Dv3T3pDzx/T0/8wDj2
9+SPwd8DPel95o+e8Ev94bnvJx3rbVQf9sQP4PcU+xz/foYnfnB9yFN84v47
6x/WMxdY/8HjKz3FQ8YzT/sP4I9v8qSfMM+3eIq30E0LPbc+dbcn/cT8xeYH
Zlxk8wcaPOxJD6BO+ZjNP57/pKf6JeOjJ/0Nffqip3iBfrziKV5QD3vufsi3
Db/A1wfGB/D2Y8M7xv2pteFnv/RcvbXErof/+cFTfILdl3viI98vMH5g//ga
T/EBOnC98QF5QH+/8m34qc38yi8wvzv4lU9AvwzxKz4jbozwaz8d+esX/jG+
8X7FA/ilyX7FA8zPdL/yCa6n+JWPYl6r/fKvmNcGv/wv+etXvAD/OvzCJ/Ne
v/DLeOEXHziv/o3ih31OXNv1tJvdH3p5Z7/yazx/d7/4wPcx/NJ/qC/s71d8
4H4/v/hAfeFX/Q4oPsqvei3m5Vi/u//3JL/ybeDuNL/WA8lfv+ID3MQ5fvd9
wfP9ig/ks1/5JqZhgV/xgft//IoPMN91fukRzPdNfuERZe9b/NIzmNeFfq2H
YL7v9rvx4n6/+ABeLbI24sXD9n3c93G7P+bxSb/qycDLc37lP+DtS37xAX7z
FRsf9ZFf8REwf8fsg+e/b/bDfH9s/MD1i83+wMtXfq0H4vlL/MoHUU/8weaX
dvFLH8BfrzJ8cP+p332fYr3fzVf7B4Q/zO82AdVDyeeA8Es+B4Rv6vGA8E8+
Wxt1o3EBxRfM7+SA9BHf5wmID8zHA+Ir5rcmID4gHtYHNB50uzkgvcT9EgF3
P4E/IL0E3IUC4gPsGw2ovoF4mgxIL7F+E9B8YX4LAb1PgnnaOeDWG3cPyD+C
t3sF5D/B0/0C0hvwtwcFhDc899CA8Ah/cFRA/htu4JiA4gV0xIkB8QPrQacG
hHfM65+sDbOfY99nfLb7Y9ouDLh6bUFAfMW4rgiIz9Ap1wbEB8z3jQHxAbi/
JaB8C/N1e0D6Cc+/KyB/w/gcEB+Al0UB8YH7gQKK74h7jwUU/4HXcsDVT88G
pJ+Y3xh+ENdfCYgPpFlA9U74g3cC0k+kseGXfDZ8s75hbfjfr4wvjM/WJp+t
DV7/FJA+4/4j4weGucb4wfenAsqvuT8hqHwJdtgmqPya69VBxVfwamhQ+TTG
NyIoPsDfjgmqHoj4Oj6o9Qu+bhYUH6B/pgfFB9htVlD5JK6rDqr+RH0d1H49
xueg9DnPXwhKPwG3/qD0E+NzUHwgn4PCN+yTtDZwnQ2KD/CXxaC732PnoPgA
Xu4RdPm4d1B8YD4YlN6jrg+6+dFhQcVH7q8Lig+Yl+OCqk9w/3pQ9TzyOSi9
ynpQUHoW+Dg7qPiAusn5QfEBevXioPQyVNiCoOID9NhVQeUTzDeD0lPkc1D4
4np+0N2vdHtQeor7eYLCL6b9vqD4ANotsjbm4eGg8I/rHrPPgZOngoo/GPez
QfEBdn/J+kO9HZT+g73fMD5w/77xgWYKqt6EbnwSlP8AHz8LSp/iuq+D0q88
fiioegd4tdT4gfxmhfGD+XFQ9RTAZm1Q+QWu6xdy67NbhRQveF5ISHoduB0U
cvmwY0j4hb8ZGRI/4K92CgnvrIOG3P2MU0LSR7h+ht2f650h8QHXV4cUvxDn
GkPufv2WkPgA/dEZUnwgn0PSS5ifrpD7/kwspPhAvR1y9Wo2pPya66ch5dd8
Hzak+jr08h4hzS9gsU9I+QX3T4SUX+A5B4eEH9T7Dg8JX1wHDUk/AcfHhaSf
cJ+TQuID8HFayN1f/ueQ8I77nm2fo9t/Dbn7BS8Kuevrl4XEB+63Dbn7i6+1
/sL/32TjIZ9D4gP1dkjxEna9O7TR+1EhvR/F+Gz2xj8/EpJ/Al4eD8l/IT4+
FVK+Dbw8H5L/w3z/OyQ+8P2TkPwn9XZI+TbXi0PS59g386Hhkfu/QtIzsOtn
xg+Y8WvDO57/rfEB873U2vC/K+z7uM8qux/+/Gb8wHz9HlK8gD/YNCz9BH5t
FdZ4YN9BYa1PQC/uGJZ9ML8jwrIf/MFOYa0Hcb9pWHxgHTCs+SGfw/JnSCNm
h6UHMD81YfGBejssfJDPYeWj3L8UdvkQCGu9AvPbFRYfgMd4WPEC9k2FhW/o
jFxY+Of+trDwDrPtat/HqP9g90MY2zcs/LMeH5ae43Vh5ROw8xE2Hlx/dFj5
BN93CSufAC5PDms9AmH3T2HpJ75vGZZ+gr3PCys+wO5/tfnCcy8JK97D/VwR
VnxAWLra8ID4dENY9SfY6eaw9BPmaWFYegR+9q6w8Mf3K8LiA/D4QFj+Hdc/
FBaeGY/Dwjv3Y9rnmOdnw+774y+F3f2/r4bFR/iR/xj+mS+H3fXrD2x81Ndh
dz1icVj6kvo6rP0z8PffhvV+Gdzqj2Hlc9BvP4Xd9wdWhZUPsv4VVn4Ne68P
y/9RX3eJH8yXu6SfgIdBXeID/PqOXW7+MKJLeOX+wS7hm/sR7HPuL7M29Nks
azP+dolf1NNdikfAQUuX8hv0o71LeMdzY13iN/PfLo2f56N0Kd/CZYUu+XfG
1y75d8bXLvkn4HPvLsVzjGf/Ls0f7Hdwl/b/gQeHdUn/gFd/7BK++T5Sl/CD
eT2lS/gCPv7UJfzBf53ZJXwDn+dZm+up1ub7K13CM8Z7ubVhr2u6xCfY6/ou
8Q32urlLeAbPb7Px4Po7bbyY/3u6VD+Fvf7ZJX+Pf3+wS/oH3Xy0S/4Dcals
8wH/+7TNF9zdC13y93x/vUv+C7h5vUv+jfvnu+T/oHPf63L3x37UpfwAeuLT
LuUH3H/ZJf+L2y4xfOI+P1ib6/2GZ+BmpfEBdv3VPkdYWGd8wnxv0q14w/1d
3fL38Hc7dEvPAU9DuqVvwNNh3eI361fd0ovcD9btvu81uVv+g/WrbtW3geeq
bul/8rNb/p387Nb6Avd/dysfJD+7VT+CP/F3a78f4kuoW/oado92K18mf7vF
Bzw/3a18gflut/gBHOxibeTLu1sbfNjL2ujX/nY/dOMgez752y09Bjwf1S39
z/dLuuXfme92iw+sR3fLPwDPZ3Qrf0Kee063/Dvr0d3KByATL+5WvQhu+bJu
5ceYr6u6pV+Bg+u6lQ+gfnRjt/JB+O9bu7Xfj/tluuU/uf+xW/4VeLy/W3zA
1/7P8Al/+a9u93yfJ6zN/TXd0vPo5/P2OfTtv7uFf9j7Nbs/rn/T8M+waP2D
nf5r/ac+7pb/534NGz/s9nW39CHm+ftu1Rdg72XGD9j7Z+MH1/uNH4DJWps/
nl8YUfxGPjEgovlHv7ePSP9TV0XEB75PHxEfoN9HRYRH9HtcRP4az50UEX6B
56kR4Rs4qIq4+n2ufR/jq7f7QV82R8Q3rgdHFJ+4HhxRPMA8hSLCP+JaJCL8
Y14TEeXD8BPpiOIB/FshoniAsLhzRPEX1+8Wkf4HHveKSI+yXhWRXoV/PTCi
+jj866ERrSexXhWR3uF6UkR4QbdOjCifhB1OjUhfcz0pIj7A3mdHpE9w/V8i
Lp4vjAjvWPdfYJ9TH0c2ym8jwj/yiRvt/vAfN1t/uD5s/QXu7opIv/E83oji
H1D7QETxkXaPKH7y/TSzJ2EfUb7FelVE8ZnrwxH5K9afbT55flZE/o76OKJ8
gOtJEeUDlGkRt7642PgBf/tVRPqJ+3OMH+Dpj4Zfnu9p+Eb+tsrwD3v9FlE9
Fvz63T7n+nDUrd9uG5U+gn12iLrnBQ2Nqv8w88io8n/G46jGz/w2Kn+B/k2N
uvtXZ0Sl9xHPZkfFB+7viGp+uH87Kn0E3rVGxQf4n86o1tcQzwJR4QPj7o4K
P9wPGtX7qrBPKuru58tFxQfExVJUeGV+GxW+EY/+EBX+gcd97HNcNj8q/MOv
HBKV/4dZj7Dnw78eHZV+Q7+Pj0rfId86Jap4hzjxp6j4D3ufHVW8hB3/ElU8
AJ4ujCreMr+Nyv9w/Siq9QTY+5qo9BLsfUNU+8uY30a1XoS/C6Pyj3x/OCr/
Cf7fG3XPt3wgKv3B88uiihfQD49G5a+5HhwVH6D3no2KDxjXC9bmerB9n3Fw
o+vfjrrnqb1vz6fdrX/c3xHVeiHyly9sfLj+Gxs/cPG92Yf7O6Lu+w4ro4q3
1NNRxWPmt1HpJa4Hx8QP9GPzmPQSF1Bi4gPXg2PS0zzPKOa+jzoqJr3B/Zox
4Y/7c2PKl3Hb6THxgft1Y8I31y3sc9ZN7XO+bmSfc3+H3Z/15pj0EOwbiomv
nKeY+Mx4HBPfeV8bP9/PiikeQH/sYvbi+zsx5WPMh2OyN+btgJj8Fa4/KCY+
sN4cUzyAvf4YU/7AfDgmPLA+FRNe4AdOi4kP3H8Yc/lwTkx45PmeMeEVOLkk
JjzzfERrw49dHRMfMI7rrc16c0zxgPsX7Xmwwx0xxQO+LxhT/ALc/hmTXkL8
fzCm+Ae7/ysmvcjzR2PSS7jP0zHlXzzPKab8Gdf/OyZ/BHu9HpO/Yh0yJn3L
94tjyg/5/mFM+pj5cEz6GXb4Iia9hOu/icnf8n21mPQI82HDJ772s+EX9vo1
Jv8OfK8zvOPvJnHxgfun4/qc8TeueACYD43r+awvx931wDFx4Z92j2t83J8V
1/i5/htXPOD6b1zxgOu/cdmX+7Pisj/ry3HtJ8a8t8c1fzzvKK56EnRqOK76
CetZceGf+yvjbv6Qjcu/wu8X48Ifrt8lrnjAelZcfMB997Y25vWAuPiAfPbg
uHs+wOH2fa4X2f25XhSXPuN6UVz8hA4+LS78w23+Oa76AObrXBs/5uuvccUD
zNfFccUD4OmyuPwLcHxVXPGA+7Pi8k/QW3+LKx6Qv3H5N/y5w+af/I1LL3N/
Vlzxge+pxRUfYJdH4uIDrn88rvjAepbhletFceGf60Vx9/yy162NUb1lbfI3
Lv2F8X4Ud/fPfmrPJ3/jil/kb1z6iPy18ZG/ceVP5G9cepL8jUtvkr9mX+Cr
f0L25/pQQvkC92MlNJ88byqh+Ub/RiRUT+J5YwnhhfxNKB5wf3RC+Of+6IT8
M/7OTgivXB9KCN+4viEh/OOyVvuc778mhH+40UBC9SG+H5kQ3vl+TUL+n+9L
Jtz1jmxC6wHcx5EQ/rG/cdeE/D/88Z4Jt/62b0L+BdfPTwj/fF8+oXwN+D8y
If+F+Tw6IfzzfbyE5pfzmpA+4P6rhPZbQC+clRD+qZ8Twhd0yIUJ4Q92uDQh
/w97XZkQfnmeYUJ8oN+1Nkb1d/s+xnu7tbk/OiF+cf9VQnqI7xMk3PfZHkko
niHeP55QfgB99VRC9VTyNaH1BPI1oXjK30NI6H0F8P1Nsz9xnVB9A9d/mND6
Avj+v4TyQb4PbnggXxPSC4R5QvsPMO/LjQ/QNz8b/hBmVhsfwPO1hmfM2yZJ
tXm+a1J8Yby1zzEfQ5Ly9+RrUvxjvE0qPrHfSff978lJ5cfUIUnlx1ynS8oe
PD8wqfwY19cn5U+4PpRUfoz56Ehqfwv1ctI9fz6clP7hecRJ5YPwoz1J4QH1
m1xS+Md9S0nhn+d1J4V/5rtJ+WOe75sU/rmemxR+6XeTwjuec2TS3b93jH0f
83l8Unjn+zlJ8Y3rR9Yfnmdo/QX+/pKUv+f7O0l3//WlSfkDnj+ZlL9nvSop
f4K4eWNS9VLmu0n3/eeFScVr7pdMuufN3JeUv+P+qqTwz7pSUv6S56skpYf4
/m5SeOd+ScMn6tX/Tspf8/wVwzfcxJuGb74/ZG12y77PerO1EUc/M/xj2F9b
f1hvToqfoMMy4wP5mlS8Q31/tfGB9eak8ieYoV+P8mHq4x7xAbfdvkf4hz8a
3KP5Y725R/OL60b3yN/x5z96hH/wZlKP9AKun9YjvQMzzeqR/uZ5uD3CP9eL
eoR/vn/eIzzzfEBrc93A2nz/yK7nepHdn/rYng/8Z3rk77leZP3nepGNj+tF
Nn7mtz3y99THZj/qHLMvf2+iR/6e6709Lv6P61G8hr1O7pH+gb1O75H+wX3O
7HH9/7k9yge43tsj/BMXPcIb9XGPWy+9ukf+H/a6vkd84PvUPcIzz7O0Nvhz
p30fquEeux/84wP2POa31h/Wp6y/CFvlHsUz7N94xsbL+pTZA/HkFbMXw2aP
4gHrU4Z/5NEf2Hygnx/bfFEf9ygesL5sfOD+KcMDxvuj4QX4+MnwhH6v6nH3
2/3WI/3B/VOGVzx305T8N/zblim3vjPIPuf+qZSux3yOTOn+3A+Zkr/HfE5M
qT/o9tSU8l/M58yU8huMb05K8Y/nt6aU//I8+5T0DuazLSW9g/H5Uoq/PN8z
Jb3DOJHSfGE+Eyn5M67vplQP4vvoKff9k3kp4Z/vJ6Rc/79XSnjj+lBK/hjD
PDAlfHJ9KCU8o3tHptzzMo+1Ns8vsO9jvfNUux/PM0hJ//P9hJT8PeNtSnoN
eu+ilPDP/cwpl+9XpVQf4H7mlOIl61Ep+RPg/JaU9D/1cUr5F9+XTyk/4/pu
Sv4M8XJRSvjn+m7KPU/p8ZTwz3w25caDF1KKB9THKfljnm+Xcuulbxm+mc8a
/rk/wz7n+RrW5nlodj/Mwzf2PPjX71Py/8xnU9L7wMfKlPQc8LU65Z4Xti6l
egD8QL+0+MD3BdPSP+jHFmnhHzzcKq36HN9fSAv/wM/2aeEfMBiYVryHWx2c
lh7A9UPSwj/y1GFp5ZPo34i08I95GZUW/mG3MWn3POGxaeEZvB5vbZ7nnXb3
a0+x6+FHp6WFd+rotLteUWX9g71mW/9hr7k2Pti9Ju2eN1mflv6n/0krX4K+
bjL7wg22plV/g55qT7u/P9GZlv/COLy0G88DadW/WY9LCw+gbXfarY9E08I/
94OmhTfkx8m0/DPhnxZegY+MtXk+vrWBv0JaeIcenGefU7+khXfmUWn5f56n
lxbeMd4908I77LpPWvVPvs+Vlv/HeA9IS/9gvAemFS9x/cFp+RN87dC0/A1m
5fC0/BGuPzItfwVcHm3zibh2bFr+DmY/3vAAf3Si4QX+4WTDE/z1qWnFA+Dx
9D48THuS+28Mr3xfzPjB88Oszeeklb9y/cDwjXxuQVr+HH7v8rT8OfzYFWnF
L55PZfxmvSOtfAf65TqzB/h9g9kL839TWnoS477Z/A1gd0ta8Rj9vs3wjvlY
mFa9B/rhDsM7xnNXWnoH9viH4QN2u9fwg9vcb/hCveqBtPQG8PR/hn/w9EFr
w04PG37Bo3+lXf/9WFp6h+elWxvT/KTxATx9yu6Pf34mrXjE+o31D/Z4IS09
xPdv0opvsMfLacU/5otmL57PbfEA+HgjrfMrMIy30tKbPF/G+IF+vmv8QDx/
3+Ybw/gwrf0UmN+PLF7w/Pe09DFg96nxBdO22PgCPf6V4ZX1JMMz8PSt8YP5
qvGB79+n3f2rS62NP8utDX6tsPvx58aNT3yt1p7P+Gv8hf5ck1Z+jDiy1viF
aVpv/ILO7JeRfsQ89M8ofgBPAzLiF+LwZhnVI3DbLTPiF+y3VUb8Am62yYhf
wM12GfELem6HjOIJzDAoI/8Juw/JyL9yP3VG/GI+nlF8wX1HZBRfuP6cEX6h
98ZkhG/M79iM/D/i0PiM+AA9NtHasMfkjPgGPE21NuwxPeO+rz/Dngd9X2X9
YXzPyB/AjHNtPMjXa2y8PK8qI38DuzdkpD+Bj8aMy68Wszfw0ZoRvzBP7RmX
X50Z8Yu/N5sRv5AfBQwPiJ+hjPJLfC+ckX/meUoZ8Yt1oYz4hfmNZ1SfwrQn
M+IbzJDKuO/DZTLiA/fTZKTfYOdCRvxBPClaG4+ZlxHfgJNd7HPoht3sfly/
t+cR9xl3PXHvjOIphrdvRnyDXt0/o/wE18/PyP/w/e+M/BPm8WCzL+orhxrf
qA+Mb5i3IzPK14GPP9r8wh7HZORfef5URvEMjzne+MZzh41vPD80o3yX+/sy
8vfAx+kZxTfWX4x/3O9n+IdMOdf4hD9/sTbXL60N/XqhtfHci4xfPO/O7s/9
vsYn4PHyjOIV/O+V1n/iPqN4Bftdm1G8gr+5PqN6N/h1Q0Z6Dv9+U0b5DGbt
ZvN3zC/NH2Ict9n8YV5vt/mFv7kzo/iFx95t+OD66kb8utfwBX7dn9H6AHj0
QMZdD/8/4xe+9pDhG/x6xPgAt/ao8YHnw1kbKHoi466XPGltjOdpa4Mfzxqf
+fs9GeU7oM2Lxi+eL5hRPEP95GUbH9ePzL9gHl43fqG+8Yb5J4z7rYzyScz7
OxnlQ8hb3zP/x/1aGff3RT+0+UW/P7L55/vDFs+4HyTjvk/zmfELeP3C8Mf3
mczf0wwZ9/fqlhi/4C++s3hCvWF8AMyWWpv5vPEJ+eoKa+N7KzPu/sVf7Hr4
tdUZ5WvUG8Y32Gmt9Zd6w8aD6/pllR8invTPyh7IYwZkxTf4z82zsifrBVnF
M+B9q6zyKczaNlnFM+B9u6zyW54vl1V9jeeNZbUeQL2Rlf/FuHfMSg/xfZGs
9BL1RlZ6CleNyiqekfdZ4Rd2HZsVvnGf8VnxAXianBUfcdlUa/P8I2sDBzOt
zfWErPgEfTLHng8eVGflD1g/yIpP0Cd1WfkT8KvBxgucN2WVb4JfLVl3P0Jb
VvzieSxZ6QfgyZeV/+Pv2WbFL+6vzbr+M5QVv6DXugwPwFMk664vx7KqP2Fc
CcMb7NSTlf/H31RWeov1haz4xfdRs+56dyErvnH/blb84Hmv1uZ+hKz4hHri
7vY58LSH3Q+439Oeh3i8d9bl175Z8Qv33T+r+Ex9YeMlL8weyJcPMXvBHoeZ
PXH9EWZv1LWOsvng+ozNF+b5mKz8JerZx9l8Ax8nZBXPYM+TsopnsMMpWflr
vh+flT/nfbPSi6xHZKWvgPMzDd/UG8Yv6g3jF/dbGF9gj79aG/i6MOv+fuvF
dj3i0SXGL+R5l2UVT6HXLrc2osqV5g+4npR14/O1xjcM93rjG3TcjeZ/qDeM
b/Crfze+AV+3ZhXPUM+6zeYHuvd2mz/un85KL0L/3m3zj9vcY/iA37zP/DNx
lHXj2aKN+PZgVv6f+6+zbjx7xPANfD1qfIDdHs8q3vD3KbNuffqprPQgdN5z
xi887wX7Pur3Lxm/Wa+w/sBMr1p/YZfXbTzQR28Yn8DPN41PrFdkpa/x/3ct
XkEvv2/2Rj8+zGr9H3j8yOIV9O8nWa3P8bzVrPQi8LjY4hXqN58bXoDHL41f
sMfXWfc81yXGLz7H+AV7/GD8AqyXGr5hj+XGD/7es7WBm5+zG9UvrM3zvDeK
Z2uMXzwP2PgMfq63/rB+kRO/uH8up/HwvIWcxks9kZN+Rj18i5z4RD2RE5+o
J3LyZ8gHtsspfmEed8iJT/Bbg3Kqn8P/D8lp/zf4uWNO+QP1RE75OnGaUz7P
9zxy7nmXY3LueW9jc4pn+OfxOeU7PO88J37x96hy4hffn8mJH+jHtJz4A3vM
sM/5fqu1YYfZdj/Yfa49j+/b5MQ3ro/mxDfuH7T+s35h48O0NufkX/j7WDn3
PLf2nPjG+kVO/gu38XKKX5iXgM0X38fLiW/8PZac9CFoEMlJH/J8/5zWE2GP
eM79vaKk4Q32TOWkD8G3TE7+H3zL5dz12UJO+Ia/K+Xc/Qo758Qv6Pddc+IP
8Lm7fQ7e/8Ha6OaeOfEL87ef3R94PsD4BH4faHyC/Q/KKT7D3x2Sk3/heZQ5
+R+er5FT/Mf1R+XkvxBvjjY+AQbH5pQv8/0k4xP+npiT3ofdTzY+IY6eanzi
+do55fOot5xhfAKO/pyTfoK/PMvwyPeNDa+IH+cZvrkeknPXry4w/tBu9jns
dknO1YcL7HP4h8tz7u/9XWH8wbRcZfzGv1+Tc8+Tv87GAxzdkFN+CVzflFP8
wvU35xTPeZ5uTvGe6yHGJ/DhduMT/MudxifEn7ty0huw5z9y0iOIP/eafwUf
7jf/C549YHzi78nkpIfAuwdzrj58xPAJ3D1q+OX5vTlXHz5heEd+/qS1Wa/I
ue/LPJtz9eHz9jlw/aK1uV/O7gd7vGzPx31ey7nrua/nFG/hN94wfwF8vWX+
hO+Dmn0Qht8zf8Tzg81f8TyknPt+8Efm7xB/PskpX4bZPrX5xfWf2fzz93Jz
qieiHviV4Qe4/Sbnvg/1reGP6yM56SvE4x8Nv+DdUsM3dN1ywz/87YrcRvsR
rA1/+YvxB7z91eIT9N5v1ubvA9n1sMd6ez73C+bVpp7Iyz8Ad1vkFZ94Xlte
40e82zqv+AR+b5eX/fC87fPSB9BDA/PSg3Bjg/M6Pwjl2aF56UHgcVhe/pT7
ifPSg5A5o/LKt2CWMXnpH+ianfLCF3g4Pq98hPohr3jF/Yx54Ze/h5V3851p
eeGf501Zm793nFf8gf1n58Uf6gf7Ptc/7P7gd13ePY++IS++w56N1l++D5h3
z1dpzcufcP0j755/32n2w/qxZ/bl74Hk5c94vFxe8YvnXdl8UT/YfFI/5BW/
qB/yil/UmXnxie8/GJ4wT5m84hfXP/Ly98BXIe+uj5Xy7n6deYZn2GOXvPiF
edktL/5gnHtYm/rB2lz/yItPPEcnLz4hf9nf7s/fs7L+8Dxr6y94dHBe+g92
PNTGy/WPvPQf90eYvbj+kVf8Qvw4Ji//xfWPvPwbzHZCXv4Ps35i3n0f5JS8
/CfwdWpe/hV8PT0v/4t5OiMv/QO/dmZe+gj69Oy84hfseK7hlfvd8ooHrE/k
3fhxoeEffL3Y+AK+Xmpt/h6z8Y31Cfscdrky757HeLXxG1a41vjF+oT1l/UJ
4xfrE+ZP+L6YjR9ufqHZC3a4w/jF/RTm37j/zviE+9xrfIL97zM+8fykvPJt
jHtRXnoQ9ZAHDT+I/w+b/+a54YY/2P8x8/fA8xOGX/x72fANPD9l+Iedns27
673P2ee4/gVrcz+FfZ/rHXk33r1qz+N+CusP7PmG9Rf68i0bD+sTeXe/+rvm
X/h7bHn394s+NP+E+PORxSvE/0+MT6xPGJ+Ax8/y0hu4z+fGJ9YnjE+sT5j/
BR6XGJ+Ax+/Mf4PfPxjegK+lhkfYY7nhlcd4GZ5x/UrDO89nNT7w/R/jC9c7
rM39FdYGvtZbG9f3K4i/PB+joOfz92WtDXxtXpCe5e/XFeQvYM+tCxo/3PC2
BdkH8WO7guyH63coiF/AwaCC+AU9M6QgfuH6HQvS8/APwwuaX9RzRxbEL9R7
RheED55HWZA/RrfGFcQ3+NsJBfGN64IFF5+TC4oHPJ+nIHxz/aMg/MOeMwvu
70fNKog//L1G+xyPqbY25r3W2lz/KCg+8jxbez7w2VQQv6BPWwqKv7BDW0F6
F/PQUVC+BZngK6heCNz6C9KHeG644O6P6S6IT/z9mILiE/dPFMQnPDdZEJ94
/khB/hbXZQrSg3hMtiD/zN+bMbzxPF3DI3//qqD4hOt3KYg/iHe7FcQfxLs9
CuIDrt/T2tQP1ub+CWsDl/sV3Hg3354HPhxk/IH9Dy6I71zfKCifon4oyF/w
924K0sPgxR8L7u8VH1NQ/QK3Pa6geiBkxQnGJ/iHE41PmI9TCopXnIeC4hXw
fHrB3Z9zhvEJ+vTMghu/zi7IXyN+nWt4Ay/+YnjkfoqC8iukDxdaG37h4oJb
L7zU+AAeLbA29YO1ub5hbfDharsff7/H2ohf1xufeL648Z2/Z2b9B47/XnD3
O91acN+vW2j24fvoZj/Ux+4qSP/x90MKqr8D3/eYv8N83FdQvMK0/NP4hflY
ZP6U7+uYv+XvExi/gO9/Gb64P9P8N+LUEwXFK/iXsuGXesLwDb/5jOGf+zMt
vqCe/YK14TdeKmy0f8La3J9pbcDidbs/zWbP53kY5g+oJ8xfcL3Dxgc/8b6N
n9Nk9uF6h9mP+yfMvjwPx+yP23xm/g92+sL8I9a7v7J4BXt8XXDXM781fOD6
7w0/GN4Phi/WIyxe8Xwdi1c8393wy2OLjV947i+Gf8TPX62N+Pmb8QH4Xmef
8/dsCxvVI4r6Pp67aVHPw3wMKCo+4c/mRfEJ+m7LovgEP7J1UfEJ+N626J5/
u33RXZ8YWJT9oJcHF6UHUd8ZWpT9gethRfELYWNEUfwCvkcWNb+4fkxR8Qv4
HlsUPsCPcUXhB9dPKCp/xzxNKgp/rE8U3ffjphWFX+B2RtH9PdCqovgAmM0u
ig+Yj7lFlx819n3o7bqi4hXsUm+fc33Druf7nPZ8rm9Y/7i+Yf2Hv+m08cH/
e0Xxi+9jmH2Ai1BR8Yv7J4puvShSVP2C56cUFb+4f6IofjHuFV1+pYriF/KX
jOGD6xtF9/2fQlH8gv8vFcUv/p5OUfzC9bsW3fM4d7c2f3/T+IBx71UUX+D/
9ym6vw+0n7UxH/vb9bDnfOMT1zuKbn39EHs++HWY9RfXH1F088mjiu7+i6ON
XzwPtah6Bd93Lao+iO+dWJRegN4/uSg9gXGcYvMF2XS6zSfPbyuqXgUcnV1U
/R2wO7eo/AHjOK8oPYh5PL/onq90QVF6CvN+UVHxCnrqkqLiBd/PszbizeWG
f5j1SuMH3NTV1kY94Nqi+/769UW33neD8Qdx4W/GH75Pb/xB/L+lKP3H93WL
7vn6txt/uD+iKP2M+H130T1f/B6zL3TjfWZ/rAf8s6j1LPi3RTZ/3B9h84t/
fqgoPQiYPWL4AG8eNfxg/h8vSg+CT2Xz73y/3/w/4s0zhl/08zmLFzwfy/iA
frxobfDpZeMP/MAr9jme89pGfPqP8YfnBdjzYM+3rX+Yp3eNT/D37xWlb+Hv
P7DxIv7+1+wB//RxUfkUrv+f+SeeH1909wt+bvMB//KlzRe7XZTe4O+xWbwC
b74zfwp7/mDxCvZcaniCv19m/OL+S/Pn3C9heOX59IZn7r80/GMcawz/PJ/E
Pse41hvf8LV+JX3O/ZclfQ4eD7DP+b5mSfzmfomS+M/9EiX1F/5im5LGA72/
XUn84vseJfd8kkEl2Qv2GFKSf+L7HiV3/+DwkvgFe44oyf9hf9iokuIV8Dmm
pHgFXIwtSa/QbiX5W+BzYkn4Qf40uaR6BuoJU0vCH3AwvSR/j2HOLAmvuGxW
Sfjm+x4l8Q88mFtyz8+pKYkvsGedtTFNDSX3vMUmux72bLH7w55tJTd+dlj/
uB/T+s/3O218mKdgSfyCHUMld39TV0n+CvaMlMQvhP1YSev3qB8mbH6Am56S
+/ti6ZLyadgza/PP9z1L0jNcly0pXwc+S4Yv2HPnkvgGFu9akv+nnjA8w55/
KIlv+N5eJfELum4fa1NPGF94nmNJ8QuydL7xC/HoIGvDzxxi90N+f1jJXb86
wvqD/P4o6z/webTxjb/XW9rofdCS/A/1hNkP/vOkkvwX388vyb/Bf55Wkv+j
nijJP/L3i0ru+dJn2fyD7+cYv9Dv8ww/sOf5hi/unyi57zNdaPjk+6SGX8zz
AuMX4vtlhnf8+xXGF8Sjq6yNfl1TUrzi+Xf2OfB1g7Vht5usjfh+sz0P/f57
yd1PcmtJ8Zi/r1SSHgQ+77Dxwsp3mX1gj3+Y/fg+aUnxDPHofvNvsMcDxi/u
nyi5v0/20Eb+82HjF/dPlNzzoh4rSf9Abz1heALsnzS84fpnDI/A7QvGL/6e
quEd+dLL1kb++oq1eb69telnrA0+vGlt6PO3jS9wi+/a8/m+aEl6Fnb90PpL
N2/j4f5LGy/Wgz+1eIX5/8zsxXqE2ZPnoxh/4Ke/Nn/H90dL7u8VfF9SfYr7
IyxeQaYsLSm/wnXLS8qvgKMVJVcfrjS8sR5heOR5hMYnzMdvhl+eT1hy32f+
3eINvrbJPLXB502tDfxtZm30Y4t5uh/i6pbz9DzkW1vPk/6Df91unvoL/7rD
PI3n/wET0Dsu
"]]}}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0.},
ImageSize->Full,
Method->{},
PlotRange->{{0, 96.235}, {-3.6815, 1.965}},
PlotRangeClipping->True,
PlotRangePadding->{{1.9247, 1.9247}, {0.11293000000000002`,
0.11293000000000002`}}]], "Output",
CellChangeTimes->{3.566417495260788*^9, 3.5664565173034697`*^9,
3.566456555093647*^9, 3.566463350254119*^9, 3.566464592512547*^9,
3.566465759925488*^9}]
}, Open ]],
Cell["\<\
Wir nutzen die ersten 60 Sekunden, um den st\[ODoubleDot]renden Ausrei\[SZ]er \
(ein Fehler des Me\[SZ]ger\[ADoubleDot]ts) auf einfache Weise loszuwerden:\
\>", "Text",
CellChangeTimes->{{3.5664175349367733`*^9, 3.566417543950457*^9}, {
3.566417602122631*^9, 3.566417618913526*^9}, {3.5664565688891773`*^9,
3.5664565726649103`*^9}, {3.566456769464118*^9, 3.566456797746428*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "sym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "sym", ",", "1"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "60"}], "&"}]}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566416210895996*^9, 3.566416261044602*^9},
3.5664173353662987`*^9, {3.566417547400022*^9, 3.566417604524452*^9}, {
3.566456575282522*^9, 3.566456582586051*^9}, 3.566456769464508*^9}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "sym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "sym", ",", "2"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "60"}], "&"}]}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566416210895996*^9, 3.566416271659527*^9},
3.566417337909851*^9, {3.566417550743938*^9, 3.566417606580274*^9}, {
3.5664565789639597`*^9, 3.566456586337864*^9}, 3.566456769465927*^9}],
Cell[TextData[{
"Wir bestimmen ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "1"}]], TraditionalForm]],
FormatType->"TraditionalForm"],
"."
}], "Text",
CellChangeTimes->{{3.56641766653157*^9, 3.5664176686717243`*^9}, {
3.566456605711183*^9, 3.566456619757758*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"mitte", ",", "sym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "sym", ",", "1"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416344367093*^9, 3.566416404499189*^9}, {
3.5664164749772043`*^9, 3.5664164803566027`*^9}, 3.5664165186680202`*^9, {
3.5664165522816677`*^9, 3.566416554473386*^9}, {3.566416667930216*^9,
3.566416697488927*^9}, {3.5664177507973003`*^9, 3.566417753419446*^9}, {
3.5664566242558537`*^9, 3.566456626936548*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1.398`", ",", "1.885`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.968`", ",", "1.907`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.542`", ",", "1.885`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.165`", ",", "1.862`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.219`", ",", "1.885`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.797`", ",", "1.84`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.399`", ",", "1.818`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.453`", ",", "1.84`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.999`", ",", "1.774`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.075`", ",", "1.796`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.631`", ",", "1.751`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.694`", ",", "1.774`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.296`", ",", "1.751`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.858`", ",", "1.663`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.914`", ",", "1.685`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17.532`", ",", "1.663`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.148`", ",", "1.596`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20.798`", ",", "1.596`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"22.371`", ",", "1.529`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"23.986`", ",", "1.529`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"25.647`", ",", "1.529`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"27.222`", ",", "1.463`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.85`", ",", "1.485`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.908`", ",", "1.507`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"30.528`", ",", "1.485`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.164`", ",", "1.441`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"33.729`", ",", "1.396`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"35.35`", ",", "1.352`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.99`", ",", "1.33`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"38.573`", ",", "1.285`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.2`", ",", "1.241`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.256`", ",", "1.263`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.805`", ",", "1.241`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.473`", ",", "1.219`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.039`", ",", "1.174`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.102`", ",", "1.196`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"46.675`", ",", "1.152`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"48.343`", ",", "1.196`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.961`", ",", "1.174`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"51.502`", ",", "1.108`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"51.56`", ",", "1.152`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.133`", ",", "1.085`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.197`", ",", "1.108`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.741`", ",", "1.085`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.839`", ",", "1.108`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"56.415`", ",", "1.085`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.973`", ",", "1.041`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"59.606`", ",", "0.997`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.566416365943509*^9, 3.566416383937974*^9},
3.566416480807665*^9, 3.566416519318247*^9, 3.5664165549251204`*^9, {
3.566416668287786*^9, 3.56641669808327*^9}, 3.5664168622938766`*^9,
3.566417345454031*^9, 3.566417755350679*^9, 3.5664565177026653`*^9,
3.5664566281073847`*^9, 3.5664633504660063`*^9, 3.566464592637867*^9,
3.56646576011128*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"mitte", ",", "sym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "sym", ",", "1"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416788206684*^9, 3.566416811680894*^9}, {
3.566417771063353*^9, 3.5664177743940067`*^9}, {3.566456631497312*^9,
3.566456634192457*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.562`", ",",
RowBox[{"-", "1.867`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.169`", ",",
RowBox[{"-", "1.867`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.763`", ",",
RowBox[{"-", "1.889`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"5.364`", ",",
RowBox[{"-", "1.889`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.023`", ",",
RowBox[{"-", "1.867`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.603`", ",",
RowBox[{"-", "1.845`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.661`", ",",
RowBox[{"-", "1.823`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.263`", ",",
RowBox[{"-", "1.823`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.864`", ",",
RowBox[{"-", "1.778`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.494`", ",",
RowBox[{"-", "1.756`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.136`", ",",
RowBox[{"-", "1.712`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.715`", ",",
RowBox[{"-", "1.667`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.357`", ",",
RowBox[{"-", "1.623`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"20.`", ",",
RowBox[{"-", "1.601`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"21.599`", ",",
RowBox[{"-", "1.579`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"23.272`", ",",
RowBox[{"-", "1.512`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.862`", ",",
RowBox[{"-", "1.534`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"26.466`", ",",
RowBox[{"-", "1.534`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.107`", ",",
RowBox[{"-", "1.49`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"29.703`", ",",
RowBox[{"-", "1.49`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"31.331`", ",",
RowBox[{"-", "1.445`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.956`", ",",
RowBox[{"-", "1.423`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"34.576`", ",",
RowBox[{"-", "1.423`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.182`", ",",
RowBox[{"-", "1.379`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.825`", ",",
RowBox[{"-", "1.334`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"39.438`", ",",
RowBox[{"-", "1.29`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.054`", ",",
RowBox[{"-", "1.268`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"42.684`", ",",
RowBox[{"-", "1.246`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"44.298`", ",",
RowBox[{"-", "1.223`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.951`", ",",
RowBox[{"-", "1.201`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"47.585`", ",",
RowBox[{"-", "1.179`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.149`", ",",
RowBox[{"-", "1.201`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"50.778`", ",",
RowBox[{"-", "1.179`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.348`", ",",
RowBox[{"-", "1.135`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.416`", ",",
RowBox[{"-", "1.135`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.015`", ",",
RowBox[{"-", "1.135`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"55.653`", ",",
RowBox[{"-", "1.09`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.208`", ",",
RowBox[{"-", "1.09`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.313`", ",",
RowBox[{"-", "1.024`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.848`", ",",
RowBox[{"-", "1.046`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.917`", ",",
RowBox[{"-", "1.024`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.566416813683556*^9, 3.566416863962236*^9,
3.5664173476919193`*^9, 3.566417775282922*^9, 3.56645651774889*^9,
3.566456634534689*^9, 3.566463350566805*^9, 3.566464592689322*^9,
3.5664657601622868`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"mitte", ",", "sym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "sym", ",", "2"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416884021413*^9, 3.56641688700436*^9}, {
3.5664173643089952`*^9, 3.566417366486847*^9}, {3.5664177873744593`*^9,
3.566417790560857*^9}, {3.566456637568837*^9, 3.566456649334568*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1.398`", ",", "1.965`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.968`", ",", "1.965`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.542`", ",", "1.941`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.192`", ",", "1.868`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.797`", ",", "1.844`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.399`", ",", "1.795`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.075`", ",", "1.747`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.694`", ",", "1.747`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.296`", ",", "1.747`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.914`", ",", "1.722`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17.532`", ",", "1.722`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.148`", ",", "1.674`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20.762`", ",", "1.65`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"22.371`", ",", "1.625`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.013`", ",", "1.577`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"25.616`", ",", "1.528`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"27.26`", ",", "1.504`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.85`", ",", "1.431`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"30.501`", ",", "1.431`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.164`", ",", "1.407`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"33.729`", ",", "1.358`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"33.796`", ",", "1.382`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"35.383`", ",", "1.358`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.99`", ",", "1.334`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"38.573`", ",", "1.309`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"38.641`", ",", "1.334`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.231`", ",", "1.309`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.831`", ",", "1.285`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.473`", ",", "1.261`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.039`", ",", "1.212`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"46.675`", ",", "1.164`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"48.303`", ",", "1.164`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.961`", ",", "1.139`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"51.534`", ",", "1.091`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.133`", ",", "1.066`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.197`", ",", "1.091`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.741`", ",", "1.018`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.806`", ",", "1.066`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"56.415`", ",", "1.066`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.973`", ",", "1.018`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.123`", ",", "1.018`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"59.644`", ",", "1.018`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.566416888434183*^9, {3.566417357006805*^9, 3.566417366938409*^9},
3.5664177920084963`*^9, 3.566456517798139*^9, 3.566456649842119*^9,
3.566463350615738*^9, 3.566464592738562*^9, 3.5664657602490788`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"mitte", ",", "sym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "sym", ",", "2"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416895715335*^9, 3.566416898579172*^9}, {
3.566417795714665*^9, 3.5664177982003317`*^9}, {3.566456654501189*^9,
3.5664566572810926`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.562`", ",",
RowBox[{"-", "2.02`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.169`", ",",
RowBox[{"-", "2.044`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.763`", ",",
RowBox[{"-", "2.044`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"5.392`", ",",
RowBox[{"-", "1.971`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.996`", ",",
RowBox[{"-", "1.971`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.661`", ",",
RowBox[{"-", "1.874`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.263`", ",",
RowBox[{"-", "1.85`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.889`", ",",
RowBox[{"-", "1.825`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.523`", ",",
RowBox[{"-", "1.801`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.136`", ",",
RowBox[{"-", "1.801`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.741`", ",",
RowBox[{"-", "1.777`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.387`", ",",
RowBox[{"-", "1.752`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.966`", ",",
RowBox[{"-", "1.752`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"21.624`", ",",
RowBox[{"-", "1.728`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"23.215`", ",",
RowBox[{"-", "1.679`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"23.272`", ",",
RowBox[{"-", "1.655`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.862`", ",",
RowBox[{"-", "1.631`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"26.438`", ",",
RowBox[{"-", "1.631`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.107`", ",",
RowBox[{"-", "1.582`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"29.738`", ",",
RowBox[{"-", "1.534`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"31.331`", ",",
RowBox[{"-", "1.485`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.956`", ",",
RowBox[{"-", "1.485`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"34.576`", ",",
RowBox[{"-", "1.461`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.221`", ",",
RowBox[{"-", "1.436`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.859`", ",",
RowBox[{"-", "1.412`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"39.438`", ",",
RowBox[{"-", "1.412`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.029`", ",",
RowBox[{"-", "1.388`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"42.652`", ",",
RowBox[{"-", "1.364`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"42.717`", ",",
RowBox[{"-", "1.339`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"44.24`", ",",
RowBox[{"-", "1.315`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"44.347`", ",",
RowBox[{"-", "1.291`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.917`", ",",
RowBox[{"-", "1.315`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"47.518`", ",",
RowBox[{"-", "1.266`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.117`", ",",
RowBox[{"-", "1.242`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"50.749`", ",",
RowBox[{"-", "1.218`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.348`", ",",
RowBox[{"-", "1.169`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.416`", ",",
RowBox[{"-", "1.169`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.015`", ",",
RowBox[{"-", "1.169`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"55.653`", ",",
RowBox[{"-", "1.145`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.248`", ",",
RowBox[{"-", "1.121`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.313`", ",",
RowBox[{"-", "1.096`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.884`", ",",
RowBox[{"-", "1.121`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.5664168993845367`*^9, 3.56641736972589*^9,
3.566417798769298*^9, 3.566456517853868*^9, 3.566456657653984*^9,
3.5664633506681643`*^9, 3.5664645928731003`*^9, 3.56646576035041*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["periods",
RowBox[{"mitte", ",", "1"}]], "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Flatten", "[",
RowBox[{"Differences", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Part", "[",
RowBox[{"#", ",", "All", ",", "1"}], "]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{
SubscriptBox["max",
RowBox[{"mitte", ",", "sym", ",", "1"}]], ",",
SubscriptBox["min",
RowBox[{"mitte", ",", "sym", ",", "1"}]], ",",
SubscriptBox["max",
RowBox[{"mitte", ",", "sym", ",", "2"}]], ",",
SubscriptBox["min",
RowBox[{"mitte", ",", "sym", ",", "2"}]]}], "}"}]}], ")"}]}],
"]"}], ",",
RowBox[{
RowBox[{"#", ">", "1"}], "&"}]}], "]"}], "//",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"#", ",", "\"\\""}], "]"}], "&"}]}]}]], "Input",
CellChangeTimes->{{3.566416950448785*^9, 3.566417094263796*^9}, {
3.566417128819862*^9, 3.566417220526993*^9}, {3.5664172740031776`*^9,
3.56641728085063*^9}, 3.566417453279512*^9, {3.566417831280361*^9,
3.5664178422700863`*^9}, {3.566456665799644*^9, 3.566456676680572*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"1.57`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5739999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6230000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5779999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6019999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5460000000000012`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.556000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6019999999999985`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5620000000000012`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6180000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6159999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6499999999999986`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5730000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.615000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6609999999999978`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5750000000000028`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6280000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6199999999999974`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6360000000000028`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5649999999999977`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6210000000000022`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6400000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5829999999999984`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6270000000000024`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5489999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6679999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5660000000000025`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5730000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6680000000000064`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.617999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.541000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5730000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.543999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5760000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5579999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6330000000000027`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.607`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5939999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.601`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6589999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.58`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6020000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6010000000000009`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.629999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6419999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5790000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6419999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6430000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5990000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6729999999999983`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5899999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6040000000000028`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6409999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.596`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6280000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6250000000000036`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6199999999999974`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6060000000000016`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6430000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6129999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6159999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6299999999999955`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6140000000000043`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6529999999999987`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6340000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.564`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6289999999999978`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5700000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5990000000000038`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6379999999999981`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5549999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5349999999999966`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.57`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5739999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6500000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6049999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6019999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6760000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6190000000000015`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6019999999999985`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6180000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6180000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6159999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6140000000000008`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6089999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.642000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.602999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.644000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5899999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6509999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6630000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5649999999999977`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5870000000000033`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6069999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5829999999999984`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5900000000000034`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6000000000000014`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.641999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5660000000000025`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6359999999999957`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6280000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6580000000000013`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5730000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5990000000000038`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.543999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6090000000000018`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5579999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5210000000000008`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.607`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5939999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6290000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.604`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6649999999999991`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6020000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6259999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6340000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6129999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6050000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6460000000000008`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5790000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6579999999999977`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.591000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5899999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5760000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6690000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6310000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.593`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6250000000000036`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6199999999999974`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.644999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6380000000000052`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5790000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.591000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6229999999999976`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5230000000000032`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5700000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.600999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5989999999999966`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.632000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5989999999999966`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5990000000000038`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6379999999999981`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5949999999999989`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.570999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )]}], "}"}]], "Output",
CellChangeTimes->{{3.566417037145218*^9, 3.5664170852269993`*^9}, {
3.566417129680561*^9, 3.566417140647348*^9}, {3.56641717581981*^9,
3.5664172224107037`*^9}, 3.566417281888981*^9, 3.5664173767611523`*^9,
3.566417453831401*^9, 3.56641784324682*^9, 3.5664565182655478`*^9, {
3.566456661337604*^9, 3.566456678927658*^9}, 3.566463352346302*^9,
3.5664645940757236`*^9, 3.566465761727844*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["T",
RowBox[{"mitte", ",", "1"}]], "=",
RowBox[{"Mean", "[",
SubscriptBox["periods",
RowBox[{"mitte", ",", "1"}]], "]"}]}], ";",
RowBox[{
SubscriptBox["\[CapitalDelta]T",
RowBox[{"mitte", ",", "1"}]], "=",
RowBox[{"StandardDeviation", "[",
SubscriptBox["periods",
RowBox[{"mitte", ",", "1"}]], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.5664135644395313`*^9, 3.5664135932825413`*^9}, {
3.566413840931016*^9, 3.566413846450987*^9}, {3.5664172409639*^9,
3.566417250652793*^9}, {3.566417447558818*^9, 3.5664174599257507`*^9}, {
3.56641784719655*^9, 3.5664178532279987`*^9}, {3.5664567123476057`*^9,
3.5664567172458563`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "1"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]"}],
SubscriptBox["T",
RowBox[{"mitte", ",", "1"}]]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413595788748*^9, 3.566413604730227*^9}, {
3.5664138496182423`*^9, 3.566413852914188*^9}, {3.5664172604677753`*^9,
3.5664172659954042`*^9}, {3.566417462405601*^9, 3.566417465982563*^9}, {
3.566417856011732*^9, 3.56641785863536*^9}, {3.566456719284751*^9,
3.566456720332246*^9}}],
Cell[BoxData[
TemplateBox[{"3.910780766501093`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.566413602619113*^9, 3.5664136050051537`*^9},
3.566413853330969*^9, 3.566415031488805*^9, 3.5664150943028173`*^9,
3.5664152865403767`*^9, 3.566415352194001*^9, {3.566417267815569*^9,
3.56641728474636*^9}, 3.56641738194198*^9, 3.56641746640886*^9,
3.566417859152856*^9, 3.566456518404031*^9, 3.566456720830854*^9,
3.566463352663715*^9, 3.566464594270138*^9, 3.566465761982216*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "1"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]", " ",
SubscriptBox["\[CapitalDelta]T",
RowBox[{"mitte", ",", "1"}]]}],
SuperscriptBox[
SubscriptBox["T",
RowBox[{"mitte", ",", "1"}]], "2"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413681720048*^9, 3.566413748696438*^9}, {
3.566413855794153*^9, 3.566413863833433*^9}, {3.566417287240891*^9,
3.566417295474732*^9}, {3.566417441918975*^9, 3.566417475309024*^9}, {
3.5664178617474422`*^9, 3.5664178658833942`*^9}, {3.566456723957202*^9,
3.5664567266282473`*^9}}],
Cell[BoxData[
TemplateBox[{"0.08131799168914104`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566413749146556*^9, 3.566413864296844*^9,
3.566415031562516*^9, 3.5664150958247833`*^9, 3.5664152921305733`*^9,
3.566415353714468*^9, 3.5664172959548683`*^9, 3.566417383528458*^9,
3.566417442368752*^9, 3.566417475991418*^9, 3.56641786640982*^9,
3.5664565185537243`*^9, 3.566456728724546*^9, 3.566463352834401*^9,
3.566464594393167*^9, 3.56646576210063*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell["Antisymmetrische Schwingung", "Subsection",
CellChangeTimes->{{3.566416149396151*^9, 3.566416152554798*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{", " ",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "asym", ",", "1"}]], ",",
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "asym", ",", "2"}]]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}]}], "]"}]], "Input",
CellChangeTimes->{{3.5664158836474*^9, 3.566416140980277*^9}, {
3.566456734485298*^9, 3.56645673599576*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {
{RGBColor[0.24720000000000014`, 0.24, 0.6], LineBox[CompressedData["
1:eJxdXXecW8XVNWBKaDG2wbh3r7u39109lZW0klarLm0oAQKhd0IJhN5CDaGH
DqaFQKihBgEfPZTQcejdgMEVF2zg856jPfc3yx/ZjKX33sy955575s680eS9
Ds3ss+mQIUPu32bIkP6/f7sS//kOeOyoi3ceuqw8a9cLn/ph5mO+hYd1bP3O
TavKoxa9sib72TO+476eUbPVP34sv3Vs//9509f0Z/8eX/x3Q7lh90e6t930
Pd+cs3ba+M115bsin/xx5F0f+Y55/LoxCz5YUb5+4/9O2+IT3+S7j9jvou8W
l/++/PWevYZ97hta2H7evde8Wrn+K98Q/Peub+OXTvA1fOP7av3tG7+5rNKv
7303dv1r5U9vrvWlzr/8kOGnLfOFzj1o41fWV65b4Xt1Yy9vvupH3+/x3wrf
xsbTk+5e7Vt267Pxpj+v9GFYuy734c+Fq3z9dzv26298HP8Pvj/5+nvyvo/j
W1359yvLfM4a32tT3lt34gEfl5N7DSu13L/WtyT90IQzvv2uvHFwp1waXOdb
0T+s0g/lN/r/tPzoq/x7+Z2b+g253rfxouePfnx9mXbY4DsJA9tQ5nU/yb63
9Hf7iJ99+NoJa8q048+V/q0qP/niDRst8Yvv2qX9A/uuTHsM8XD5uC/L/b1K
PzTE4+evVfqziUe7POtr+6h34xWbeAPjXT2z3zKbeAN2D8Mwm3r93ll66zIf
bv/Ept6hG//3xRt+qDx3M492Xecb2+/eUzbzBvwBty7dzKPfNvheOLp/AEO9
Df3u3GuDr7+Xv9l7qL5PPwz1Bvybg+M29wb8B/jdvLk3EsBa4dt2036kbe4N
g0G/r9xvC280APWJb28McAuP+Hm9cr8tK8+/2weYZrf0Du+H92FvlTmuLT36
67Myn7OVN+Bf4morj3ZeUWY/t/Im9pt5wpoyzLb7rzzieV0Z5rj0V96Av/n9
X3kD/r6t32z+rT36eUP5xxP7P9ja4zjWl2MY4DbeAH7G/6Z/RNt4xN/qCp62
qfh3ZfkPG61c2H5bD24d/m2Z/tjWI54+L1/R774XB9ovlemX7Tx+72Yf8bGd
l2BA+/6vPzye2s47EoD4wrfx3zY+eTuvCh1cUomn7SvXr6zgensPty2s9sGc
Xb8WPjj+X3vE2Y8+mG3zYfI/Lp84zOM41/vAN78bpusR3icP89ivNRXeGCY8
ov8PD1N/4N83hnkD8Q48jNrBo52+8wEntTtU4uFT8lhqB484fasSHzsIL/0o
6ThnB492erq8qh+ut+zgEbdv059P7lDBwycVvhsu/CB8pw33yKsrKnwx3Bvg
136vt/12uPD0n/7w/tPwij/Wlhl/w70BfiUfDBde6J/hwhf/jlC7Dv+N0Pdp
5xHeAN8A75eMEN5gh3+O8ODGf/1Q7meBZ/8zQvgHDr8Z4Q3kC/pzpMc4+KZM
Xhkp/GEc+4wU/sD3p470jueDK7w9smKfl3zo5qMjPcLxf+TVd0dWnv+5D7BZ
PlJ8xTjY0fu+//GPLPcd3P9xZseKf1aRjw7d0bu6P9z2W1Ph/x0r/l5X4d0d
vYH8Af9/v6PwCv9vvZPwyn5am3jfyQOddPzo689+kT13Ep8Rvzvp+cwrOwm/
8P9HOwmv4N+1O1X45Ft+f/Qoj7z/RSU/jqrw3Qc+0GFyVMVfb1T4b1TleU+W
8f0HRgmvmX5YvjZKfEecjqqM5+vy9P5/3mZnD3F53fdl0Gf1zh55ZHmZ8bGz
+AjfP3dn4ZV5Y2cPz0n/WMYwn9nZox3XV/TEzuJHNKePVhtu9kbr+8/10+Ue
o4V/5sXR3s9v9ifqteTLy0arP7TDaG8gX4Lnl41W/NGeYzRe2nOMB9y8/kmZ
9hyj/MC/Y2RP6Je/jKng/1/E2+tj5A8+b0wlf37pQ7htN1b8iefOGit/Ez9j
vQACeWWFb8YKH7zPWOGJ9hzr4u2TseJP0MHPY4VPdGv8OLXhluZx+j75ZlxF
P6yt4Gec+Jx6Ylwl3lZV+Hyc8jHHO075mPE4XvzKfDte+GTeG+/1o+agrx71
gZcvGF/p3z3Un7eNl37h/cd7gNlBH5VpzwkezPLst2XIxzkTKv5aXoY8i07w
nul310UribffTfCoO1dX8uMEj3l0TRn64PoJyt9w0+cThD/Y56cJ4k/ac6I+
Z16YKLyTfyYKr7Dr1RPF77TnRPE/7TlR+OR4J4pfMZ6tJnkD+hnxMGmS4he8
1zqpgp8XqM+jk5TfER+FSdJDSB97T/IQ3mM+Ip8ePkn8yusmeQP6GM+7flLF
X0vpv3sniV/x/ScnSa/Bn69MquBhLfH3wSSPcV/h2yWThF/Yb90k8S35Z7Lw
ibibOVmfwwztk3V/hHlisp7POJvsOTp//8nKD9S3kz3iZqkPf86a7L38Uv9/
i/n92ydX7PNZRV9Mln6GP56fLLzCvm9PFl4xzC8me+TF98kvP0xWPoSdN5si
vYbbzphS0RvLyhhnwxSPuFvF/No1RXhF3OWmKF8z30wR/ujPKcIn84+1gYPz
pwjPHMYU6QH6c4r4FX54dYr4lf6cIvxSVk0RfqlHpniM+6WVfDJVfIvvz5ta
8c+n5cv6YdU2tdK/56hnk1PFr9A7u00VfpGvDpxawcPHPvj1j1MrfPoV/XP2
VOVPjmvg+mX0/0NTvSgMV5n3vTBV+Zl2niq+hd77cqrwivnfqqnCI/s5TW34
YQdr05/TdL+1/TIjNK2iR9f4oP+z08T3xME06Vng+rBpyhf05zTpWfLnNI0f
9rpmmuxDu0/zyOtv016PTPM4T/m/Cp6nCc/UW9OEZ45/mgc5NuW9yvxzmvgH
4xk6XfqP/DRd/AXeb5wuvBDP08WHxMn0SrysrfD1dPEn8Txd+ETYnzhdeAZN
nG+f0+/TFQ8w053Txe/A26PThW+O3/qDuP/fdMUf7PL1dM238PXV072p/eHw
2LIycLTlDOUj5sUZHnXLFxV+niF7EnczvIH6Auf/A5+/UOHnGRU8LvLBfkfP
EB/B3qfPqODja+LtohniM9jvphniO7p1hvI3wvPxGR7ssP4H6uFXZwj/jO8Z
4lfq/RnSy6SNGYoH6MKtq6SfMZ6dq/Q5UNNSpfvBz/Eq6QvYoa9K/SPPVnnU
mStYVzqmSvkH86szq5SfkG//WqX5Kuy3sEr5DdOf+6rEH4ifJ6rEL9AF/62q
5NfHqAc+rvIqdS7q3e+rpD8wjJ+rVG/BfbebWZnPLCkTVzM9zuOXk3+9mZpP
wd69M72B+g7svdtM8Tn8eOBM4Rd+On6m8M04sTYec6W1qZ9mCu/UGzMVX4DJ
czPd+HvD+kf9M1N4R75fMVP6CrjbZJbmBxz/LPE7vl87q9L/dznfC8ySfuZ8
e5bm1+jH7rPkH87XZsl/wOuJs+Rf8t0szf+or2YJH7DfHbM8xvUKH+N9lvQK
8/ws4Q964X+zVF8g3mcJ78xns1SPYLzPlp5h/rY29fVs4R3xEZstfQJ/9c1W
f2iX2eov8T5b+Yp4ny28s140W/NB2PHG2R7rSh+zvnHvbNUzYP+nZktvc149
W3yPvPPJ7EF6e3YlPj6s6N/Z0i+YH20/R/qFfD9HfA8eDM/R/Iv5bY7wRt0x
R3hEfB45R3xPPTZH+AfNX25t1gPnCN+sx87R/BP66v/mSC8xvudI/xPfczzW
KVfy+SvnaH7LevRc4Rt2q5or/U1/zpXeJn/NlX1hp4PmegP1bOSJE+ZqPgSz
nDdXehP4+9tczZ+I37nK93jMw3OlB4C/5+ZKvyD9vTNXeoL5eq70BvXKXOGZ
9Zp5wjPwPtvazFfzNB/kc+YJv8xX84RfjHvfecIv3HTsPOEXeDhznvQYdcc8
zY9hllvmKd6B6/vmiQ84350n+4Jm35znId3GH2R97fN5FX+9XtEn88TXiOtN
54uv4f9p84Vf6pP5qm8h3sLzpVfQ3/x86V/y1nzpBzzvyPnibzzv1PnCJ3Xu
fFev32Bt2nW+4oH1vvnCL/W3PR+09+F8xReuXzZf+OXywnzVHxmvC4RfzqcW
VOLtM/K5f4E3sB6DOEktqPDzHpX6ywLNf4CjQxdIn5CfF6j+juddsKASb4sr
/Lygwq/f+ajHFgjf5OcFFX25kvXlFxZo/kY9tkD4A26+WiB8kp8XiG/h36HV
wjuuG2Ztzt+rpXdYf6pWPoAb5lYL34ij+mrhG/q6o1r4Bv5C1cI356PV4mfw
S7Za/Aw+2LVa/Ayc/a7ag657+onK/KZa+AbvHV4tfgbvHF+t+SXxVi1+Rrxf
Ui09DjtfXS09Ap5eWC3+w/PuqFb+x/PuqRZf43mPVgvv9GO1+BYy70Vrs75o
3wc/LqoWnlmvGhjvauqVxfZ81netf6wPVAvfiPNfqsXP8ONWNdIf9HeN8I38
NrlG9oNfZ9VIf+Oymhrpb5ippUbzJeqOGuEbz4vWaL7FemGN6nt4brFG+MD1
v62RngXe9qmR3mU81Wj+Bz8dXSN8cr5TI32CMDyzRvhHPJ1vbdz3Ursesu2a
GsUPurnQngdeuLNG8cZ6cY3wzuXgGukr4P3pGhfvL9WIzzEterNG809c/77Z
E/j7vEbzT1y/pEZ6hPmqRnyE6zfUCO+M71rhHX+3rRXeMd7xtcILnjetVnzJ
+K6VHsDz6mulx1lfqhV+OV+3Np6XqBVfI86z9jlxYPfjfLZW/E19X6v5JeqU
h9eqXsl6Rq30NtdLasXn8OvZtcI7cPnXWuGduK7VfB0y5Ppa2ZPzg1rhH/2+
p1b+wH0erJW/wP9P1Mqf0BfP1orfeNta6VPGea3wAh75sFb1YsKkVvVu/PP3
tdIzfE6t8Aoz/FQrPFNn1gnvjHdrAwcT6nQ98vmMOuGd9ac6xR/G3VCn+OS8
tU7zaTwvVCe8w+2JOuGd9d462Yf8Xufife862Re8fmCd7A99fGSd1sdgluPq
5D/8PbVO9Rbg+py6ynrkYvrvojpvYD8A8PO3OuEHvHFjnfCF/Hp7nfCHYd9b
p3gg39eJ/2G3J+uEZ+D4RWtjvve6tdGvRXY98t4ndcI/cWLPp36x/oF/11n/
MR8fUu/q8S3rhX9YaXS95iuIlyn14nvE/ax68QvGWV2vfAs/tNRrfYJ6qF56
lLis1/wT9k7Xa/7J+Vy98AL9tke96i+oI+xXL/2ONHlYvfDO+V699Afi7eR6
4RfXn10vfc/1p3rFA/T4FfZ91uvrhXdcf1u9+B356q566S3Y6cF6j/Oe5ZX6
UL30GusFNl7A+hWzB/68VS99Q31aL32DfPWl2Rv1uu/MH8gXq+rFT/j7U734
nvXFBuEf86ZtG6RnsX46sUH6hvO1BtUv2I8G6XmktcYG4R047GgQPnF9pEH4
xfW91uZ6SoP0C9fv7X6cDzUI37D3IQ3CN/p1TIPyE64/qUHzZ+iDMxo0P8Hz
L2xQPRH9v6xB8xvm9wbVq7g/oUH1LPjrrgatBzG/N3jUza9Qnz/WID0Pvny2
QfNVwO7lBukd8NxbDdI7eP4HDdI7zO8N4nv6u0F8j2780CD8M783qB7J/RON
igfWExuFb+4XaXTXR6saxecY7/xG6RfioNHFd2ej8A17dzWqnkp/N2o9DLcp
NIoPMN7dGsUX3N/QKHzT343S79RzjeIj6rlG8Tvnx43K36xnNwrfsMNljeJ3
5JerG1V/Zj2kUfNX6rlG6R0M64FGb2B/GvVco/DK7X2NwjOe/7K1oY/etDb9
bdfDDV80Cu/A5ZJG4Z3+bhTemc8btT7E+G4S3mGHUU2V/R9flsEzE5tUT6S/
m7ReRH83Cd+0U5P2kyC+fE3CN9fbm4Rv6vcmzVfp7yatr3D9qUn74RBfv2+S
XsD3DmkSvjFfPKpJ80fA8sQm4ZX6vUl4p7+bhHf62z4nLzYpXljfbhLe8fy7
moR3PP/+Js2vwVuPNw3i8ybhHeN/pUl4J583ic+B1w+bhHfQ4BdN0jOsjw/Y
7zbWU1Y3Sc+wXt4kvKP/Q5vF54zvZukZ8nmz1kNZr2gWvqELqps1P2S9tVn8
jvF2NgvvtFuz+J31d2sDL8Vm4ZnzNbue8zW7P64/tFn4BgyPaZZewZ8/NQvf
eP5ZzZqfMA83a/4Ce13WLP2C51/XLD7H9bc2a/8Z+bxZ+6eYv5s1f4X9ys2q
P7J+1qz5K/jt1WbxOWDzdvMgPm8Wn1PHN4vPcf3SZukZdHt1s7u+9HOz8Aq8
bdkiPOM227cI79yf2aLvM25bFE+wc02L4o3z8xbFI/Vai/DN/N2i+ir1WotH
nH/G+mSpRftf8fw9WlRvZP5uUb2R648t4nPWN1tUb0S3T2mR/1hHbRGfA6cX
tojP4ccrWzSf4/ysRfqF87MWradzftYivEOvPtwifHL/YYvwC9w83yJ8o/+v
WZv7Z1tUb8E4PrL7sR5jzwPvLm/xBvZzUze0CO94/iatGg/3q7Qqnjkva5We
437IVvED/s5tFX8grdW3Kp+y3tYqPcn141bNt8CfPa3u/rh8q/iN+bpV+OB8
rFV6AH4/uFV6GJf9oVV4hhtOaBU+uR7T6uL5glbxO/p/iX0fefGaVulv6rNW
4Zv5ulX8Tb+0DtLjrVofgN54ptXVK6+2So9zPaBVeoV6vFX4Rr++ahW+Of9q
lR4Hvteaf8gjbZX5zKKKf9u0fwP6YGSbB7+c8RXXX6a2Sc8i789uE54Zz23C
F/rZ2iZ+Be8H2oRP4DZmbcw3M23CO9df7HPmjTbpEeiEA+x5xG2b8gnrLW3S
U6y3tElvcb7dpvjF8//apvhmPLcp/rke1yZ+wPP/3iY9juff3Sa9At59pE16
nOt1bdr/Sly0af2f8+026RX0/39t4m/c95M28Tee/02b9ABptE14Y321TXgn
7tqFX9QnRrQL37DTuHbpG9bX2oVvxPmcdt2f9bV2PR+wam9XfYg6oF31FfBI
vF35CW7JtSt/Yflwl3blN+Bun3blP66/tSs/Uo+1K38yP7crv1KPtXsD73dw
fbld8y1cf0m78jfC8Np2tx5xa7v4m3qsXXzJ/NwuPc79B+3CJ5dV2sW/XO9p
F54Zz/Y5+dquxzgWtw/a72rPxz7wte3CN18X6RBfs37aofHBvmM7ZA/Gc4fw
zHpKh/Ih95d3aD0f17d16H0CXB/sEJ65ftohf7J+1qF6Gv3bITywftohvABf
B3aovsL1tw7xN+O5Q/wKfJ7eIbxivOd1CN/k6w7hm/unOly+v6XDrVfe1SF8
4/r7O4Rv7mPuUL4BPp/pUP2EOqRDfA18vNOhfIZ//6hD9UM8/8sOrb8BH0s7
tD5HHurQfIhx0an9y8R5p/zJ9cBOrYfSbp3CM/m6U/kd/qntFJ7AM62dwht4
O9gpPBIXncIv6+P2OfLmLtbG8/fqFD+zPtqp+g2Gd2Sn5o9cT+/U/ID+7RRf
c329U/qDNNCpfMV83Kl8xvWQTtWfoCfu7JQe4TahTukRzqc63fn/M53Sk/Rv
p/Qm9XWn9Cj1dafml8R1p/iadugUvjmf6hTegI9fOoVHfH1Ln/DNebRP+GU9
1Cd+x31m+qTfuV/Hp+exHuqTvgaOAz71l/nYJ/1Bfe3T/JHx69N+eMavT/oD
OmN/n+xJ//qkP+hfn+ol8M/pPs0fYcfzfJo/cr3TJ/3BephP+/FYH/FJj+D6
f/iEb+Djfp/wDXz82yd8V8JOeOX+Zp/4GP552ye8I82/75Oe4X4Mn+aLwOFS
ex79a/2hf32KR9hnM0/1Eda/PcUv/LCDp/oI7DXSEx8gDkZ7Wm8Avsd74hPO
vzzpa+B5uqf5P9dLPfkX9pvrCc+AWY0nvsP1DZ7wg/zT7Ln1wA5P+MP1fk/4
5HqbJzzjb7cnfQEz9dj3cZ+0p3gAjec95QPqIk/45nzAUz4B7Pb0pJ/gj9/b
+OCGAzzpL84XPOUzxNcRnvQb5rvHeNpfiHj5oyf9x3qvJ3xDX53maX6Efpzj
6X0U+Ocv5n/mK094hq6+wpO+hn2v8YQv4Op6T/wK/9zsCZ/Axe2e8M34sDbD
0q6HfR+w++O5D3nCL9z8uCd+Bi6f9MTP8NsznjsffsGTnsb1r3jS0xj36570
B2D7tic9x/0hnvQeePdDT3oQ/vnUk17keoSnfAu5+62nfAxYfe8pX4O/Vnru
+y1rDN/w74+GL8avJ77mOPzCJ+PXL/wCR8P8igfw2I5+4Zfx69f94Z9xfj0f
/pnsFz9Dr07zC7/Ua37lI/h1nl/8DP/U+JXP2C+/6nvM937xB/zT6df8EPkj
4Bf/cP+fX3qDes8vPc16q1/rd/BPxi89Ctoq+oUf+PU3fuGLOtUvfcD84hc+
8e/7+sXf1IvWZv3Ovk/96BeeWc/zK56wr/l4v/Q9cHiSX/U96g+/9DPX5/2q
XyOsz/MrnkGjfzF7EbZmT7yfcIVf+oP1fr/m68DJDX7lU/jrZr/4CM+/zS++
gtnu9Gs+hTx0j1/6Gnx7v1/4hp0e9kvPMh/6xd/g6yf9wjfXDwy/8OsLflcv
v2Jt+Pt1wzfzp92f81m/W//40K/1VeShz6z/8MuXNj4851sbP/Ot4Z11Ir9b
D1lj9oW/1/ulR4DXn/3Sh8zHAb1PyflTQO//Mh8HhG/E48iA8A237xwQnpiP
A9K38M/kgOoT8M+0gPQD83FA+GU+ts9ZXwkoPpiP7X7AV3PArVd3BJRP0G1/
QPvZuV4SEF/j+mhA8Qx89Nj4cX3a7MN8HNB+Wfx7X0D4xjRn94DsDz7ZKyA+
Qrd+H5D/cJv9A/Iv19sC8j/zccDdj3JMQPjB3+MDwhfXZwKqL4P2TrM2+nVW
QHhlPSggvLO+a23g62K7Ho+9PCD+xvznqoD4G7rruoBbn1wYUP6BzrwtoPom
ZO0dAeUv2PHugOIf/b8voPk39NdDAekR4PWxgPCN+WQ5IP6Bvng6oPkRePB5
8y9g8JL5Hzj6b0D8h+e+ZXiHHxYFxOfA6/sBt378ieGT64kB8THwttjwDbx9
Z/hmfdqu5/t2AfE38tePg+Ltp4D4G/3aNCi8w0xbBDV/RD7/dVDr7fDDiKDq
R1yvDEqPAOdjg5qfQ3ZMCkqPQO9NDUpvwz8zg6rXwg1zg9LbXO8KKp+zPh6U
XsU4m4PCN/evBYUv6EcvKPyBj0JB4RPrFd1B4Rt277HP0Y1UUPzM+rrdj/Ec
1PwVMmS3oPIJ4myvoOKR8Rx065cHBBXPeMwhQcU73xcOunxwtNkT8fhHszf4
4MSg3jdhPTco/cj3C4LSl/DXuUHVB1j/Cyp/M56D7vr05UHhG/F4VVD4Rjxd
FxTeUB67KSg8Mj8HhV/GXVB4h73vDrr8f39Q+QG3fTioeh7s/e+g8Mz940HN
f1mfMDxDx70Q1Poj83NQ8c38HJQ+gZneDoof+L5MUPU/7u8Luvz9aVD8w7Je
UPzEenTQXY9cGhS/UW8HVV9gfg5K3zI/BzV/43qj4R323iwkfOIx24Xc9+F2
sDbMPjIkvQP9Mzqk+zE/h8TP3E8cEp7h5xkh5R/Wz0LaX4D+zQ+pPsR6acg9
r6EppHoIxtcWkt4Gbn0h8Qt0ZCCk+h76GQlp/sj9qSHVRzDf7A2pPgLc50Li
a9ixGBL/4fpdQ9IDGNZvQ+Jrvr8TEp6Rn/YLCb/gqYPsc/DPYdbGfY+y+8GO
x4WEZ9bnQ4ovXH9ySHhG3jvDxgM98OeQ5o8Y1wUh8TXi9q9mL54XEVJ9BLTw
N7M3/HVtSHhm/IY0v8f1t4S0nwTmuCMkPCNf/DMkPPN9+ZD4m/trQ+Jvvv8Q
Ep65fm/4Q33r6ZB7ns1z1sY4XzI8I9/819rA1Zsh6R344d2Q+JqwDCm+uH5k
+Oa02PCNcS8OaT4Js34XUv5CPl8e0nyb+/tC2o+DOFgX0noB+OfnkPgEdty0
S3ob+NqqS3qS+bhL/mY+7pLeBq+O6lK9AfYd26V6GvNxl/ga/p3aJTxyv0mX
+Bbdnmtt8Fi1fZ86rUv4Zb2rS3zM/YVdwjPrXV3KJ7i+q0t4Bi5iNj7Wu7pc
PGfMHph/5bukrzHv/k2X9DXfr+wSnpFXftfl1qv27ZK/mI+7pC85X+5SfQS8
cmSX8jf1dZfmY5wvd4kvkQ9P6hK+mde6hF/Y62xrc32mS/jlfNk+B54v6VJ8
sP5l94f+ubpLeEY/r+8SnmHnm7uEZ/Dq7V3SH0hz/+iS/gD/3N2l9RjktQfM
frjvw2ZfxNW/zf7cP92l/Mn1IPMf/P2i+Zf52PwPO75u+MB60NuGH+B+UZf7
vteHhm+M49Mu6RHExVfWRt741vBM2Wafk8eszXxs9wetrLf4gr9/6RJfM4+E
NX/EY7YLq37N+ldY9X2k/R3Din/m47D4AW4dH9b6Odc3wqpns34dds87mB2W
P2Hf+WHlZ65/hLX+yP3BYc2/WP8KC8/QK76w9Db0fDAsPuW6S1h8i3iIh4Vf
wCYZFn7JE3Y9/r0YFp6Zj+35CNM9wsIz619hl5/3C4ufwX8HhlXPp5/Dineu
v4TFz4iH48KaL0L//CksPGMedkpYfAN7nxEWnnn+Rlh45nkjYekRxMNF5n+u
r4elR3DbK8Pib/jr2rD0CPx4Y1j4g466JSz+BQz/HhaeYe+7wuJvXHevfR9u
fNDuB5w9GlY8wd/lsOKN+djwzHxs42E+DqveR90b1nwacfxW2H0fbZHhm+tH
hm/Oj8Oa73B+HNb8kfu1wsq/fJ8mLD4DDleEpUcw3jWGb8T/+rD0CMLmZ8M3
xjs0InwyH0eEb/hzh4jwjHy0Y0TX475jIsIveHlCRPkCdp0SkT6Cm2dElG/4
fnLE3a87PyI9zfP8ItLT6EZjRPVr7keIaH7I/aERrccA/8GI5ofU0xHxEfej
RDQ/wnJZKiJ+htlyEc2vEP/FiPACXOwacfXsHhHxJfC/d0T4w7Rrv4j4Frr6
YGtjvfVwa0O2H2XXU0/b/fleTkTxBDydElG8AU9nRDTfpZ6OKF7x/PMjmi/z
fbOI4p37lSPKb/DX3yLiC/jr2oj4hPEbEd+gX7dGxEfU0xHxFex+V0R4Rlzd
GxFfA48PRYRn1rciyv98f83wB3s9HRG/or70vOEXvPBSxN1f+pp9n/Fr+Abf
vhtRvQNx8oHhm++7Gr4J64jikfPhiOYPjN+I8hXcsiKieOf5MxHxAetbEfEF
vvdLRHyC52wWVT7lftyo8M16dVR45vpT1F2fGx0VnvHP46LCM/Nv1D3vZ4a1
Gb9R8S3zr7WhB+vs+7BzU9TdP9gaFX45H466fByKuu+3R6OqT/J9vajWo3j+
SNTl43xUfIzrS1HZD/fdLery8Z5R6Q2e1xPVegLr01HxE2B5SFT8Bb8eERW/
Qc8dHVX+5v6lqPDDelbUPb/01Kjwh36fFRU/I37OtTbi54Ko8It134vteuD8
8qjwi/i5Oqp8wP3JUdVjYO+FUcUf9PttUekNuOEfUeUj2PvuqPQYz+uIDtLP
0UH6OSr+4HpTVHoD+Ho2qvk89XNU9Q+M95Wo6nnA1xuGBwz7najmi8DF/6Kq
f8DsHxm+GRaGR/DN4qj4lt+zNp6zzL4PHl1pbZ7vGdX8ELywwZ6PXg7pFp4x
vq27xc8w4/bdwjP06/Bu2QNu2alb9kL8jOlWvR9untCt+Tf6N7VbfAI3VnWL
bxAHc7rFR8BDdbf4ivWsbuEB7m3uFt8B1+3dwjPr0d3CG89P6BYeeX5ht/DK
+W+38Iz4S9vn3B9q18O+pW7xPfOcPZ/7Pax/3O/RrXiEvQ/ods+zOMTGDzwd
afbh+11mP57P0C2+AA5P6hafwF+nmn9g77O6lU/xvXO7pZ/5/l+38jFwdEm3
9Cbf/zS8YFxXd2v+Bdxc3y3+ZPx2Sx/wvMNu4Rd2vtPaXC+2NtN4t/DL8xG7
FS/c/2jP5/6PbsUb/71b8cj47Va8kke6pTcArzcG4fvtbukNxP17Zl/un+x2
z/v+zPzD80PMfzyP0vzL/fDd4mueR9CtfA3dsrZb9Q+et2L4wr8Pibn75baO
CY98/yXmntc2IubuLxll15NHY+Jjvg8Xk94Bn0+NqT+4viqm9SO+XxETnnme
b0z1eNy2Pib9zPiNST8DT+0x7a/BdV5M6yv451DMnc90x5RfGb8x4Zn5NyZ/
c3045urPvpj0Kd+/i4kf6deY8Mb1pJjwTF6MiW+RDw6JCb+M35jwy/qVtZl/
Y4oXxq/1Bzg4LaZ6DNeTYlpPwXz73JjmC5h+XBiT3oK/L45p/RD584qY+IDx
G1P+Y/zGpJ9Zv4pJPzN+Y8Iz4zem/Iv8eU9M+pnv/8bE19Cfj8TEh+CRf8eE
Z/DVU4ZHvh9seIVfXrQ230cxfMPur9vngME7dj/olffseVxPiqm+wfiNSR8x
/xq+8e9LYpovMP8avgGbVTHpM+Zfwzd06IaY5oc83y6u+SHnu3HpZ/Rv+7jw
jLgaHhc/Y5w7xYVn5t+48IP4nxAXPwIPU+PCM99fjwuPXE+yNnC+IC5849/r
Bl3fFBd+gcv2uOIHZvTFpZ95vkVceMZ4o3HhGX8ScdUzwMOpuPs+Vy6u+TPW
k/viWq8CrnaNa30F+WDPuPQe36+MSw/i+v3j0ot8vzYuPc39HXHxGXEVV/7m
OOPCC/d3xMWX3G8ZF5/iOWfFxc/A7blxt359YVz4Zf6Nu+8bXm73g1mujgu/
XA+OK774/m5c8cfzOOKKT+4/jyt+mX/jWm/i+wZxra/yfLi41g8xzMfjwjP+
PmX+4LTF/IU/L8a13sv8G3fn+6/Hxdd8XyEu/cH8G5f+4Psphi/Gr+GPfo+7
758sibvrM8vsc5h1leGZ77NYG/3YYPHF80ISqseAz7dOqL/o53aJQfo5If3F
+E1IX6DfYxLiA9hhYkL2xfVTEu75OVUJ+Qf5YE5C9Q3kgwUJ8RXfj0rI/8y/
CekNvi+VEH54nmjCXZ/rSgh/iLNua6PbiYTwSj8nxL98D9e+j3zwm4Q7/9zd
ng887JVQfPF92YS7///AhNaPmH8T4mPWmxPu/pdjE5pP4zknJKSfcd3JCc1f
AKPTzT+ww58T0oesNyeUb5H/LkqIv5C/LkuI33D9lQnxNfp7bUJ6FeO6KSH8
Iq3dmhD+gP87EsIr38+2NvTZfXY9138T4n+u/yYUL3w/zJ7PenNC/AweeD6h
eg3rzQnpDa7/Jlx+fjMhvQG+WZSQ3oAZ3jf7sl6VkH4mjhPuedGLE9KL3I+V
ED+x3mz4hr1XJ1Qf4H5pwzf3VyakX7l/o0f1Bthpix7hETAbZm3w4Uhr8zyB
HvE9zDCux30ffHKP8Mv1oh7hl/uxeqT/uV+6R/MDjK+2R/kJX2vsUbxjfK09
ym88b6RHfIF8H+wRn4Bvwj3Sz6w394iPwYu9PdIb6Ge2R3hmvapH8ynm2x7h
GX/36HHxtHeP8Mbz8XuET77fYG2eP9jj7t//Q4/wC974Y497/tqfetz3ZU/t
cdcvz+wRfvGcc3qEX853e4Rf7t/oET/T7j2Kf547bfbk/g2zN+e7PcqP3E9p
/sJj/mH+5Pu55m/Ez/2GB+6/6pHewPWP9Sifs15leOP+K8Mj900bXoGvl63N
8xOtzf2UPeJ71qvsftCTH/Yofrg/2voHvvqqR/HH9x16FJ/A19Ie8TPy/qoe
8TPwtbZH/IzxbugRP8BeQ5Lu+3JbJKU3mGeSwjPPx08q/7JelRQeqJeTwi/P
A0kKP6xXJYVnzN+qksIz57tJ4ZP1Kmtzvmtt7tew6znfTQq/rFdZf6iXk8of
GGd3UvHIeUZS+gl4SCc1H2a+TWo+gev7ku55TbsnpZe5fzKp+R/Pn0lq/sfz
BJPiY9jr0KS7H/jIpPzN+W5SeIAZjk+Kj/n7AknxI/j4tKTwzPcbku56y3lJ
4RN4+Iu1ET+XWBt56Iqk+J3v2yaFX56PmxR+EbcLrb+YB9yelL5A/NyZdOcH
9yaFX/DNv8xewN0jSfEz7vt4UnyB+cH/mT+4vpsU38De/0mKj/i+dlJ6A/h6
Myk+4/vbSXc+9X5SehS8/XFSepXn6yTFp3zOIHwuSbr1teXW5nks9n3g7keL
F67vGr6Zb3vVH+iRbXo1nwX+h/W65/eM7FW+gj937tV+OvhzfK/0BPNtr/Qc
822v+JjvM/Rqfs73GXqll+GX2l7xMc9r7hUfM9/2Kn/Dn5294mNcF+gVvsCH
kV7hmb9H0Cs8Ane91oZ+y1qb5wXZ9QDcrr2KF+bhXsUT0ujevcIv6g/79Qq/
zOu9wi/wf3ivu9/oD72aH4MXjjP78febelWf4/6MXtVDeb5Br/Qe5hnn9EoP
4rYX9IqfeL5Fr/QG14cMD1wf6pXeQD3x+l7xI7qxsFd4Rr67rVd45vuF1ub7
C73CJ/D/QK/wyfWhXre+/Zjdn/Vl6w/w/2yv8gnPq+xVPNIPhmfE+xtmD8ar
2Ys/b2r2BCw/NjzzvLte6WPkk8W90hfo9hLzJ8a7zPDM9xUMD9wf2av5IN/D
NDxBf2ySEr7hr01Twjfy+ZYp4RP2+ZW1YZZt7Pv8/Qa7H+wwLCX+BZ8OT6k/
fA8gpf5yH0JK+OX7TSmNF/0bkxL/Qq+PSwm/XI9KCb/43qSU7A37T02585Vp
KddfVSnhF3wzKyX8cv0qpfoFxjsvJbxQH6SEX+r7lPAFu9elhE/yj7V5/pi1
eX5+Snhl/S0l/QJ7dVobePFS4l++jpVSvMFeoZTwi/wfTkkfI99GU8pH4MF4
SvkK8qsnpXo96SalfAc+SaeUDzE/yaa0XgJ75VPKp9yflpK+4Pk7KdWreP6t
4QX5d/eU+Bn92GMQfvcyPAJGexteqXesDXzsZ9/H9QdYG2Y6OOXuTz00pfiB
Xw9PiY9RrzgypXoi1iP+kFJ8Yj/PMYZn7o9LKb4xvzghpfgH/5yYEj8AHyen
lA+B59NSypdcPzD/4bZnm3+Rn89NSV/yvO+U+A1xeqHhB4+5yPCF8V1seETc
Xmp4hX653NrQiVfa96Fnrrb7cT+exQv8eX3K3a96Y8o9H2qhxSPyzS0pd//J
7RbP3L9n+IWeuDMlPQaz/dPwC3/cY/jl+2/GN7jugZT0BfjxwZTqFVy/TEkf
sx6Tkr6APx83vLA+Y3jC/PcpwzPw+7ThD/OfZw2/iPfnU9ITPD/fPudfux/T
vvEx9yNZfAEnb6Tc89DeMvziundS0lOw+iKzB+z1nuEX+eYD42PmO8MveP4T
4xOeb5GSHkQ6+Nr8y/dxjb8wjO8ML/DbUsMv+Hu54Q3z+5WGRwzrB+Nn3sfa
6Oe6lPu+ywb7nO8bGH6hX4akpc+5rzEt/gWfDU2r/4DFFmmND9dvlVb9Efjf
Oq35Hfh727Rbf98+rfkdcDosrfk0Hj8iLX/AXjum3fMJR6XlT+T30Wn5m+87
pF0+G58WXvj+Q1p8zP1baeEZ452WFv5AezPS0rfgs5lpl39n2+fU73Y/ns9q
z0P9scb6g/HWpYVfvq+cdvHblBb/Ah8tZg88py2tfIX7dKQ1X4a9fGl3Ph1I
C7/cP5YW3yC/h82fsFfU/I15VSyt+gV0TCItvoN/k4Yn+DeVFt4w3mxaeOT7
lGn3fdOitXm+uLURD7ukhW/+fpjdn+9rpaVvEA97phVvPP/Q+o94+H1a+Qb8
uG9a9Rqen5dWfIMWDjI8AyaHmH35vpfhGfY6Iq36EcL4qLTmM9AVx6SlL/j7
nGnpSfJQWvyM+ecJafEz7HWS4Qv9OCXtvk94muEZ/jw77e63O8fwDH+eZ9/n
+6B2f8xn/mL4Rb3qrxZvwP8laekh8ONlaeUb4OqKtOo1wMNVaeUr5Pdr0spn
sPt1aTff3ZCWPsb85aa09DFlR1r5FPWgW9PSx/ja7WnVpwCLO9LSF+CLOw2/
qJfenRY/s75ieIM+uN/wCD3/L8MrzPaQtWGnR6zN+Zy1ed6l4Rd2ecL4GHZ9
yvrL92nS0heUVTZepK0XzB78PfO09Bf45mWzJ+s5hmfg7jXzB3D1hvmL51eY
P4Gjd42fWa9Nu+93v298Bxh/aHji7w8afmHmTw2PCIfPrY24+crwDH3wddqt
331r3+d57HZ/xM9Swzfzr8UX86/1H2b/weIT911j/Ay7rUtLHwMfGyz+8efn
tPQx4mJIRvoC9to0I37BOIZmxM/Iw1tk5E/wxVYZl5+3zojfwDfbZoQX2OvX
GfEhrh+WEd5grxEZ4Z31LmvDXqMywju6PdraqBeNtTYeO97uz/1bGcUX9OMU
6x9wONX6T5xllI/wvdlmD/DV3Ix7vtSCjKsvqjPiY/BhXUb5kvk2I3/xfeSM
8IvxtWTkb75PkREf47qOjPgP8ePLuO+fBDLCF/NtRvjj62HWRtqJWpv5NiP8
grcSGelhwC6ZkT4HP6fs+eCBTEbxxv0qNh6eN2TjZb7NuPy8S0bxjsfulnH1
xW8z4mfuDzc8Yz3vdxnxM+Yz+2S0/wLzy30zmv9x/3hG+Ri8d2BG+hP6/GDD
L7p92CA8HWF4wzCPyoivuV/V8Ay3HGufw49/tDbX4+1+/L03ez7sfXJG+ofr
BYZf5LMzbDyQxWdlpC/4vknGXf881+yF/UHnZ8TPsO9Fhmfc9+KM+AX569KM
9AX45YqM+Im/t5hR/QL6/GrDM89fN/yAD28wvAGXN2Xc+d/fDd88nyXj/l7p
XRlXf9+dcevX99rz4Zf7M9K/8Pu/MtIPyA8PGT4RH48YPgGTf2dUXwO+yxnN
52CXJzPu+5TPZJQPMYznDY/Q9y+a/4CnlwyPNLP5n/NTwyP33xvegP+3DE+4
7h37HHZYZG3om/fs+3y/xu4PXvjI8Ah/fGp8iv5+npE+4PlvGekD8Opi41e+
j5Nx529LLB/BTEszWu+EP5aZfYHblWZ/vN+1yvCIbqzJSO8yX5p/gf/1GTff
/mT8hfH+YngCj22SFf4w3qHW5npsVnjEP29lbeBsa2uTsLPiU4z311k9j+8L
ZcX3GO+IrJsPdsyKX5kvs64+GJ1VvoF/x2YVv8yXWcU3xjsxq3yGv5Ozwi8e
My0rvuB8Nevur52Zdeczs7PSv/Dv3KzwjPEuyLrnL1ZnpT8RB3VZ4Q9pt97a
nK9mhVeep5oVnuHftqyL546s8Ivx+ux5wHPA+ofxhqz/MFvYxgdcRrPKL6hH
xLLSC+DzRNat3ySzwjPP08xKn3G/Sdb9/aZ8VnzD+WpW83Hu/zR/gyd3yYrP
gOPdsu55x781PHF/meEN/d7b8Mj6r+EbfjrA2oi3g+z7qK8eavfn+5P2fP7+
cFbxxvW2rOIR/Tsmq3jF9cfZ+KH3js8OWo8z+8EOJ2WlD3geUdZ9P++0rLtf
4sys+Ifz1az4GPninKz0LvB7Xtbltwuy7nl0FxmeYKeLDa/w56WD8Hu54ZPv
Y9vnGO9V1kZ+vsbuz/fF7PnA743WP+B3YVb5BOO9xfALPX6bxS949e+GX+7X
MfzCL/80/PL3Msz+/P138w/Pb8iKjzHeBw2/kG0PZ933UR81PgNu/m144flp
hi/+Hofhl/v3DI98f83wimE/n3X3x71on6PfL9nnPH/Yngf99V/DM3DxusUb
fy/ZxgN7vZOVfoC9FhkfY37wnvEx4un9rPQurv/I8MzfDzc8Ax+fGZ4xL/nC
/IduLM4q34IfvzY8w15LjN+47drwBD5fZvwMO6/ISn/wmE/jU7h5teEVuFhn
n/P9d2vDDj8Znnmea9Y933CTnPAMfGyWE57hz61y4l/MA36Vc+dr2+ZkH/Dv
9jnhl/XgnIvfETnVH1gPzrn8Oyrn+nN0TvwFfhmbk94FTsbnhA/gd2JO+GE9
OCd9iuunWpvv9+aEb+SrqpzwCT062z5nfs0Jr8yv9jyMsyYn/cD3ga1/0KcN
OeGX+TXnxmtLTvEMv7XlFO/gpw6zJ/dP56QnENf+nObPqFeEctLDzK85zU+A
v2jO1cexnPQkDJjICb+4TW/O5eN0TviFbslam/XgnPDM/JoTHrnemhNeEa+7
2PdZD7b74Xu/teej33ta/5hfc4o/+GUfGx/ywH42fvD0/mYfxoHZj/u9zb7g
88PM/uDzI8w/CIujcqpH8PcRzb+47ric8i/i7fic+Jj7TQ0vyPcnGZ4wqlOs
DX46zfDJ8w8M38y31kY8nGNt/r7AoHi4wO7P3+fMKT+Az/9q/UXYXpJzfz/9
Motf6KcrDc/glavMXqwP56SPOV/NiY9x3Q058TH05k3mL54/mFN+5fzV8It4
/YfhA/x0l/Ed98cavhCv9xn+0L8HrI2/Dxp+YaeHrQ1+edS+z/xqeMVjyznV
E/j7ODn3vLunrf/MrzY++PP5nPQU+OlFswfzq+GX+dXwy/xq9mZ+NX9gvezN
nPIlf/84p3wK/C7KSQ8zvxof43sf5Nz1ro8MT+C3T6wN/H9m+IO9vrA2+Pyr
nKtHvrY286u14ebvDa98f876A7uusP7C7KuMjzGs1RavwP9ai2fw449mL77v
npOe4O8D5ga9f5cXfoGvzfLSe9Crm+flT56nnpe/Ub/7VV56EvjaJi+8cL9T
XnjCMIblXXwNzwt/PF8uL7wDXztZm/udrA18jckLzxj3OPuc97Xn8fcX8u55
91PywjPPc8+Lj8GDVXnpC/DrzLz7PvQcsxfqnXPzqkcCXwvyqleAl2ry0hfA
V11eeAa+GvLiI+CrKS9/w16tefEz4qE9L7xwv1Ne+IKs9fLK/xhnwNroRyQv
fAIP3dbmeVr2ffxzT17xAbv35sW3GHfa+gM75fLCL/dj23j4ux556Ss89zd5
rcdDH+xq9sL4djd78vefzd6cz+bd9yH3Nn9xf5PhF/y6n/mb+7vzys/g14MN
L4izQw1P3N9kbe5vMvxxfpsX/3I/uLXR7eMMvzzPz+KB54HZ/aEvTrL+IO5O
sf7i+tPy7nlBZxp+mW8tnsHL55i9uL/c+AB8cUFe/MzzAfPiZ55PlHffX7/E
/Ml8mxc/g9+vMPyCb64yfLA+bPiBXa4zPPM8fsMfxnvTIHzebPjF9bdamzix
73M91u6Hr91pz2P9OD9ov3teeoLnq9h4qCsM3+Crh8werB/nxc8Y72NmT+Dz
cbM38PmE+QO4esr8xfVYwzfw+ZzhG/uTXzB+Q/3vP9aG314ehO9XDX98P8ba
sNcbeff9i7cMv3juu/Y57PU/ux5h+761Ec8f5qV3uD/f8gfW+z+1/gJfn9v4
gM8v89LLXI/Nu/uJvzV+Rj38O+ML1pfz7nlDy/PKlzxPxviZ+4eNnxFXa8zf
sNe6vPQHz082POO2Pxu+MI4hBeGR56MXhEf4dWjB3f+7hbX5+5AFl9+3tjZ/
v93ux/lvQXgGvoYV1D/4bXhB8Qj+27EgfGM5clRB48f++dEF2Qf6d2xB9oNZ
xxekNzBfmFgQvnm+c0F6kOdrFKQX8e/TC/IvujWzoHoG8DW7IHwAX3MLwg/w
Mb8gfMHe1daGH2oLwiPsVW9tXN9YcOeTLdaG3mq1Nv50FMTXGIbP+sPfeyiI
r6F3ggXxNXiyqyC+Rv6PFBTfGG+soPgnLxTc9w+SZm/YK1UQvlGfzhTE1zzP
pyD9iOsLBfE112fN/4irXQwfXJ81PHF9tiB8w897Whv58XcFl6/3sTby274F
9/ew9i+4728fZG3A7JCC9DP49jDDM/dDFcTX4N2jbDxY5j7axgs9fazZg+fd
F9z54J/Mnrj+RMMz5pOnFNzzzM4wPPP3LQpuverPBeln5t+CWx843/AD/P7F
8ItvXWT4gx68ZBB+L7M23wezNs8PLLj76662+2N81xbc/e/XW//4+6sFl58X
WnzCzrcWpDdYbzZ7oN52h8U/7HtnQfU5nu9t9iZtF1z9fF/B3Y/4QMHVzw8W
xM+cD5v/oS8fM3zwPCXDM/79CcMvz2exNvcfD+LXZw3PiJ8X7PuIn/9YG/Hz
suEX43rV+gNcvWbxhvnsG9Z/POctGx/i5x2zB9d3Db/A1/vGz7j+g4L0NKZH
HxeUH1lvLih/Al+fF5RfmX8L7vtpi83/GOc3hm+u7xp+mH8L0h/w83Jrc33X
8In8/YPhF7pjjbVh73X2fa7vGp4Bo5/s/shHvxi+0c9Niuov9vduVnR/X2fz
ouKX+5GLwjP/Fl17bVuUPaEPty/K3sy/RfmD52MU5S++/1OUfoTfRxXdet3o
oupZiKexReEFvDa+6PLzRGtzfbco/CGephZdPTzd2jxvozjo9wrter4PbG2e
P2nPY/4tur9PUVuUXoK96m08zL9FxTP0YXNReoP5t+jWO9qL0tO4vrPo7s/y
iu77TsGi8inSbKgofHN+XHT323cXhW/Oj4viP+Cjpyg84breosvX6aLwB3xl
i8Ir4jFvbeCrZNcjHvvsc/z7rvY532cuKr54/q31D/++l+GZ70sanoGvfW38
wNf+Zh/wz4FmP+DrYLMv34cuiq/R38OL4mvouyPNf8DH0YZv1AOONf8DN8cZ
PtDfE4riR543ZHjDesHJRfErxnuq4RX4Ot0+R7ieVRRfI3//2T6nH+3+GO/5
1ka/LrT+oL8XFcXPmG9dbPGKv5cWpTf4vqfZg3YsuudlXV1063fXmr0RT9eb
P9DvG4tuPWqh+RPjvXUQnm8vaj7FfGz8h37eaXjCeP9p+MZ47zH8Ybz3Fd3z
yB8ouu+3PmhtjONhiwfQxGPW5u9b2vOZj4uuXnra4hH4e64ovQEcvmD8jH7/
p+jux3q5KL3B/Ft039d7zezP/Gv+wnPeMvwy/5q/ed644Zk0aHjmMA0/6MfH
xpeI808Nb3jM50V3v9qXhlf+fpd9Drt9Y22+H2v8i258b/mCx1wbfsGPKw2v
qEf9UHTX89cUpTcQP+uMjzG/WW98jG78ZPaFvX8x+yNPblJyzwvfrKT5D/Z7
bF4a9HslJfEXz28tCQ8s2JTEf4if7UvCE8+3KQnPPF+uJPwhn4wsiW+h73ay
z/GcnUvCM+w11j7n+/n2PJ5nVRJ+wUuTS+Jj9GOqjQf5ZHpJ8Yp/ryopnlHf
mVUSP8Nec0ru+SDzS7I37FVdEj8z/5bkL57XUXLng40l+Rs80VwSvtHN1pLw
DH3XXhKemH9L7n5Kz9r8veuS8I547CoJrzxO3j6HvbqtzfN7SsIzf0/N7o/9
vr3WP+SjtLVxfbYkfPP925Lime/fllx+7ispn/E8ArMn+Gr3kvgZftijJP2H
8e5VEj/jMXubPxHPvy+586X9DA/EoeEbYXKQ4Rtxe6jhjevBJff91iMNn8gP
R1kbbju25NYrjrP7Mf/a56hHnWjPhz47ueSu159q/Qc+Tjc8I57OLImfYfez
Dc+4/pyS+BrzpfPNvrjswpL4hfuVS+7vi15cct/vu9T8i35dbv5HXF5ZEl9z
/1XJPX/qWsMX38c1/KG/N5bc/c4LDa+4/hZrM//a98Efd9jn6O+d9jyM65/W
H1x/T0l8jfHeZ/GJ/RgP2Hjh34cMz6DHR0ru+zaPljQ/gR0eN3sjHsqGZ9RX
njI8k0cMz3yM4Rnx/3xJegPDfnEQnl8ahOdXrQ08/3cQnt8YhOc3rc33ce37
GMcia3O/s92f+52tzf3OJff3gz41PHO/s42P+51t/Ij/xYZnxO83Zj+ktSVm
X1z/vdmf+51L0h+w1wrDM89bLbnzwzXG15wPGx64/6rk/v78T4Yn7r8y/ub+
qz7hE/bazNr0Y5/wyTi2Nvq3bZ/ux/Nc+/R8nnfTp3hDvW14n/rL94H6ND6e
f9En/KI5uk/4RbfG9Lnn34zvU/5D9yb2yf78Pe8+6Q3uv+pzf29nep/8y/1X
ffI/6899wjPwMLfPXX+b3yc8wS7V1gaeavvErxhmfZ/wCX5s7HPf32+xNtbP
2ux+yJ8dfdIX4Fmf9QfX+/sUb/w9pT7xMf65q096C36K9Imf+fulZi/ycp/w
C77p6XP3f6X63PXCTJ/0BuyV65PeAAwL5m/0s2R4+H8uBlsO
"]]},
{RGBColor[0.6, 0.24, 0.4428931686004542], LineBox[CompressedData["
1:eJxdXXd8XMXVNWDAMSXGGPcu96repX3aIm3RantRKAECgdBbKIHQCYQaOoTe
IfReQljgo/dOHDoYMGBwBdvYhs86Z3Xub+R/9Bvvvvdm7j333DN35s1O2fPg
9N6bDxo06IFtBg3q+/vPy/HPd8w3M6qG3LHcN3uX857+cdbjvrMO+Hr9bStW
+0Ytem1N5otnfbs9Ftl287nrfe8e3ffFd3yTTvsu9cjEjb46fPCBb3B++/n3
XbXOd1fXZ38Zcdcn5f9f5bt27MKPpm31mW/IHeN/t1fL175/rXgrvuewxT7c
9qaXy9/72nffVctueS72SWnf878/zlf3rS/9yMRNT1hZ2u/xIy4cPfgH37Ej
+u78cyl5zqUHDT9luY/93lgahH8ry/3aUPoj/q30PXFN34PXlpZvumvD31f5
0L1lK0p9o9vlvNW+E3DjpSXe50c9n/f5yffz8X1f2LcUhCHW+N7e1Oti06e+
nr4/D6z1tQ19/4ZD2n7wbRrcSRcH1sle/N7PPvbrZ1/ft4a+v96HYeQ3+Kbc
c9imIW6Q/Vb2maO40YfbvvCz7+Yrnpl8z2G/+MJ9Zuxa4zsKA/lF93/qpetC
D6361df50KqN7xz9vY/2GOR1N/y9Y/cvF/tgtkcGefz7Wrk/m3m835ullk8S
m67YzOsf70+z+hy+mXfw8FOefOm670u87+Zev/1x+yc3956P9T1gTenqvssa
tvA47vWlcX3uPWkLD49/Y0OJdt7CuyTQ1+ONpReP7BvAYLWrAITBXg3+bSzh
cd8M9jjOn0vZL27aZIEtvel9tz9rbYk42dK7tc+NHatLm0B4+shFW3qr+y6b
saJ8v608mPO0L0p7YYBbeTDzce+X77e1h2EP/7/Spos33XHrsr3e8HHcW3v9
/gXMRgzx+u37et/jrxhS/nyl7/pQ3wdDytf/5ANcd/uN149/mOPi33j00/ry
939T9scGH8cxVG3ibKj3O3R8vS+KAW7j9eNnAj7YxkN4jv+pjKdtPI57le/P
fbDafluvz1oHfP2dj/7Y1uO4F/su63PfS9t6/fHGeNqufL9/lTiu7cr+e6v0
f33h8fR2Htx4y1elTf859YN12wkfjKftPcB/6I+lPtQe+cT2Xn+84Wuh3wof
HP9vPeJuQwl+2nKY1x+/uHzSMOEBfPOHYboeZjhxmIfbPrSuRDsP89jPNez/
o8M8wOWAH+nft4d5jNOVxMOoHby5+GBZaUzfDap3KON7cQnjTu4gvLCfOwgv
GOeZO5T9c4sPuLt5B9kT/nxqB484/rjMd8PlD9pluEc/rSjzxXAP5n1ulQ+0
+Pvh8u/LfbD563CPPLnWx/gbLjwwToYLX/SPtclrOwpPtOuOXj9/E0/WBt4v
2lH4RbzevaNHXirz4ss7ev18/uampx3/7Y7eX8Hcy3305wiP/Patj/8/QvhD
nOw9wnP4/uQRXj+/Mr5GlO3/egmw/vcID36676MS+vHfER7j4ssSeXCEh+6f
/m2Zj3aSvw/s+zi9k8c88hP56OCdxCfk/52EJ+a9nYQ3+P+HncRnxPlI4ZP5
caQ+J95Hlse3vgSa3WPkAPyO1POI+5GKF/j/k5HqP3hn7UjhFd8fM6qM92/K
+XGU8As67BnlIY6u+V+Z/0Z55IGLffj+g6O8/ryN694cJbwu7aPN70aV7f2l
D3baZrTwCzdWjvY2eX2Tw1b4GB+jhQ/adbTXnyfJG6OFJ9jn2dFef36jnhgt
/KE5fYzwCrx7Y/R95p0xuh9xMkbxAVxcMkZ8TDuP8frz5aF9iXr5GPE37TnW
e3Zy352+oX3qxnrkyc98tOfYcv/e5/WHjC3nv2epX/4xtmyP+4m3t8Z6iIv9
Pi3xeWO9X/rSU9WSEsa13TjxJ+w0e5xHHl1Rxs84jzhYVeabccIv7TlO+KE9
x7l4+2yc169/QAe/jBPfwm4TxutzwKbR2uSb8R554+cyfsYr3zNPjRe/ks/H
e4Db2FXl8Y73mAeXl+NxguKV+XaC8El9M8Hj914sgRfPnSC8Ir5unSC+4P0n
eNRb//PRnhO9V1/p+7ekrEsnio+Am/BE8RXzyUThlc+ZKLyAp66d6LFfa33I
q4snetSRP5OPN04UHmnPScIvcTVJn5N/JgmvoJcrJ3nUaT+V9dkkD+lg/uqy
PpgkfHK8k8r9X8bxDJksvMIvkyd7oKFdvvD90Gf25snCJ/wanix8wg/5ydJ/
4J29JnvksQ/Jp4dOlr9on8llffhdCfe9drL4CHa6b7LyP77/1GSPeegn+vO1
yR517lri76PJ0nfg26WTxY8Y97rJwjP5Z4rweWWfW2ZN0ee4besUj3lsXQlu
754iPTATDpwivILn/jSlnF9WlfXtFG9tX9p5ZnmJeWSK1z8fwMe3TZH+ob6Y
In1EP/f35wra970p5Xz2AvnsyyllPv8v+eXHKfIXcLDFVPkTMJsxVf6GHq+b
Kn2H/BqaKvwgX2eniv+Yb6Z6nF+V5yGHTpVeYP6ZKnyCrs6xNr5/71Thnf6c
Kj6HnV+f6gFnj/1I/H80VfoFOP5+qkdduqKsR2w89GeFxkvcV8gemBe0VCje
gZ+eirI+fLQE3OxaUdY375aQr/av0PwF/fpLhefHg7+kf86okD+Z3yvkb/j/
kQrhA7zxYoXww3FUCF/Qe19ViB/h19UVwjP19DS1kV93mCZ805/TxN/oR3Ca
9Ahwk5nmkXd/Km24rc+x0zTfQf49ZJrXP3+lP6eV+f2HMn9O8ziPW0J7XTVN
8yH6cZr4l36cJr1FHEzTfIB6a5rwzPFPUz6kH6YpX2I8g6eLj8lP073++THG
XT9dfEw8TxeemB+me/3zXfL1dOGbeJ4ufGO+cfx04Zu6wdrk3eniX+DtTrse
ePu33Z/jny79TTNNFz/Dft9MF77x9Z+mC9/o99YzhG/OH2cM4OcZwjfHOUP8
wbw0Q/4gP88QP8N+R86Q3oO9T50hPYj/P3+G8AD73TBDeGF8zxCeEJ5PzJC+
QDdfnyE9yvieIbxS78/w+usvsON6awMHQ2eqjfGMnql4QVg2zRTe8Tc2U/oC
cd47U/FIHpopPYS8c9RMzfcxv/rbzHK8LaX+uqD/+q9pvxtneqw7fFaCbL9/
pvgDMHlypsd5a6kEHLwx06MOvpd64NOZqg9wPjBTehnX/TJTehl8ut0s+Z+6
b5bwged5s8SXsHdilvCG2+w6S/jHZfvPEj6B12NnedQJa8t6e5bwjLR9ubWp
n+z71BuzxOcI4+ft+Zwvz5Jepv6ZVeaLlaxHrZwlfYX8sNlszQ84/tlef30P
36+eXbbHu5zv+Wd7w2hwH+fbs8XvqIPtNlv6hPO12eJ34PX42eJ38t1s6RPq
q9nid9jv9tnSp4z32dIr5KnZ0ivQC/+bLfwT77PF//zebOGZ8T5HbebvOcI/
9fUc6R/ER3SO8A5/9c7xOG/4kfpm3znSJ8T7HI2HeJ+jfEZeniO8I19cP0d4
Jy7nlOcj75Rg/6fnCO+E9RzhHfOSz+aoXkj92d/fj8r6d47qi5gfbT9X833y
/VzhHTjvnCv9wvw2V/qF/z9XeER8Hj5X+pt6bK7wC7ddam3y5lzFB3XWXMUP
nvN/c4Vvxvdcr7/uS3zPVT7C81fNFb75//OEb/ydOU/xTn/OKz//Ec4ne+dp
PgO9ccA88XdFnxuOmyd9jQecPU/1C+Dvn/Okr4nfeaoHAH+Pzivr0dXE3/Pz
pBfw9/15wi/z9Tzhl3plnvic9Zr5wi9wMme+8Mt8NV/4pV3nC7/MV/PF1/iz
z3zFG3B09HzhF93+23zhl9O8+cIv4ufm+cIvePr++eJrznfnqx6Hbr4zX/U4
jHvxfOGX180v5+sPfMiTmy9QPQr+n7ZA+KU+WaD6BuKtc4HyP/qbWyC9Qn22
QHjD8w5fIDzieScvEJ6JO2vjsuvs++jWPXY/1vsWCL/U3wvEz0jbHy8QfnH9
8gWqL3J5YYHq14zXhWV9tMTH+dRC6TfwecdC6T30K7lQepB+Xyh9Aj8dvFD4
Jj8vlN7E885dKH1Cfl4ofFOPLdT6Avl5ofQJ6iIvLpQ+oR5bKL5GHHy9UHqC
/79Q+IZ/B1eqDfsMq1Q8cP5eqXhh/alS98dt51UqX4B3aiuFb+iOtkqNB/cJ
ViofcT5aqXwFfslUKp+BD3apVL67sQ+mf6hUPuT8plL8AjsdWunRzm/5cN9j
K8XPxFul+BnxflGl8A03XVkp/YowvLFS+Mbzbq8UvvG8eyuFRzzv35Uuvp+u
FJ5hp5eszfqitTGuRZXie9arKpUPgKMllcI3/1YK36wPVHr965NIY79Wekhj
U78jnodUlfXFV4yHYVVe/7oj8tuUKg/pNv60D2Exu0r1ETyvqkrze9B0U5X8
dTiAWCX+xvPCVeJv1gurhAf8LVQJ37j+91XCN/C2d5XyP+OpSvNPPOfIKvEv
5ztVwjP48m/Whh/PsTa6e3GV8I552FVVihfEx41Vwjuec2eV8M56cZXwzuXg
KtX3gPdnqsTnwPsrVcI77PpOleqhpIkq6RFctrhKfI7rl1ZJjzBfVYnPcf2G
KvE547tafA5cbFst/Y3xTqgWn+N506qlvxnf1aoH4nm11cIj60vVwivn69XC
M57XbW3wf8a+z/pTteqLnM9Wi8+p76ulR9DvQ6uFd9YzqoV3rpdUS48Af2dU
S29Dl1xQLbyTR6qlv0H711arPsj5QbXmn5iv3Ftd9s8rxO/D1aoX4Lonqz3m
pc+pL56rVr0Bev31as0/6adq1beh7z+ulr5lWa1aeMN0+Ydq6Rnet1rxAH9u
rFY8sN5SI3wz3mv0OXA6sUbXwy4zanR/8l6N9BTye12N9BbrFjXSL3hesEZ4
B366a6RfWO+tkX4hv9doPRGX7VUjvAOG+9eo3o28e3iN6gMIo2NqhHfQ0sk1
qicgb59Zo3oL/Hd+TRkvS4mff9YIP7DD9TXCF/xyW43wh37dVyP+J9/XCL/g
z6dqxP/AyUvWRhy8VeM5+yQW2fXgvc/s/pxH2/OpX6x/oNl1NdIziPNBtRof
zL51rfAPe42p1foA7jO1VnoGun52rfCOflfWCu+Il6Za6RnqoVrpGebBWukZ
2DtVW14PXFaez9UK74iT3WuFd9Sx962VXoZZDqkVHjnfq5UeQbydWCu+xvVn
1ArfXH+yNnjsMvs+6/W1wj+uv7VWegr56q5a5SPMWx6uFf5ZH6oV37NeUCv8
o9uv1ao+jvu+Wyv8U5/Wiu+Rr76qFf4Rtt/Xiu/B06trxffQZxtrhX/WF+uE
f+B+2zrpWcBgUp3wwvlaneaf7Fed9AV0Qn2du97eVie84voua+P6RJ30ENdT
7HOu39v9OB+y58HeB1l/YO+j6pSfcP0JdaqXAqen1Um/4fnn1Unfof+X1Kke
xfxeJ33I/Ql10o/w11110pfM73XyD/r9eJ3yNfjyuTrlc5j11TrpHfDzu3XS
O3j+R3Wes19rcZ3wRX/XCf+gvR/rhH/m9zrNL5nH6l18j7Y294vU6/vA4cx6
6SncdkG9i++GevUPdmqvF75h71C96on0d73wDXvn64VvjHfXes1Pub+hXvim
v+vF79Rz9eJ36rl6rQ9xflwvfHNeWy98AweX1Gs+h/xyZb3ww/vWq15HPVcv
fkU3HqwX/1LP1Qu/3N5XL3zj+a/a5+jnO/XSR/R3vfCO+fmX9cI7/Ly0XnqL
/rb+MZ/3f76sHN8NwjtwNapB9Rbo50kN2r9Afze4+F7QoPoW/d0gPY/48jVI
z3O9vUF6nvq9QfxOfzdIz3D9qUH8jvj6Y4P0MXjnoAZ3ffyIBulr4Oz4BuGV
+r1BfE9/N4i/6W9rcx2jQXzO+naD+BzPv6tBeMfzH2gQn0N/PdHgrnc+3yC8
Y/yvNUjPkM8bhHfY9eMG6RnkxS/7+/9ceb9Mg/AO8/7UoPzLenmD9CiuG9wo
vcr4blQ+J583qp7IekWj8IP6ZGWj8M16a6PwiPG2NwqvxLW1WX9vFL6Bl4J9
zvlao+KF8zV7Hv4e3Ci9gjx1VKPyD/D910bxOZ5/eqPwzfs0is9hr0satf8Q
z7+mUXyO629pVP2cfN4oPmf+blQ9AfYrNUq/s37WKD0Dv77eqP0puO97jcID
47tReCEsGsWfuH5Zo/CGcf3UKP7l/pNG4R9427pJ+Ife397anMc1KR9QhzUp
noCbqiatB3F+3qT+UK81ic+Zv5s0Huq1JuEblxWblO/w/N2bxOfM303ic64/
NgnfrG82Cd8w+0lN4nPyRJPwjfA9r0n1Cfj58ibpWc7PmlR/5vysSftBOD9r
Ep/C7482iW+5/7BJeAVPvtCkeMD33rQ2989aGzj5xK5nPaZJ9SHYeUWT4o9+
bRLe8fzNmpWfuF+lWfMTPqdZ9SryRrPsBzvMa9Z+QOS12mbZn/W2ZvmH68fN
8h/4M94svQL+yjWrHsd83Sy9wvlYs9ZHAdsDm4UvuPnPzZofAo7HNYtvuR7T
LLwCz+c2C+/o/0XWhr68ytrUZ83CN/O1PY91nOYBerxZ65/gjWebtZ+M8dys
eOZ6QHN5v3W/Hm/W/AY88XWz+ILzr2bVe4HvteYf6pAWrf/Tvy2esx9+RIv4
DDxa0SI8YL46p0X1R8Zzi/QwYNXcIn5Ffd3fovoM/BxtET4x30xbm+sv9n3W
5+1+oOH9WhQ/3M/XovhivaXFXf85eUD/z2wRnvH8C/rv/3k5nls0X+F6XIvW
j/H8f7VIr+D597So/oh60WMt8gfX61rkL+5PaBF/c77dIj5D///XIr4DT33W
Iv7G879tEZ4QVytbxN+sr7YIj8xrreJz4GDHVuEf+nN8q77P+lqr6jnQLXNb
dX/W11qll4Cz1lbhmftkWoVnzAtjraovwU7ZVo0fsNm5VfuD8f97t2o+w/W3
VvEH9Vir1ouYn1s136Qea1X9gOvLrVofwfUXtUqfgMavbnXXB29pFX6ox1qF
d+bnVukF7j9oFb/i+c+1is+53tMqPDOe7XPytV0Pvl9i9+f6bav4GvP2ta2q
B/F1kTbhm/XTNtVPMc5xbeJrxnOb8Mx6SpvwzDpIm/iDdmpTfQXXB9qkR7h+
2qZ6IutnbeIv+rdNeGD9tE35Hfjav016nOtvbaq3MJ7bhEfg89Q24RnjPdva
5Gtrc/9Um/ANvr+5TfzM95valC9w/QNt0iOUadZf4PPZtgF628YLfLxv9oD+
+8Tshed/1SZ+AD6WtYk/mNfapA/J1+3Sj5w3tcufXA9sF39xHaVdeCZftwvP
sEt1u/AMvmpuF96wfhVoFx6Zd63N+ni7+Bh5aWdr4/l7toufWR9tF34xvMPb
pTe4nt6u+QH92671IK6vt2v+zPcbbLzMx+2Kd66HtGt+Dp64s118AX37ULu7
X+WJdvEN83G75pf0b7vml9TX7eIz6ut24YF2bxdfU5e0i685n2oX3oCPX9uF
R/zd2qc2ec/n8vlUn+IBt53l0/24X8en57Ee6hM/Y97p9ykemY99A+qhPukv
xq9P80fGr0/6DXXiP/k0f6R/farP0r8+rVfAP6f6NP9HHj7b5+qPi3zSH6yH
+cRnvK9PfIfr7/CJD4GPB3zCN/DxH5/0CfnZ575v9ZpP+IZ/3rM2eOhDa3M/
hl0PHC6z59G/PtVD6F+f5gewzxae9Afr357Wv5Dvd/A0v8ZzRnjiA9hpjCd+
Bq4neOJn3sdz61nTPfmP66We/It+zPNUDwQtVXmql+D6Ok/4Qf5p9MSPeH6b
J77G9R2e9ALX2zzhGc+PeMIv/Bu3zzH+lF0PmOY86Q2ux9nzOR/wxM/Iq3t4
wjf88UdP8Yr77Odp/yXnC57iHfF1mCc+gF2O8lSPwv//xROfsN7rSV/j7ynm
P/T3TE/zR/jnH57wzHzlCc/QiZd5wjOec5UnfEEPXOsJf/DPTZ47n7zN2owP
+z73j3rie5jpQU/6Gc9/xJ6P/PiE9Q92e8pT/QM68llPegr3edETP+P61zzp
acDqLc/Va+95Wj9gmjR7g38/9rRfBf3+3Cvz8aLyeoSn+RGG9Z2nei9w8YOn
+SP4a5XhG/l6jeEb/v3ZE38yfg3fXK/sED4Zv9YGbQ3rEB9DL+zUIfwyfjuE
X/hnfIeL3ykdyifQq9M6hF/qtQ7hF/w2v0P4xf9XdQi/1Pkd4mfm+w7Nz+Gf
9g7tp0D+8HcIv9z/16H1Ceq9DvEV660dys/wT7pDfAe/FzqkP7Av7Xcdqndz
3B3SB8wvHcIn/LNPh/BMvdjh7r892NrUj3Y/1vM6pDfwfuKx1h9874QO4Zv6
o0PxyfV5Gy/y8NkdylfQef8we1GfdEh/4L6XdYgvWO83f4Dvrhvgr5s6NB/C
8281f4Pv7jQ84Ln3Gl7Atw8YnjDORzukr5kPDX/g66cMr1w/MDwjv79obcZz
h+IBfnrL2syfdn/OZzsUX9CxH3dovRXziS86tB6JuP6qQ3oaeeq7Ds0XmW87
NJ9mnuuQnsbfNR3iD/h7fYfqfcDrLx3ia+Zjv+ohnD/5xdfMx37la8TjCL/w
jWGO9ivfMx/73frIFL/wCP9M8wvfzMd+8TPzsX3O+opdz3xs9we+Gv3ia+pg
v/Q0+KTDr/kA10v84mtcH/YL38BH3K94x/Upv+YfzMd+6RF8r9cvPQJe3c0v
PQI+2dOv9QbQ5x/9qvdBhvzJ767fHOQXvpmP/crnjGe/u7/2WL/wzfUZv/gW
Xj/FL3zCDqdbm/Uga7O+a23g60K/8gFgcqlf9UbknSv80vvQWddYf7k/zy99
hTrArX7lJ8Dmdr/yF+bh9/iV39D/+82eiJNH/Jovwu+P+5U/MZ8s+cU/+N4z
ftWzETcv+FUPwThf8aueDX3xhl/5HXh71y9+xJ9FfvEn8Pqh4ZH7Q/zSE1xP
NPziPksM38Db99Zmfdq+z/ft/O589We/q482+rU+g3rd5gHhHePYKiC8I5//
NiA9Av/uGJAe4XplQPYE/4wLaL6INDc5ID0CHqkIaH4P/8wKyJ/o5ryA9DbX
uwLCA+vjAeEF/mkMCE/cvxYQ3hCnXkB4BB8FA8I74iASEH6RF+LWRr5KWpv1
dbsf4zmgeELa3DWgfAI/7RlQvmE8BxSv4Pv9Aqp/IF8cFFA+4z67gOYnuP7I
gOp7wOVfAi5fHx+QPmE9N6D5I+0YUD0Edj4roPV31v/M/4zngOoL8PelAeEb
8XhFQPhCPF0TEJ6Rtm4ICJ/MzwHhl9dZG3a4x9rMz3Y/hPmj9jzY+z8B8Tft
aHhmfSIgvQVcvmjjZX4OiL+Zn81esPd7Zk++LxOQHuT+PvMH/PV5QPqEtBUQ
f7MeHRB/cz0xoPxNvR2Q/mZ+Dij/Mz8HXH3wi+EdX9siKHwCRtsFhXfkpx3s
c8ByRFD4BU+NCSqemJ+Dyh/cTxx09ceMoPrP+llQ+gv9WxCU3uY4gtqfwOX/
oOyH8bUEZV9mzaDqIajH+YPufoiuoPiJ+1ODmk8Bxomg/I9uZ4Nu/boQFB/i
+l2Cwhfu8/ug+JS6Iyg8Ij/tGxS+we8HWBv8c4h9H88/wu4H3B0TdPXIX4PC
M64/Maj4A2+cFnT3//09KDyDd84NKr5h1wvMXjwvwuyJbv4zKP6Av64OSm8z
foPCM66/2fyJftwelN5Evrg7qPUZvi8fFJ65vzYoPPP9h6D4kuv3QeEbOH0m
KH0MvDxv+MVzXrE23PyGfR84fsfayBf/tfsj4D80fHP9yPANvv8yqHof+GtJ
UPkJ/vo+qPyFfL4iKD3C/X1B6RHE17qg9Aj455eg8id4f/OQ8ivwNSQkPcJ8
HFK9j/k4JL2N+d+okPQ2+jUuJL3NfBzS/A5uqAgJj9xvYm3gal5I+MVjK63N
+bLdj/WukPDM/YUhxRfrXSHhGdeHQopP8Gs0JH3NeldI80fgOR3S/BG6LRcS
nmHn34U0f+T7lSHpEcyf/hAS/yAf7hPS/Ij5OCR/cr4ckv5ElBweEp6pr0Oq
j3C+HBKekQ9PCAlv3GcTEl/DXmeEhF+uz1ib8+WQi+eL7HrWv0Lib+iUK0OK
L+jja0PCM+L0ppD0B+x6W0h4htvuCKn+CT/cE5JeA+4eDGn+CP56NKT5I/Lk
f0LiE+6fNv9wPSgkPoK/Xwop/zIfh8RniLu3QuI7zDPfM/xgvr0oJL5k/Ssk
vY14+tzwifj42vCN+sh3IdVXMI4f7HPqLrue+djuj8eut+fD379a/LH+1em+
n7Fdp+YPrH91Kn/BbDt1uuuNYzq13ohuTOgUf3B9o1PvX7J+3an5I/A8p1N8
Dfsu6FR+5vpHp/DA/cGdwjfrX53CN3Dh65Q+QJ4OdAp/xEWn8Il4iHW6+097
7HOef2Bt/CnY/ZmPO8XPoIndOwesj3ZqfsD3iTsVr4jj/TsVz9z/0Cl9zfWX
TuU3xMMxne5+7b92Cs/w40md0oOw92nmL56/Yf7keSOdmj+i3+eb/7m+bvhA
GF7eKXzDX1d3ij/R7+s7xa8oT9zcKfwiTP9lbdj7rk7hF/O9+6wNuz3cKTzD
7//uFJ7h71Kn9BLzcafyDfNxp/arMh/beGmWTuUvxP+7Zi/OjztVH+H6UafW
wzg/Nnxzftyp+RD3a5k/+T5Np+ZTGMdKwwPGu8bwjfhfb/jG3186xd/o9+Au
4ZH5uEt4hT936BL+0e+dusT3iJ+xXbof7D6xS8/Dn6ldwi/oYkaX9BPfT+5y
zztb0OW+717dpXjHMOu7pDfIm13iC+4P7RKfAP+BLukN6uku1fe4H6VL/Iy0
nOyS/oAeznYpfyP+C12qhwCmu3SJD7nfsEv4Av736hKe0Y99rY1584HWxjzj
0C53/fIIa1NPd0nv0C72fODpJOsf8HRa1wA93aX8g+ef0yX9wffNuqQ/uF+5
S/VR2P2fXdJz8NfVXar3MX7NP8D1LV3CM/V0l+aL8Ndd5n/Mf+7r0nwLeHyk
S3hmfatL/Mj317rEn7DXM4ZPzONfsDbq7a8YnsF7b1qb8WvxAL79b5f0Bvju
I8M333e1/lFPG745H7bxMX5t/GCJlWYfnj9j9mN9q0v6DnHxa5f0H67bIiz/
cD9uWPqD9eqw+IrrT2HhmetPYeEFeBofFh8y/4aFZ/DxjLD4lPFrbeZfa0MP
1oSFX9y3ISz8ol/NYdVbyJJh5QfwU9D6y/dzw4pPvq8XVn2e54+Etf8D482F
Va/G9cWw8hv2Z+4a1nwc8bNHWPNDntcTVv5kfTosvQjeOyjs8tVhYelN9OvI
sOZX3L8UFl5YzwoLz7j+5LDwjPg5PSw8In7Osjbi51xrY7/OhdYG310aFn7h
hyvtedyfbP2BvW8MSy9BV99q4wE+7ggr/8De94Q1v2AeNHtRP5s9qZ/Dyn9c
bworPwJfz4XF19TPYeVXjPe1sPgK+Ho7rPkUaT0svkM//heW/kBe+yTs7r/4
Iiz9Ab5ZYngnzxlewTfLrQ3VtMqu5/me1oaO2GDPg70GRRRvGN/QiPQSeGX7
iPIR9OvwiLv+OjKiej7iZ2xEfIzbTIwoH6J/FRHpC+BqZkR8g2HMjUhfAA+V
EfmXuIm45681RoRnuL01ovkX69ER4YvnJ0TElzy/MCK9wPmvtRF/KWtzf2hE
+IV9i3Y/fs+ez/0eEeGX+z0i0kew934R9zyLg2z8wNPhEekNvt8VUX2f5zNE
xMdIoydEpJ/hr5Mjmg/C3qdHxMew91kR8RPf/4uInzGMiyLiN77/GRGegacr
DT/42rUR4YvxG3HXZ26LCM+Ivzsjwi/XiyPCK/fD2fU8H9HuzzCNiJ+5/8P6
x/tGFI+M34j4mfvnIpo/wK1vD8D3exHlM+jXDyLKd9w/GZHeYPxGxC88P8Tw
zfMoI+In7oePiK95HoHhG99ba/jheSsR8SN05aCou19uaFT45PsvUfE35m87
Rl0+HxUVflm3jmr9hO/DRaWXwecVUXc/6cyo6ut8vyKq+R/P841qvNCvtVHx
MeM3KnsBT61R2RN48qLSz9BTwaj4hvu1ovIX4zcqvmL+jQrPXB+OCs8wc29U
+Zzv30WFZ+7vjwpvXE+KCo8ch7WRDw6yNuM3KjyzfmX3Y/6NCr+MX3s+cHNK
VHimH6LueZZnRZV/8LXzospP8PeFUc3/wEuXRZXfGL9R6Q3Gb1T1JdavouIb
xm9UfMT4jaregfx5b1R8xvd/DR8ww2OGH+id/0SFZ/DV04ZHvh9seMb+nJei
bn3kdWvDX2/Z96Hv3rfPYccPouJnridFlT8Yv1FX7y+x/sPuS6PSy8y/Uekv
4HO14Zv5Nyr9DL2/ISq9wfPtYsI357sx8Q36t31M/Iy8MDym9Rb4cWRMeGb+
jQkviP+JMeEJeKiIuecbzIwNeH8m5urfhdaGfWqsTf0ckz7HfVtj7vuHvpi7
HhSMufkkHBOe0a3umOIX9aNkTHgGT2Rj0mOYJ/XGpJ+B511iwjPywR4x5Ue+
XxlTPRXX/ymm9QO+XxuTf7m/Iyb9wbiJKX/zHLOY+Jn7O2Lu+XmnxMSnSBun
x4RHpMGzYsIr6pnn2efMv9aGnS+1+2G+caU9j+vB1h++vxvT/I/nccSEZ+4/
t/Ey/8bc9ZQHzF48Hy6meh3G+0RMeEb8PW145n7mmPgaYfJSTHzN/BvT+hnw
/Zbhm+8rGF6Yf2Oqh/H9lJj0NOM3Jj7lsGPu+ydLrQ1YLrc28tNqwzPfZ4m5
9ZUN1uZ5Id3CN/h8aLf6C37brlvjo37u1vgZv92Kd+BpbLf0BewwqVv2xfVT
u2V/6udu8Q3ywdxu8RFoYGG3/Mv3o7o1/2f+7RY++L5Ut/DD80S73XpCqFt6
A3EVsTbyQre1+Rxr027WBq39rlv4BR5265beAB727BYf833ZbuEXPLd/t/QG
82+39Abrzd1af8Jzjjb7AUfHmX3xvRO7NX9BeJ/aLf0MmPzd/Md6c7f0I8Lk
/G7pS/y9xPCA6y/vFj+jv1d3C8/QCzd0C7+wwy3d4mvg/3Zr8/1sa0Of3W9t
rv92C89c/+1WvPD9MOsP683dqi+jPvFCt+KR9WbDM9d/u1W/BN+80+3y86Ju
8TO69WG3+Jn1KvMH7dTtnhe9pFv6mfuxujU/Yr3Z/A97/2T44H5pwzf3Vxq+
uH8jLvyB1reKi1/B+8Piwiv4cIR9zvME4ooPPGd8XPcHbqfEhV+uF8Wl77kf
K678wv3ScXe/f3Xc3U9eH5d9ML7muOzH80biwjPyfSAu/IJvOuPyD+vNceEZ
vJGIK/8Cj5m48jPrVXHhg/k2Lv6D+3aPC8/A015x8SXPx4+75/keGBdeef5g
3F2v/rO1MX/7i92P+zfs+ZzvxlW/4PvT1n/w65lx6WXOd+PSF9y/EZde5nvX
Zj/+fkxc/Mz9G3HNVzjfjau+wf2UcfEP8HFHXPzE93Pjmv8BVg/EpZ+5/8rw
gusfj4ufWa8yvHH/leGZ7/NaG/h61fDL8xOtzf2U9n3Wq+z+0JMfx6WXuT86
rvjC976OK7/wfQcbH/C1LK78hMesjit/AV9r49LLuO8Gsy/sNahH/Mz9kz3y
D9fZesRHPB+/R/5mvarH/b2qsT3CC88D6RF+Wa/qEd7A8zN7hEfOd3uEZ9ar
rM35rn2f+zV6xL+c79rzWK/qER9TL1t/MY6IjYe82uPmn1SPu16S75H+wnW9
Pe75Hrv1iC+4f7JHfMLzZ3rENzxPsEfzP3Tz4B7xFfdr9IjPON/tEX7xvWN7
hBfY68Qe4Ql8fEqPu758Ro+73nJ2j/gYePhHj/QxYHxRj/CMOtdldj++b2vP
4/m41h/UqW/sUf7AusFtPcIv4ufOHpef7zN7gG8e6hF+8fexHvd9oSfM3siD
/9ej/Mj13R7xM+z9svmT72v3KP8CX+/0SG/w/W3DC/Ot4QnXfdojvuT5OoZH
8r7hFbhcanjm/mf7nOexWHxA//5s9+P6rj2P+Tah/IG8vU1C+gL9HpZw53sj
EuJj+HN0QvaCPyckVO9kvk1ovsd8m5A/+D5DQnzM9xkS4iPMX6oT0ss8rzkh
Pma+TWj+B3+2J8THGJc/IXwBd10Jd/07lnDrawlrQ79lEuJfnheUcM8/3SUh
PBMHCeEXenWvhPCLec2+CcUjv5dw6zWHJqQvYK8/m31gx2MSymf8/aaE6vnc
n5FQPuT5BgnNZ2DWMxNa78LfcxOqZ/B8i4T4jOtDCeVrrg8ZXgDraxPCM8Z7
Y0L8CdjcmhAe+X6htfn+QkL4hV8fTLj65FG7H/4+bs9jfdn6g+ueM/zyvEob
D+e3Nl7Y5W2zB+M1IX7mz5smlN8QNp+avXneXUL8DFwsSWh+Dh5aav7EeJcn
pJf5vkJCepn7IxPu+3obDd+4zWZJ4Rv+2jwp/CFutk4K37jPb6yN+dc21ubv
NyQVH4jnYUnhF3w6PCn88vdNksIv/z8p/PL9pqTGi/6NTUpPwG7jk4p/rkcl
ZU/osMlJ4Rf2r0hKT4A/pyVdPTgzKX4C38xOio+5fpVUvRnjnZ8UH1MfJIUf
6vuk+BHznJqk+JP8Y22eP2Ztnp9vbdbfksIv7NJu9wdevKTmo3wdK6l4g12C
SeUT5P/OpPCLfBtOav0I+i+WVL6C/IonpS9IN0nN98AnqaT4GfOTjPkH9sqZ
/7g/LSl+5vk7yQHn3xo+0O/dksIv9MPuA/C7p+EPDtjL8Ey9Y3gFPvZNuvXp
/ex68MeB1obeOTip+R544NCke17B4UnlE8iYP9t4EMdHJTU/4P44swdwd5zZ
C/xzvNkTfjjR7A08n2L+4DiT4h/A4Iyku/51VlL8xfO+DR/IV+cZfrC+eX5S
/Ii/Fxr+YPeLDZ/QL5daG+urlxs+oWeutDb349n94c9rLZ543rDFG+df1n+M
82YbH3TCbUnpKe7fM/wiD9+ZlL7AdXebPXHfe83efP8tqfyIet+D5i9Y/WHD
L9cvjb9YjzE8wJ9PGP+xPpN014ufNr4Efp8xfGP+85zhGfH+grV5fr7hlX6y
62Gv1+x53I9kbeiXt5Nu/fhdwy/w8b7hF7BflHTfF/wgqXyFfPNRUvmM+S4p
fYz89FlS+ZDnWySlL3Dbb5Ka7/F93KTqF8h33xs+YLZlhmfE6Yqk5n+Y368y
vIGmf7Q2100N39gPvc7ayM8bku76yy9J9/cCBqVc/t88pf6AzwanhF/oqa1S
4l9cPyQl/MKPQ1PCL/h725Twi+u3T7m/dzkspfyHx++YEn5hr51S0n+w16iU
5jfI72NSLn7HpcS/4LMJKekJvv+QEv9x/1ZK+MV4p6WEP8wXZlgbt5mVcvl7
jrWp31PiW57PmhJeUX+sSgmvGG9NSvHG95VT0vvAb0NK8Yr7NqVUf8TflpTm
w+hHW0r4xbB8KXc+7U+5vzcQTElfIL93pqQvYK+w+Rf3jaaEZ8xPu1PCM/zb
k5L+hH+Thi+MN5MS/vg+Zcp937RgbZ4vbtcjHnZOufGwq92P72ulxMeIhz2s
Pzz/0PCMePij4Rl23sfGy/PzDM/QfwcYnuHWgwzPfN8rpfoQ7HWY+QN+OsL8
BZ46yvDMdZ+U+IrreSm3Hndcyn3f6gTDE/LASYZv6JlTUm5944yU+/7pmYZX
+PNs+z7fBzX8Qmb+w+IJfr8gJf0O/F9k/QU/XpJy64uX2XiBhyvMHsjvV5m9
wAPXpNzfa78uJX0M3r3B/AE33JTS/AUwucX8CbPcllL+BX3ebngGX9yZcs/n
vcf4kPUVwxv0wQOGT/z3Q4ZP8NAjKff3Kh5LufXqx63N8y4Nv7DbkxZfoIGn
Db98n8bGg7/Pp5R/oIdetHgGT76cUr7C/7+act+Hfz3l7r9/MyV9Ab55OyW9
x/MrjI8wv/uv8RXrtcbPrP8YP4MvPjY88fcHDb/o9eeGP4TDYsMncPa14Rdx
+I19Dv34nbV5HrvdD/GzzJ7P/Gv9Y/41PPOYvJTmr7jPmpT0BOy0LiW9BXxs
SGk/Ecb7i9kT+nFQWnoO122elj+Au8Fp8TPW57ZKy5/giyFpd71gaFrzP8TV
tml3feG3afEhrh+WFt5grx3TwiPrXWnhHfYaZZ8DX2OsjXrRuLT0OOw1we7P
/Vtp4Rn6cWpa8QacVKSFZ/JGWvM77H+fk1Z8g6/mpbW+z/XltPCL6yvT0hfg
w5q0+75UXVr6j+8jp+VPjK8pLf5iHKeVn3F9W1p4Qfz40sIT821aeGa+TQt/
fD0s7Z7PHLY28619H/mr2+4HfdGTFv8DBknrD/g9nXbzRzateOR5Q2nFK/Nt
WvgFj+ycdvXYrmnVj9HN36fFz9wfbvjF3z+k3fro3mn392D3Mf9y/7jhGVl1
f8MD9PmBhmfks0MMz8DTYYY/EPYRhk/uV7U27HS0tfH3L2mXn49Li/85T7Xn
oZsnWn+4XmDxh3x2Wlr6AvurTx8w3r+n3fXPs8xesNM5aekL2Pd8wzPmPxem
3fejLk5LL4NfLksr3/L3FtPiL9znyrTyN89fT0tfgA+vM3yB529Iu/O/f6UH
nM+Sdn+v9K60q7/vsTZwdl/aPf/jAesf+O4hi0fwyCOGT8THY2nlI/T7P4ZP
4KZk+ES3njJ8wj/PppUPgYcX0tIL0Pcvmf/4e1/mX85P0+7vCb6Zdn/v/G3j
P+D/XcMnvva+teHfRfZ99OsDa/P9GsMf7P6J8Sf88bnhEf1dbP3n+W9p6QPo
sSVp97zmb80ewMfStOo1sOeytKt3lxse4fdVhke837U67c7f1hgemS+NX+GX
9Wk33240PsN4fzX8YD6+Wcb9fdHBGZdft7I27jPE2sDZ0IzwSoFn98N4f5vR
8/m+kLVx3Y4ZNx/slNF4mC8z7njHZJRvYOdxGdmL+TIj/KKfkzLKZ7h+Skb5
Dv2dlpE+4Hw1o3oa93Nk3PnMnIz4FX6blxGeMd6FGff8xcqM8A2+qckIjxhX
bUb45XzVPud5qtaGf1syig+Mty3j4tmXcfHsz0ifY7zBjIvnzozwDLuEM8Iz
6hHRjPAMPu/OuPWbnozwzPM0M+55ARnzD/RjzvzH+WpG+pf7PzPKp/j/nTPK
t5h37Zpxzzv+fUZ8y/1lGeEb9fO9DI+s/1obemg/+z7i7QBrwywHZ1x9e2hG
fMvfH7b+cb1tAH6PsvHh+mMymq9B7x2bkb7lepzZD3rqhIz0Lc8jMvxyP3lG
+Q754m8Z5UPOVw2/iLMzB+D3bMMv8HBuxj2P7nzDL/x5Ycb9vaGLM64+vdTa
fB/b2hjvFXY/xOVV1ub7YgPwe/0A/N5o/cd4bzb8Qo/favjF/P9fhl/u1zH7
gSfvzgz4PcOM+Ji//27+4fkNA/D7sPET9O6jhl/o3X8PwO9/DD88P83wy9/j
sDb37xle+f6ateHnF4x/uV5pn0Pfv2Jtnj9s8QMzvmH9YZqx/vL3kg3PsNf7
A/C8yOyB+cEHGTd/fZhx3y/9JCM9wd8PNz4BPr7IuO9PfjkAz0sy0n+47zfm
f9hrqeGZ51EYfsDnyzNuPWCl8Sfwtdrwyp/dyLjnJa/LuPuX11s84P832v14
nqvhGfjYLKv+AR9bZMXHGOeQrPCL+ttvsspP8Oe2WeEX/Lt9dkA9OCt7cz6a
FX5ZD866+B2Vdf05Juvy77isi98JWRe/k7LueQFTrY3rK7LiT77fa23+Hpe1
oUfnWJv5NevqiYVZV09UZaV3+D5wVvoX+rTOxsP8mnXjtSkrPoYVW8xe4IW2
rHsen5cVH0M/dWSFX9QrguYv5tes+75OOOvq42hWfMbff866eiKRlR5lfrU2
4j6TFd5YD866fFzICp9cb7XvI153tjbrwVnFB9ZHfm/PQxztYf1jfrX+Ax97
ZxWf+N6+Wekp+PVPWZePDzA8c7+34Rl8fkhWfAw+P8z8Ax45IuueB3BUVnoZ
9zkm69YfjjV8cL9pVvoTNHKC4Qu0elJWfAx+OsXwyfMPsu787AzDK+LhzKyr
r8+2+yEezrXn8fc5Dc/o1wUWfxjGRYZn2PWSrKufLrf4Bj9dkRUfsz5seOZ8
Nav8h/Fel1V9GLi+ISs+5vmD5k/OX7PiX/jpjqzqDeCnu7Lu+z/3ZN33q+83
/KF/Dxpe8edhayM/Pmr4xLj/nRW/Mr/a8wCvkuGVv4+Tdc+7e8bwy/xq8Ql/
vpBV/gE/vWT2YH61+Gd+Nfwyvxp+CUvDL9bL3jH+Yb+ymp/jPouymr8zvxqe
wSsfGT74/qrhB/z2meEL+P/C8Ad7fWlt8PnXhmfY+xtrM79m3fXtHywf8P05
ez7qZyutf4j31dZ//gyW8THwv9bGD3782fDL990Nv/x9wOyA9+9ywi/wtUVO
82/8/5Y58Q/PU8+Jn2Hm3+Tkf+Brm5zwwf1OOfd9iWE54Zn7nXLCI8+Xywmv
wNdIa3O/U074B77G2ufA13i73yQeOKHnkedz7nmFU3PSEzzP3cYDv8zMKX7B
r7Ny7vvQc3PiY+B0Xk74Br4W5tz8V5XTfBv4qskJ38BXXc79/ZmGnPwNezXn
xGeIh9ac+Jn7nXLiZ+DYywlvwJc/J3zz9/tywifwEMm56xEx+xyPidvn8EMi
J/xCf6WsP+CLbE745T7DnPiXv7uUU/7Bdb/LCb/QB7vktD6H8e2WEz/w959z
4g/OZ80fwP9eOfEP9zflxE/g131zyr/c350TP4NfDzR8oF8HG364v8nwxv1N
hjfOb+1z7gc3vIJvjrE2z/Oz63kemD0P+uKEnPgYPHOStXH9KTl3//vfDL/M
tzZ+DOvMnPQX95eb/YDTc82+PB8w554vdEHOfZ/sopz0BfOt+Re0cJnhGXxz
heGZ9eGc+A/4usbwzPP4DW8Y7w2GR8DupgH4vMXwz99NtzbXY+1+uP5Oex7r
x7kB+90N3+Q56z9/T9DwTTtbPLN+bPbBeB/Pue8bPJFz3/d40vgZ9ZenjZ+5
Hmt8BHw+b/4FDl40fON7Lxu+4dZXDT+4/vWc9ADfjzE8wl5v59z3L941fOM5
/7U27PU/+z7mxx/a/RHPH1ub+/MN74iLz62/wNdiGw+XCS0fcT3W7MH3b8xe
qId/b/ZkfTnnrj+vMH7meTI5dz3qx5z0B762Jqf8C3utM3zz/GTDB+LxF8MP
xjEoL7zxfPS88Ih4HJwXXmGvrawN+A3Ju/w+1K7n77fb/Tn/tTbwNSwvfANf
w/Pia/DfTnn3fZdRecUzYD0mL3sg743LC8/A14S89AfcOCmvfMjznfPyB8/X
yMtfqGdMz8ufiMdZefkb+JqTd3/fY15e+gO3WZAXf8PelXnhDW6ptjbsVWtt
XF+fd+eTTdaG3mq27yMe26wNfPnyii/+3oP1DzwRyAvfGFcoL75G/u+y8WO8
UbMP/ZaX3uB+qLzwDHsl88qXqE+n88I3z/PJi49wfT4vvuL6bF58hvnzznnh
meuzhheuzxqe4Pc9DG/Ij3+wNsJgb8Mr8ts+efE335fMu+fDHGD3RzwdlHf3
wx+SV3xxP1Re8wHowyPyilcsyxxpeEbeO9rswfPuDc+Ih78annH98WZvzCdP
MjwDv6flpT/4+xZ58TPy0d/z4jPmX8MD9OA5A/D7D8MT5p/nWxt68KIB+L3E
2nwfLC9+5fmB1oZ9rrQ2xne13Z+/b2X45e+vWvwhfm60+ITfbrHxst5s9kC9
7fa8uz56Z949X+husy9/Hyvv6uf7865+ftD4CPHzsPmb82HDA/Tl44Zf3tfw
hPn7k9bm+SzW5v7jvLv/7Dlr4zEvWhvx87K1ET+vGl6Bj9etP8DZmxZvmM++
bfGI8b5r+EX8vG/j5/qu4Rn4+tDsh+s/MvtievTpAH7+LC89CHwtNv8x/xo/
8fdRzf/o9reGD67vGp6Zf60Nfl1h+OP6ruEX+ftHa0PfrTE+hr3X2edc37X7
IR9tNDwjzH41PCN/b1ZQ/CGvblFwf19ny4LwzP3IBY2fv5tXED/DXtsWhGfo
w+0Lsjfzb0F8wvMxCuIbvv9TkP+Am1EFt143pqD8jHgaV3DfZ5tQEH6Ar0kF
4Y3ruwWXnysKLj9PtzbP2ygM+L1C+5zvAxcGnP9ccPVOZUH4hr2qrb+wV62N
j/nX2vBjo9mD+bcgPPN94oLyHf6/veDuz/IK7vtOAfMXdHew4NY7ugraP4Ru
Rgria86PrQ18xA0/0I2JgvAFvk4VhD/gK1MQPhGPuYJ7/m3RPkc89tr1qA/t
UlD88H1ma/P824LiD2bcs6D45PuShmf4dR8bP/D1J7MP+Gd/sx/uc2BB8xW+
D214Rn8PNf9A3x1ekJ4GPo40/6IecHRBfI16yTGGb/T3OMMPzxuyNtYLTjT8
4bYnGz6Br1OtDTuebm2eO2t4RX3nrIK7Xn2OfQ4znGfxhf6eb/2lHW084M2L
C9JXfN/T8Ey7Wfzz9+gKbv3u6oL4Gbi71vyBblxfcOtRNxY0v8d4bzF/A8+3
Gb8xHxteMN47DU94zN3WxnjvNTyiX/cX3PPIH7TvY7wPWxvjetS+j3z6uMUL
f9/S4on52PrHerTFH/D3vI0X+H3R8At/vlxw9carBdU3mH+NP5h/zR/Mv4Zf
wOBd8yfzr/mb540bHvj7HwV3Pvix4Ql++9TauM/nBXc9Y7HhFfXNr+xz/n6X
XQ/8f2uf8/3YgltP/qHg7sdcYf3lzyLZeICzHwvueugawy/iZ11Begw6Zb3F
P7q10fgY9v7V7A89vFlR/uLv/xWlN7DfY8ui+JjnxRXd9ZWhReGDE6ai8IPb
bl8U/ni+TXHA+XLWRj4ZUXTXZ0YWXT082r6P54wrCr98P9/aPM/K+gd9NsX6
D3xWFMXPyCfTbbywykyzB+4zuyg8w15zi+7vaS8oyt6wV2VRfML8W5S/eF5H
0Z0P1hflb8RZY1H6E7BptjbiprWofM78WxS+eL5HUfjk710X3fXnUFF45XHy
1oa9IvZ9nt9jbf6eWlH4Rr8T1h/ko5T1F9dniso/fP+2KP3M92/NPlwPLgrP
PI+gqPwHvtqtKDwjnncvio8x3j0N3+jmXkV3v/0fi+58ad+i+I1+MfygnwcY
vpG/Dza8cT3Y2tx/VXTPlzjC8It6wdFFt15xjLWZf+37sOvx9nyM40TrL88j
MjwDH6canhFPf7Pxw29nmL1w/ZmGZ8yXzikq/6Ff5xmeuV/Z/AV9dqHhGddf
bP6GFy41PED/X14U/3H/leEX8XC1tfk+ruEN/b2+6O53vtHwi+tvts+Zf60N
O95u90N/7zT8gi/vtjb+3Gv9x3jvt/HBzg8anuHfR8w+oMfHDM9cHy4q/2G+
8oTxB+KhZP5BXnza8Mxzzovufo7nDM+I/xeM79DNlwbg+ZUBeH59AJ7fGIDn
tw2PPH/N2nwf1/ALnCwquudRfGBt7ne253O/c9H9/aDPDc/c71x0fy/7K+Nn
2GmJ8TNw+K3hmcd+GZ5x/Q9mf+53Nv/gqSuL0h88b9X8C3utMf9zPmz44P4r
wzf3XxXd/Ze/Wpv7r3qFT/Rzi17hmXaxzzn/tTb6t22v4oXnufa6+WBYr/qD
etvwXukNvg/Uq/ER970aP5pjeoVnDHtsr+zH+W+v8IvuTeoVP/P3vHvd/aEV
ve7v7Uzv1XyI+6965W/Wn3uFD/zHvF739xwX9Lr6tbJXeAOeqq0Ns9daG/xY
3+vWR5p6hX+sn7VYG/mzzdqwk6/X/f2Jjl7FH39PycaD54RsvMBTV6/im79f
2is8Ewe9wjPsHO9VPmT9uVf8DFykzV+wV9b8Cz2a7xV+oa+KvcLv/wNbpRQl
"]]}}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0.},
ImageSize->Full,
Method->{},
PlotRange->{{0, 101.385}, {-1.874, 1.82}},
PlotRangeClipping->True,
PlotRangePadding->{{2.0277000000000003`, 2.0277000000000003`}, {0.07388,
0.07388}}]], "Output",
CellChangeTimes->{3.5664161416479053`*^9, 3.5664565187322083`*^9,
3.566456737284575*^9, 3.566463353268448*^9, 3.566464594701522*^9,
3.566465762358819*^9}]
}, Open ]],
Cell["\<\
Wir nutzen wieder die ersten 60 Sekunden, um nicht durch \
D\[ADoubleDot]mpfungseffekte ein zur symmetrischen Messung widerspr\
\[UDoubleDot]chliches Ergebnis zu erhalten.\
\>", "Text",
CellChangeTimes->{{3.566456924171784*^9, 3.566456946424758*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "asym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "asym", ",", "1"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "60"}], "&"}]}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566416210895996*^9, 3.566416261044602*^9},
3.5664173353662987`*^9, {3.566417547400022*^9, 3.566417604524452*^9}, {
3.566456575282522*^9, 3.566456582586051*^9}, 3.566456769464508*^9, {
3.56645695676995*^9, 3.566456961161633*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "asym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "asym", ",", "2"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "60"}], "&"}]}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566416210895996*^9, 3.566416271659527*^9},
3.566417337909851*^9, {3.566417550743938*^9, 3.566417606580274*^9}, {
3.5664565789639597`*^9, 3.566456586337864*^9}, 3.566456769465927*^9, {
3.566456959473802*^9, 3.5664569627305517`*^9}}],
Cell[TextData[{
"Nun bestimmen wir die Frequenz ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "2"}]], TraditionalForm]]],
" anhand der Daten von beiden Pendeln."
}], "Text",
CellChangeTimes->{{3.566416291402357*^9, 3.5664163272865877`*^9}, {
3.566417437987132*^9, 3.566417437987214*^9}, 3.566417678885417*^9, {
3.566456817431726*^9, 3.566456817431815*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"mitte", ",", "asym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "asym", ",", "1"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416344367093*^9, 3.566416404499189*^9}, {
3.5664164749772043`*^9, 3.5664164803566027`*^9}, 3.5664165186680202`*^9, {
3.5664165522816677`*^9, 3.566416554473386*^9}, {3.566416667930216*^9,
3.566416697488927*^9}, {3.566456823685152*^9, 3.566456825670598*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1.032`", ",", "1.729`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.523`", ",", "1.774`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.005`", ",", "1.729`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"5.51`", ",", "1.729`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.999`", ",", "1.729`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.522`", ",", "1.707`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.977`", ",", "1.685`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.521`", ",", "1.663`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.015`", ",", "1.618`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.51`", ",", "1.596`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.017`", ",", "1.574`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17.525`", ",", "1.507`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.016`", ",", "1.507`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20.564`", ",", "1.463`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"22.094`", ",", "1.418`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"23.552`", ",", "1.396`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"25.055`", ",", "1.396`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"26.524`", ",", "1.374`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.076`", ",", "1.352`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"29.581`", ",", "1.352`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"31.072`", ",", "1.33`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.536`", ",", "1.307`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"34.058`", ",", "1.263`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"35.578`", ",", "1.241`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.986`", ",", "1.152`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.084`", ",", "1.219`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"38.572`", ",", "1.196`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.025`", ",", "1.108`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.533`", ",", "1.085`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.598`", ",", "1.108`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.024`", ",", "1.085`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.094`", ",", "1.108`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"44.591`", ",", "1.085`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"46.063`", ",", "1.063`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"47.569`", ",", "1.041`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.057`", ",", "1.019`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"50.605`", ",", "1.019`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.11`", ",", "0.974`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.548`", ",", "0.952`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.618`", ",", "0.974`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"55.059`", ",", "0.93`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"55.124`", ",", "0.952`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"56.541`", ",", "0.886`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"56.601`", ",", "0.93`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.052`", ",", "0.863`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"59.568`", ",", "0.863`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.566416365943509*^9, 3.566416383937974*^9},
3.566416480807665*^9, 3.566416519318247*^9, 3.5664165549251204`*^9, {
3.566416668287786*^9, 3.56641669808327*^9}, 3.5664168622938766`*^9,
3.566417345454031*^9, 3.566456518847052*^9, 3.5664568261054583`*^9,
3.566456967090324*^9, 3.566463353512884*^9, 3.566464594824828*^9,
3.566465762463636*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"mitte", ",", "asym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "asym", ",", "1"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416788206684*^9, 3.566416811680894*^9}, {
3.566456835318183*^9, 3.566456836990018*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.313`", ",",
RowBox[{"-", "1.801`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.808`", ",",
RowBox[{"-", "1.756`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.282`", ",",
RowBox[{"-", "1.778`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.774`", ",",
RowBox[{"-", "1.756`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.287`", ",",
RowBox[{"-", "1.734`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.748`", ",",
RowBox[{"-", "1.712`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.277`", ",",
RowBox[{"-", "1.712`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.747`", ",",
RowBox[{"-", "1.69`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.299`", ",",
RowBox[{"-", "1.667`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.795`", ",",
RowBox[{"-", "1.645`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.255`", ",",
RowBox[{"-", "1.601`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.315`", ",",
RowBox[{"-", "1.579`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.79`", ",",
RowBox[{"-", "1.556`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.297`", ",",
RowBox[{"-", "1.534`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.823`", ",",
RowBox[{"-", "1.468`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"21.309`", ",",
RowBox[{"-", "1.445`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"22.829`", ",",
RowBox[{"-", "1.423`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.31`", ",",
RowBox[{"-", "1.401`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"25.819`", ",",
RowBox[{"-", "1.401`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"27.323`", ",",
RowBox[{"-", "1.379`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.812`", ",",
RowBox[{"-", "1.357`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"30.296`", ",",
RowBox[{"-", "1.357`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"30.359`", ",",
RowBox[{"-", "1.312`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"31.837`", ",",
RowBox[{"-", "1.357`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"33.35`", ",",
RowBox[{"-", "1.312`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"34.838`", ",",
RowBox[{"-", "1.268`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.324`", ",",
RowBox[{"-", "1.246`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.819`", ",",
RowBox[{"-", "1.223`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"39.316`", ",",
RowBox[{"-", "1.201`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.813`", ",",
RowBox[{"-", "1.179`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.881`", ",",
RowBox[{"-", "1.135`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"42.345`", ",",
RowBox[{"-", "1.112`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.838`", ",",
RowBox[{"-", "1.09`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.904`", ",",
RowBox[{"-", "1.068`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.367`", ",",
RowBox[{"-", "1.112`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"46.884`", ",",
RowBox[{"-", "1.068`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"48.36`", ",",
RowBox[{"-", "1.046`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"48.433`", ",",
RowBox[{"-", "1.001`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.84`", ",",
RowBox[{"-", "1.024`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.903`", ",",
RowBox[{"-", "1.001`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"51.386`", ",",
RowBox[{"-", "1.024`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.865`", ",",
RowBox[{"-", "1.024`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.93`", ",",
RowBox[{"-", "0.979`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.373`", ",",
RowBox[{"-", "1.001`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"55.844`", ",",
RowBox[{"-", "0.957`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"55.942`", ",",
RowBox[{"-", "0.913`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.364`", ",",
RowBox[{"-", "0.935`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.89`", ",",
RowBox[{"-", "0.913`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.566416813683556*^9, 3.566416863962236*^9,
3.5664173476919193`*^9, 3.566456518939184*^9, 3.5664568376073627`*^9,
3.566456969146302*^9, 3.5664633536739817`*^9, 3.566464594877619*^9,
3.566465762554109*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"mitte", ",", "asym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "asym", ",", "2"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416884021413*^9, 3.56641688700436*^9}, {
3.5664173643089952`*^9, 3.566417366486847*^9}, {3.566456840317688*^9,
3.566456859680868*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.313`", ",", "1.82`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.808`", ",", "1.82`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.229`", ",", "1.795`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.716`", ",", "1.747`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.287`", ",", "1.722`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.779`", ",", "1.698`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.25`", ",", "1.674`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.747`", ",", "1.625`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.272`", ",", "1.577`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.764`", ",", "1.552`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.255`", ",", "1.528`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.76`", ",", "1.528`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.268`", ",", "1.528`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.757`", ",", "1.504`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"21.242`", ",", "1.431`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"21.309`", ",", "1.455`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"22.773`", ",", "1.455`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.245`", ",", "1.407`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.31`", ",", "1.431`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"25.782`", ",", "1.382`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"27.291`", ",", "1.358`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.812`", ",", "1.334`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"30.265`", ",", "1.261`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"30.327`", ",", "1.285`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"31.742`", ",", "1.212`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"31.806`", ",", "1.261`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"33.292`", ",", "1.236`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"34.807`", ",", "1.236`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.324`", ",", "1.212`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.819`", ",", "1.188`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"39.316`", ",", "1.188`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.813`", ",", "1.164`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"42.275`", ",", "1.115`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"42.345`", ",", "1.139`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.807`", ",", "1.115`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.863`", ",", "1.115`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.299`", ",", "1.091`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"46.789`", ",", "1.042`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"48.299`", ",", "1.018`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"48.399`", ",", "1.042`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.84`", ",", "0.993`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"51.358`", ",", "0.993`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.797`", ",", "0.921`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.899`", ",", "0.945`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.308`", ",", "0.921`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"55.808`", ",", "0.921`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.306`", ",", "0.896`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.858`", ",", "0.896`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.566416888434183*^9, {3.566417357006805*^9, 3.566417366938409*^9},
3.566456519037601*^9, {3.5664568440342216`*^9, 3.566456860276615*^9},
3.566456970866476*^9, 3.566463353788166*^9, 3.5664645949255857`*^9,
3.56646576265298*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"mitte", ",", "asym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "asym", ",", "2"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416895715335*^9, 3.566416898579172*^9}, {
3.5664568464612923`*^9, 3.566456848029269*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1.032`", ",",
RowBox[{"-", "1.85`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.523`", ",",
RowBox[{"-", "1.874`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.005`", ",",
RowBox[{"-", "1.85`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"5.51`", ",",
RowBox[{"-", "1.825`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.999`", ",",
RowBox[{"-", "1.777`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.055`", ",",
RowBox[{"-", "1.752`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.522`", ",",
RowBox[{"-", "1.752`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.035`", ",",
RowBox[{"-", "1.704`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.521`", ",",
RowBox[{"-", "1.655`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.075`", ",",
RowBox[{"-", "1.655`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.583`", ",",
RowBox[{"-", "1.655`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.017`", ",",
RowBox[{"-", "1.607`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"17.551`", ",",
RowBox[{"-", "1.607`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.016`", ",",
RowBox[{"-", "1.582`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"20.564`", ",",
RowBox[{"-", "1.558`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"22.094`", ",",
RowBox[{"-", "1.558`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"23.586`", ",",
RowBox[{"-", "1.534`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"25.055`", ",",
RowBox[{"-", "1.461`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"26.617`", ",",
RowBox[{"-", "1.436`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.076`", ",",
RowBox[{"-", "1.388`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"29.581`", ",",
RowBox[{"-", "1.364`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"31.072`", ",",
RowBox[{"-", "1.339`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.574`", ",",
RowBox[{"-", "1.315`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"34.058`", ",",
RowBox[{"-", "1.266`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"35.578`", ",",
RowBox[{"-", "1.266`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"35.641`", ",",
RowBox[{"-", "1.218`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.122`", ",",
RowBox[{"-", "1.218`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"38.629`", ",",
RowBox[{"-", "1.218`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.107`", ",",
RowBox[{"-", "1.194`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.598`", ",",
RowBox[{"-", "1.169`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.661`", ",",
RowBox[{"-", "1.145`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.094`", ",",
RowBox[{"-", "1.169`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"44.591`", ",",
RowBox[{"-", "1.145`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"44.656`", ",",
RowBox[{"-", "1.121`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"46.063`", ",",
RowBox[{"-", "1.121`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"47.633`", ",",
RowBox[{"-", "1.096`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.155`", ",",
RowBox[{"-", "1.048`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"50.637`", ",",
RowBox[{"-", "1.023`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.151`", ",",
RowBox[{"-", "0.999`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.548`", ",",
RowBox[{"-", "0.975`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.643`", ",",
RowBox[{"-", "0.975`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"55.086`", ",",
RowBox[{"-", "0.975`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"55.157`", ",",
RowBox[{"-", "0.951`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"56.672`", ",",
RowBox[{"-", "0.926`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.129`", ",",
RowBox[{"-", "0.926`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"59.64`", ",",
RowBox[{"-", "0.902`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.5664168993845367`*^9, 3.56641736972589*^9,
3.566456519119944*^9, 3.566456848789443*^9, 3.566456972000711*^9,
3.566463353875011*^9, 3.566464594979232*^9, 3.566465762738132*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["periods",
RowBox[{"mitte", ",", "2"}]], "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Flatten", "[",
RowBox[{"Differences", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Part", "[",
RowBox[{"#", ",", "All", ",", "1"}], "]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{
SubscriptBox["max",
RowBox[{"mitte", ",", "asym", ",", "1"}]], ",",
SubscriptBox["min",
RowBox[{"mitte", ",", "asym", ",", "1"}]], ",",
SubscriptBox["max",
RowBox[{"mitte", ",", "asym", ",", "2"}]], ",",
SubscriptBox["min",
RowBox[{"mitte", ",", "asym", ",", "2"}]]}], "}"}]}], ")"}]}],
"]"}], ",",
RowBox[{
RowBox[{"#", ">", "1"}], "&"}]}], "]"}], "//",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"#", ",", "\"\\""}], "]"}], "&"}]}]}]], "Input",
CellChangeTimes->{{3.566416950448785*^9, 3.566417094263796*^9}, {
3.566417128819862*^9, 3.566417220526993*^9}, {3.5664172740031776`*^9,
3.56641728085063*^9}, 3.566417453279512*^9, {3.566456851629588*^9,
3.56645685628512*^9}, {3.5664568864878674`*^9, 3.566456888705738*^9},
3.5664569956342382`*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"1.491`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4819999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.505`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4889999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5230000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.455`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5440000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4939999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4949999999999992`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5069999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5079999999999991`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4909999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5480000000000018`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5300000000000011`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4579999999999984`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5030000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4690000000000012`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5519999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.504999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4909999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4640000000000022`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5219999999999985`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5200000000000031`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4079999999999941`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4879999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4529999999999959`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5080000000000027`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.426000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4969999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4720000000000013`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5060000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4879999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5479999999999947`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5050000000000026`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4380000000000024`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4409999999999954`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4169999999999945`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4510000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5159999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.495`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.474`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.492`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.513`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4610000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.528999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4700000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5519999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4960000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4600000000000009`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4749999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5070000000000014`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5259999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4860000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5199999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.480999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5090000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5040000000000013`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4890000000000008`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4839999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.477999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5130000000000017`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4879999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.485999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4950000000000045`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4969999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4969999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4639999999999986`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.493000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4629999999999939`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.517000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.475999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4070000000000036`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.483000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4789999999999992`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4429999999999978`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4710000000000036`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.421999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5260000000000034`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.495`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.421`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.487`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5709999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.492`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.471`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4969999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5250000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.491999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4910000000000014`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5050000000000008`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5079999999999991`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4890000000000008`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4849999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4639999999999986`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4720000000000013`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4720000000000013`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5090000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5210000000000008`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4529999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4149999999999991`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4860000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5150000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.516999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4950000000000045`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4969999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4969999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4619999999999962`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4620000000000033`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.436`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.490000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.509999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4410000000000025`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5179999999999936`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.439`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.408999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4979999999999976`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5519999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.491`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4819999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.505`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4889999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4670000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.513`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4860000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5539999999999985`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.508000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4339999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.533999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4649999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5480000000000018`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5300000000000011`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4919999999999973`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4690000000000012`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5620000000000012`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4589999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.504999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4909999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.501999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4840000000000018`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5200000000000031`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4810000000000016`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.506999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4780000000000015`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4909999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4329999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4969999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4070000000000036`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5700000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5219999999999985`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4819999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.514000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3969999999999985`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4429999999999978`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5150000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4570000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5110000000000028`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )]}], "}"}]], "Output",
CellChangeTimes->{{3.566417037145218*^9, 3.5664170852269993`*^9}, {
3.566417129680561*^9, 3.566417140647348*^9}, {3.56641717581981*^9,
3.5664172224107037`*^9}, 3.566417281888981*^9, 3.5664173767611523`*^9,
3.566417453831401*^9, 3.566456519221681*^9, {3.566456866613173*^9,
3.566456892827619*^9}, {3.5664569746173162`*^9, 3.566456998374814*^9},
3.566463355433857*^9, 3.566464596325849*^9, 3.566465764126381*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["T",
RowBox[{"mitte", ",", "2"}]], "=",
RowBox[{"Mean", "[",
SubscriptBox["periods",
RowBox[{"mitte", ",", "2"}]], "]"}]}], ";",
RowBox[{
SubscriptBox["\[CapitalDelta]T",
RowBox[{"mitte", ",", "2"}]], "=",
RowBox[{"StandardDeviation", "[",
SubscriptBox["periods",
RowBox[{"mitte", ",", "2"}]], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.5664135644395313`*^9, 3.5664135932825413`*^9}, {
3.566413840931016*^9, 3.566413846450987*^9}, {3.5664172409639*^9,
3.566417250652793*^9}, {3.566417447558818*^9, 3.5664174599257507`*^9}, {
3.566457005528328*^9, 3.566457013537655*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "2"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]"}],
SubscriptBox["T",
RowBox[{"mitte", ",", "2"}]]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413595788748*^9, 3.566413604730227*^9}, {
3.5664138496182423`*^9, 3.566413852914188*^9}, {3.5664172604677753`*^9,
3.5664172659954042`*^9}, {3.566417462405601*^9, 3.566417465982563*^9}, {
3.566457016193658*^9, 3.566457017281163*^9}}],
Cell[BoxData[
TemplateBox[{"4.219753093941509`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.566413602619113*^9, 3.5664136050051537`*^9},
3.566413853330969*^9, 3.566415031488805*^9, 3.5664150943028173`*^9,
3.5664152865403767`*^9, 3.566415352194001*^9, {3.566417267815569*^9,
3.56641728474636*^9}, 3.56641738194198*^9, 3.56641746640886*^9,
3.566456519317068*^9, 3.566457017800802*^9, 3.566463355623475*^9,
3.5664645965897818`*^9, 3.5664657644040823`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "2"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]", " ",
SubscriptBox["\[CapitalDelta]T",
RowBox[{"mitte", ",", "2"}]]}],
SuperscriptBox[
SubscriptBox["T",
RowBox[{"mitte", ",", "2"}]], "2"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413681720048*^9, 3.566413748696438*^9}, {
3.566413855794153*^9, 3.566413863833433*^9}, {3.566417287240891*^9,
3.566417295474732*^9}, {3.566417441918975*^9, 3.566417475309024*^9}, {
3.566457023953312*^9, 3.5664570266246567`*^9}}],
Cell[BoxData[
TemplateBox[{"0.09689234694462619`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566413749146556*^9, 3.566413864296844*^9,
3.566415031562516*^9, 3.5664150958247833`*^9, 3.5664152921305733`*^9,
3.566415353714468*^9, 3.5664172959548683`*^9, 3.566417383528458*^9,
3.566417442368752*^9, 3.566417475991418*^9, 3.5664565194538527`*^9,
3.566457027338031*^9, 3.566463355778633*^9, 3.566464596747365*^9,
3.5664657645214777`*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Schwebung", "Subsection",
CellChangeTimes->{{3.5664180333680267`*^9, 3.566418034246147*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[", " ",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "schweb", ",", "1"}]], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}]}], "]"}]], "Input",
CellChangeTimes->{{3.5664180434247513`*^9, 3.566418047212668*^9}, {
3.56641808286226*^9, 3.566418086236058*^9}, 3.566457032026518*^9}],
Cell[BoxData[
GraphicsBox[{{},
{RGBColor[0.24720000000000014`, 0.24, 0.6], LineBox[CompressedData["
1:eJxdXXWcXdXVDVYCRUMgJIEQd5lJxu3dsTdv3tiTeTJDS7EixUqxUtxdChQo
VoqV4g6FwqAfVlyKFddgAQIhEOBj1npZ63eSf/Lb8+6955y919az77mTtt8r
89vVR4wY8eJ6I0YM/197yyP73/O382K/+/e+Z26+5utD9z329/bbvro7dtr9
X8/81WlvD7385LLsO5c/Hqs+oXnb955+f2hG+chrthh8XvQ3P191/9cvxQ78
aPrPv7w7xOe9EtvqmI/Td0x4a2jKq8sP/d2/34xl7pjw819eGppz3GY/P/Kd
WMvPd09+9dGhT9LDP7xXGv+2WKxymzs711scu+DBiTf8YZeXY+utPnzH4ljq
lHP2HHXUu7HGdf976e8bP4vt8udPD45VLo699afR13W8tST2wPB07/80hj9v
82VszfwG82668OPY4I71b/Sd8lWM63ovtlFxeIZLY1f+X9fPS3gz9vNifr7i
61g3FxTD9Mctix00/Ng/nRVb8L+pvzjiL8tiF33+j5/veGaI61oee2by8MLe
HMK089/FnuvZ/udHfziEad77XQzLzH4+1P/O5ec/OHFFbG9M/IshzuuH2Kxh
ts38cujh4Wls+5N+5zgjIo7/ydCSYfKEEdFK/mL5664WfTa8zDtfHtoHjFit
9Pt/hsiH1aLxmPjlsau+ePbnma0ecbz/xIa5vvzQ1SOu840Y2Pvk6hGf815s
JBiyRkQ5f1LCwRrRB9//8+cnLSnJac3S87+KbQkGrxnd9tUPz//xo6Wxi8cN
/7BWlIBgvi49by39/m12mCFr6X7iYa1oWErn7PlljH//RbTfMFs3+LQ0v19E
T/xn+N+HJbmtHRF3b5aet3Z01L3DAn6uNL+R0Xl/xb8h8nVkRL49XOLPyGgP
LOitobNbT9r9g+9HRhDrMR8M/fjzLKeXryP+E7/rRCvlRX6uG132++EHLy3J
Z92IuFg2xPmuG037GTWtJ307xPX8UjTl9suI43w7NAoTXy/ic78p3b9e9NAw
/P/81RDUYfX1I+rVZ0P8+/oRYNn6ztD2APT6wgPlsUG0Ur84vw2infDv/0r8
3CAagX8vxW66cBhwG5bG/7D0+4YRhp3zeQz/rb1RRH1bGttreMKTNoqI+2+o
N7/dKOI4y3n9cRtFTw2bjfO/i9F+bBRxXt/HqB8bRW3DbP/n9yU74N/5/I11
P3G5cQR4b/FtDGL41cYR5fY18XPAxpof+bNxBPGN/jL26DDMr984ot5/Rj1b
svL6xbQP64+KDoHheS3GdY+SvswbZlB8VLRiGP7bbzs0ZnhBO4wSnijfURGs
x+RXhyCXB0ZFJTs3RPsySvIbnt2nK0ZFB/w8rQX/+3LoMAB2k+jLYfYXvx5a
hH+bRLju4GVDwGlmk5K8lw+9MAyb4zcpjf/9EHG/SUleP/D6ZzeJOO4PQ9Cr
zzaJaJ9+HAIOfzm6hPcfhmD2UqOjK84fNrgreP2eoyPaqeW0NyeO1nww7ctG
l/Tt69J6R2s9sGdvjo5W2j/oyZRNI9rlxUPU302FV/5904j2/j7q40GbRiv9
Acz3OZtGkOOCF2K9APym0v9hrdr9g02jDSCo92mvN90sIk6+iFHPNpM94no3
E54mDS9sj80i+pXvYuTvZsIn9OPxzSL6nx9L421WWu+PJXs3JqLd/qmE3zH6
HfajYYzuh9odPiY6d1gNHvshRpyP0fhwk3eMiWinlsXAhhfHRHju37+OYVpf
jImo91/SPm+4ufCNec/aXPpM+7e57CP94eYlPN8Qg5pct7nwzOduLjwD7+9s
Lv/D54+NwO7/+3gI9rdtbAS4fP7VEJ87Vnihvxlb0oflQww3xkaY7j3fl/Rj
rPBI/Rhbsk8j7gV/xo8r2ZcR95LPpjHtwriSvEfcSxyPi2h3fhoiP8dJHy5p
H/ZE4yLGI9/RPywZp/nSHoyXfed6x0cr/TP4kxiv9QMPO48Xf6CHV48XPyG2
h8YLz3Cr746PiOsXGdessUXJPr/NuGXLLWSfyM8tSvL4qoSfLSKEFTd8E8Ow
F2wRUU7LGYf8a4vSeCtitAdblOzZj6X4ZsuSf/mpFLdsGVFOI4jbX5uOw3Gb
/u7Q4SdvGQHeU0fQj924pfAOd7l0yxK/fijhc0IJn9/GMO+yCYoH6H8mlOzB
F9SvnSfI/5OvE6KV8Rvs9KMTZJ+pjxNK+nrjEHC01lal8V8oxV9bRSvjWerZ
VqXrPyrJb6sSv5aU4tetIsYV3wwhfrlrK+EXcdErW0UMF1eU4t+tSvL8kfZ5
5EThl3Z5ovAKraqdWJLXiHtxfcI0nlPw9WDrjhMj8uknxuf7TJQ9R3xw5ETN
B3p/+kThG+7k5okl/7Z0iLOaGDGuWcJ44amJ4gdg9/pExRfg/ycTxU/w4/uJ
4jfmuc6kiHHyA7RXm00SvrneSSV5L2Z80DFJ8uZ6J8k+M56YJLyMHVaIP0xS
PMD1TirNf0WMejpJ9pXrnVTSxxERrr9/UkS5rEYcPDWpFB+NoF963dcTdpOE
b8zzu0nSF653svQJfnvzyfIXlMtk6SfXNVn6i7ikf7LsNezBjpNL9usDzn+f
ydHK/IT6PjlamZ9AXqdNjlbmJ5z3ZMV7XO9k2SPg4enJij9gX/43ueSvvhri
eicr/sRzv5useJV8m1J63nfEw9wpije43imyt8TzFNlj2ucpwjPXa5r22jTl
OEX6QzxPkX4B/zd7Prj+gSmy32TTFOGd8p0i+w1//+kU2W/ieUrEPOw92veR
U+X/kOfNnir+wg5UT41ALn+yFB9OlbygB7mp8r+MF6dK3sTzVOU7uO+IqcI/
4u9Tpwr/jMOmCv8QyzVTZd+pR1OFR/rvqbLHmM8LU0v++adSnjtV+KZdNQ32
j5im68mHadIvwLx8msZH/Ns8TfE/5t87TfgnDqYpPofcdp8m/SeOp0Ur83fM
//hpiuegX+dOi8YSuKV8Ypr4z3hwmvSBz5km/0v8T1O8iTzt9WmKz2nfpkUQ
x6iPS/ifVoqPlpTs23TpC9azxXTpC55bN114xPWd0xVPM66frvgD8//t9BDP
+0yXfcf8jzRN/E+PGPf9OAS5Xuj7ob/XTpc+Yv53To+YV6wYAq4eni5/gPm8
NF35J+bz3nTlH5j3l9MVz2M+q88QP8C2TWaIX8xXZoi/0NpoRsk/PVjKR2co
/gH/t5lRqic8W8LDDNUjGP/PkL+nHZqhegTxMEPxPXB/5QzhC3K6fYbyU8Zf
M6RPgMnzMxQvYV1vzyjlE9+V4uuV6y3he7WZURKFqB9K8f1MxTeMZ2ZKH5iv
ztTzuM6ZpfxlOeOvwZnKP1D/2m2m5gtcHzizZG++on05dib92OpfxADrc2aK
H9Dny2fKf9A+zlQ8SX8wU/k+/d9M+Wvqw8wSnq8s2ceZpfzvqZI+zJQ9pF7N
UjxFfZgV8b4PeX3drFJ+80VJH2ZFjw+L84elzHeLs1QvWTocFuw0S3iEW993
lvJd/H/ULOkXcPznWcp/6ddMM983DXkMmWYdaZbiOcz/tVnyd/jvk1mK/7h+
z5/2YLb0g7iYrXiK8c5s1ZMY78yO8Nzd3xhivDO7FI88X7IHs0v8+zf17w+z
lZ/RHswu2Z9HWc87fbbkCT5eNFvyxnOunS08MH6dLbyAD4/Njhg3fx5Dnezl
2aqXQB7vzxb+iOPZ8k/gy5pzZN9hp2fMUb6K6yvnCN/QizbTyB+yc0r5/jLW
b7czTb84R/oA+R02p4S3paX8dY7yX+aTc0r+Ygn16eo5yh+wjH/NUf2Q982J
WOd6h/bkpTny3+TLHNUboM5fz5G+UM/nqh6E62fMlb1Dnl01V/JGfSA+t7T+
94cYH8yV/UT8usNcxWeM/+aW7M0XJX8wV3iD+z59rvJt3jdX+AT/rpsrew43
eY9p8O+JuarfsFzv31mPn6v8l/HvXMVTxP88zYd+Z570nf5wXgmvn5b0f57s
A+U6T/Ep8T8vWllPhz/fd14pX3iR9aIj5qm+Tf2fJ33h+ufJ/1P/56neyTrD
PMkTy/jPPMUT1P95Jf/zToywmRfqz/fzlL/QjswXvkCOmS99Yr1nvvQJ1ydN
Q6wD80N922m+4kH6KdO0I/MVL+HPZ8yXP4Afu9Tjc13zFU/x//maP/KYZ+Yr
PmV8PD9aub+CaX02X/pANzc/WrkfAzmvu0D+m3HGAvEbOGxcIH8CfncvUPwM
ezOwQPaPcl9Qsr+v0X4euCBauX/EuHKB4jX6/wWyr/R/C5S/wgzfskDxPfOD
BarnAz/PLIiI809L9UrTFOsC1S8hjh9Ns95XJn2l/Mt0P66fUKZ6J+Q7vUz4
B27ml8keYL4VZcq3oVeNZdIH1tfKxB/ys0z5OPx9tkz+GjgZLFM9lXaqTPKA
Hu9aJv/C55SV/N29lOcfyxRfAxaHl0l/WN8vEx4QVp5bpnosbruoTP4IuPxH
mewt/r+uTPtN+O/WMsV7WMfdZdI/mJkHTYMPj5eF8c5zvh9yfsU0cPyWx4M+
LvZ8YE+XeL7A5/Iy4R/+abVy2QuY3bXLtX7iv1z6gOsnlas+hetmlst/YNz5
5dqfA36qy7VfBdw0lau+Any3l0ue8GPd5dIn+tNyyR/2auty6Rfitu3Lo5X7
r9CnXcsVz+Hve5dHK/d/qX/l8l+0v+XCI/Mz08DFaeXSV9j9c/w79OEi/454
/HL/zvzF4zF+Nc24yvODX3qgXPqA5zxWrvyD9U6vl/W6cukL4ve3yqOV+7mQ
04fl8i+A1eflyh9hb741/6H3P5WX8rPbhwCbXyyUvACrMQslT9qDhdI32oOF
yodoDxYKH4wfFireg9loWCg8MZ4yTXuwUPUh4mGh8Ah5Dvh3zsO/Q567mIZ/
2Ns099cWav8A9dTDTXO/xNczTjONZZ5tGv7hQs+HeDBNPJimPfd6Gc+aP2Sb
adqHhfJH0NtnTYMfL5tm/8BC2T/I+cOFJX96V4xxluWF/75ZKP2lf1io+APx
zFqLJH+Eq2NMY/1bLpI9xjSmL1I8A/2eu0j4wmMrFgl/9A+LFG/SP5hGWNC1
aBX7sEj2gfmnaejDdoukD9RL04D13otK/u5Z+u8DF0mfwL8jFsneEA+mMcxp
pmkfTBMPpunPTRMPprGem00DFv/2/IgHzx96+ahp5FfPLpK+0z6YX7QPi6T/
tA/mP+oZn1s+tA+mmZdVSL7Q919UCB+sF5umfagQ/mgfKoRP2ocK4R/7VxUV
8s+MtyqkX+wnqJC/RjzXW6F6POPvCuWPGH+bCvkzxDc7VZT2E16hPu5RIf+H
+/evUL2G/sG/U/9Xuf7sCu2v0x+YZj3P43M/0vOj2nk9ENu/K2QfyDfzB3L9
T4XsKeODCukv44MK6S/jgwrpJ/C/uELyhB/5okJ4IN8rhB/GB5Uh/kdWyh/h
uWMr5a9YP6qU/4M/nlUp/wjclFWqvsJ6c6XiX+A8Vql6NevPpll/rVR8iTwy
b5ry9vXMvyqVj3E/3OMhbNqvUvEp2Hyw54uywtGV8s8Q68mVii/A/zMr5Y+h
Z+dXSh+Rx1xSKX6CT1dXiv/Q15sqlW9zf7NS8sTf76+UvgAHj1QKH7Bfz1QK
T7j/5UrhE39+s1LxHvzhh5XKB2FvvqpUPMl8uFLxJ+ujVSU8fUT8blClfIt8
Nw1+TTXN/RTTGG+Rn8d8ukr1C4zXUqX8DThKVim+xboyVYpn6f+rwnh2uyrp
N/i1S5X8OezbXlXSJ/r/KvlD4O+wKsmD9ckq+S/8f0qV5Innnl2lfJ5+p0p4
AYwurxLeIferq4RPwPDmqmhlfx39f5XyK+a3Vcrv2K9RpfyM8WCV6tf0/1Wq
17H+a5r6X6X6C+vB/h1/Xm6a8WCV8kPYsZHVGh/r36xa82N+UB2t7J8E3mZW
qx+N9eRq8Qf+oqZa/hb621Qt/rK+WK34k/pfrXiT9r5a8RH2IX5TLX8A+e1U
LXuO+tAe1cI/+LB/tfZjIL9DqtWfAD07plr1BviLU6rVL4h6zlnVqlcAJhdU
q54B+31ZteodrN9Vq75H+Zum/E2zvm0awzxerfoKHvtsteqD7CetVn8b/X21
6qP099XSN+jZkmrpP/19dcl+vMX664/V0ifoydo1sj/cD6+Rf2c/Qo38Ceun
NbKPzA9rhAfIqbpG+gD5xWqEf9YXa4Q38LG3Rvil/a9R/yLtf436C2n/a1Tf
w7p3r1E9EHn9fjWqFwJ2B5vGuo42DTd3su9nv0iN6om0/zWqX4JLl3h+xHGN
9Avyu6lG9RXWc71+6NN9NfJftP818q/sb6iR/SGbzX/Wf2rk/wGLD2rkT5gP
1sg+Qo+W1ciesu5aI/vL+lCt9AP8XK9W+7+Q01a1witgOb1W9W38v6BW/Y2s
D9SW6o3LSvGeafr/WtXP8fde04gX+1e5/9d+PvfjPT7lX6t+Be7H1EpfuT9X
G/YvHF0rf0X/X6t6IuVfK/sCMV9QK34SF7WK19g/Vav4mfpfq3gBz7mzVvEU
6p8P1Er+wMnjtcIH9ahW9pn+v1b1atitt2uFR+Dvo1rhGXr+Za36C1gfqtV+
EffL67RfBT3euE77S+DbOP8OezW5TvdjHrPr9HyMt7BO+8vcT6qT/hB3dSX+
fkl/k6iTf4OfSNVpfwF4L9Yp/uP+a530A/s6O9cpfwIO9qqTPwf+DqhTvAW+
HlqnfIP2v07ypf+vkz7AfvylTvEN96/rVK+m/a9bxf7XCY/c36/TfhD6IO6q
034T7X+d9leZ/9epn5Lyr9N+LOVvmva/Tv0VnGed9odp/+si9g1+G0M/3Lce
H/Z8RL30ifKvV38764P18o+M/+vlTxj/18uewF4tqJd+4P6aevEfYo/qJR/6
/3rlH+BbX73ic/bf1KteDrf163rFI8z36uUvWHerlz4w36uXPoCvh9QLr3xu
vfAN+Z1Ur/1awOAv9RHtzPf0HxfUqz8Cf7+sXv2g0IerfD3rgX4e/Mdd9dIv
yr9e+8eUf30J39+U8n2vh/6/XvpP+dfLv0AeH5lf7A+tlz+GPn1br3gM6eCP
9aoPsD7coHgZeBvbIHlS/g2ryL9B+KD8GxS/YLyaBukD/FXUoP1X9ls1qL+B
/r9B+Od+c4P606CXv2lQvwL3nxrU78D4r0H9dXyuf4f/OKRB+gM1OaZB+kf9
bwj3g//SoP5l6n+D/Atwc2mD4jP2NzXIXlD/G8L6/p0NsjdYx4MNireY/zco
v2f+3yB/zzpPg/Jz5v8Nym+Bi8UN8h/M/xvUH8r8r0H2l3Fto/ZfEVdt3Kj+
AfYvN6r/BuNMaRTe2V/cqP5N4GyhafZTNEpfmP81qr8H8U6iUf0NHKdR/fu0
/43SV9b7GhWfcT+gMdxf/n2j1gv8Htgof8L8r1H1AYx/fKPyfe5PN4rfrPc1
qt4Fe3lxo/JL4PfKRuXj3L9ulP8Afm9fuZ6PGT8NNQovDNMaZW+5r9MYxk//
bRQeOUyj7Dv7nxr1/gn7PxqFd+LcNPj0g2n45TWapE+0o03SN+jhlk3yH1CD
aU3yZzAr85rUvwS8VzQp3qIeN2m/GeO1Nikfw3y7m+Q/cH9/k+wN+D7YJHvE
fsQm+Q/Yy92a5D+4H9Sk+ID7QU3KV/HfkU3a32cc0yR7iv6FM5sUrzCubpI+
QA6XNCn+IZ+aZM9Z72mSvUdedmeT9IXxflPoLx4zzXyvSf6D+X6T9I/2vkn+
iva+KSJOljH/XtIk/aC9b5J+MN6LKT9hvhfTfjPGGxtT/k57H1O9nfY+pvoJ
8/2Y8nPEFzUx5ZPQlyim/UqM1xFTvI3H9sWUz+I5hZjwQzsWE77Y7x4T/mC3
94qF75vsH5M9RxxxaEz+BPHCsbGwH/Vk06z3msZ9F8bUH8p6T0z+ivFeTPkJ
9OSWmPqNGO/F5C8g1wdj0n/2c8SkH7T3MdXnSq+jKl+n3sdU/wAOPzb/ae8t
H9r7mOot7AeM5D+gJ+tGql9Bn9ePlI9j3FGR/AX4t1mkfJv14UjxCu7fMhIe
EddMikr+7Vvm49Mi2XfcPyuS/sCMzTONOKXM1xMHkfQP7rUmkn/g/lIk/DPe
jFQvgPzaI/VTM//wesH37kj9DnzfKpK/gB3oj+QvOE4k/aDcItWzWPeIVD+B
fHeItB+A5+4cyf4BL7tF8h/Ed6R4gv1VkfSF+U2kflKYjYMi4Y3vvUSKv1Il
hqz0L/R/keIx8OG0SPk3899I+Abuz/b1GO98P4/9E5Hej8F4l3o+sOtXeL7M
l70eqNV1keoP0OubIsVP8E+3mV+sp5iftKOR6h+sr0fSB5idhyL5d9jnxyLV
V4DfJyL5D+D3mUj5OfD7QqR+HfYfRoq/AZvXIuUjwN1b1h/qQaR4nvY7UvyF
+z+JlK+wv8P6BRwtjZRfs55nGmq5wvjH30c0S1/p75vVD47x1mtW/g25btQs
fwA3MbpZ9WvGbc2KNyH38c3yF9Cric2qd3C/oFn+GnZrRrPkwf2DZtVPsJ9R
1iz/z/2EZsVXsKvVzarvQl/qm2UvgYNYs/QF9rK1WfUe1puaVc9FPN3VLH/D
/KNZ9S3gNtMs/OL+fLP6S4GDgWbFb6xPmuY6/TzET79tVn6E+3dtlj8A/vZo
Duu7ezervgv/sm+z/Cf3s5tlL1jfbpZ+AKZHNGv/CPcf3az4FXw6oVn5Oezn
Kc2qXwG2pzdLX5gPNyvegr8/t1n1LNbHm+VPMM+/N4f9Ypc1S39gZ65sVnzO
/ZNm2WPEDzc0K54H/m8xXnH/Hc2y59xfbVY8x7dw/DvGf7BZ8Q/uf8TPI1s8
PuOYZtUbcNvzni/48JL1g2xolr3AuG82K/+mG7G+4P4Pm8N+gE+a1Q8BuX7e
LH+C+79qVn4I3Cxrlv8HLr+3/lDuLYrHqP8t6nfj+/Et0idct1GL9ueo/y3C
G/W/RfqF9W7RovwGechWLcIr2DbVNOLRmb4e+jvHzwPeylpk/3FbRYv2M6j/
Lcof2K/aoviS7q1F8RL41doi+wH709Gi+Aly6m5R/s36U4v8B/iVbZF+YPxC
i+rt0NOtW8J+3t+0KN6CWduhRfVJqNHOLdov4fsTLcID65ctqn/R37fI3nI/
q0X4gl/4U4v0C/bvsBbVf9h/3RL28x/XIrzi/hNNw3+f6uvBlTNalD/x/Y0W
7edA78/3fDD+31qk/8D9JV4P6jVXeL3Qq6taFI9i/OvMLwx7U4v6WxB/3tai
ehXrKS3SD8Qp97QoX2d9zfJD+PxQi/wNrnusRfqD+580HnD/sy2KL8D/F1vU
78H43DTs/+vGG/dnW1TvwbjvWf9YrzcNM/Fpi/a/kUZ8YTxj/l/7evj15S2y
98zvPT7Yslqr+lUwj3VbNV+owQatshe0a61aP+OYVvkL4GVca9jfM6FV8S3G
m9QqfmO901olD9iB2a3h+zrzWiU/6EV5q+SLeVS2hv0rta2Kt/F/Y6vwgsc0
t8qewt+1mYbedrYq3oNb6DENf5MyzfcdTIMPRdN839w04r3tVrn/t63Sd+jZ
rv4darO754d4c2+vB2zbt1XxFMRxoNfPvKdV+gGxHW5+wX4f3Sp/An99fGvY
r3ey+Y/473TTuP+sVtk72P9zLU/Ww03D313cKv/E+nir9vNZLzMNWF3TqvoO
/N31xhPrp63SV8S1d7RKX7mfbhrzv9c066vGK8Z52L8jfn3cNNzl06YRfz5n
Gn7nv9YH3P9qq/rZYPfeMI3x313l/g9aw37Pjz0/2NUlXi/Wv3SV+S/z78y7
zC/sr/9kmv6+TfyFvNZrk37S37dJHpDX6DbJk/6+TfKnn2kLzyea2CZ9pr9v
E37YH9CmfiiYoblt0m/2i7UJn5jvItPsH/H18DMNbcI3+B0zzem2yf9i/I42
6Q/43dUm/YK8U6bp703DXxbapJ9Yx9Zt2j+hvzcNf72Dr0ecsbOfx/zev0Ne
e60y/j5t0m/M/4C2sL/sIK8X9x+2Cv+OMo37j2uTvgMvJ7WF/Z6nW17M9y1f
hFXnGA/sfzCeEO/9rU145Ps8bcIr4qV/tElf6O/b5F/o79u0H4v7b24L/e1t
bWG96y7TiPvuaVN+w/dl2hTvchqmub/WJn+IuORJ04zTfT3ilRdNI957tW0V
f+/5wO++7fkjXnnf6+P+jNfPtNT8wV+/ND+RNn5jfcX937XJvrJ/x/KCn1mt
XfKEffxlu/AAnG3YHvYbb9IufwS8j2lXPsf9n3a9z8D4vl31EeB9SrviO+b3
7cp3gLM57YpfIe/57YoX8fdFptkv1K56G/hdbxrjx9oVXzK/93jUd8+P+f0q
8+9rV/2O+u71M75vD/V163bpH+a/Tbv0ifW8dtk/9iO0Sz6Y/27tssd47l7t
Yf//Pu3CB+t57cIzxj+oXfjEug9rV7zH/Yx2xYuM79vVv8L4vl31M9iL09pV
LwHfzmhXvsf9rnblW6zvtYfnq11kmvU9Pw/TuKJd+Rn7YdtVn+D+WLvyTYx/
U7viW+jbbe2Kl7l/0i79Y32vXfEq7r/f/IS+/F+79IX9dO2qN9Ett8v+ETft
sqfUd8uf+t4e5ievG+9Y/zvGJ+b1frvyMfr39jC/+qw97O/5sl31BExjWbvq
DdwGald9kf7dNM9fiovG/WvHtb/Fel5cz6e+xzUfyGlMXPkc+DI+Ln2CHdsq
Lv0BX6fGxQ/697j8K/RtTlz2Bs8ti0s/gMNFcfkP/F8dV7yEddTHZT9xXxQX
/hEPtcWFF8QHibjwzfp9XPhkPh9XPQHz749rvwXzL8RVH8T8t46rvwf24jdx
9YPyfWfTzOfjqt+Bf7v5d/Yjx1XPYz4fV78E7MUB8bAeclBc+sf6vdcHe3dU
XPqD8Y+LS1/YvxIP/eOpcekH8HJmXPEe1nlOXP4C958fVz4B/v0trviG/j2u
/B3j/yMu+879sLjqBVj/9fHwvI2b46qvYf23x1V/435ZXPU6vv8dV38l35+L
az+T54PEVc9mPm8aduepuOrvxLWfh/X/1+Nh/Ffjqjdi/m/EpY+Qwztx6S/W
/0Fc+o77P47LP7F+Z35h/V/FFf8xnre+AD/fxxVvYfyfLD/wf42O8H2S9TqU
7yN/3ahD9hh+Z3SH8IW4ZfMO4Zv+vUP1cPZ3dqg+DX2b2qH6N/17h+rfrN+Z
pr53aL+W+m6a/t3PY/2uQ/V31u86pE/sF+iQvrBfqEP1Qup7h/wN+N3XIf2g
vneE778WOuRvYZ+37lC8RX3vUDzFfoMO6QPUeOcO5fP07x2KN+jfO2RPeT5O
h/CC9R/QIXtNfe/QfhHrdx3CK+P5Du0XAe/HdWi/COOf1KH9H/p301jWmR3a
P8L953Rof4nxvJ9HvfR4mP+lng/j+Q7pC+OiDvWnAnbXe73g/y3mBx57e0cY
n93VIfvCer35TX3vkP+GHjzcofyC+bv1gfm75Q35Pdeh+IP5u/HD/L1D9h/P
ecP6wPy9Q/2dzN+Nd/r3Du33s9+yQ/uhzN871K+A65Z1hOdLrfDv4NOIhPrN
wP81EtIfuK31E+H5oBsnNH/qe0L+DvWezRNaP8LfLROKHyHWiQnxD3nJtIT0
gXYyIf+N8eclJB/2LSYUD3DchOIHwLo2IX/A/fmE9hd5/lZC+OH74gnhjf1h
Ce1fYvyehPCL8dMJ9eewXpfQ+TywqwOJ8HzMX5vG+Nv5etbrEtIX4GTXhPZT
Aas9Euon4PulCe03cX/O68G8D0zI/yFvOCQhf8H3kROKJ1HXPSahfAR26ISE
4lPW6xLyD5DjnxPKH1mvSyh/AP//mlC8xP25hPwDYPv3hPZnmLYk5B8wj38m
hH+Mf00iPK/4RuMV99+aUL8A7v9XQv0E4P/dpqH395rm/rzvB34fSUifgJ8n
EqG+PZ2QPvK8uIT8F+5/yevB+P9LyB9C/m8lFF8hrHg3EdbXP0oonmLeZ/0A
/7+wfvD8UMuL71tZPzDuDwnFS6zPd2q/BfhZs1PxO9R6g07pA/txOtWfBr3f
rDM8/3BcZ3ie94RO9eOgP22yaewnTDON+2d3huffzvfzcf/CTvkLjF/VKX0A
juo6pQ8Yv6lT8RTub+mUPmD89k7ZB4yf7JQ+cD++U/qAOCDTqXiJ7wd1Kt+G
vAY6pQ+4f5tO1Wsw7vad0gfI+bedih/g/n7XKXyA/3t2Kp7nfnyn9IH7cZ3S
B9z/p07pA/uNO2Xf4ceO7JT9hxs7tlN4x/xPMM1+ZF+PeZ/h5/P9xE712wB3
53Wq/wBqcFGn4ivI6e+d0gfUp67weiG/q8wPuOVrzS/4xZs6pQ/cj+uUP4a9
+len/DXGv6dT+sD9OMsTfHuoU/EAz/cyHnD/k8YL1P4Z4wnDvtipeB73v9Kp
+AX8+5/xyv24TvkP3P9+p+w95LfY+AcOP7M+sb/O10P+33SG77sst34CFj9a
P1ifS0o/EAf+Mil/AT+9YVL+AfHLJsnwfZcxybAePT4pfWC+ngz7x6ckw/dh
ZyTlH5iXJmXv2L+flD1k/J5UvMT3uZLKZ9l/k1Q8wjgjqfgedqs1Gcb/HUnZ
b573YJr1uWQY/2RN830QX896fFL9bYzfk8I/4/ek8M/6XFL6zHw9Kf/HfD2p
+gHj96TqaczXk8q3Mf+DktIH3H9YUv4B9fSjkmF98Lik4ifw76Sk9IHn4ybD
+uqZSdVHGb8n1T/DPtWk/AX775LSD+brSekH8/Wk8mfm60npC+P3pPSF+XpS
8Q/PpzTNfD0pvPO8wqTyb+Dg/qT8F+O+pPIH8PExz5dloKTyI+6/eb1Y/3+T
8p/M15PKr1mfS4bnS72TlP3B/R8kw/6Nj5OqR3H/LRl+j2NpUvUn5utJ5ZeM
35Oyl4zfu6QvmOcaXcpf2W/XJX3B9Rt1KV6BWEZ3qV8Mer55l/CM+GuLLukX
7OTELvkj9tt1Ce+If2Z2Ce8Yf26X8gXcX9Yl+8/zvLrU78P9ty7ZA8CwoUv2
gv3dXarPsj7Xpfya/bVd4i/y/e4uxa/s/+5SPR3z7+9S/RXrL3apXg9cbN2l
/IJ5ZZf0g/X4LtU3Mf9dupRvsN+mS/UnwPL3XcIfxt+3S/ikvnfJXqMOenCX
9AnXHe7f8ZyjfT/2T4/vCt9PO7krrC+d1iW8ky2eL/h3blfYX3ZBl/Jpvo9i
foD/l5lfGP9K85PvJ3WF+0HXd4X7t7d0qT7I7w90hfvld3UpX8Qs7u2SPWR/
XZf2I7DsR7uUf0LM/+lS/gGcPdOlfBV53PNdsseM37tUr2X8bhrjv2k8w028
Z5p6aBpi+dT3g39LjH/A/mvrL/5f3iV/wPjd64FfWq1b+oA/r9Ute0H/3q36
Nvg6qlv7QZjvpt3SB/KxW/sT0OsJ3dp/gppP7pa/4PlL3eH5g7O65T/A1vnd
2p/g+7nd4Xmeld3CF+xkXbf639lf0616DuKY5m7FYxg/bprnRXYLv7i/x7/z
fA8/D3Y23y37zvi9W/Efr+uWfuP+7btVX2W+7vUyfjc/GL93h+en7d0dnu+x
f7f6C4C7P3WH510d0i194Pn93fLvfJ+kW/EV8/Vu2T8Me0p3uD98hvHB+N34
wfjndcu/8HypbsUfyDf/3i38cb+tW/YZ/L+qOzyP8FrTWMdNq9x/m2nM61/d
6qfEtO/plj5Djvd7vuyn65b+I6553OvD/U96/bRT3dr/xvpf7Fb+ALG81i1/
Af18s1vxLOzbu92yVzzvplv2DPd/0q34ivrdrf0p5ufGA+zjt92q5wI2K4wf
vh/do/iC+XmP8Ia8YIMe5avIb0f1yB5zP900njveNOq1W/l5kPMUj4fnzu/R
/BBHLOzR/HlecY/Wx/64HuGb5zH2KP5h/t0jf8t++B7xk/l3j+wRz2PoEf5x
f6ZH9ov98D2SH/vhe6QPfF/fNOa/fY/iK57f0SN/gnF/1xOeD72nadz/B9PM
v3uU3/N9P9OY/6G+HvM/0jT8wrE9wifGP9E0xj/V86P+ev5Y/9k90nfcf57X
i/Ev6pH/xPiX9ITfG7miR3hn/m1+Y/zreoR/vg/To/wa8r+1R/YKccidPdrP
o/5a3sDRfT3SF9pp44P7Z6bZD9sjfcL4zxpf7Ic1zfcVTWP8141P2I+3exSP
4P73e5TPMv/29TzPt0f9UAxz/Ttg943HYz/sKuP/2BP6z9V7tR7wby3TzL97
xR9YqVG98g/Mv3vln5E/jO8Vv9kf0yt94vfDesPzWWaYZn9Mr/SN71Oa5vsv
vWG/f7VpmNkG02BTrDfs52vrDc/HTfQKb4jnunrDfq4+Xw972b/K/cVe4Rdm
8le90n/Yy21Nw17v2Cv84/5d/Dv7CnrD/be9TGPcfX095PBH/w65Huzf2f9q
mv2vpnm+o+8HLE72+tgPZ34gHzvLNPzNub3qL2H/q2ncf7HlwfNBTDMet3z5
vovxwPddjB++72Ka/a/GH99jMc16eq/0nf2vxi/cyCOmcf9/eqXv0MunrA/A
z/O90h+6oV7pI/PvXukjwpQ3e0N/+25vmM99aJr+2jTfd+uVPcD4S/08nl9i
GvnwCs8H94/oE41lrGOa30fr03p53kmf+MHzrvrEP8TZY/uk3zz/tE/2F/dP
6pM8EUZN65P+sd+9T/hhv3uf8IfrFvYJn/ivqk/5AthS1xeeP9toGvaspU/+
iPF4n/wV47A++TPW0/vk/3B/pk/+EvlIrk/5PM9bNQ17vI3v53kMfj7X4d8Z
j/t33L+n50d/7vXQn/fJf8Kf/cn8wWMO7ZO+gv9HmN+4/9i+MJ86sU/6g/FP
7ZO+8Dx6yx/DnG18gH9/NX54/mef4i/cf0mf9nfgTy7vU/zI82D6FM+x/61P
/VSY/42m4Y9v61M8SX/ep3gR8dw9fcp/EE/cb5r+3Pfz/FjT7Hf1ePTnni/i
sRf6VD+gP+9TvsnvrfRJX5EPvd0ne8EyWJ/8J+Sw2PxGPPFZn+wdv9dj+eH+
b6wv/H5Jn/wH6+l9yh8wzmop4Qv+eI2U8g/Yq5Ep5SuY77op5TOwL+ullO+w
LpBSvgUYb5RSfgQ5j/Lv7Jc3TfuRCt9H29w035/x+MDxFintx/M83ZT6F9hf
n5J+gk+TU9J32NepKdkL1gNSsi983y4l/wSuzU6J/xD73JTwz883pCRP2Nuy
lOTN811S4fsrFSnhG/2TVSnhDeuvSaleC7zVpVS/Qj7VkFK+j2U0pcLzi6KU
6hGYV2tK9QK+z28afI6bRv2p0zTq2V0p1Tvg37tT4ftzfSnVS/B+djol/QIe
MynpD/xJLiV9wZ8L5he/l5EKz7PeOiX/Ajn9OiV/wvONUsI/3yeyfIGzHVKy
n6x/pMLzG3c2nnD/rsYb+kl3M555PnJK9Tj8fa+U6r88Tz2lehjmv09K9TL4
i/1Sqtfh/gNMs//BNM8n8P2wN4ekVP9DfHtYSvU2yO2IlOoXmNYxq+jX8dZ3
2OMTrR+Ib05OyZ+ADadaH/h+c0r+gf4gJfuF+89KhfnI2ZY367Mp5e+4/zzj
HfdfkArPL77IeEY8d3FK9TL6k5T2c4Czy1KqV8O/XWGa8WRK9WTM66qU9hPZ
r5EKvwdyXUr1ZuDmhpT6G2E/b06pPsfzTKwvcIu3p8LvDd5h/YB+3ZWSP4F+
3p1SPMf3NawP0I/7UuF5Pg+kFC/jzw+mwvMsH7a9x7wetb1k/Sml/Wrg8wnj
nf2gKfXXAjfPGN/gy3PGK/1hSvVj5GcvpbSfQv+YUr8i5PCaaeDw9ZT6yfD3
N3w/96P9fL4f6vGRD3xo/YR8F6dUH8Q6PvH68ZzPzB/ge4ntB/vNbV/A36XG
P/1vSvEPj22x/HD/d5YvcL0ipfiE58kZ79C7EWnhHfNePS28wX6ulRY+UQ9b
O61+YIw/Mq39E77PktZ+C/i1flr7Mczf/Tv83MZp7cdg3pv4eYgLNk1Lf3D/
mLT0A25jbFr1a+ynjk/LP/G8m7T0HfLdKi3/wPdh0/KXyLenpIV/xPPT0uI/
zOKMdFhvnp1W/AM+zUnL/uP+eWnVX2FPytKyj4jPy9Oyp7h/UVr2F/asKq39
SdiV6rTwy36etPYrwaeGtPYrwb9G08BJlNZ+JHDZYpr9vL4ediaeln4gXkmk
1Z+CvyfT2q/h90LS0lfWJ9PSD6w/lZZ+ML9JSz+4v2j+sS8nrXgJ+lJMh/nD
YFr2CfHar9Ly7+wvSksfgLNt07KH8AvbpxXfIF7bMa14BHHSTsYb9H2XtM6n
YD3UeMb4u6e1fw8572kadnPvtPpNeO6eaVy2r6+Hvh1g/cE8/2j94PuG1g/E
3Yd4vuxXtn7AHh/h9eK6o9KyD4injzf/wIcTzF/g86S07D/wfYrxz+9xWH7A
xxnGP+oUZ6XD81D+Yvzze0/GP/TsvLTsL+6/wHhk/db4hb+/OK39eeDqEtPg
02Vp7c9zf8Y08HWlnwf5XJXWfj1gd431j9+b8vwQj9/g+QNfN3l9YOMtxj/f
pzL+ES/ckVZ8hHjyrrT8K9TsbuOf71+klR8AJ/dafsw/jX/g4yHjn/7a9hJy
fTSt+AL2/HHjCWJ/wvYf+HzK9ht6/0xa/SSwo8+Zhr9/wXgHDv5rGnHxy2n1
p2DcV30/2ZQO9//f8HwQL7zl+SJseycd9jO+Z/wD7x8a/+wnNb/4/d604kuo
2WfpsN78eVr5Ac9ztj6wP8X6wDzX8ub5f8YDj8GzvYS+fW97Clz8aLzx/KhM
6A9Wz8gfwJ6umZE9B4x+kRG+YY9HZsLvXa5rGvetlxH+uZ/m5+O6jTw+6/EZ
zQ/xz+hM2K+5WUbrY/97Rv6Q/bEZ2QuYwS0y4X7QhIzyBfbHZ1Y5zyKjegbw
OSOj/TnwcVZG8ub7cBnFQ8DnvIzsP89Lzyj+R7xSnlE8BJwtysgf4LGVGeGT
+wEZ2W88tjYj+454oz4jfAOfjb6e+wV+HuxeSyb8XnJrJvz+ervni3g4kVF8
R3/t9SJv6zI/+D2fjPCP+1MZ2ROERemM8M/+v0zYT5rPqP7H/qCM6kHA/WBG
9RLiIBOer/LrjPwDxLZtRvkA9GP7jPQB698ho/gD+rFTRv2P0I9dMornoR+/
y8h/QG67G8/sR/Dv0I/fG9/8vrqfh/v3Nd6x/v0zyg8g1j96vrj/T8Y/v3eQ
kf5zP9T4h34dngn35480/rHsYzKKR+EPjs2E++/HZ8LziU/KKF+A3T/F8ub7
iMYD3t/4c0b5JPsdM2F95qyM7Cv07ZxM+H3Wvxqf3H/NhPHKhdYfnk9kmueT
Ge/wR5da/6AWl2dk7yH2f3h8+JV/en6oj1zt+fN7xpnw/fbrM6qPcVsho3oC
9lNuzoTfV741o3wBZuqOjPYj2K9h+WDed2Xkz2Fv7s7I38OfDGVUL2I/dkb5
MmD2fxnVM2EXHsmoHgR//5jxxm0h4xH3P2l9AT6ezii/gHyeNZ4Bi+f9O9+/
tj0HDl/yeJjXq54PhvlfRv2XeO7rxjvC2LcyqocBX+94/XzfIxN+H+MD8w9t
xh9lFI8Ct4uNf/aT2V4hb/k8o/0ChtEZ7Rfwe0zWB+Dja+sDbltmvGDeyzOK
n2APvze+YNd+sP0Fvn4yHtmflg37H9fIKv9GfL2Wf6e/zio+w/3rZOWvMK/1
shqf34vKKt4BbjfKav7sd8uG/Ymjs+F+w6ZZ+U+eN5MV/4DLcVnV41gvzwr/
9NdZ4R/+fmJW8sO4k7PyD7DzU7Oyd7AHM7KqH0Jes7LyF6yXZ4Unnk+blX7Q
f2dVnwROyrPh95cXZRWfs9/ONN9/9/WwJ7Wmoff1fj70uTEbni8eyyq+wTqa
PX/c15pVPMjjDrLyjzwvI6v4EWztzKpexPPxssqP6b/Nb9jdvqz8M/7PZJXP
ga39Wdkv5ttZ+XvMo5iVfiCfGcxqPw0w/VU2/B75NlnZT+Bl26zyDeB7h6zq
9/j7zln5F56/ZZrv75rm9+OMX9iDvfx82KG9PT7G2yer+i/YvF9W+yGsh3s9
4O+B2bA//aCs9tdZD8/Kn8LeH25+Qr5HZLV/g2UelZV9wrDHZhUf8X0Dyw92
+sRs+D3Wk7PafwVuTrF+QC1Pz8peYh1nWF9w/1nGF/dPs4ovoCbnGo+47rys
7DHc8AWmcf9Fptnf7OeBz5d4PNSnL/P8ANsrsornwecrvR7g8Oqs7D3EeK35
Af9+ve0H4pMbzU+eR2j84/5bjX/o0e1Z+QfM/46s8gW+72x7xvq45c/6eFb5
IMa/z/oC//VAVvVErP9B44n5tvGG6x41zfp4VvEG36f07zS72TCfeca/o373
nGm+b+nr+X6154O/v2waMHw1q/iGauL1wv+8aX7wvHvzi+9jZ+VvYY/eN3/Z
X2L/AJwstnww/4+zqm/Az32WVX6H5y6xvJlvW38Ak6Wr2MNvssrHgfdvs2H/
xnem8dwVpuG/frR/Yr9pv/QR46zVL7yyPt6v66En65gGPn7Zr+dD79bvF75Z
H+8XvqHHG/drPeDjJv1aP+axab/2C3hejGnWx/ulDzwPul/8BX8m9Iv/PF+i
P6xnTO6XPYNZmdov/WF9vF/yBX9n9ssewk7O7hcesMy5/cIL97P7ZU95vqxp
1FUX+nq+/+Lfwcaqfvkv8LHGNPtzfD3i0Ub/jj/HTCMejvrDfKnV40Mf2/07
97P9O+xBp9eP/Ygu07AH3aYhpz7zD/qcNg2xZ03DrOb6pT8wo0XLA/o8YBr3
b2350T9bvtDHbfvDfqntjA/Ia0fT/J5Tv/wZzMoupsGX3/WH+c5u/dJf6Mme
xifm+XvjGf7vD6b5vo+vh1rsbxr26I/WD77faxp55MF+HvuT/DviisNN87yu
/rB/8mjTiCuONQ17cLyfz/M+/DvkfbJ/hz051TTi2T97PcDbmeYXYHKWafiv
c0wDb381/zH/8yxP+K8L+0P/97f+sJ/xYuOF30s3DX/1D+MV9uyfpmHPrrZ+
w55da/3geaH9Yf/vjf3KHxCf3dwv/wJ7cqtp5tOmmU+bZj7dL/8Lttzj35lP
ezzozX3+Hfh+0L/D3/yfaeDjEc8ffHzM68P4j/eH/WlPmj+wZ09bf2HPnu0P
zyN43vKAPXnR8uL7VZYv4qtX+sP94deMN+Tnr/eH/bxvmuZ5aPY/sIfv2T8B
n+/bvwGfH9m/Qd4f9ysfQX7+iWmM83m/4jnYsy/6Fe9hml/5er42bBpyXObx
+H6XaZ6/5PkhHv/B62F+3R++77BaTjT1Jif+sb88F55/OzInewf/t25O8gJe
1stJnpjXBrnw++0b5kL/MyoXfm9hdE7xFfL6zXKKv9iPllP8CKmMyykfZz08
p/yF/Wj+ne+b+nfYoyk55T/sRzMNtk339cyv/TzUk2bnFI/CnszLKb5EPL4g
p/iS5814feDDIq8f86/ISZ8QL1XnQv9Zm5P+YNw68x/5faPlAznGcrKHPK/G
8mY+nQvjq46c8IZ5d+aUb7PfPqf8CY/tNc16eC58HyyTU32O51mZhr/Mm0be
WzDN93H8PODjV6b5PdWc8ivMc9tc2E+1fS6sp++YC/t5d8qF7/vukpO+4P7f
5UJ/ubv5yX7gnOwR7v+98Q87+Idc2K++r/EPfO6fC/OHP+bC/tw/GU/01znV
E7DPfWhO9SnYs8NzyvdhT4/MqZ7A9wlyqg/w/aGc6gc8Xzun/Q+ev+nfAbuT
fT/s6al+PsY/Pad+Ep7X5/nBnv7F88f9Z3t99Ne58Dzi83Nh//uFuVXO9zO/
WQ+3PFgPt7xYDzf+WQ/Pyb6zHm784/6rjR/g4Frjjf7beGXYmQu/73JzTvU2
sOHWnOphPE8sp3oZ/XdO9WDw+d+m6b9N83t8pqFv9+fC8yQfzKm+Br15yPOl
/86pXkH/nVM9gt9zzIX98U9aP+i/rR/03/YXMEPP5+S/Mc0XrQ+Ir16yfGG3
XrF9hz18zfaV9XHbZ55/ZLwBF+8Yn8Dru8Yz2ZxTvRl29aOc6sO4/2PT8L+f
5sL9zs9z4feTvvDz4Be+Mg15f51T/RtyWmZ9gn1dngu/R/R9TvU5POcHrx/2
dURe/gNyXD0vfYAerJGXf+D3sPPiP8YdmZc+YB3r5GX/2U+eVzzBfZC88M9+
8nxYzxqVV38u6+N51XfZh5MXvum/89qvBF7G5dU/C7xsYZr18bz2T1gfN43x
J/t65BNT89pfof/Oq14N+zQzL33h/nZe+on8dZ7Xw+/Be73033nFa7BPi/Ly
H/TfedkX3F+VD/OR2rz8Nevj+TB/bszLH8A+xfKKH3heRV72E3hrzQsvPB46
L3sMO9aR1/4GxunMC5+wb1157Z/wfLq89ld4vkVe+4XMv00z/86H/S853w/7
VPDzUQ8byEt/UM/aOq/9GO5v56WvsDu/yUs/sN+3vdcPPd8xH76/8tu88h3g
fZe88hHm3/nw/cbd8rJXzL/zygeYf1u+zL+tD8y/8+H7D/vnZf/pz/Oyx8y/
jUew6WDjl997zIf9s4fntb/I732bhnyP8/Xg4wl57T9Cvif5+TyPy/rHfjTr
A/YL/+z58/xNr492Pi//gPWda/5Arn/Nyx9g3efnlZ/xPC/zH7C+2PLB/X/P
y//zPJC84m1+f894hxpeabwDB1cZ72DLNcYb1PA64xFqf4PxjHXfZDwjXrol
r/10vt9kGvbojrz27xHn3On7+T0vj8d+tLz2N8GX+6yPsIf3G//sR8srfuL3
P4x/nk+Sl7/E/uzjeflTPPcJ+wP+Oa/8AH7hmbzyPfD5ubz8O57zQl7+n2Yv
r/0L6OMrecUTfJ/S9p9pk/EO//Wm7TfGecv4ZX3c+Ob3B/Lab0f++IF/B24W
+3dM6BP/jvz3Uz+f55t6fL6/5fnxfU3rK/vJrQ/Q+2/tD9hPbv7A/q/IK57k
9w3yqmfx+6UF8Z/nnxckH9y/ZkH+HLhcuyD5Qj/XKSgfhbx/WQjPE1m/oPgC
89qwIPsKPd64sMp56oXwvJNNC8Iv6+WmoUdjC8I/z18uCP+sl/t6xCkTC+H3
eSeZ5vnMBekn9Ht6IYyXZhQUz0G/ZxcU/0Fecwuy/2DL/EK4P1tWkH3BuhcW
VB+GHlUUwvcvqwry37BDNQXJE+PWFeT/eZ5UQXjgeZEFxdsYPyoIT8BLS0F4
g79tLwiPwHG8oP4Tvv9lmt9/Mc33v0wDL30F4Z/+uiD8Qy5Zj0d/XQi/T1co
hPnIQEHxEf11ITw/5dcF+QPYl98UlD+Bz9sVFF+yH62geAj/7VRQfAr7sEtB
+QHwsmtB8RDu2936ALe2Z0H+ge/fF+QfINc/GD/A277GF+a/X0H2l+/nF9Q/
wvN0rC9YxsEFxTfA+6EF+Q+w6XDTuO9IX4//jvbz+b6v8c/3wayvYOuJBfkD
nr9VUDzE8z0K8gf8/rv1ATg4w/rA/Nv6wHq59YH5t/WB38cryJ/z/N2C/AOG
/Zv1gedzWh9gny4tyD8wDCjInsI+/cP6gWn80/qBv19dUDwPN3itaQx7g/GM
ddxYCM+vu9k05HWb8Q77dIfxjvv/VVA8BH/y74L8Gb/PV1B+wPO+C2E+dH8h
PE/uwYLyKfpr4x/pw+PGP+L3J4x/TOupguqB0KOnC4qPEN89Z/zzz8Y/vw9Q
UHwEPrxsPEE+rxYULyHf/Z/xB/m8UQjz3bdM83xC05DPe9Yn9o/7echjPrL+
QT4fez7sH/d8+T34guIf5A9f2P+xf9x4R7zwTUH5MXD0rf0pvydeUL0I968w
/yHfH41/fm++KH/A81eKinehz2sWw3riL4qqP0KOI4uKn6l3RekDv39QlL9g
/3hR+sD+8aLwSDtUXOX7CP4d9bTNTAMvm5uGHR/v50MOWxZl35lvF4Vvfv+8
GPYfTimG/edTi8qHMP70ouw/z28syv7j/jnF0J7MLYrf7EcrSh6wJ+VFxUc8
T6YoeeLvlUXJm99XLco/QA61xfB7SfVF2UueR1EM+xdjRcVT7CcvCo/8PltR
8RXf/zKN/xOmoRedxdD/dPt5fP+rKHsOfUkVw/evMkXpM/DWX5S+s35eFP75
/ldR9gHx7WAxPM/kV+Yf3/8yfyGnbc1/vq9dVP6G+sqORcWz/H5MUfky8LpL
Uf4B8t7N+gL7tkdR/oLfh7e+8H3tYug/9jH+4L/2Kyr+4PcoTEPuBxbDfOQg
0/jvENPwi4f5+exPKyq/4fcrPB/g5RjPF+Mf5/XwfbCi7D3kfrL5Aft6SjE8
z+d08xP24Yxi2B9wpuXB8/aKYT/JuUX5C+DgPMuX5/sUlQ/i/ousL5DXxcYL
xr2kqHoT/ORlxbD//Yqi7C/wcqX1CXi52jTwdk1R8Trwcn0xzF9vNA283uTn
I+6+1fiGXtxuGuPf4fnye5peD3B9t/HP833NH+DlvmL4vsYDxfB8g4eKio+g
tw8Xlb/BHz1aDPuHHi8qnwZenrB8gZenrC/A2bPGB8zk88Wwn/EF4wn+7CX7
G/iDV4w/3P+aacDsddNY55um+b0/Pw/zfNe/83tgtuc8r7AYfr9ssWnYh0+K
4fcRP7P9h1yWGP+Qw1fmF/T7a9P8fqD5y+8R2B7Bvnxv/WD+bXkBLz9ZX3je
yoDkjfmvPhC+nzByIOynWGdA+gNcruffYf83GAjrjRuZZv/4gPSN73sNCJ/0
174e6xrr50Mfxnl8+mvT0KetTEM+EwfC721O8fpgf6cNqN6M+2eYH/j7rAHh
H/o0Z0D84/lPA+I3cLNgQPttYHv5gPSD73+Z5vtfA4p/eT7zgOQNfao1DX/Z
MKB4AThrGhB+ENfE/DvsQotpDNs2IH1DvhUfCPsdE34eUJscCM936x4I6/m9
vh8wT/l3+muPDzznBkJ/WTANHBQHwv6mrc0ffp95QPhHP8BvBoR/1IO2Mw0+
b2+a56tYXrB/O5vG/7tafvy+q3+HvPYYkD7xfBXTPI/WNHCyj/GC+/czDXkd
YHyxn9z443l4A2F/7KED4fukh/l+2K8jjWeYmaNNY/xjTMNNHG8a6z7Rz2c/
+UDYr3Sqx8PfT/fv9Nf+neetmB8oS55tmuetmB/Iz88zDbxe4OuB14sGVC/H
/tXFptlPbnnRX5vm+9uWL+670jT6X662ftJfm4bdv954wvtqNxqP7CcfCPvx
bjGe6a99Pf21r6e/HgjfT717IPwe9JD1if7av/O8FdPc3zYNvD7s+2kGB8Lv
Sz/u+aIe9IR/h3162jTw/oyvB16f9/wRj79oGnb9v14//n/Fv6Ms95p/Z9hj
/tNfW17wB2+bxv3vDoT76+8PhPsrHxpPPM/MeGN/mvGLMOAz6wfk/oX9B/21
ady/1DTwsmxA9SXkj8vtj/j9X/s3+KMf7L/w9598Pf31oGjgZQ3T7C83DXmv
bRrxwjqDmh/PMzcN+7r+oNaLaWw4KP0G3jYeFH9gHzcZFP8w/qaD4jfih80H
JT/kj+NMs14+GO6HTRgMv98wcTA8H3DSYHge6dRB+R/kj9NNY/yZg2H/0uxB
xWOwT3NNY/z5g4o3YV/KTMO+LBwMz2urMM3vJw2G/VM1phFf1Xk+uL/BNPAS
Mw28NHs9wEuL14/4ss384n72oPSHcjG/weaeQeGf/WmWH89zt/z5PeVB4Rfx
XX5Q+IQ+FQeFX4w7OKj4jf1pg4rvoM/bmOb5KoOqT/B97UHlMzxfxTT8x06D
4Xneu/h3nq9iGvq4+6DyIbB1T4/HeXg+0IN9BhWfAub7er08X8X6gnjjQPOL
56FZX8DvQ6wP0MfDBsP9xiOMf56vMih7yPza8ob9PX5Q+QPs7wmDYb50svGI
/08dVL6CeOO0QeU3wPMZg6pXcVqDyufpr00zvzYNPJ43qPoA/fVgeH7VRavc
f7HHg7+91PPh+1+D4XndVwyG9eJ/Dobvx1xt/YC8rrG9oL+2PvD9r0H5C34P
x/Jhfm37xve/LF/8/69V7O9dg+F+wt3GE9YxNBi+v3Wf8cv8elD5PfPrQeX/
sF+PDKpeAPv52KDqX7Cfj5vm+d6mweenTf8/cBdxng==
"]]}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0.},
ImageSize->Full,
Method->{},
PlotRange->{{0, 107.257}, {-2.111, 2.129}},
PlotRangeClipping->True,
PlotRangePadding->{{2.14514, 2.14514}, {0.0848, 0.0848}}]], "Output",
CellChangeTimes->{3.566456519809661*^9, 3.566457033171077*^9,
3.566463355975685*^9, 3.5664645969212627`*^9, 3.566465764672607*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[", " ",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "schweb", ",", "2"}]], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Red"}]}], "]"}]], "Input",
CellChangeTimes->{{3.566418094323538*^9, 3.566418098142885*^9},
3.5664570384808617`*^9}],
Cell[BoxData[
GraphicsBox[{{},
{RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJxdXXWcnNXZDfbhEEIgIVjcZd2TeXd31mVmR3ZnhkIpUFyKu0txKKVAsVLc
KW6FxYu7u7skBBIkwMeeMznnd5c/mj47732vnfPYlXfCNnuk/rziiBEjXl5r
xIihf2tveXS/e/91buzB76f/4bQHlg7e//i/W25bfE+sHP/9Mvja00vTH1z2
RGydOTdd8M0V3w1OK13t2k0KLxbljweXDBX7/tXY1Yue79lm5B0xvu/12Aj8
92ls0hs/Hrbzf9+N/X3syv3rzPkuNuuvG/7+yg9i24zM/f7oT7Ev++7Y7Ngv
Pop9NnXoxSOiWOVWd3Ws9Xlso6HHbxoRrbXiUInPYxvPe2vy/x35S2z+Gq9c
8pf5X8e+PmToye9j7x00+vq29xbG8Lr9Po797auhH76Nsd3nDRa2q38nccri
GNv56SCf+y6G16zx/eDvnfn9ie9jQ2//R/PPg2j+uKWx73558YDPpv42iGr/
sTQ2Zejnk0bct/mxX/ze4h8l/3efoZ79FDur+aRdP/n5l8FTzt591NH3/RQ7
+r6hgfxxMPN7Ix4avyz2n712/L1piwfRrQt+KT7/3uD/uqpPaNz6t9gnP1/1
+wg+ELvwmyse6aoeES3vz8Ih8YQREcf122K7V4g43j/E9h56bWyFaHv891Nx
HleI2M5fivOyYnQoBvbX2EfPTvx9RlaMxmCAfolheJ9eMVo+vqthQFbS+34f
tN9fuFJ0+e+9+M9eP8R2RodXjgCD7RbHNsUAr1x8/8LYReOGXrRKhGa+8kbx
fatEy/v3w9CsPLRKNNTrj559fpB4WCV6bGjY5703yHb8X7THqKER/GqQ7fu/
KDUEk75vB68cGo7GVSNM69lLBvm+VaMJGOAfBtm+1aLl87knALNa9NIBQwhb
NsjxWS1C8d2XDXIe/PuvQ9Neunp08BCsDvppkPhdPeI8LR3keK4R7YYOfT/I
+VkjIl4WFdu7RvQ7iH//v58X+7Om+kvcrhktxye62bJW9PD4oQ68VJyPtSKO
+/ukw4prR0No2/WTL2J8bm3hgTxau/j8d8X5WCdKAohLivhZR3jh+y0PsfiR
rnWjdhBpafH3daNuNHhJDP1YdWS0nL+Ylwkji/O7KIbn/jxS7WO/Rwq/7OfI
iLh4L0Z+jIzQrVmvxJq2HkLkyOL4Plx8/3rRT4cNzeSOg8T3etFzQ7Dd+cXB
P6Cj60Vs9zvEz/7rFfHx4SDHZ71oOd+BqxvWi/YfgtdbXxIPC9eLqCcWUj+s
PSoi7xcPsl2jIuLsu0GoudZR0XJ9Ad5sOyoC/Xf9vji/o4QH4O5By9QvLg+Y
LhsV8e+LBw8HYNdX/dS760dQE98sGsR7UutH5Mk3g8Dp8etHLPflIPXM+hHH
8SM+//z6xfF6dxA4/3r9iPrnlUHorTVHF39/chDTnBwdnfvPof/u5PO7jy6O
/6PUNyeOFj4xjJeOLs7XW9SbD44WXvH3d0dr/i8dgsmkDYrlP4txXDeIlutx
zsMGEcb5kW+oFw/eINoXgFsUI883iEDDfRbFegF4y8SdZUzHBhtKH5HPG0bk
0Tcx9nfDqPW2xb8z9qsY9MZuG0ag58QvYhzfDaPl9gvNemJD9Y/1baj+E9dj
hGfid0wEON7xNO1fw5jieNxLu3jEmKK+/UfsGaiBMZoPlhsjvEOdvTymyPfX
B4e01VWLxmh+0a51x0ZQ98d+MBgfemDGWOGB+m+s+EB7OFb6aUjLjb5+rPBE
fTJWfKGdGCt9zPdvJBn6N75RkY9fDC4bUvPbWKa92Sii3v2M9vXcjSLOy6dF
fmyk9pIfG8keYHw2HhfNAPHfHKR9HKfxAa0GxhX113ODtFPjIj73WHE8xwnf
F7cMTfy4aLm/Qn0wTvqH+mDjaLnfw/5uHLEfz1Pftm8sPgAPO2xcxPPrMeDg
mo0jwOuzt2MYpoc3jl7oGSr5bgx288ONpQ+hp1faRPiCf7DpJhH13Acxjqd/
J342ic4ZUqOPv0e/6fxN9D7Uc6d/pz7YRO2hntlU9pnt2lT9wbxvuWnRHr4Y
I082FZ6pFzaVPcc83ripxhM8/G7TiH7djfQf1t0son939SDcoZLNItJhcJA4
2SwC3CY/Msjx3Ex8OBAFLYPXj22m+ScfN4vot740CB6ssrn0Hf2vzcUfzpNl
1re58MW/W4b/cvfmEf3Rt+j/vm6ZvLLMcRuv8tQL41UfYF47Xu3D8+3j1X7Q
c2C8/AWMy3aW8dzelqHXjlr+vmfon5w+XuMFc3Lz+AhqfdSDg8DPfeM1/vAX
nhlf1J83D0Ifvz1e84Xx/3K87DHG4+fxEfXIFfQvVp+g+Ya+2tAy+ztBeMFw
tE0Q39jfCbI39CcmiH8Y170ss7+WYV8umSB8sr8TxFc8/4Bl4PGZCUX/5lna
n7f9O8zOV5bhr/00QXxgfydK/nYI9mMn6nnyaaLeT700Ue2DW5mxTD96ovqD
9u89UeNBvk/UeGG+Tpuo8SQ/LLO/EzU/wMOzEzV/hOlEzS/7O1H6EX7vTxOF
D/ZzkmTUN3uS9Cv7O0l4JJ4nDdPPk4Rv9neS+EB9PUl8od86SXwinifJ38N7
bp4k+4DnH5wke8h2+HfOr2XGCZMi+qHvF/Hs36HfV5us+vDemZNDf7N6stpL
/3Cy+geznrVMf3Gyxod4nix+wh86crL0H/zvUydrPhgvTla8AL/z2snyHxhP
TJb+pf2eLDzgsZcmC1/E5WThle2cLP2PcRkxRf4M/aIpshfwP0qnyN6gHY1T
ZG/Q/t4psl/8d0pEPfwh8brrlCI/PowxzppSnO+P2P7j/Tv4dY5l9sPvoz/o
+uhnTJG9JP7dPsTFb0+R/0b95v4R/1MivvfVIt+niu+oZ5OpGk+Mf93UUB92
TJU+RftzUzW/KPfnqZp/6vOp4gvaf9RU4Yv4nyp8wz5fMFX+Hvh73VTFP2j/
XVOj5fkZ6J//TZX/h/a8OlX+GNrz0VT5a+Djt1Pl/+G5FacV4+WvBxGGrD8t
YpzyTTFesQx9Ffl5xqPT9D6M/1bTVB/xME3tof8/Tf4h8yzT5B8SD9Oi5fkT
jNOV08RP6KXbp8m+0v+aJv8QcHtxmuYD/tX706QP6V9Pk/0CvleYLn1M/366
8EB/Zrr8O8ar04VX8nB6xDzIJ/S/CtMj5o0+Z/5rl+mKR9DNA6crHsK/x01X
PAOcnj1d8RHquWy64h/qx+mKz2kP/Dvtn8uTD9Mj2pGFjIe+cv3kg9vHOHaG
4n3yYUb01JND/33K5+tmiG/kwwzxC3FGbobsI/Im28+QvmI7Z0i/4X+PniH7
A5z/bYbmk3ZkhuwJ4/0Z0ueYj8EZwg/bOUN4I81mCJ+A25czFG+z/zMUj1Mf
zFS83okE5UzlC+jvzFR+gP7OTOUD6O/4d+qDmcoP0B5apj7w+6kPZhb107fk
04UzI+Z5FtG+XTdTfKT/OlN8w3sfnyl+wc68NlP6BPPx8cxh/u1M6SfEeyvP
En8wLNNmyb/A85WzZE8QVsZniR94Lj1L/MA0/mmW8gPUG7OUH8D8HT5LeKWe
nVWM5xeTT+fOUn4KfLpmVkS9+z35dOcs5cNoH2cpv0V9OEv5L+J6VoS476ql
MdD5ez/P/OJsyXh+2uxoeT4a+Ziq2crPwU62zhZ/6R/MLvLtS/qv286WfqD/
N1v2lfM/W/YY1Z4+W/qI9czW+GP8rp8tvsDO3ztb84fxe2q27AlpMzsijj8a
pN6bLbzQ/50tPhD/c5SPZbvmRMvXB2gP5xTx8QOf75gT0Q78yHxG/xzlV4n/
OUX+/TQIXO/j3+kf+Xfy37+z/34/+T8not34YZDjMEf5YkzDk24v+T9HfKI/
PCfkz89zpC/Iy7mytxDHzJW9Zr5nruw/nu+cK/8dw5yfK/+C+m+u/BXmieYq
/0RezhUfQI8z5kqfw7+8ZK7wT97OLdqzJUV/aK7y9+DZc3Mj+pU/FuOfudHy
9Rjkg76eW8Tbz1xv+WVu0b/5OQa9vsY8ycwbWX5iyJ2cP0/vx3h3zxOfoG/y
88QX4nCe+Ez7N098p16bJ77Q/s9TfpH2b570C8bllnmyz4wP5sk/xrw9N0/+
NfOV88QPzv888QPV/DqvqK8/GSQvS5T/4vyXSP/i+c1KhDeuC5REy9eD0K+5
JUX/8edBtLeiROsRwPn8kmL7finm10qi5etLHM+SYvzyK/3HtGWMa6GkmN/+
tZiPKynGH8uYP9mpZNj6iNuH+TygROsdeO8RJbJHzBuWiC+gwTkl4gf0zYUl
8s8wbFeUaHwRH1xfovGHfr21RPlR4OaeEvEDtH+oRPwAr58okb1A/18oCf2V
10ukf6E/3iuJ6NcV1/0+LxEeMS4LS4p8+4n4/LGkGL/9TPu0QmkxXl/Gdc9V
S7V+RvyXFvH6G5+fUFrE66+x84doN71U62vo/9xS8QXDWl2q+jFvC0rFV+C7
pVR8hv/SXar1N9rTUvEFf96iVPls/LtNqeIl4HSnUuUrwYc9S6WfyL9S6S/q
31LFr4zPSuVf4d/TSuVPwP8+u1T8wLReWCr/CX++rFR4YvxSGgXrzzeXDlt/
KxV+YS8fLBUfgKvHS4v8+624/lEacZ16xH3M15VGy9dr0a73Sov6esR9+PdT
lwfOvimNlq//Qt/8UCo+Ale/lYqvWCb9vzK1F3ZyTJnsH/VBmfrP95bJ36Q+
KJP9pf9QJnsCd7yhTP4W/akyxZvUB2WK54mHMuV7MZ/5MulL6oMy+fOYzx3L
FC+AV3uWiS9cXysTX4CjI8q0Psz1krJiPLOsuF5cJrzj72eViQ+wDxeURdQ7
vzE/ftny+n9j/u06/0597vL0Z/1+rj+5fuoHtw/28PkyrXdiPF4ri8L9A2Wy
P+Drp2Xy1zhvZdI3qGdJmfQR7UOZ/DOohVXKpc8wTWPK5Y+h/5uWSz+imVPL
tR4Dfs8uj7iuvZDxakV5tHz/AO1Debj+HS+X/4N2dJXLvhAP5cIv489y4Rt8
+FN5Md79jXzauVz8wbTvaRnvObBc/MH4HenyxEO57BHG77Ry8YX6oVx8IR7K
xRfa83LFR8SD+4/+3Fyu9Vs047/lsj/EQ7nye8DtY+XKx0GvPu/5oH7wfFE/
lGs+qR/KlV/COH9Trvid+qFceKEerxCeMM7/V6H4g/niCul36ocK2QPOS4Xw
Tf1Qof0bWL+qqAj5NN8y9xNUyD7Bn+ut0H4Qttv1of6tKmR/4N9sX6F4COO/
W4X0AcrvV1H0t4r29cgK2RvyokL5NfK/Qvky2oMK5TP5b4Xiea5HViifg/K3
Vcj/Qjf/WyH9SZ5USL9iHJ6skH2hf1Ah+0L/oEL+Dv2DCvEF+P+8Ilq+/wn2
cVGF/Cnojx8rhG/6B5XiE/3OSv0OvmxUKfvF/FGl/C/YnRmV4i/0VEml/C/m
mysV/xOllYq/mH+uVL6N+ddK2WPYlf5K2WvOd6XGm/FXpfJfXA+vlD8A/2zf
SsXz4MEhlcrvQC0cU6l4BTA9uVLxCsb/75XCC/Iw51Vqvwp4cnGl+AH9fU1l
xHXaH2LgyU2Vik+4vlkp/MKePVAp/Q++Plopfw24fc6/o/xrlfLv0Ox3KxXv
oJ5PKxW/QN8srlS8z3i4UnxgfrRK/ibwu06V/FGOa5XsBcZrcpXGk+spVco3
or7yKvnHjKer5H+hvqYqxSf4t7NK+S3Yu1SV1vNp/6u0P4n5lirpU4zXjlXS
t8DhHlXiC+1/lfCJfh5epXic+ckq4Rn4OaVK+6nAs7OqpP85rlXiG9TSZS6P
Ybtmeft/Yr755irt76L9r4rIwyXF/VxuP/drVCk/R3+wSvkL2v+qcL/C+1Xy
v8j/KuW/OM8efzz2Y5X8Y/qDVbIf8B9Wq1b8if5vWC1/jPFBtfQl8Da9WvlX
5pOrZT9gL2qqxRdUs6Ba8QDzi9Xh/q3eavk7xH217A3STH+sFr8wf9tbxjTv
5vIYl/2qhX8My6HVyq/h78dWF/G+mPbilGr5k4jjzqwWHzCN57v/0N+XVmv9
h/m7asXznP9q8YXzXz1svbNa9gTD9kS1/GXA7vlqrQdwP2m19CHtfbX4Q3tf
LX8M47CwWvkg2vtqxfuwq79WC2+A4ao10tdcD69R/pdxWI3wy/xpjfjG+NC/
Q81V18jfw/zF/D7mF2tk7/BYb434Tf1fE+YntqqRvaD+r9H6EPzPXWvEB/x9
3xrpG+DukOW/v0b7e0yN1rPAw5NrZE+Yl6yRfqP+r5E/ABxcXCN/i3FGjfKf
aOZNNcoXM59bo/UGwP7+GuWHqP9rtN+L+xtqxC/YhVdrZI+Y/6mR/kYzPqkR
/xgP1ijehv+61L/D//rFMttdq/ejnWvVKl+HejavVfwFXkytVXyB+ubVKl5j
fqBW40F/r1b5Edr/WsV/8Bd7a8UP8DpTq/wwym9ZK/+X/aqVP8D5r9X8st21
mn+uz9Uq/0n7Xyv/jPa/VvxhvbWyR/Afzq8Vn7h/o1b+PPdP1cpekf+1wi+m
6a5a+Xvwcx/078DZEy5PntQqnqL9r5U9AO/erw33t33m9kIvfVsbrpf8WCt9
wfXyOsVzGJf16hS/w36Pq9P+HOBkYp3sB/yomXVa70J9ZXVhPqa2TvtFqFfq
pA9hb9rr5G8jbk7WSX+iXK5O8QvXX+ukbzHvO9Rp/QGP7VEnfgF/+1vGPB1W
p/iH+t8y7b9l6I9/uDzXr+vkL1L/u37q/zrhnzh3+7Ef8O468YH6v072lfF/
nfJbnP862WPOf124nvtenew331MX7p9ZWCd9Bt7+UCf/DPp8RL3sDee/Xnwi
jurFJ/r/9Ypv6P/Xyx5BX82rV/yK8jX1Wp/D36N68Y/2v176GsOUqBc+uf/G
MqZ9S8uM91yePPb7Ge+5fozrofXCO//u/mD+TqqX/4T44R/uP/cr1sseQ39c
Wq/8MPhwdX24P+Lmeu03Qrvvrpf+4vzXi0+c/3rpO8b79ZpPNqN+WLxfL75h
Pj6rl33i/tB6rVdjWH6oF/+gd3+tl/1ifrhBMvC2UYPwyPlv0Ho4598y59/P
o74ay2hn1CD9z/1Wro/2v0F453qzZayn/rFh2Pp7g/QL/b8G9Z/j1CC+wH4c
2iD7gueObdD6CvnfoPEm/xs0H+R/g/gErXdJg+aP+5saxC/2s0H7F7m/pUF4
AL0essz4v0H6lvF/g/hI3DfIn2f8bxn4+7xBeGT8b5nxn2Xa/fkqD1ysN1+/
c/+yf0d/J/l37i/279BXZfPVXu6nsMz4zzLsTLtl8na++k/9P198Yr5vvsaL
6wHzpb/Qjr/M13gDvwdaZvxnGfUfP1/zxfVpy8z3zdf8Ql9eNF/+OnB55XzZ
P65fWwaMbp8vPJH2lpE/fWS++MzzK/OFT/JqvvhNtWSZ+5/mC9/c/zFf+Kdf
bBn4/WW++AL/ZaUF8r+o5yyDt5tahpsxxTLaOccy8F4xrPx8y6iveYH4i/Z2
W0b5zAK1D/gpLFD7uR9xgfoLfbnLAo0X14MWiM9cD1og/x21HGWZ6yoLNF9w
6/6+QPwmDhZo/oHfixcIP/T3Fwh/zPcsEF6Rn71rgfBMf39ByNfHF8ieMN5b
EO63fs0y9f0C+WfU9wtkvxCeLbRMfb9A/i/9vZh+Z7wX0++obyP/Tn0fG2bv
Y7KPjPdjah/8i5qY7CX4EsWUv0Z9bTHpD/jBiZj4D74NxMRv+tUxjTf3u8fE
T/gde8TER9r7mPgFf/GwmPgFf+G4mPjDeC8mvDHfG5O9AX4viMleMd8Tk72j
vxeT/4Z45ZaY/Ff6e7Ew3/hQTP4g93NYpr6Pab2zeBxVMvPiloHfL1ye+j6m
fB31vevnfsBI/ifmYY1I7QeP1o7kH2CeR0UaH5TbMBLfmB+ONN74+6aR5gNx
x4RI/s4Sbm8VP1B+RiQ+4D1zIuEH/ktJFPpjlZH8N0xLTSR/j+tLkfaP0t+M
FN9h/loi5QsYf0SK9zCO3ZHyazxvZRn+fiZSfMU8kn/nPPh9xJllzO+2rh/q
fge3D3jZJZI/S3y7v9xfFYmPjG8i8Q9xyMGR+EW9G4lPyeKALOcP7V8k/Yf3
nBZJ31LPGg/g0VmR4jXUd14kfHH/RKR8B+q7JFK8hHzi5ZHiK8bLkfJpwMn1
kfIL0Lc3RcrHY1xui5QfYT7FMnFmmfl1l0c3H/b7oZ8fd/3A71OR8hnA73OR
4jnM20uR+Mf9h+YT9PibkfQF3vNeJPvHcYmG+euR/EuU/9J84f6OSPYD+PvO
/GA+L5L+hj5ZZj7ADo5oFL5o7xuFV7x3rUblE9CtkY3KT8DujW7Ueg1x36h8
IXC5sWXwdbxlrhdYhpqY1qj9N1w/aFT+AzApaVS+g+sJjcq3wE5UN4p/4Et9
o/Ib4EusUf2Hvmxu1Pgw39Qoewt/uqtR+ojxR6PsP3CRapQ/gfL9jfJXYP/z
jZpv5icbhQfuV2hUvgL+058bhS+U36lReAT+dmvUeizs756Nyr/BvuzTqHwf
17Mbld9jfrtR+Wy4J0c2an8dyh9jGdWe4OehP09pVD4Q6uL0RuUDGQ83Kh+J
dp/TKL4xP94oPkGv/LtR+RH049JG2Svo3ysbpU+4ftIo+wue/adRfAEubmkU
X1D+jkbpN66vNoofPC/WqPwE6n/IfED5RxtD/f+k8cZpNj5R/sVG5afRzlcb
lb/Ge99sjGinlpAP7zYqH87rIxq1PorynzYqf476v7SMePebYeUXNyp/Dpou
bdR+UOD5Z/ONerdJ7Sf/m9Q/no9v0v4D9Hdkk+wL+d8k+0zeNcl+oL+bNIkf
iP83bwrPi01uCvMB05vCfNisJtkH4K2kSXwAriuatD+M/G8S3rlftUnrmTRv
Tdofg/FqbtL6EvRPW5PWg4Djbv/O/JNljFfaz+PvA01a7wXst2jSehJ4+ccm
8QlWddsmrSfh3x2atJ7E8xNNsofMXzZJX9DeN8mf5HpWk+wx9NZBTfLHgPPD
m8J45agm+dfEeZP8KZQ/sUn6EjA71XjAtJ9hvPD8RpPy0/A/z2vSfQCo/19N
wj9wenGT9seg3OVNWo9FfHd1k9ZLUf/1llH/TZahV28bVv6uJu2XBk7udX3M
r7k98GsebtL6Fso/3iT7hvJPN8keovzzTbKXGP+Xm5R/pNvl8YT+f9vjzfXZ
JtkT+B8fNSkeYb6+SfoO8/iV5xuvWdQU3kfxfZPOr8BO/Ngkfcz4vkn6G7xY
oVnrr2jvGs1af4W9W6dZ66uMs5qL+vrHYj6gWfsJgJdxljFem/l51DehWfvt
0N8pzeIL/K2Zbg/ybXOaZc8wD6XN6g94V9ms/nI9oVn+Jdoxv1n2A9U2Nsvf
gr2LNys+gd7qaFY8Cb3U06z4FPYm2Sx/m+cdmmUv4C/nmrV/h+fNm6Vfwcs/
NYsPKP/nZuEP87pTs/Q7urlrs/AMP2bPZu0vwz/7NGu/AabjwGbtN6AdatZ+
BgzLEZahB45p1n4h6NXjm8UPrGuc3Kz1Wfh/pzfLnqD8mc3y18DDc5rFD+bD
m2U/Ye8ualb8wvx4c3i+/Mpm+bOwA9c2ix+wdzc0y96z3mb5V9CzdzQrvuV6
erP8KbT/vmb5I8yvNkv/Yhr/1yz/B/P8hPkAM/Ss8Qs/4wXzA+PyivGP8m80
a/8Z2vVOs/Zvov4P/TvKf2K+MH5v1n4F9Huh+YJ+f2e+oP1LzRfitFn+Il77
W7PsCe19XPEK+rlWXPaY9j4ufmC+Rsc1P9S7cc0fxykue0F/Py57QXsfFz64
PyAu/KCZs+Pyl7hfLC7/Bu0tj2u/DPePxIVf6IWGuPiBcYnFxQc21zLqb4uL
DxjvrrjsCaYlGRf/aO/j8s+A64G4/C3YgS3i8v9o7+PiP8zktnHpBwzrDnHl
Ixjfx+WPYr72iEv/oP6949JPKLe/5wftPzgu/Ybyh8dlL1D+6Lj8B5T/a1x4
AF5Oiof7PU+Py17Qr46H+6fPjguP3P8QF14xbv+Ka/8Nz/NYhh28Ii6+0N5b
pr0fVv7muPjHeD8ufqL/d8fFB3j598YVn/C8TFz+FfPrccUjXF/z+CA/+LTH
j/Mc13oU/JWX47LX+PsbcflXtPdx5Vvw3vfjijfhr3wclz7k+kxc/gTKf22+
oJ3fxuWPoN4lcdkTlP/JeOT+HeMV5VZoCfebrdki/qAX67YI/+DJ+i3CP7o9
pkX2ges/LeIn/fsW8Rd4n9QyLL5vUfyOfs5qER/wmrktitdRf3mL7C33C7Uo
Psd417cov476Yy3KVzG+b1G+inxvCe/n6mpRfor9bFG8Qb63aP8N/fsW8QP9
36JF+EL7t2qR/WA+r0XxBvcjtITxwS4tih8w/ntYRi/2tsx8XovwjvoP9vuB
+8NbxE+uZ7QoHqIdblG+gP59i+whcHRai/QBcHRGi/jA9a4W5YOZ32sJ73e7
sEXxBvN7LeID+HZ5i/Ip3A/bonic62Mt0n+o/6YW+dPg220t4gfXT1rED9Kw
Jbxf7IEW6WPw5RHjk/vpWuR/Yf6ebpG/Qx61hOfdXrZMvltG+bdbxD/0/wPX
B5597PbQvru9KP91i+IpvOfbFvlPeM1SjwfPb5oftO8tyvfy/qVWxRsov2qr
5oP5vFbF4+R7q/xlNGtMq+JxjPvGrcrXYJ42b5X/DbUxuVXxOe17q/iCds9q
Ff5QT0mr/BXwpbxVeMV7q1sVLyMervfvsDNRq+wT/Ii43wf/oN31MX/v9jCe
d3vR/kyr8I/2D7i/aP8WreF5iT96vHjeuVX2l/F8q/iAbuzSqvUP7kdulT1n
PN+qfArmbf9WreeR763aP8N6WoUH6LujW7V+gPr/2qp8KPevtIb76U9t1f40
4OXvrfJXMP5nt8reoPx5rfLXMAz/skz77udR/xWtwjfXw1ql/9H/G1w/7zdq
1X419P/2VvGd62Wtird4/rtV+3d4fq5V9pX3g7TKXjCeb5X/injimVbl08nb
VuUPUc0rrbLvqP+NVuV30f53WuUvA78ftCq/i/5/0hrms75olT5l/q5V+8fQ
/8Wt8kfoz5tfGIefjVfU/1ur1i8w/iu1SaY/36bn4eePbNP7MA+j24R35DvH
tsn+0b63KZ7m/s422UvM++Q22QPa9zbZV+bv2sQH8r1N6/Pke5vW22nf28QP
5u/axA/m79rED+4XaJO+436hNuUnyfc26UeMd6JN8Qn53ib/i3xvE76gn7do
U/xCvrdJH3O/QZvwib/v0Ca+0b5bpn23zPtx/D70f/82+T/ke5viA+bv3F76
823CP/D+V/cX9Z/UpviM9r1NfIC+/3ub7AP+Pbst3I92Xlt4HuBfbfKv0P5L
2sQP+vNtis/pN7WJL6DBDW3h/Rm3tGm9HP28vU36lPvh2sQn5uvbFN+T75bR
7v+1iW+M3y0zfm8L18tf8O+M34eVf8Pvx/i/Y/wzfjf+Gb+7P7Tv5gP3W7Yp
n8f43fzA+C31+KEdy9qUP8ffR7RLP2H8V2oP7ztbu118AY7Waw/XB0e3a76h
F8a2K76E+7tpu+wN+Da+XfzCPE5pF574XLv0Lf3edvlvxHG78Eg/yzJgXOvn
uT7fHt6X3NguPvO8uGXuD7OM+nvcftTf1y7/kvk69xd+e7493F+wZbv8U9T/
p3bxgfm6dsUbmPed2sP7zHZrl/7i+VLPF9fn2sUf+CEHtkv/IS47tF3+As8j
W4ZdP7Zd+hP1ntAu/435unbhCXnsv7WLf8zXWcaw/NMy1+csAyb/9vvQ7Mv8
O/p/lWXUf61l8PxGyyh/q9uL8ne2Kz7D+N/j/iF/dF97eN/bw5aB30fbxQ/g
5ymPJ+9Hs8z74tqVL0H5Vz0f+Ptbni/8/T3PJ+b9w3bpQ8zfZ55/xtXt8icw
/oss8/5QyzxvZTwBP78Yb8zPdwiPwM/KHeIz3rOOf+d+HP8Ovbyhf4f/M84y
WLFZh/CPPObEjvD85BT/jvIz/Tvjdb8P5csso/6qDvUH8VqdZdS/YFj5Jsuo
v8XPo/7ODo0X1+M7NJ6w0ynLPB/UEc5XvkP6EuW3sgy9uY1l8O3PHZp/qMGd
LaOe3TuEH67HdwhvXI/rED5R/qAO2UvuN7aM9aCjOoRvxMvHWUb7T+gQP7gf
2TLm/4wO8YvnEy3DLTy3Q3zEec4LO0K+/rtDfIfdvdwy5u9qPw8/8zq/H3HY
TR3iM9fjLIMnd1pG/fe6/VyPswx78XCH7CHv9/J4ovzTHeIzYdkh/mL8XvZ8
0U3vCM8Dv9Uh/nI9rkP2E+U/Nv4wf5+bX8ivfd0R7k9eZL5g/pd0yN4wT9Yh
/wvm8NcO2Vfm5zplv4CjNTtl3+C/rtspewv/Zf3OMN4ZY5nxut/HeN0y2jXJ
MvIo0zplL+m3dKr93L/fqXwm/fdOjQfPc3WKn9x/0yk+8v7ATvER8WZzp+aL
6++dmk/e99AZ7h9IdAoPvB+oU/jjeZBO4ZX5+E6tD9F/71S8Rv+9U/4a83Od
4X6TXTrl3zFe71Q+mP57p/xBxuuW0f6DO8P84uGW0e+j/T76764P43dSZ3h+
4jT3h/uRO+Vf0n/vlH/J+9c9Ptx/1yl9wnjd4814vVP6jPG654v+e2eYr7jZ
88/7KY0XxuudwjfvK+yU/wiaPNApf495nk7lN1Ds8c5w/8HTnYqHuP7WqXgN
/X+lM4yf3rDM/Jxlxuudypeg/CeWMa5f+Hmuv3Uq/oL//53by3i9U/4t/Xfz
l/57l8YDo7xSl/jE/XZdGl88P7Ir9D9Gd4kPmOexXdKX8L826RL+oYfGdwkv
3G/XJXzB/5neJTyi/tldio9QvqRL+wt4n1eX8mFcf+tS/gJ6taFL+QTu7+5S
PoP5OcvcX+vnEe93W+b+b78f7c+4fvQ/16X8BPC6RVf4vYat3V/m47vEJ7R/
xy7xhfttusQXzOtfusQX1L9Pl/QV+d4l/QYcHtIlPsB/PaJL+h54OaZL+Ece
4Pgu4Yf7zbuEb/K9S3jEsuaZXco3YPzO6Qrv9zy/S/k9nkfpUn4c439pl/Jt
qP/KLuXjeD7JMrp1g59H/bd0KT/NcepSvg64v7tL+Q1My31uP/fXdSlfCRo9
5v5jnJ70+EAPPdclfYJ2vdgle0z/vUv2m/57l/QZ6n/X/EAzP/J8Exdd0vew
C18ZPxi/hcY/1OL3XdpPgPI/Gs/037uUb8O4rNCt9UaYv1W6tX+F9r1b+9fg
f4yyjPZu4Oe5jtat/DXmebNurU9h2id2iz+8f6lb+TwM+4xu8RvzOrdb+RWe
z+2WvkB/K7vl78Fs1nWLD9xf0y17gXFp7BYfUH9rt/wj3hfZLX8D5Xu6pS95
v0e38AH/tb9b+Tf6793CO3HZLXyj/Dbd2n/GeL1b+Wn6791af6H/bpn+u2XU
v59l+L8HdWs9k/57t/LdvL+/W/lznifpFn8Yr3eLL8DbKd3K/9F/7xb/6b93
ix+o/9xu2Q/eL+XxRbz5727xgettnh+M/9Xd4Xmx67qVjwP+buqWvkT527ql
XzH+d3aH99ne2618MvD3gPHO/XTGM+b1iW6tl6L8091av2H+vVvrO+j/y5YB
8ze7tR4EHL/bHa7/fOj3874b84c06VZ+nPw2Xxifd4vv0GM/dEsfQD8u65b/
yPPRPeF+spV7FM8hPlinJ4xvR/Vo/rie3qP8LfKFG/fIn4GZ27xH+h7+8qQe
6V+8f26P8AielPVofxbvK+7R/THcH2eZ9zH2aL2S8bd/5374Hq1fMv7u0X4D
3sfQo/UdlE/1iI/cD98je8D98D2yBzyv3yP/Du3fpkf+Eu/v6AnzDzv3yD9C
+d17hG+U36tH+p7xd4/0Gc/79Ujfof2H9Wg9Bu0/qkf4xjwe1yN9jvpP7BGe
UP+pPcIb+dsjvKL/Z/VoPwDKn9uj9XnUf6Fl1H9xT3gf2eU92s/C+NvvQ/3X
uz6eh+nRfjaM8609shfw8+7qEV/J3x7hHfNwf4/wTp71hN8PeLxH9oD7YXvk
j6L+53sUX3M/rPHP84o94Xr/2z3Sb5jX941/PPex8c/4u0f6lPf59kjfovy3
PdL30F9LzAfuhzW+Uf+vPVr/R/kVe7Wej/FbxTLj716VxyiM6tX7GX/3hvdH
b9yr9nJ/TK/0P78f1iv7Bn0wrVfxBffH9IbnN0t6xQeef+mVvUU7qnvFB0x7
Q6/4AJ7GeqXvgZt4r/gAnrb3Cg+wy1290o+Mv3ulP6EvM71aX+f9973Sxxin
P/QKr9CXW/cK35in7Xq1Px7ld7TMcfbzjL97xQf4g/v0Cv/whw/oFR/B00N6
ZX+4/7VX+124/9X94/2OvdIHwPHJveH60+m9irfhhpzZq3wWYHdOr/xP7n/1
/KD8Rb2y17wfpFf+EP3xXtkDnnfplb7keZde6VOedzG+uP/V+OP9sr3yX5hP
N165/9V4RrFHjXeUf7JX/EA3nrHMz6X2yn7w/qFe2QvG372yF+D5u73h+bEP
3X6ed+mVf0d73RueP1nYG+4f/s784P0l5gfixmW94Xm5EQnxA/po9YT4we+j
JRQP8L6ThPwf3neVCP3/jRLiA+8/TYgPKD8hof0oGLcpCfkv3O9umfvdE+IL
/LGyhPAOfVbl3/HaOpfn/UmuD/qsKSH80x9PCP+0C4nQHvQmFG+jfCqheAFq
K5sIv7dWSIgP0MdbJeRf8j6GRJiP3T6h/CD98YTiO5TfPaH4j/Y8IftAe56Q
fYA9Oygh+4D2H5aQ/4HxPzIh+4DyxyXCeODEhPCJ+k9N6PwH76NPiC9o/lmJ
0J7808/z/k+/D+UvTsg/A48vSwj/vA8moXib+98Sit/R/hsTwj+qvS0R7he9
K6H4CTy6NxF+f+qBhPQNcZJQPo/3xya0XsH9rgnpM9rzhOwF/v5SIrx/+bVE
eP/S2wnFm8DZ+wnFxwxrzBf4E58n5E8Bp1+bP/xeT0L6HOWXGN/8foll5tP9
PP5dIan3AacrJeUPQV+tllT8jPaukQzzTWslxX/yKKl8Gbo5Mql4APswRyXl
H3G/fFLxAPVHUvk84HpsUv4sz88kw++RbJIMzw9tlhQfuL8+qXgR+mJiUvEk
+j05KX3KfEAyzN9MTwp/aPXMpPgCns1OCq/8fENS9gX6tsQy73fx8xjWimR4
P3iV60M/atwe4K0uKfuGeKohGeZvFyTD8wVRUvljxJfNSeGf5/mTsgfwOluT
0j+gUYfnA83oSiq/gee6k8oHop5EUnzAOPUlxQfgMWV8wJ5kjR+orYGk+MHv
ZSTlf0BPbpGUPoaZ2jKp+IP3GyWlv3meyDLiw20tM/+RFN94P4bxjvI7uX64
UbsY/7wfOSl/EPXvkZQ94H3qSflHaP/eScULsBf7JsP7mfZPyt5y/0NS8QPv
J0gqfsC8HJoMzzsc7vmE/jrS843+HpsM7zM5Pil9ifecmJT9gH9zsvkCfpya
lD3h+WbjkfYgKf8d5c+0DPtxlvnG/KxllD/X70f585PS77Qfbh/8uYuSyofR
niTDfPGlSfk/6OflHg/6k9YnGLark4rHuF8jKf+I9yuYDxjn/yTD8w03J2Uf
eJ9JMtzventS8Tb+uSMpfwr8utt4AT/vSSre5HkN8wXTdn9S/jjyIw8aj/Br
HzKf8J7/JbU+AP3/mJ9n/ikZnrd/yvVxP2hS9gz4fM7thZ18wf2hPbT+By1e
Tcofon20/gCM3rR+QX7rbeMf+H4nKX+J69GeH54PTSr/DR5+mpT/hPn93POP
+f3SfMA4fG19CRwtTMp/4H7zpOIPjO935g/tr/GIYfvB9gflf/Lz4PEyy7xP
zvobcc+IvnC9b8U+tQf6c5U+tR/Tumqf4iXUv1qf8gk8z9InvGO81u6T/8P4
vU/jhzzpen0aX+Br/b5w/8cGfeH32sf0yV9CXLpRX7ieunGf+MH7bvrED4zT
5pZ5HrZP9gT9ntQn/sCfn9InfQo7Oq1P+IOen2kZbu8syyg/xzL0SYnfB71V
ahnly/uEZ+izqj7hGcNU7fZyP4/7A3w39AnvGL/5fdL3sAORxws8bOqTfuF+
Xo8v/LlWjz/e294n/xX97/T88XshfbIXzE96vtH/ZJ/W5xjfGB9cXzR+aBf7
xC/gNNen9TzGP33h+tQf/Dv3F/WF9xVt3Sd+op5tLKNf2/l5+NPb+33g+46W
mQ8dVv+ubj/esrv7i7h3T8s8t9onewAztY/HC3zb3+MJvh3QF95HebD5Aj16
qGXuV/b8QR8f2af8COb5aM831PjxfeH59xMsA58nGT/A9yl9ijf5PY6+cD/R
GeYj/J4zjU+YgX/4eX7vyTL077nDyp/v35m/tQx7f1FfuB/rYrcX/LjU/eH6
jGXg68o+2QPMz9UeH6y/XmuZ35vqC/cz/scy5vWmPuU7MO+3eD54nsrzBX/h
DsvwJ+/2fMMfvMcyz19Yhl6+r0/rT4w/zU/g42HLtNeW0c7H+uSfQ58/0Rfu
v31qGD6fsQw3+bm+cP/6C5Zh718y/qHPXzH+Ece/5t8xzm9YZhjm56E33vHv
8Bfeswy/7IO+cD/jR24P3Rbzi/tJ3X9+v9fPQx997d9R/zcuz/ucPf7cn2KZ
eUTPF+//swy1/5PnH3z72XiBv/Kr8cT7o1LCG+zBiqnwvPjKKeGV35NKCe/Q
x6ulxA/eP2EZeF8rJX5zPS0lfsFMjkyF962PSoX7oUdbRrUbWub+d5fn/ljL
GOdNLKPdm6XC/SHj/Tvvs3D7gM9pqfD+5Rkp8Zvn4TxewOeclMaX96WnNP6Y
x9KU5gfjWp7S/GHcKlPD1gNSwgv8jdqU8AR/oz4V7vedn1J8xfWClOwL9GlT
SvaH9+f4d/CjJSX7BX+4PSX7RnttGeW6UvLn+D0fyyifTIX3XfYNK592fSjf
b5n7g9xe8KPg9tLPd38xflumxFfM89YeP/BjG48v+r9tSvwCP7b3/GCed/T8
gR87e/4R/+1qvHM/gvEDfvzFeOP31VPyt1B+n5T8MfR/v5T8NeDzgJT8SZQ/
KCV/kN87SMn/43qof0exI1LKb8C/Pyql/YqwB8f6ebTrOL+P39NLyZ8E3k+y
jDjjFLeX5xFTyp8h7/M384v7Ha0PuP5ifoFvZ1vfID/zz5TiWa6/pkJ7dIH5
wPuJzAfeT5aSPwV7dInxhH5cZryhG1ekFI9jXq5KKd7CvF6TUrzD7xmnFA9B
DdxgGXy9MaV4C+spN1tGv261DHtyR0rxFvdr+H3A690pxXfQN/ekFG+h34Mp
xVvcj22+YdweMX/gzz6aCvc3PO7xBb6eNB/w96et74CPZ41/zM/zxjvyGy+m
lD/i+WvjGXriVeMP/sobw/D5Vir8/uzbqTC/8F4qvE/rg5TyBTzvYRk4+cQy
YPKZZfDjc7+P+8lSYf7vm5TyC6h/USrcD7zYfAM+vjdfoI+Xmv/wV370eGFe
fk6F54V+8Xjjn99sL7g/LS39Bt6slBb+4V+vkhbeaa/T0s8ov3pa+IG/slZa
eOP3otLKZ2EeR1rmfre08m+Y19Fp5ceA7w3Syr/x33T4/Ypx6fD+1U0s016n
tX4Kez/e9WO+JqbD76dPdvvB22lp8RXzNSMd7l+e6fHh/bRp2RPa77T0C/RJ
aVp8gD4pT2t+uN8urfnj+fd0eD6jNh3eX1GfFv7B5/lp4QmvjaXD/VuNaeXH
gJfmtPK9vO4gHZ5/b0srHw191GGZ9+OllU+m/U5rvQdqIOHnMd+ptNZPEaBl
3B7WmxZ/EE/l0uIL9EwhrXwc/MM/pMUP/H0rjxdwsnVa9gL43jYt+4DX7uD5
4f1baek3nt9NS5/z+3HGO8rtYfyAt3umtV6BevY2vtGtfdPKBzMfntb6B8b3
QMtox8FprWcyH57Wejn0/RH+HfN7pMvjz0enlZ/G+B5n/vC8gdsH/+REtx+P
nZwOv5d0Slr2DDQ5PS37gPWvM4x/lD/T48v107T0D3h1Tlr+EOb93LTsPZ47
Py39j/IXGu/c35yWfgc+Lk5LHyM/fanxDb15ufEN+3VlWusrmMdr0lo/gZ28
Lq39jBinGyxjnG60zPsIh5W/1TLG7XbzBe2/w3zheWe3l/lx84H5ceMf9d+f
lr+FaX/Q44X+P5SWP8l42/oG3X4sLf+V+fG07DnPU5oPsD/PmA+Mt9Ph/Qsv
pJUP5nlL44vnq41/6NnXjF9EPW+ktT6IeXo7rf28sD/vprWeyPvu01qv5Hls
Pw999LFl7i/x+zGun6fD7zV9YX6AZ1+ntT4DfbTQ/WO87f5DT33n8UH9S9Jh
/vCHdHie7CfbA7RrmfUTcPyr+cD9phn5+xjfVTLiA/PjGeEf/sHqGeEd3Vwz
I/yBz2tnhE/mxzNaH8e/62W0fwT9Wt8y7MUGlnlfjGXmxzPiB++DzohvGJ/N
MrIPvF8iI/xjfCdmZL/QrMmZ8HthUzLS/xjf6Rn5R/jzzIzwj/mZnRH+uZ6d
kb/K+2Uz8n9gR8syYX62IiP9h3qqMtKP8ItqMvI3uD8nI38EwzI/o/0d4G0s
I30OtzbKCK9cz84I7+BNS0br7VzP9u/QBx2Z8PthXRnxA/qgOyP8Y9wTbg+m
pS8jfoKPafcHaijr/sL+5DweaFc+E55v2iIje0D7nFG+CnzcOqN8B8r/KaN4
DvO1XSb8vsD2Gfn/+PuOGfn7mO+dM9KXUCu7ZML75XfPSN/C7vwlE973vpfx
yvM+5gPsz37GN/TRAZZ5vtcy4vNDMuF5jcMyWo8Hb4+wzPu6zAf4qce4/ch/
HZfR+jv+Pd584H0fGdkDzPfJ5gPG9dSM/EtM4988/sDb380H+LVnZpTPxDyf
nVG8C7z90/OP9p+bkf8MvXhBJrx//V/mA+13Rv4Jv5eekT6GvbrCfIA+uyoT
3qd4jX8HTq+zzPtCjXfMw40Z2Rvo2ZtdP/TJrRnpf8bTbj/jaeOf8bT7Dz17
b0bxEePpTPg9pPszirfw2EMZ5SegBx7JhPd9PJqR/of//Ljxj/qfMP6Bz6eN
D+izZ20PoM+ez8j/5n3lxhtm9WXzgeerzAf04/VM+L3TNzPav4Vxf9u/Yxzf
zYT7Uz7w+0GTj1w/2vmx+Ylh/sz4x3x/kVE8QDXl/sOufuPxQTWLMooHgPLF
xj+m/fuM8nOA/VLrJ57vsj3g/UvGPz9DnlG+hPF1Rv4A5nuFrPwFwGrlrPwh
7i/PCm/027LSx9Bja2TFB/R7razwC322TjbcX76uZeijUX6e+9H8PjRrQ9fH
/WhZ8ROjNi4r/4f58KziHe5Hyyo+5nnTrOJjTPukbPi9zcnZ8P6IqdnwPowZ
2fD7djOzsgcY1zlZ8QHjOC8rf4g8zUr/oZ3lWelHtL8iK38C/lJ1VvhC+dqs
/A/0vy4r/wl+w/xseD9XLCs8876arPwrxtOWoY/aXB56ssP1cb99VnxFvb1Z
8Zn58Kzie9irlPvL+6yy8v/R736PF3AwkJV+4Xkcjzfw8Yes4gF+TzWreAD+
79ZZ+bO8LyMrfUd7nRUf4N9tnxUfUH7HbLgfa+dsuB9rV+ON+4HND5T/S1b+
CczmXpaZD7eMYdwvG36P5wDjG/UfZD7SXmfl76Cdh5m/eM8R2XD/7VFZ5QN4
nsD45/kh45/3axv/vH8zK3sAfXpyVvEA9OmpWcUDqP/0rPIZvK8vK/8I+vQf
2TBfelZW/jHtdVb5RaiB87LhfsULjDfe75eVP8V8eFb5GubDLTMfbj4xH+7f
mQ83vvH3a7Lh+drrsuF+rBuy0vfMh2fD72fdnFX8A77d6v7yPjHrB9pvjxd4
+d9suD/33uyw7/FlZZ/Btweysg+031n5R8DNw1n5u7Tfnn/ab/OF33M0X2i/
rU9pv7Pyp2i/jT/kv160PgZMXzZeMY+vWkZ+/XU/D9y96fcxP26Z9x+Zvyj3
QTY8r/1hVvEupukT9w/z9Jn7j/JfeHzodmUVD/N71B5f6KFF2XC/yeKs/FUe
OzE/+L0T8wPj9qPnmzw1P5DP+8X4AOxH9EufAvcr9osv6OdKlmlX+oVH1Lta
v+wN9Ovq/eH33dbqD88fruPy3E/u9wMXo9we5sctc1z7w/h3bL/6g3rH9cv/
B1426R+2nt2v+Jj58X7xAfVP7BcfEE9M7hcfaL/7ZS+gn6b3a/64vt2v+YVe
ntMv/cfvwffLP6b97hde6Kf0K56k/baMp6r6w/veavulf5kf7xe/eL9cv/AK
/RSzzPsq/Dzw1uzfeT203w+/v60/xHuH2wf91tWv9QHeT9cfrq8n+qU/GH/3
y94y/u6XfeD9df3yl/DPQL/sBeKYfL/sOfJZW/SH39/bsl/2H3/+Y7/8Yfjp
2xgP0E/bWeZ9WP3iE/C+Y394P8DOxhvq36VffGP8bZnxd3+4n3Av/8742++j
PbdMe26Z8Xd/+H2hQ4x3fu/R/eH9epb5vW/jH/P7137pF8zvCf3SP5jfk8wH
3sfl+eB+tH7pL8D+b54/3r9pvvC1/eF+xXOMB+iTf1qGH3ae8cP7vMwvjMNF
llH+38Yf7wOxzO/vWYY+utIy8vtXW8b8XGsZ9vN6y9BH/3H9mJ+b3F6Myy3u
L8839Yf3e9xhGet1d3m8+D0v6x/uR7OMebrf4w99+EB/uF/xYfOF3/+wzPtJ
zB/8/QnLmO+njA/mxy2jHc/1h9+TfcEy1MhL5iPG+9VhfHzdeOR5yv7QX3nb
MuzXuy4PM/+ef2d+3DK/P2AZ8eMnbg/4/Ll/R4O+tAzcf+Xneb+p+8fzW/6d
5zU9ftxPbj7Bv//BMveTW4YeXGaZ3zcw//j90gHJvP98QPON8itbBq5WHQj5
ufqA8IP5XtMy95NbRjfWHRAekZ9azzLvUx8I73fcwDLz5ZbBz40GhHfevzwg
vjNf7uehJ8cPhOfrJ1jm/cyWwe+plnk/u+sDv2daxnzN9vPA21z/jvkqsYx+
l7l9iOsqPB6w61UeP6y/1VhGPXWWeZ+U54f3RXr+UH/k+QZemgbEX9jblgHh
BbhtHRD+eP5rQPjk918s8/zXgPCOfiYGxC/a64FwfTltmfbaMr8fMSB7xPts
LNNeW8a/W1qGfvmjZeDlT5a5H21A9gzztb3rh37Y0f0BXnYaCPXDru4f8ki7
D4T37+0xIH4jntnL4wu87eP5wL/7DpuvAyzzPp0B2UO4UYcYL8D7YcYT7MkR
xiOeO2pA9gT2/pgB2Rue9x0I7dHxA+F5mRMH5J/x/i3LvN/DMt5z+oD8U+Qp
zrDM+NvPM1/u+hh/+3d+H8+/8/7dAfnDsEf/cv94P6f7j3m+xDLv5/X4EeYe
X8TPV3l+UO81A2E8dZ35AXv0H8838Haj8YRSNxt/mK/bBuR/QT/dMRB+D/XO
Afl3sCf/HZD/x+/zDSh/y/u+B7TfBf18YEDxDp57yDLttWWED0+4PPr1lOtD
vPmMZfjxzw7In4R/94L7h/e+5P7z+wAD4f7e1zxemJ83PL6Id9+yfsIwv+P5
gd57z3jn/YSeX8zPR8Y30yzGD+Ldz4xH1PrFgOIV7h8fGPY9eMuIHxYNaD2D
+8cHlN+Cv7BkQPE/9MIPA8oP8Hvifh7ll/l9mN9f/Tu/N59TvMX7V3JqL/i8
ck7xFPD1fzn1F/pktZz4zXsncuILv3+Q03hy/3hO9oT7x3OaD/ImJ/zzvvSc
5hf5tA1zmn/gZWxO+Ia/sXFOeMK4bJoTnhlv5xS/8/vnuTAfNymnfADbnVO+
gOtaOeUTeH+jZZSflRt2n6Nl7kfz+9DOUtfH+2RyyqfBv63MhfejVrs/sF+1
OfEZ9qs+J/7zPopceD4nlpM94X7ynPQR8BLPyf7z/JfnD+9p9/xCn3TkpC/R
ru6c9CvPf+UUn/N7bsYb/k3lhGfgLZNTvo3585zyYTz/lVM+Df5tIaf8NXD1
B//O81855dvQjq39O89r+3fkV7bLiU/8fkwu/J79jm4/5nsX8wW43c184ffh
zQ+e186F9mPvnPQP7Ne+Odlnfo8iF+4XOjAXxiMH56Qf+X1p4wFPHT4ML0ca
T/x+RS7cz3FsTvleVPvXnPLRPA+WU34Y+YmTc+F53lNy4f2gp1uGfjgjF+4P
+Lvfz/v2cuH66Tk57S+DfjvXfOH9Pu4Pyl+Yk71Bty/KyZ7AX7rY44V1n0s9
ntDal1sfAS9Xmg/AyzU5+dvA27WeX7TjBuMfsL3R+ABeb8pJH2McbzX+0c/b
c+F+ljuMV35PM6f1EeiHeyzzft+c1lOAl/tzWm+B3n4wp/Ud3udvGetT/8tp
vR326DHzi9/zMF+Al6fMF+DlGfcP/X4+F65PvWj7gXa/ZH0CvfSq+QB78Lr1
E19j/YV8/dvWb7BH79oe8Ht/xgPsyYfWr/wemPHP+wqNN+4nN96hH740nvm9
MMuIpxbmtJ6IcVqcC+9z+D4X3m+3xDK/R+D3Qb/8bL4w/s6F60O/ub28byUf
fi9xxbz8Mejf1fJh/LN6XuMJ/b9WPtwPsU5e+Od9yHnNF/eP56X/ed4rL7zT
XufD74lslBdewIdxeeGJ9joffj9r87zwi/kZn9d6Ivz3SZahJ6fktf6I8tP8
O8ZlhmWM86y8+ML7n/LCP/A8Ly/+wX8vzYufPP+VF395/sv95/3MefmD4FNt
Psz/NeQVLwCPC/LS/6g3lpf+h/5rygvvsJfxvPQb6mnNh+eP2vPCO6rtzAvv
4HV3XvhGK3vzWg/En5N54ZH2Oh/iOZsXfnn/e17r6+BDLh/ur90ir/V8fp/Z
70M1f3R9cLP/lBf+sX62TV745/0q7g/03w552QPgdqe8/EF+3zUv/wjztVte
8TbvV8lL//M+2rz8VeBw77z8IZTb1/jn92A939xPnpe/wPvwjH/G18YT/LvD
jT/0+yjjE/rvGOMX9R9rvKNfx1sGP0+0zP3k+fA+olPz4fr+6eYb7XVe9oH3
reRlDwCTs/Ly13jfSl7+Esqd6/4Dr+d7fPDvhXnFU2jHRR5f7if3+NNemw88
v+35gx670vMLHlxjPtBemw/QSzcYP9jXdqPxxf3k5gPPb+fD+05uN35pr80H
2mvLwOs9xj9gPpgP77O73+/jfSvmA9e3zQfg9X95+WtQo4+5P/DvnjAfoNef
Mh+gn571eAHvz1m/AK8v5hU/470v2x7ATL+Slz8EvL2eD+9zeNPzzXx5XvEu
7bX1J+zB++YDyn9ovFEN2z6g3Z+aH7zPzPglzPPh/XRfG+/o1yLLtNfDyn/n
+oCXpbYH4OmPtl/8/q/5AJz+kg/Pq/yWV3xAe10IzzeuVJB95f7yguwD5nvV
gviAYVq9EH4vYs2C8o/g+doF2QfEf+sWxAfgbb2C+AD9uH5B8TBeu0FB/gVg
P7Yge4H4cVxB/GC+vCC8Ml9eEJ5Rz3jLvJ+xID4xX+7yiB+n+v14bHpB+Me4
zCwI/9BPswvCP+qfWxD+Mc8lhTCfVVZQvMT95YVwfb6qoPgAeK0phOsjdZ4P
/NtQkP4CXmKFcH29sSA+AC9NBfkL8C/jBflLXM8uiA/EZUF8QDN6CrIX3J9W
EF55n3tB+pvfU7YM/67fMmCbc3nwuVAQvrk/ze0Bn7cqyJ7xfpWC8M7z2u4f
71cpKD7CsG5fkD/E+1UK4femdi4oHsC47lqQfQaudy/If0X9fylIf6HdexcU
D6DefQrSf7xfxfiA2jrQfOB9aMYTxvtQ4w18PLwgewG9eGQh/B7G0cYr42vL
0L/H+3no3xP8PtRzciGMj08tKJ8EPXRaIdyvckZB/j6/V2G8015bHzC+tr7A
e8/1eNJeF8L1mwsLig9Q/iLPD+q5pKD8Bs9/Gf/I/11eUPwHGF1VUHzI/eQF
2QfM17XGE+218cbzX8Yjv4djmfG1ZZ7/Mp7Brzv9O+21Zd63UgjPhw9apr0u
yH4xvi7I32F8XQjzX4+a/9Cfj3t8oD+fsP7n/d7W/9A/z1rf/D/ilpPf
"]]}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0.},
ImageSize->Full,
Method->{},
PlotRange->{{0, 107.257}, {-2.068, 2.087}},
PlotRangeClipping->True,
PlotRangePadding->{{2.14514, 2.14514}, {0.08310000000000001,
0.08310000000000001}}]], "Output",
CellChangeTimes->{3.566418098801072*^9, 3.566456520184943*^9,
3.566457039266361*^9, 3.566463356175218*^9, 3.566464597090303*^9,
3.5664657648457947`*^9}]
}, Open ]],
Cell[TextData[{
"Da die Schwebung das Vorzeichen der Schwingung umkehrt, ist es am besten, \
zur Bestimmung von ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "\[CapitalIota]"}]], TraditionalForm]]],
" nur einen Schwebungsblock zu nutzen. Wir w\[ADoubleDot]hlen vom ersten \
Pendeln die ersten 15 Sekunden und vom zweiten Pendel die Sekunden 10 bis 25. \
Zur Bestimmung der Schwebungsfrequenz ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "\[CapitalIota]\[CapitalIota]"}]],
TraditionalForm]]],
" w\[ADoubleDot]hlen wir manuell (mithilfe der graphischen Funktion \
\[RightGuillemet]Get Coordinates\[LeftGuillemet]) Schwebungspeaks aus und \
ermitteln deren Differenzen, und erhalten wieder das Doppelte der Frequenz \
wegen der Orientierung der Einh\[UDoubleDot]llenden."
}], "Text",
CellChangeTimes->{{3.566418255329228*^9, 3.566418281083146*^9}, {
3.5664184416434603`*^9, 3.566418527597598*^9}, {3.566418898142995*^9,
3.56641892066775*^9}, {3.566457087944189*^9, 3.566457116125992*^9}, {
3.566457150901135*^9, 3.56645715878719*^9}, {3.566459107355624*^9,
3.566459110658256*^9}, {3.566462956913033*^9, 3.566462969928224*^9}}],
Cell[TextData[{
"Zun\[ADoubleDot]chst ermitteln wir ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "\[CapitalIota]\[CapitalIota]"}]],
TraditionalForm]]],
":"
}], "Text",
CellChangeTimes->{{3.566418529541356*^9, 3.5664185392688637`*^9}, {
3.5664591034972258`*^9, 3.5664591056189947`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["peaks",
RowBox[{"mitte", ",", "schweb", ",", "1"}]], "=",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"8.869", ",", "2.119"}], "}"}], ",",
RowBox[{"{",
RowBox[{"29.25", ",", "1.799"}], "}"}], ",",
RowBox[{"{",
RowBox[{"50.35", ",", "1.448"}], "}"}], ",",
RowBox[{"{",
RowBox[{"70.97", ",", "1.189"}], "}"}], ",",
RowBox[{"{",
RowBox[{"91.71", ",", "0.9527"}], "}"}]}], "}"}]}]], "Input",
CellChangeTimes->{{3.566418553726355*^9, 3.566418556862135*^9}, {
3.5664186021190243`*^9, 3.566418636734869*^9}, {3.566418686901483*^9,
3.5664186908324213`*^9}, {3.566457122998774*^9, 3.566457146418922*^9}, {
3.566457231337943*^9, 3.5664572325593243`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"8.869`", ",", "2.119`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"29.25`", ",", "1.799`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"50.35`", ",", "1.448`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"70.97`", ",", "1.189`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"91.71`", ",", "0.9527`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.5664186487621803`*^9, 3.5664186916285067`*^9,
3.5664565202200203`*^9, 3.566457147742454*^9, 3.566457233677925*^9,
3.566463356220594*^9, 3.5664645971421547`*^9, 3.5664657649333*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["peaks",
RowBox[{"mitte", ",", "schweb", ",", "2"}]], "=",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"18.76", ",", "1.988"}], "}"}], ",",
RowBox[{"{",
RowBox[{"39.98", ",", "1.644"}], "}"}], ",",
RowBox[{"{",
RowBox[{"60.84", ",", "1.323"}], "}"}], ",",
RowBox[{"{",
RowBox[{"81.58", ",", "1.076"}], "}"}], ",",
RowBox[{"{",
RowBox[{"101.8", ",", "0.8447"}], "}"}]}], "}"}]}]], "Input",
CellChangeTimes->{{3.566418697494882*^9, 3.566418698883885*^9},
3.566457196906156*^9, {3.56645722696686*^9, 3.566457236100732*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"18.76`", ",", "1.988`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"39.98`", ",", "1.644`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"60.84`", ",", "1.323`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"81.58`", ",", "1.076`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"101.8`", ",", "0.8447`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.5664186993548203`*^9, 3.566456520268859*^9, {3.56645722845265*^9,
3.566457236465382*^9}, 3.566463356339699*^9, 3.566464597192474*^9,
3.566465765054343*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["periods",
RowBox[{"mitte", ",", "II"}]], "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Flatten", "[",
RowBox[{"Differences", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Part", "[",
RowBox[{"#", ",", "All", ",", "1"}], "]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{
SubscriptBox["peaks",
RowBox[{"mitte", ",", "schweb", ",", "1"}]], ",",
SubscriptBox["peaks",
RowBox[{"mitte", ",", "schweb", ",", "2"}]]}], "}"}]}], ")"}]}],
"]"}], ",",
RowBox[{
RowBox[{"#", ">", "1"}], "&"}]}], "]"}], "//",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"#", ",", "\"\\""}], "]"}], "&"}]}]}]], "Input",
CellChangeTimes->{{3.566418704725378*^9, 3.566418723733201*^9}, {
3.566418774176773*^9, 3.5664187746959467`*^9}, {3.566457260346917*^9,
3.566457263098391*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"20.381`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"21.1`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"20.619999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"20.739999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"21.219999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"20.860000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"20.739999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"20.22`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )]}], "}"}]], "Output",
CellChangeTimes->{3.566418725313447*^9, 3.566418775740443*^9,
3.5664565203407717`*^9, 3.566457263581451*^9, 3.566463356509609*^9,
3.566464597279415*^9, 3.566465765155094*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["T",
RowBox[{"mitte", ",", "II"}]], "=",
RowBox[{"Mean", "[",
SubscriptBox["periods",
RowBox[{"mitte", ",", "II"}]], "]"}]}], ";",
RowBox[{
SubscriptBox["\[CapitalDelta]T",
RowBox[{"mitte", ",", "II"}]], "=",
RowBox[{"StandardDeviation", "[",
SubscriptBox["periods",
RowBox[{"mitte", ",", "II"}]], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.5664135644395313`*^9, 3.5664135932825413`*^9}, {
3.566413840931016*^9, 3.566413846450987*^9}, {3.5664172409639*^9,
3.566417250652793*^9}, {3.566417447558818*^9, 3.5664174599257507`*^9}, {
3.5664187707838707`*^9, 3.566418783510667*^9}, {3.56645726680972*^9,
3.5664572707698402`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "II"}]], "=",
RowBox[{
FractionBox["\[Pi]",
SubscriptBox["T",
RowBox[{"mitte", ",", "II"}]]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413595788748*^9, 3.566413604730227*^9}, {
3.5664138496182423`*^9, 3.566413852914188*^9}, {3.5664172604677753`*^9,
3.5664172659954042`*^9}, {3.566417462405601*^9, 3.566417465982563*^9}, {
3.5664187883821297`*^9, 3.566418790805861*^9}, {3.566457272752955*^9,
3.566457274496818*^9}, 3.566462972491454*^9}],
Cell[BoxData[
TemplateBox[{"0.151510668664394`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.566413602619113*^9, 3.5664136050051537`*^9},
3.566413853330969*^9, 3.566415031488805*^9, 3.5664150943028173`*^9,
3.5664152865403767`*^9, 3.566415352194001*^9, {3.566417267815569*^9,
3.56641728474636*^9}, 3.56641738194198*^9, 3.56641746640886*^9,
3.56641879136887*^9, 3.566456520432188*^9, 3.566457274967578*^9,
3.5664629737164516`*^9, 3.5664633567757587`*^9, 3.5664645973766327`*^9,
3.566465765264257*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "II"}]], "=",
RowBox[{
FractionBox[
RowBox[{"\[Pi]", " ",
SubscriptBox["\[CapitalDelta]T",
RowBox[{"mitte", ",", "II"}]]}],
SuperscriptBox[
SubscriptBox["T",
RowBox[{"mitte", ",", "II"}]], "2"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413681720048*^9, 3.566413748696438*^9}, {
3.566413855794153*^9, 3.566413863833433*^9}, {3.566417287240891*^9,
3.566417295474732*^9}, {3.566417441918975*^9, 3.566417475309024*^9}, {
3.566418794301804*^9, 3.566418797517473*^9}, {3.5664572778009377`*^9,
3.566457282080546*^9}, {3.566457426531823*^9, 3.566457426651546*^9},
3.566462978121789*^9}],
Cell[BoxData[
TemplateBox[{"0.002451436072620659`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566413749146556*^9, 3.566413864296844*^9,
3.566415031562516*^9, 3.5664150958247833`*^9, 3.5664152921305733`*^9,
3.566415353714468*^9, 3.5664172959548683`*^9, 3.566417383528458*^9,
3.566417442368752*^9, 3.566417475991418*^9, 3.566418798230929*^9,
3.566456520560872*^9, 3.566457282620494*^9, 3.566457427429977*^9,
3.5664629786715183`*^9, 3.5664633570223503`*^9, 3.566464597556217*^9,
3.566465765436976*^9}]
}, Open ]],
Cell[TextData[{
"Nun bestimmen wir ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "\[CapitalIota]"}]], TraditionalForm]]],
":"
}], "Text",
CellChangeTimes->{{3.566419016055272*^9, 3.566419035180059*^9}, {
3.566457287968896*^9, 3.566457304213272*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"mitte", ",", "schweb", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "schweb", ",", "1"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "15"}],
"&"}]}], "]"}], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416344367093*^9, 3.566416404499189*^9}, {
3.5664164749772043`*^9, 3.5664164803566027`*^9}, 3.5664165186680202`*^9, {
3.5664165522816677`*^9, 3.566416554473386*^9}, {3.566416667930216*^9,
3.566416697488927*^9}, {3.566418872129775*^9, 3.566418886836277*^9}, {
3.56641892783801*^9, 3.566418932070135*^9}, 3.5664189647335033`*^9, {
3.566457305984005*^9, 3.566457307671797*^9}, {3.5664573382506857`*^9,
3.566457338343218*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1.055`", ",", "0.93`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.628`", ",", "1.33`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.188`", ",", "1.729`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"5.756`", ",", "1.951`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.306`", ",", "2.062`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.879`", ",", "2.129`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.448`", ",", "2.018`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.066`", ",", "1.84`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.605`", ",", "1.507`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.566416365943509*^9, 3.566416383937974*^9},
3.566416480807665*^9, 3.566416519318247*^9, 3.5664165549251204`*^9, {
3.566416668287786*^9, 3.56641669808327*^9}, 3.5664168622938766`*^9,
3.566417345454031*^9, {3.566418938148533*^9, 3.566418990247615*^9},
3.566456520606966*^9, 3.566457308662702*^9, 3.5664573419150257`*^9,
3.566463357071191*^9, 3.566464597615015*^9, 3.566465765538212*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"mitte", ",", "schweb", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "schweb", ",", "1"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "15"}],
"&"}]}], "]"}], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416788206684*^9, 3.566416811680894*^9}, {
3.566418975598394*^9, 3.5664189928204*^9}, {3.566457311063684*^9,
3.566457313375404*^9}, {3.566457344011961*^9, 3.566457344169251*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.318`", ",",
RowBox[{"-", "0.713`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.851`", ",",
RowBox[{"-", "1.135`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.438`", ",",
RowBox[{"-", "1.534`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.983`", ",",
RowBox[{"-", "1.889`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.554`", ",",
RowBox[{"-", "2.067`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.141`", ",",
RowBox[{"-", "2.111`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.724`", ",",
RowBox[{"-", "2.067`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.255`", ",",
RowBox[{"-", "1.956`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.874`", ",",
RowBox[{"-", "1.69`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.401`", ",",
RowBox[{"-", "1.357`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.566416813683556*^9, 3.566416863962236*^9, 3.5664173476919193`*^9, {
3.566418983803308*^9, 3.566418993302281*^9}, 3.566456520707449*^9,
3.566457314356086*^9, 3.5664573446698923`*^9, 3.56646335712878*^9,
3.566464597661853*^9, 3.5664657656390142`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"mitte", ",", "schweb", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "schweb", ",", "2"}]], ",",
RowBox[{
RowBox[{
RowBox[{"10", "\[LessEqual]",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}]}], "&&",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "25"}]}],
"&"}]}], "]"}], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416344367093*^9, 3.566416404499189*^9}, {
3.5664164749772043`*^9, 3.5664164803566027`*^9}, 3.5664165186680202`*^9, {
3.5664165522816677`*^9, 3.566416554473386*^9}, {3.566416667930216*^9,
3.566416697488927*^9}, {3.566418872129775*^9, 3.566418886836277*^9}, {
3.56641892783801*^9, 3.566418932070135*^9}, 3.5664189647335033`*^9, {
3.566418998515291*^9, 3.566419001113822*^9}, {3.5664573174659653`*^9,
3.566457354473534*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"10.74`", ",", "0.678`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.351`", ",", "1.115`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.952`", ",", "1.479`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.495`", ",", "1.722`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17.096`", ",", "1.941`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.647`", ",", "1.99`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20.207`", ",", "1.917`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"21.785`", ",", "1.795`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"23.372`", ",", "1.552`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.935`", ",", "1.212`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.566416365943509*^9, 3.566416383937974*^9},
3.566416480807665*^9, 3.566416519318247*^9, 3.5664165549251204`*^9, {
3.566416668287786*^9, 3.56641669808327*^9}, 3.5664168622938766`*^9,
3.566417345454031*^9, {3.566418938148533*^9, 3.566419001800186*^9},
3.566456520807023*^9, 3.566457320030972*^9, 3.566457360729589*^9,
3.5664633571770687`*^9, 3.5664645977106047`*^9, 3.566465765739225*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"mitte", ",", "schweb", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"mitte", ",", "schweb", ",", "2"}]], ",",
RowBox[{
RowBox[{
RowBox[{"10", "\[LessEqual]",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}]}], "&&",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "25"}]}],
"&"}]}], "]"}], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416788206684*^9, 3.566416811680894*^9}, {
3.566418975598394*^9, 3.566419006493784*^9}, {3.56645732239965*^9,
3.566457323982918*^9}, 3.566457365355214*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"10.083`", ",",
RowBox[{"-", "0.489`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.167`", ",",
RowBox[{"-", "0.343`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.6`", ",",
RowBox[{"-", "0.975`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.139`", ",",
RowBox[{"-", "1.364`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.224`", ",",
RowBox[{"-", "1.315`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.699`", ",",
RowBox[{"-", "1.679`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.753`", ",",
RowBox[{"-", "1.679`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.327`", ",",
RowBox[{"-", "1.922`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"17.852`", ",",
RowBox[{"-", "2.068`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.444`", ",",
RowBox[{"-", "2.044`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"21.005`", ",",
RowBox[{"-", "1.947`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"22.587`", ",",
RowBox[{"-", "1.777`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.156`", ",",
RowBox[{"-", "1.485`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.566416813683556*^9, 3.566416863962236*^9, 3.5664173476919193`*^9, {
3.566418983803308*^9, 3.566419006927163*^9}, 3.56645652090679*^9,
3.566457324571477*^9, 3.5664573669054728`*^9, 3.566463357227957*^9,
3.566464597761922*^9, 3.566465765785666*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["periods",
RowBox[{"mitte", ",", "I"}]], "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Flatten", "[",
RowBox[{"Differences", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Part", "[",
RowBox[{"#", ",", "All", ",", "1"}], "]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{
SubscriptBox["max",
RowBox[{"mitte", ",", "schweb", ",", "1"}]], ",",
SubscriptBox["min",
RowBox[{"mitte", ",", "schweb", ",", "1"}]], ",",
SubscriptBox["max",
RowBox[{"mitte", ",", "schweb", ",", "2"}]], ",",
SubscriptBox["min",
RowBox[{"mitte", ",", "schweb", ",", "2"}]]}], "}"}]}], ")"}]}],
"]"}], ",",
RowBox[{
RowBox[{"#", ">", "1"}], "&"}]}], "]"}], "//",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"#", ",", "\"\\""}], "]"}], "&"}]}]}]], "Input",
CellChangeTimes->{{3.566416950448785*^9, 3.566417094263796*^9}, {
3.566417128819862*^9, 3.566417220526993*^9}, {3.5664172740031776`*^9,
3.56641728085063*^9}, 3.566417453279512*^9, {3.566419061101471*^9,
3.566419071899342*^9}, {3.566457374395771*^9, 3.566457379475959*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"1.5730000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5599999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5680000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5499999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5729999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5690000000000008`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6180000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5389999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.533`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5870000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5449999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5710000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5869999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5830000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5310000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6189999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5269999999999992`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6110000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.600999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5429999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6010000000000009`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5509999999999984`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5600000000000023`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5779999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5869999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5629999999999988`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4329999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5389999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4749999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5740000000000016`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5249999999999986`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5919999999999987`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.561`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5820000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.568999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )]}], "}"}]], "Output",
CellChangeTimes->{{3.566417037145218*^9, 3.5664170852269993`*^9}, {
3.566417129680561*^9, 3.566417140647348*^9}, {3.56641717581981*^9,
3.5664172224107037`*^9}, 3.566417281888981*^9, 3.5664173767611523`*^9,
3.566417453831401*^9, 3.5664190738211184`*^9, 3.566456521361012*^9,
3.56645738012992*^9, 3.566463357714478*^9, 3.5664645980680637`*^9,
3.566465766114225*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["T",
RowBox[{"mitte", ",", "I"}]], "=",
RowBox[{"Mean", "[",
SubscriptBox["periods",
RowBox[{"mitte", ",", "I"}]], "]"}]}], ";",
RowBox[{
SubscriptBox["\[CapitalDelta]T",
RowBox[{"mitte", ",", "I"}]], "=",
RowBox[{"StandardDeviation", "[",
SubscriptBox["periods",
RowBox[{"mitte", ",", "I"}]], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.5664135644395313`*^9, 3.5664135932825413`*^9}, {
3.566413840931016*^9, 3.566413846450987*^9}, {3.5664172409639*^9,
3.566417250652793*^9}, {3.566417447558818*^9, 3.5664174599257507`*^9}, {
3.566419079227153*^9, 3.5664190868506804`*^9}, {3.566457382730624*^9,
3.5664573864496613`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "I"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]"}],
SubscriptBox["T",
RowBox[{"mitte", ",", "I"}]]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413595788748*^9, 3.566413604730227*^9}, {
3.5664138496182423`*^9, 3.566413852914188*^9}, {3.5664172604677753`*^9,
3.5664172659954042`*^9}, {3.566417462405601*^9, 3.566417465982563*^9}, {
3.566419089370288*^9, 3.566419093497917*^9}, {3.566457389265527*^9,
3.566457390458157*^9}}],
Cell[BoxData[
TemplateBox[{"4.021937264554034`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.566413602619113*^9, 3.5664136050051537`*^9},
3.566413853330969*^9, 3.566415031488805*^9, 3.5664150943028173`*^9,
3.5664152865403767`*^9, 3.566415352194001*^9, {3.566417267815569*^9,
3.56641728474636*^9}, 3.56641738194198*^9, 3.56641746640886*^9,
3.566419094127233*^9, 3.566456521493745*^9, 3.56645739085604*^9,
3.566463357991838*^9, 3.5664645981790037`*^9, 3.566465766234066*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "I"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]", " ",
SubscriptBox["\[CapitalDelta]T",
RowBox[{"mitte", ",", "I"}]]}],
SuperscriptBox[
SubscriptBox["T",
RowBox[{"mitte", ",", "I"}]], "2"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413681720048*^9, 3.566413748696438*^9}, {
3.566413855794153*^9, 3.566413863833433*^9}, {3.566417287240891*^9,
3.566417295474732*^9}, {3.566417441918975*^9, 3.566417475309024*^9}, {
3.566419096690737*^9, 3.566419099641781*^9}, {3.566457393362804*^9,
3.566457400005389*^9}}],
Cell[BoxData[
TemplateBox[{"0.09560550620976867`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{
3.566413749146556*^9, 3.566413864296844*^9, 3.566415031562516*^9,
3.5664150958247833`*^9, 3.5664152921305733`*^9, 3.566415353714468*^9,
3.5664172959548683`*^9, 3.566417383528458*^9, 3.566417442368752*^9,
3.566417475991418*^9, 3.566419100354113*^9, 3.566456521691614*^9, {
3.5664573965132236`*^9, 3.566457401368137*^9}, 3.56646335815663*^9,
3.566464598334297*^9, 3.566465766448677*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Vergleich der Frequenzen", "Subsection",
CellChangeTimes->{{3.5664192234035397`*^9, 3.566419225883049*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "I", ",", "theor"}]], "=",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "1"}]], "+",
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "2"}]]}], ")"}]}]}]], "Input",
CellChangeTimes->{{3.566457600153709*^9, 3.566457616332611*^9}, {
3.5664582669581337`*^9, 3.5664582872466993`*^9}, {3.56645843821292*^9,
3.5664584480132627`*^9}}],
Cell[BoxData[
TemplateBox[{"4.065266930221301`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{
3.5664576205921507`*^9, {3.56645826866374*^9, 3.566458288048279*^9},
3.56645844865298*^9, 3.566463358259912*^9, 3.5664645983869753`*^9,
3.566465766556676*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "I", ",", "theor"}]], "=",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "1"}]], "+",
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "2"}]]}], ")"}]}]}]], "Input",
CellChangeTimes->{{3.566457626926803*^9, 3.566457632702582*^9}, {
3.5664584511095667`*^9, 3.566458453821082*^9}}],
Cell[BoxData[
TemplateBox[{"0.08910516931688361`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566457633296639*^9, 3.566458454456777*^9,
3.566463358360696*^9, 3.566464598535396*^9, 3.566465766656411*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "II", ",", "theor"}]], "=",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "2"}]], "-",
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "1"}]]}], ")"}]}]}]], "Input",
CellChangeTimes->{{3.566457640925796*^9, 3.566457645781568*^9}, {
3.5664584595566063`*^9, 3.566458462349407*^9}}],
Cell[BoxData[
TemplateBox[{"0.15448616372020774`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566457646269865*^9, 3.5664584627753143`*^9,
3.566463358509795*^9, 3.566464598632213*^9, 3.566465766756196*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "II", ",", "theor"}]], "=",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "2"}]], "+",
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "1"}]]}], ")"}]}]}]], "Input",
CellChangeTimes->{{3.566457651229074*^9, 3.566457661692594*^9}, {
3.566458464684102*^9, 3.566458466796021*^9}}],
Cell[BoxData[
TemplateBox[{"0.08910516931688361`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566457662260446*^9, 3.566458467175603*^9,
3.566463358628417*^9, 3.566464598681322*^9, 3.566465766804698*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"Null", ",",
RowBox[{"Text", "[", "\"\\"", "]"}], ",",
RowBox[{"Text", "[", "\"\\"", "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
"Text", "[",
"\"\<\!\(\*SubscriptBox[\(\[Omega]\), \(mitte, \
\[CapitalIota]\)]\)\>\"", "]"}], ",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "I", ",", "theor"}]], ",", "3"}], "]"}],
"\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "I", ",", "theor"}]], ",", "1"}], "]"}]}],
",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "I"}]], ",", "3"}], "]"}], "\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "I"}]], ",", "1"}], "]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
"Text", "[",
"\"\<\!\(\*SubscriptBox[\(\[Omega]\), \(mitte, \[CapitalIota]\
\[CapitalIota]\)]\)\>\"", "]"}], ",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "II", ",", "theor"}]], ",", "2"}], "]"}],
"\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "II", ",", "theor"}]], ",", "1"}], "]"}]}],
",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "II"}]], ",", "3"}], "]"}], "\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "II"}]], ",", "1"}], "]"}]}]}], "}"}]}],
"}"}], ",",
RowBox[{"Frame", "\[Rule]", "All"}]}], "]"}]], "Input",
CellChangeTimes->{{3.5664576787642727`*^9, 3.566457789085693*^9}, {
3.566457819457388*^9, 3.566458019263232*^9}, {3.5664581445370483`*^9,
3.566458154319097*^9}, {3.566458249632433*^9, 3.566458258711831*^9}, {
3.566458298157398*^9, 3.5664583803127813`*^9}, {3.566458469326837*^9,
3.566458481998563*^9}, {3.5664631303313437`*^9, 3.566463141977501*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{"",
InterpretationBox[Cell[BoxData[
FormBox["\<\"Theoretischer Wert\"\>", TextForm]], "InlineText"],
Text["Theoretischer Wert"]],
InterpretationBox[Cell[BoxData[
FormBox["\<\"Gemessener Wert\"\>", TextForm]], "InlineText"],
Text["Gemessener Wert"]]},
{
InterpretationBox[Cell[BoxData[
FormBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Omega]\\), \\(mitte, \
\[CapitalIota]\\)]\\)\"\>", TextForm]], "InlineText"],
Text["\!\(\*SubscriptBox[\(\[Omega]\), \(mitte, \[CapitalIota]\)]\)"]],
RowBox[{
TagBox[
TemplateBox[{
InterpretationBox["\"4.07\"", 4.065266930221301, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 3]& ], "\[PlusMinus]",
TagBox[
TemplateBox[{
InterpretationBox[
"\"0.09\"", 0.08910516931688361, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 1]& ]}],
RowBox[{
TagBox[
TemplateBox[{
InterpretationBox["\"4.02\"", 4.021937264554034, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 3]& ], "\[PlusMinus]",
TagBox[
TemplateBox[{
InterpretationBox["\"0.1\"", 0.09560550620976867, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 1]& ]}]},
{
InterpretationBox[Cell[BoxData[
FormBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Omega]\\), \\(mitte, \
\[CapitalIota]\[CapitalIota]\\)]\\)\"\>", TextForm]], "InlineText"],
Text[
"\!\(\*SubscriptBox[\(\[Omega]\), \(mitte, \[CapitalIota]\[CapitalIota]\
\)]\)"]],
RowBox[{
TagBox[
TemplateBox[{
InterpretationBox[
"\"0.15\"", 0.15448616372020774`, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 2]& ], "\[PlusMinus]",
TagBox[
TemplateBox[{
InterpretationBox[
"\"0.09\"", 0.08910516931688361, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 1]& ]}],
RowBox[{
TagBox[
TemplateBox[{
InterpretationBox["\"0.152\"", 0.151510668664394, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 3]& ], "\[PlusMinus]",
TagBox[
TemplateBox[{
InterpretationBox[
"\"0.002\"", 0.002451436072620659, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 1]& ]}]}
},
AutoDelete->False,
GridBoxFrame->{"Columns" -> {{True}}, "Rows" -> {{True}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{
3.566458020441966*^9, 3.566458155267816*^9, 3.566458252040106*^9,
3.5664583495151653`*^9, 3.566458380859438*^9, 3.5664584826607237`*^9,
3.5664629844855423`*^9, {3.566463130895702*^9, 3.5664631425231943`*^9},
3.5664633590111322`*^9, 3.5664645990331287`*^9, 3.566465767076579*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Kopplungsgrad", "Subsection",
CellChangeTimes->{{3.5664202435408382`*^9, 3.566420263483097*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Kappa]", "mitte"], "=",
FractionBox[
RowBox[{
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "2"}]], "2"], "-",
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "1"}]], "2"]}],
RowBox[{
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "2"}]], "2"], "+",
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "1"}]], "2"]}]]}]], "Input",
CellChangeTimes->{{3.566455520937298*^9, 3.5664555748032703`*^9}, {
3.5664585483842163`*^9, 3.5664585530386887`*^9}, {3.5664634493226957`*^9,
3.566463449554791*^9}}],
Cell[BoxData["0.07589336329943856`"], "Output",
CellChangeTimes->{3.566455578139165*^9, 3.566456521832499*^9,
3.566458553705472*^9, 3.566463359244487*^9, 3.5664634502022057`*^9,
3.566464599233717*^9, 3.566464638385352*^9, 3.566465767225244*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Kappa]", "mitte"], "=",
RowBox[{
FractionBox[
RowBox[{"4",
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "1"}]], " ",
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "2"}]]}],
SuperscriptBox[
RowBox[{"(",
RowBox[{
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "2"}]], "2"], "+",
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "1"}]], "2"]}], ")"}], "2"]],
SqrtBox[
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "1"}]],
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "2"}]]}], ")"}], "2"], "+",
SuperscriptBox[
RowBox[{"(",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"mitte", ",", "2"}]],
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"mitte", ",", "1"}]]}], ")"}], "2"]}]]}]}]], "Input",
CellChangeTimes->{{3.566455582521412*^9, 3.566455587051407*^9}, {
3.566456219233301*^9, 3.566456292189419*^9}, {3.566458560024431*^9,
3.566458568542531*^9}, {3.566463453267262*^9, 3.5664634535151787`*^9}, {
3.566464634537668*^9, 3.5664646351653843`*^9}}],
Cell[BoxData["0.03079893294740152`"], "Output",
CellChangeTimes->{3.566456295268393*^9, 3.566456522259495*^9,
3.566458571235566*^9, 3.56646335969801*^9, 3.566463454453475*^9,
3.56646459968262*^9, 3.56646463660356*^9, 3.566465767647718*^9}]
}, Open ]],
Cell["", "PageBreak",
PageBreakBelow->True]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["\<\
Starke Kopplung (Aufh\[ADoubleDot]ngung unten)\
\>", "Section",
CellChangeTimes->{{3.566420415771991*^9, 3.566420421800921*^9}, {
3.566458631515876*^9, 3.566458636843622*^9}}],
Cell["\<\
Die Aufh\[ADoubleDot]ngung der Feder befand sich hier bei\
\>", "Text",
CellChangeTimes->{{3.566415594191719*^9, 3.566415638364727*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["l", "unten"], "=",
RowBox[{"Quantity", "[",
RowBox[{"30.5", ",", "\"\\""}], "]"}]}]], "Input",
CellChangeTimes->{{3.5664156413819637`*^9, 3.566415677841835*^9}, {
3.566456438563306*^9, 3.566456450698697*^9}, {3.566458648780693*^9,
3.566458662331912*^9}}],
Cell[BoxData[
TemplateBox[{"30.5`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"cm\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: centimeters"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Centimeters\""}], "]"}]& )]], "Output",
CellChangeTimes->{3.566415678959667*^9, 3.5664564530836143`*^9,
3.566456516627063*^9, 3.5664586629330883`*^9, 3.566463359764398*^9,
3.566464599759487*^9, 3.566465767719569*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]l", "unten"], "=",
RowBox[{"Quantity", "[",
RowBox[{"0.1", ",", "\"\\""}], "]"}]}]], "Input",
CellChangeTimes->{{3.5664156797709217`*^9, 3.566415691630045*^9}, {
3.566456453534399*^9, 3.5664564538511553`*^9}, 3.566458665629656*^9}],
Cell[BoxData[
TemplateBox[{"0.1`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"cm\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: centimeters"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Centimeters\""}], "]"}]& )]], "Output",
CellChangeTimes->{3.566415692080596*^9, 3.566456455717495*^9,
3.566456516684526*^9, 3.566458666271532*^9, 3.5664633598310947`*^9,
3.5664645997965117`*^9, 3.566465767758706*^9}]
}, Open ]],
Cell["\<\
Wir importieren zun\[ADoubleDot]chst wieder die Rohdaten:\
\>", "Text",
CellChangeTimes->{{3.5664157071366663`*^9, 3.566415712766675*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"time", ",", "p1", ",", "p2"}], "}"}], "=",
RowBox[{"Transpose", "[",
RowBox[{"Import", "[",
RowBox[{
"\"\\"", ",", "\"\\""}],
"]"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566415733208415*^9, 3.566415742796677*^9}, {
3.5664564628035707`*^9, 3.566456463128696*^9}, 3.566458669265626*^9}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "asym", ",", "1"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p1"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566405351112589*^9, 3.566405357447461*^9}, {
3.56640544960851*^9, 3.566405474501894*^9}, {3.566405878244103*^9,
3.5664058812828007`*^9}, {3.566406623173218*^9, 3.566406650963872*^9}, {
3.566406681345848*^9, 3.5664066820338078`*^9}, {3.566406750765345*^9,
3.566406752245111*^9}, {3.5664068340642033`*^9, 3.566406978710898*^9}, {
3.5664071823293343`*^9, 3.566407190896555*^9}, {3.5664157551585693`*^9,
3.5664157724838877`*^9}, {3.566415848992949*^9, 3.5664158492234583`*^9}, {
3.566456465923169*^9, 3.566456466306416*^9}, 3.566458671831624*^9}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "asym", ",", "2"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p2"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.56641041393626*^9, 3.566410422064912*^9}, {
3.566415777189785*^9, 3.5664157786755123`*^9}, {3.566415852231278*^9,
3.566415852527092*^9}, {3.566456469378828*^9, 3.566456469769991*^9},
3.5664586744786882`*^9}],
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"time", ",", "p1", ",", "p2"}], "}"}], "=",
RowBox[{"Transpose", "[",
RowBox[{"Import", "[",
RowBox[{
"\"\\"", ",", "\"\\""}], "]"}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566415791171216*^9, 3.566415792488168*^9}, {
3.566456473259087*^9, 3.5664564736577387`*^9}, 3.566458677247369*^9}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "sym", ",", "1"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p1"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566405351112589*^9, 3.566405357447461*^9}, {
3.56640544960851*^9, 3.566405474501894*^9}, {3.566405878244103*^9,
3.5664058812828007`*^9}, {3.566406623173218*^9, 3.566406650963872*^9}, {
3.566406681345848*^9, 3.5664066820338078`*^9}, {3.566406750765345*^9,
3.566406752245111*^9}, {3.5664068340642033`*^9, 3.566406978710898*^9}, {
3.5664071823293343`*^9, 3.566407190896555*^9}, {3.5664157551585693`*^9,
3.5664157724838877`*^9}, 3.5664158119699497`*^9, {3.56641586288662*^9,
3.5664158631188993`*^9}, {3.566456475632914*^9, 3.566456476025807*^9},
3.566458679086481*^9}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "sym", ",", "2"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p2"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.56641041393626*^9, 3.566410422064912*^9}, {
3.566415777189785*^9, 3.5664157786755123`*^9}, 3.566415815385363*^9, {
3.566415865766223*^9, 3.56641586599216*^9}, {3.5664564778260803`*^9,
3.566456478225603*^9}, 3.5664586806226587`*^9}],
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"time", ",", "p1", ",", "p2"}], "}"}], "=",
RowBox[{"Transpose", "[",
RowBox[{"Import", "[",
RowBox[{
"\"\\"", ",", "\"\\""}], "]"}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566415791171216*^9, 3.566415792488168*^9}, {
3.566415834488915*^9, 3.56641583536876*^9}, {3.566456481090536*^9,
3.566456481525543*^9}, 3.566458684526785*^9}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "schweb", ",", "1"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p1"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566405351112589*^9, 3.566405357447461*^9}, {
3.56640544960851*^9, 3.566405474501894*^9}, {3.566405878244103*^9,
3.5664058812828007`*^9}, {3.566406623173218*^9, 3.566406650963872*^9}, {
3.566406681345848*^9, 3.5664066820338078`*^9}, {3.566406750765345*^9,
3.566406752245111*^9}, {3.5664068340642033`*^9, 3.566406978710898*^9}, {
3.5664071823293343`*^9, 3.566407190896555*^9}, {3.5664157551585693`*^9,
3.5664157724838877`*^9}, 3.5664158119699497`*^9, {3.566415845159831*^9,
3.566415872266081*^9}, {3.5664564842404213`*^9, 3.5664564846651278`*^9},
3.5664586862939157`*^9}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "schweb", ",", "2"}]], "=",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"time", ",", "p2"}], "}"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566405351112589*^9, 3.566405357447461*^9}, {
3.56640544960851*^9, 3.566405474501894*^9}, {3.566405878244103*^9,
3.5664058812828007`*^9}, {3.566406623173218*^9, 3.566406650963872*^9}, {
3.566406681345848*^9, 3.5664066820338078`*^9}, {3.566406750765345*^9,
3.566406752245111*^9}, {3.5664068340642033`*^9, 3.566406978710898*^9}, {
3.5664071823293343`*^9, 3.566407190896555*^9}, {3.5664157551585693`*^9,
3.5664157724838877`*^9}, 3.5664158119699497`*^9, {3.566415845159831*^9,
3.566415872266081*^9}, {3.5664564842404213`*^9, 3.5664564846651278`*^9}, {
3.566456547732293*^9, 3.5664565495801907`*^9}, 3.566458687973833*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{", " ",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "sym", ",", "1"}]], ",",
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "sym", ",", "2"}]]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}]}], "]"}]], "Input",
CellChangeTimes->{{3.566417491347795*^9, 3.566417494211622*^9}, {
3.56645655185375*^9, 3.566456554460984*^9}, {3.5664586898063507`*^9,
3.566458691189682*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {
{RGBColor[0.24720000000000014`, 0.24, 0.6], LineBox[CompressedData["
1:eJxdXXd8pGXV3d5LymbTy6RsYVvKbnoy7/RML++INCkiUgWlSJWiCCJVERBF
pBdBBRFBBDL0IkhvgkrvfWF3gQW+zTl3zvzy5Z/8JnnLU24599x7n/F8+6Dc
XtOmTJkyfe6UKRO/fzAy75lLv3+b956W6w7eJ9tV8G7Y9Zbogju9V90b7zvl
Do+Dj9Oe8L72aOvzn33V7pwbOPWAN754zntQxU8KD3ranL/87oMr743/z/vY
tn8f+3aj88+LQ3/b+OWL3m3/vTjUW+Us75pzbcNOr3q3X7Rm26UznF+8d8y2
V7zuvXDitr7Hxqfg503vd/Ezq/Cdof+lTz/vbW/PxM8NSwpb3Fcu/+3d73o3
rdjlzDs/bSjsd+uhZ9fMeN/76wO3DeDnnsIVv71728g/9E7MYuTnbYUF01ad
vPS5D73bRrPfrevbC5iH72PvrBPOCZx6bVth2yy3DWGj9/Nt/z60srXA93/i
/d4bX1z90eNNBb7nE+/EaK8MVxfq1/2nfdYJn3oPmbhtvMLet8k78ddzAjMK
h9/++7p1/9lk89k4/m725qafvrOZyzjtIy+Gu/0W+z3duePBiQX6zPvX+3+4
7c4KW6/Pvfj7IXUOxn3oF17sy3UtzunnTUx0q3fiqdn+Ngeva/+Kz/9xu3PZ
9ycu/MpbtsPAtke2O5zPFKd4/ZFvLdu2A1Oc35w/8dPicJxTbV/rHO7/VAfr
N6/cmVi9f22e6sSwkF96cdmqac62Rdz9tUf/7T16yZ8iLx01zeHfv7T9m+5w
PrMLHz+e/HbZDtNtnysLHP90J4EHVBdw+5IZDvYv1lTA8p4zg+N8t6XA98xw
JmZz+/9aC1h370yO66a2wk4QkJlcF6e9gH26d6azbRGfPGJle4HyOdOBGPyr
rbBtFbYtxSwH++hrLTx1xMSLZnMdNrcUMP2R2Q7f02Djne0EJx6zsqawOwR/
toPl2LGs8NWTeIDty6wC5XaOAzH/zhfj3N85TgYXvEq58c51KP9fe1Pfntip
uSYHZbZf87g/tUudMCYyz343OtsWa9uKzaPe/aO4f/Ntf9q4Tr+f73w48edo
UT/nO5C3pR0O9KhnAZ/j6XDaIGALnAsmxPjNdtvvBdy/ndoc6sdCu6/V4XgX
8vmnNDmY5tAipyivlJ9FDv68W4U9b5FD/ZjnYPobFpsdeNfLdVvsNGNjXhqn
vi12fgSJnl3gvMqcbQ9xX+koLzRiw8vsvVXUz8PKON7fNBRgZ/5W5lDPWwp4
/RNlziObJwxHq+lzmeSB8yp3amdM7Eh7AWqfLKc8v9NewLLvW+5g2ve3096c
WO5snbjs2+0FjPvCcsnj+xNifku5Q71vLdBOljvVExPYs6VwHB5Q4UCsWxsL
1MsKrse/azlet8KZ2LWrP6oqQE4OqnBgZz4u53hvqHA6YMDmF3ITD3iswvbx
w3EPNqyC+7nPc17KdyXf/8pn3k++nBDYStu/Wc5dn25bEH+l84eJ6ZQtdiZW
Z8UulbbPlRznJZU2/3p7T6XDdWx2/FCISgfjPttj+233f9LqTFjvAyuWONje
me0O7GpuiUM72W7ysoT24cIOjuOsJQ7MzzMdDszDn0r/H5v4eN8Sye/EKhzw
xhLK/W7tNo8qystebU4FBKLKKdpP7kOV9An29kdVDqZxZK3JUZVDu1blQN4e
qaK92quc131W5WDds1NM75aavXvFS3uw1OT9lXHK61Lqw/++pD/Yf6nZz9mF
iyZW4aSltHerywqUy6W23jUFytFSyQvM7Oxqh3a1pUC/W037frOnALM/Wi17
yfWtlrzTPlRTP6Z2FKBH/6i2deoocN2rHcjxYEeBdqnaxt9eOGzCbS2qkfzj
45oap+hv6Q9rZE9pn2tk3+l/amz96wrQ8wdqHIz79qUF7mcN7dXTFYWVEMha
3v/gggLWZazWKfpX7kutQ7193Es7Wyt553xrTa5n2X7WSt7pb2tNbqtpJ+rr
qBd3Npi9qnMw7IYWyrlbx/X4vccBPDmwTvKO62+sk7xzn+to/wMdvP598+t/
7XCwPgvrzX90OHALy+tpt4/ucC6ZGF6+nv7ksnaH/rGe/ujqNu7TLfXUj/+2
mN7UO4RxjXzPJ/WSb+pjgwN89wuT73SD5Jt4o0H+Cdf/ssHs40veCfTVcl2D
vf+tceKkBvOXUwscbyPnceU82/9GhwClscD7Gh3s6z6eAu1Vo+SV1zUZjmy3
/W+S/YX+R5q4D0+0F/Bxjybaod+2m39vop2Y3U5/8UgT9Xmwzd7XRHm4oKUA
Ozq/mXZk78YC/Uyz7DH3odn86GLTn2aniPfwnBeaDS/dN160i9STzcSh81pM
f6Y7tA8tDnHCAgfmZLTF/FU15SHZ4mC6m+qJY/Ztceh3mimnh7dQX2e2Us5+
2mLjaeM+/73FKeJBLP8zpc/EXS2ST+zrxy3Ch7QLHvn7++BGPYZLPCbHHvO/
NZTvjMfscIWD9f1e8fpZ5qc8Zh//58W6/sYjfwX9u81j+Gcu8f4zHrNvSwoc
r8fkr4b25WMPx3lHYwF+bG4r/dGGFpOXVgeXf8tToH9r1f5D7zOtsocwez9s
pT+5uIgPW6lv7W0FyPcvW2l/v91K+3N/qwP38KtGs5ettl81BejHh61cp+mV
xJNftpqdWEB9WNjmwO7Pms7rO9scxEv7bRonbmuj/dt+k7fox4jrDYcd0ubA
nC1eQr34WZvhhRru7+VtnO/nTVz/f7ZpPxmXtQnf0Z+1EV90tztQ21ntnF++
3dat3QGO2PYe7M832+VPaTfaTR8bue/Ht8u+MH4zHHp0uUN81m5yO51ye1e7
7ccrXsjbi+2U9xn/NTxjcnzeV+PUw3YHfvDkOYwvajqEx7l+HebnlxaIMzto
H3Zu5np/v8Mpxoscb4dTjHcffmjbz2lFu9xG/b6gQ/gO+nh1B/f3rrYC1ueW
DsO/bWZvOrief2ktwG+80EG9/8hDedvUIXzKfVxGeXu1nu9rWKbx0y8v4/rP
WUQ8vP0ywwPTqB97LTMc9dH4ExNqc+Qy88/XeXH9ucsMj041+Vhm/nOB7ccy
W79Kw1fLTF6rzQ8vo1/5Zr351WXC//R7y+y5LSb3y83PeehfFi+nvX/T7FVo
uUMc2k5/lFsueWPctFz2Cfefudze66EfvmC5k5/YyN1baG/+uJz6cGaj+Ynl
tFsvFse/XPOD2X19ucUXC2l/v1puOHYKccTCFbQfv3vHS71YYfr54jjsemoF
x7tkQQG/Dlxh67uU8nDUCo7vonrKw5krTH+aC5j3FSuIG8/1MB65cQVxyG2t
Fr+u4LjPbaN8P7uCuLmi3ezLCskr7fVK81d2fc1K2TvipZXE0WubiRf3WGn6
Wsf444iVhmer6F9PXmn6u6jAcayUv+M+r9T7iTNWan0AAz5dafjgCy/s77Tt
nCIuxjqt2k7xBPxjbDvtL+KjHbZzwMec3Ua/dMR2TpHP4Pi2c4r8E8e3nfkP
82d/2U72jLhqO8pHus3kYjvZQ8rpdqZ/TYx3t25nfrLO7Owqvjey1PzkKpvv
YsrjLqtMnl4gP7L/KtOrT8exnyetUrxGXLRK+g0e4o5V5i+bGU/+dxX16lAP
8fV7qyQfnPcq2R/ijNWmn+0WT67W/nB9V0t+iJdWE9+tazN7uJp+/KwWxhcn
rxZex3pdVHoe9W21AzuZWMrnP7ha8yM/sdr4pamMR75aLb6IdnWN2Z+vvdiu
xjXmh+aZPVgjvIr12tuuv6nJ5GCN+T0P/dVJa4S/6SfWyL5wvGskH1zHNbTn
fR2cx0Olz7QPa2j/T2+nnGxcQ77ojjbqwfS11JfHWh3677Wyf1yntRY3LzWc
u1brR75ireJv6tla54EJeLTuKS+uv2qtxRkfjMNu3L/W8NV82v+n1zqw83+v
NDy71ni9WsMba4WPiKfXiX8gr7TOgR242EN5Gl1nfEEbr0+sYzzR1E68u9s6
w3XtZu/WSd7o19cJP5EPWUd7c2Crycs6w4se8nfj6/6fvK8TvuN81pl9XcLr
v15ncdgiw+udZi+mkP8o76Qc3PvOOPFfp/GiU0zOO82eLKB96e+0uK+C1wU7
hZ9oJzopR9Umb9t3im8jr9XJ/VjeanFDp/Az/XCncBXk9vBO2S/M99hOxXOM
/0ufIU9ndUp+sS9X2fh+YLj45k4H6nZAM+Ou8U7DB7W8795Os09LuG8PF59X
Rhz5SqfwJfT87U7K08Dd48TXnQ559k3j2JYvOw1/zi5gnDO6uK4HlTGeX9Bl
81hCPNXSJTwDu7m8y+xhM/msdV30x7Ue4ue+LvGxkDdvl/HRbXx+okv4CvH5
zl2mT20F6OOeXYofaX+7nCKfD7t3cOl9wL1HlcYDfT+py/SvnnjszOL7qgvY
t3O7LC42PP+7LvP3iyye7TKedJrxc13GH707znisS/wE7Nl9Xdzn6zYxD/JI
l/nLORzX013i3yE2/7Xx9lbZe7uM76mjHfqoy/iNJuL6z7sYf55hcd+0bsZH
N3poN+d0cz3ObzXeqVv4Hva3u9shr9NGXDTUbXJscVGw2/C0h3Y/3m28RYvF
bd2GPxtNX7otLqgxXq5b8kk56jb7vJh6d3i38QmzaYeO7WYc/NYnXujDz7pl
L7FM53UbXvtsnPF5t/hjqMmV3YrfyXd1i89n/NFt+tRg/qxb8QLG8b9uruu/
PfSPb3TLHwPffdA9OV7Y2i3+l/inR/wztmN+D9fhNQ/9v6fH9qupgPmt6KE+
TK23+LDH+LVq8s/BHtlDvCfeY3hmOuPnb/aYPr85Dhy9V4/J34de+LsDeuiX
VkwnfjmmR3wE7OGJPeI/IR+n9dh8ag1/94iPoN/pIQ/1ucfsZI/wFu2IjffG
Nj7nnz3ir7Auz/fQP/yjlf71lR7K0bMeywP1yH9CPj/uUXyL/f66R3iBcfV6
45+qqJcN6yVfGHf7epPPrV742Z71No+HxjGeofUWn345Dv3xr7d8xRzjt9Zb
nFLB+G6X9eYPawpwQ/uvd4yXKpDnXK/xQ56OW8/1ecRDPHjyeskPefT18scY
72Wl/+P516y3+bbSft60XvYN/uX29ZYHaubz7yu9n/ZmPePn2XW0p8+vL/L8
fN+r642PXVSgf1hveGQm9eeL9caXvjIOPzx9g/GpbxrftUF5RvA8DRvod39d
Znhpg+wB5LVvg/HPTXzv6AbxmfBb4Q20bw2ttOvuBsYTP2izfSm+3+KDvTco
/wX9PGiD/Cn98AbJI9bjzA3it2hPNsie4vILNxheqqOeXLHB8p3VtJN/tPmu
ruTvhzZovTHeJzYYLn3ai/V7foPZrym0P69sMD2ZWyA/s4HrNmz5no0bjAes
Mjy0QfEb5b3XeMEm7l97r62zh+/v6ZU8EYf1iv8in9cr/8r17ZX/xDh26aU9
faCF+YBDeokH2mrJrxzVa3FTZYE8Y6/8I+T11F7D2TN4/9m9tl+bxmlPes2e
ve3F/l3Zq3wz9u/PvWafZ9P+3NpLPzZWQX2+u9fwYjWve6jX7Hs99/vpXuM1
mmlXX+oVfw85eatXeJ68d6/wPobxWa/4CcpJH6/7c7v509JnrHtZH+e/fzvl
xtOn+ATXr+hTvgxy0tXH9e9pYdw00Ed/1thoee0+i7dqabfH+oQHyL/2WT6t
zPi5PuEJ8iR9hku/9GK++/aJb8O8f9DHuHj318a5n32Gh78ax/3H95m/nkt+
7ZS+yfnYM/skn/A75/dZ/qiW/u3iPtPnBvIRV/UZPm4m3vpzH/F72EN7eXOf
zcPqMQp94mMhx/f3OcX6Daz3oza/D9uYX322z+L3Nt7/Yp/yU8A5b/bJnpJP
sfVa2cr3b+lj/meah/HvlH6Tx+YC4pSKfvM/9awvqe03Pm8J/X1rv/FJC4kP
Vxbvn8F8XGe/4aRPx7lO/aafd5i/6Tf785GXct5P+1kzzexKv9mz+VzHHfuN
L62gvOzeb/UWSynf+xbvrzO72a/8EMZxRL/4NPitE/on48Wf9Vt81Wo8W7/4
GeLIfvF1WO+L+omPRorxS7/sL3FvP/NBD9n9f+8X3sQ4Cv3iZ7jf/bLP5BH6
Db808/7n+i2/Us99eMnuv6Ha9Lvf+OJK+oMP+q2OYhH9x+f9lo+cyfdPGbD9
2Ey8OWfA4oUnvNjX+gHLT309Tv0eUL4LeHjVAP1vcwXjj+4Bs29LqR8DA4rX
mZ8YkH6QrxlQfAJ5yQxIHsnbD9A/bPVY/DPA9b2ilf5jvwHbb6tvOGRAfCDj
9QHJP3DQjweET8mLDwifcp8HVI8DeTt/wOLRZr7/0gHK1fUNnP81A2aXagu4
7voB4/mrOP5bBijfL5Rz/ncOiN/Afj0wYPs6jfr2+IDxJBupL/8eYFz73q3j
uP/lAeOrP7a6swHz11an9OGA4Zf5Fh8NGC9Ybus6SHvybhXlZe6grWet4ZdB
xdu0e4PyH5CndYPEzZdZHqh3UPKM67yDqkeAHEZKn4nLB1W/gzjrm4OKz2Am
dx00/+mxfMug+AjGT4PiLxmnDYpfxfuPG1R+m3hzUPkjxh2D5o/LDKcNyt+S
/xu0fN1W1pNcNah6JurzoPI1zJMMGl/82Tj5iUHhR8z7nkGr61hoeHTQKdbT
YfzPDBq+XVqgXgwqH0s5GXSK9X/014OSR6zjpkHjeVsML9l+/NHD988cEt9A
fz1kdSet1IfWIfkD/h4SX8/4eIh5+SdbKM+DQ3o//cCQ4Y0G6lNsSPoOfiU3
JHvAvMSQxVsVBeCqPYcsnl1g8cSQ8ZHTqQ8HD8l/AM8dPaT4Bff/ZMjyz+95
gUNOHaIcHTuFdvHsIYuT5hpPOyR8Djx/6ZDic+Dca4aU74UeXj9k9qKe475l
SPkg6vOQ8tTU5yHjRyyP+/iQxeetxAn/HhL+ov0ecor1pKzDGiIfPc/ylB8P
yR8RRwzJX2D+04ctnvVQ7iqHlWeH32scFr+PdVg2bHzqUsr96mHK12EV5Ml6
h5Uvw76MDCufz3h8WHwa5DpVfP6jrFP9RvH+98bp14eF/3H/d4bNH80xfnXY
/FWZ8cXDFncvoT4cO6x4k7zbsK1/fQHjP21Y/D3ldtjsYwv5+AuHVX9BuzVs
9XethseG/198Oax8JnmPYfkL8o3D0ifM65Fh8cvMvw3Tvl/ZYnzvsPhf7OPr
w+JfcP8Hw+Z/a8m/bRo2/a2yfMKw/AfGP2PE6mDmE7/VjIgPoR8eEb4ivzJi
OOYTL/dhxPjn6bS7AyPii1k9O2K4o8Lw94jlCZbS72VHVP8IfdpxhPb9cqvX
3GOEdTvfaLH4dET6QDw2In6NeGxE/oB4bIT295g22+cR8XWMX0eUz6c+jyjf
Cn26eGQynrpqhHin3+KP60dUz0e+csT4gUbLI4xY/qDW9HlE/Arxt73vKquP
e27E/NU80+fiek+1OtMR8VGMM0r7Q30eUXwINzNl1Pi/6cQjlaOqB2O91qjy
UYxLRw3f1tF+rhq1+q0m2s/uUdXPke8Zpf85zsP7A6OKP6hHo+LzsM/uKO1G
2PDUzqXP5JVGha9glw8YVf0I5WRU9Qfk30aln+TfRqW/rEcYVbzPupNRp1iP
Trswqvpq8kWjyt9inf84avh7puWbR7W+0KNbR8X/Q23vGdX+4PfDo9o/wIAn
R7W/sAf/GVX8gXV4fVT5Xlz37qjqy6nPo6oXgT34atT03/ieWV76nz9YvqPG
K3yF57R6xd/Aj6z0Kt/C95b+T9zrFR4j3vZaXV0r/XzUSzy5xmP1qV7xm7h/
J6/Fsw2U5z28hmdrLM730v6dsIR24xAv5W+kjLjlKK/wFJ/rtbq7L7zkV73K
H3N/vaqvg524wCt/wTyj1/ikuba/tl77lZOf/KtXeJv22mt1g7X0F/d6hZ+4
j17F47juKa/iceYfbD03WH3C617lW2ivvZJ/jGuzV3wTbvvKq3wz1neaI/6c
euJY/qqV+eNyR/UKeG+VY/FwvdVPO5b/qOb9jY7lnyt5v8cRf4n5dDiSf/YF
OGZ/N49j/qsd40sfJ9/R6ag+nXVljvHFU7lOA8Xr51HvRh3JP9TY70j+4SfC
jq1nncmbI/+AcaYc+QfiQ0f5bdjhbzqKB5iXcMSv4/5dHck7cPmejvgr5icd
6tmFpg/7OcJXjB8c6QPE5BBH/gHr9kPH4lOrgzzaMTzZYDyuY3xHDfX6J7Zf
LyzhfE9xyO/eU8Zx/cJRfSne+yvH8NrLXs7TMXv9+jj293eO6qdZV+OYPs/h
/l7uGF4uY3x9tWN85RLK97WO4ZUa1r9c79C+PVzP+qobHafY7wM/drOj+lA8
9zZH/oHtUI7wDt5/j2N+0eKFBxzpB+zAw47wE+Tj8dL9xEeO4gvi4dL7oQf/
LY0PfuRlR/lV4LM3HMtX1Bh/7DjFfins0/ul9YEf32j69+Vs6vMmR/V18Jdf
lNYft33tGD76D/uipvlUX431muNTvSdwUplPfQWw20t8ij9xfY3PxltPHqjB
x/U5uIl64/Epf4nrOnziS4nffJJXyMcan+IH8qk+7tfXrXz/ep/wEP2cT/pE
O+1T/grjd3zE19Ue6mnIJ/6YdtpnfGMD5TBp43mylv4h61O9EOMCH9evu8Lw
oc/yuwvMb/uUj6N/8SnfCbn4rs/yAwUv5Gtfn9mbD8eh1wf6VH8NO3Wwz/z3
POYrD/cpnwA7ebSt76KqArb9WJ/0A/7rJz6rt7H8/ck+5bOg/6f6hJ/I//qU
b4BcnO0z/+NhPdKvfconwN9dUPoMHHKRT/lV+L/LbD+zHuOLfdIH2O1rbT2C
zey/ut7W48QG+osbffJ3kJebfcKHxIU+w0cVtAd3FOVzAet/7/EJb2K/HvBN
rod42Pb/+0+NQ48fs+c/9Cb7+p72qb4J+/Wcz/ztbK77f32qxyB/5RMfQ/9a
0hfc/5ZP+Qzs9/s+1afA3m/0Kb5lfalP9hv7/YVP9XXUZ5/x/a2MW6b7KS+n
Wz3AAj9/H9BKO1Xup/9r9VAfq/zGH1jdeI1f9Zf0x37lyyDPHr/JSzX1pN0v
PhZ6uNJverjYcJjf+hRmE+91+5WvxXt7/fIXuG3Qb/bxpXHI86jf9OuLcdhL
v9/2Yxb1IeI3ftTqAeJ+5T9xf8ovfM18mF/9KpyH3/BbI+/f2W/738x8w+5+
5cuwjXv6FW8D5+zjF78KvTzAL32Af/u+X/rAuhO/6gEZH5aej7zPj/zii6EP
J/jVLwS5PdFvfHUd/eMpxflXs97q9NL8sW+/8Fu9y2LGC+f41d8IOTzfr/5G
+KcL/ep3wj5d4rd8yIteiMHlfpP/z7lff/Abnp1l9Xl+8fH0z37V62K/birJ
D/ljv9Vz1BlvWHxek9kdv/AU4o17/apXwTr80698MvlHv/wB9OkJv/gl1iH4
LW9h+vGCX/6H+SWb7x3GN71i6/dJC3Htm37FE9jvd02/rm0wP+JXfg/3b/Qr
vob92+IXX43rtvrFZzM/FbD8+TTKxdyA+HDsz6KA+i2oVwHxiXjN0oDFL5av
qg2o/wrPaQoYP7qU+Kc1QHlcb/nnZQHpA9Z5VcDsTTPjg3UB9YNBProD4mOZ
/w8IDzEeDxg+sPjCG1A9IePzgPQF6zsWED7DPBMB1bOy3yNg8WMT/Us+oPwd
640Dqj9kPUdA/aXYn90D8p+U+4DiL8jNvgHjZaYwHvlewOKD98fpJwLm3x/y
wj8dFhBfyHr9gFPse0YYc0zA6hQWMh91fED8E677qa33I0vpp04JMP/7rTri
vNMDii/gR38RkH/A+88JqJ6Q+hyQPFOfA5P7Ny8JqL+I9Q8B8U3ATX8IiJ8l
rx+Q/4Bd/ktA+I24IqB4n/ocEB9AfQ5YvrbO9Dkgvo36HFD9JvblocBkvu7R
gPAU9uvJonxvZD7v2eLny73sz7DxP/gR9+vFgMXf08jHvBoQv4j9fitg+fcK
1su+GxCfj/36MGB6Xcv44NOA7DH267OSflCfA9Z34GE969Sg/APkZFZQ+gCx
XBwU/0p9DoqvAl6rDgp/kR8Lyl9An5qDiq+x7m1B9bvD3i4PWrxVQ7y2Omj1
tFXkh9cFpQ+wa+uD6t+CvewPSh+wz8NB48/eI5/nBFUPSX0OKt/KfHfQ4o+Z
lKNE0OK9Rdy3bNDi1kqT26D8A/Rpx6DwEtTvW0HFF8xzBy1/ZX10ewUln8B7
+wYlv8CbBwQl31jvg4PSB/LzQfFLiL+OClIP/2N9aD8Kin+FHPw4KH9EHBRU
fynu/3nQ7Gsj/dqZQdXfEV8HxS8wbgyKf6BcBFUfQDsUVP0A63iDJs8febFu
VwWND7yK/cnXmLxEP+F5DtcFDS9Ot/rWoPK1sL83237PrbD6Spvf81W0v4Wg
8DjW+a6g8sXMUwZVb4n1fiho/I3Z70eDio+hB08Fla8A/nw2KP8AeXshKL4V
+vRSUP6CehUUHqM+BykHP20hX/ZeUPE2+yPt+hUNps/ByfVPnxfHV2X190GL
Fyy/PS1kcd580+eQ+ctpjJ8Wh8zeXD8OuawMGX7+lOd81IQsr2bnYjSE5B8o
xiH1X8K/tYeUz2K9UUj8E9Z3dcjwYCPtVGdIeJ52LKT4l/FySPED8NpISPED
xukLCT9hfmEb74+L/GpI8s/8WGhy/VM2pH5C5rVCqu+EnO4UUj8s9GG3kK13
DfVwz5D4JsRNe4dUD8X8afH9du7GQSH1B8A/HBpSvxfxdcgpnkcD+3xMSHw5
/XFI8SH09MSQ4d0FzD/9LKTzGjCO00PiY7FfZ4UkPxDjc0Lic1g/FRL/z3pz
W69K6/e/OKR6DNify0OKD7APV4eUf4M8/zEk/SHOCYnfJf8Vkr7RLoQUT2C/
bwvZOQmN5J/uDFn8WU9/cV9I57nAfj0YUj0U/MgjIeUzWQ9ZXM+5zO89HZK/
oN0ICT8RX4cs3rvXy3UKGb/yqRd27c2Q8neQ73dD4ldY/xFyiufr4P5PQsLX
rO8LqX+C+hsS34/7p4Stn6+J9nle2PrWWsxvh4Wn2I8Slr5Qj8Lqh8Rz68Li
d+mPw4oXIKZtYdXTY9+WhRXfwL6vCqsfk7x6WPl51huFpQ/0xzb+lnLKzXBY
57Hgfm9Y+R3sTyCs+AH7HAmrn5R8V1h4if44bPHdVMrzN8LCA/THYcbPW8oM
X4fFT/K5YbPPNeyP/W7Y4pl61kPtF7Y6hEbmIw4MSz5ZvxgWP0S+K6x6aMjT
0WHZe8zzuLD4JfJdYdVXQR5PCnOfjmphPHFaWPV/kMezwqrvYL4mrHgI7/l1
WP2gcKMXhCfnJy4OK75mfBzWeUnMo4Z1nhLzO2HDf2+MM18b1vkuELMbi/Lx
Gfmmv4fNvs8k33R72PDyQuKXO8P0x1XFft+w+tUgR/8MG59XZ/ndsPAIcbqN
9zfNxBXPhlWPBP17oaQP0PMXS/oAv/hq2Hhi42PfKv2fdVjhyf7ho7DqwWFn
Pg0rH8H4OKx6Rs4zbPWtdeQVpkZUD8j+sYjxDZWU80UR88dzKLeVEcNTW9mv
Ux0R34T76yPiO9jvFBEfgnm0Fa+fxXqm5cX/LzI8HdH5AFiHzojlR6uZv1sf
kTzBLvVHlK8jTxYR/4n18UUk/+xni8i+A89GI7L/xN0RnRfD+oWI/AVwwPYR
8bmQpx0jyk/j964R839NzOd9OzL5/KXvRoT3sF77RwyvLaU/OCiieifmSyPm
jxcyfjk8onwdluXoiJ1rspnn6RwXEf/KfFPE4rm3rD8oIv/O/HnE6gnnELec
FVE+ivmniOwlcUxE+IL+N6J6Oq5TRP4AeOnyiM5TI46LqL6D8XBEfBP07C8R
8a2Mh0ufYVdviVgfhPUn3x5RPS7k867i+rfQT9wXMTzdbPXvEZ1fg3V6NKL6
DebvI/J/sDfPFte3nPmYFyKKHzDfl2w8t0/lfF8r3v8h68nfiqh+APbm/Yjq
01jfETH+yfimTRHVtxHnRcTHQz6+jqj+j3Z5TPE0njtnTOfJYN7lY5J/8tNj
kneMq3ZM+WXWf42pvo/HoZT+j3XuGBOfhHGsHFP8zLh5TP385KfHFN/jvb2l
8SI+GBzTfHD/6JitX4X1X4xJ/oHjI2Pqt8f6xMaEP7Fs6bHJ9X7umPmLD7zM
F4/pPAP2b4zZ+s8lP7L7mM7jwHu/Y/MdNzy075j4SPLTY6bPdg7QwWOy/zw/
ZUz12ZznmPAO80tjiqfhd08YE5+K+08qfQa+OXVM8g/e6owx1dtivmePyd9g
vueNWb6gmf7rt2OGr03+LxozvrGG8n/ZmOo16G/H6D//XEa5unZM9oL+dszk
82sv/M+NY6Z/b5OvuLkoP08yP3TbmNm7zaznv3PM8OwMyxePiW9lv+GY+Fb2
646Jb2UcWpIn1seW5J/9RCV5ZL/imPm7FssXjwn/QH/eHFN+gf52TPXk5K/G
xB/BPn4ypv5tvGfLmOJl4uXi/tv5ElOjxm9aPm5mVPEO1nlxVPwZ8F9F1OzP
PPLB1VHj36cSv9VHxV+zni9q/vlvPD+xPap6PuaHi++fTjleHVU8wPqOqPKx
8Mvro+aPrV9iIGrrX2vxblR8PfPDUePLmi3ejUoeGe9GhX94XkhU+sD6jqji
YdZ7R4WHmE+Kyt5DjnaNGm4x+79nVPE680lR8b3kVaOqb6WfjIofI+6MKv8G
uTgianz2YsrVMVHVK2E/T4gKD+E9P41Ozr/9PCo8BL09Iyo8xHrj4vrPon07
L6r+MNi330RVv8Y6lajwM/bl0qj1Q9UR318ZFf7Ga66Jiq8hjxBVfhr27a9R
xcus74hKnjHfW6PCS9DzO6LKV1Bfo4oHEMfcHxVfxTqSqM4Pgzw/HlV8zH7u
qOJj+JHnoqrnZT1sVPER9TWq/D3uf72kDxj3O1HFX5DDD6IWn+3O89g+jorf
w7Jvjqp+CeuwNSp/gPWaElO/OfmpmPFX1h+wKCY8Dbkuj1l/cpPFtzHax/IW
rkt9jPJ1XwvteFPM8LWHcV5bTPiIcW5M9dqY36qY/Anmty6mfAH7GWPih2B/
+2PCO4xvY+JLyTfHLP5aSvwSiin+AT6Ixuy8y0Xcl0Rscv45F1M/Iu1KzPz3
6zzPbKeY+YOnx8k3x3SeF/FxTHwR8XFM5wdhvvvHxJ+Sn4qJT+T5BTHV9zC+
jem8Aq5jTOd9YL7Hx9T/i/ecGBN+Z/43Jr4H4z09pn4G2MezYqrX5vk6Np/t
7P7zY8L/rCePyR/h1yUx1d9SX2OWr622/qCY5B/3/ymmfkLYkRti6qdi/XlM
fCn55Zj6gYAbCjHhT/LLMfU/ID69Pyb/TX45pnoM8ssx9b+QX44pPsRzn4up
35f8ckzxMdbrxZj1p9h5ka/FhEeIj2PKR8POvR8Tfse+fVTSD+Ljkj6QX46p
PhVi81VM/oZl7nHVb8P/zI1LPzG+srjwD+ux4tJv+I+auPSf+Dgu+8A6wbjs
B/cpPhn/r4zL/rAeK67zyID3uuKmv1OJX/riFv/NY331YFz7D3s4Ghc/xPxQ
XPwQhhmJS76or3HlnzHfTFz2GXqdj0v+Md4d4+oPor7GlX+Dmd49Ln8BP/vd
uPLJzA/FVe8Bv/S9uNUzNtJfHRLX+V/Yxh/GJ5/nenRc/bJQw+Piyhewfyeu
/Ar9dFz2g/08cdkXrPNZcfHV2LZfxYVPqa9xyT/jrrj4Dupr3OqYy4grrojr
nF7M9+q4zlOjvsaFL5jfjYt/wbhvioufgdzdFpc9h17dERe/g/HeHdd5Dxj3
A3HVU9C/xqUP9K9xyT/+/HRc8Qj9a1z90/SvceU/6F/j6hfnOseFhxB/vBO3
+t9FtLMf2Ho8PpNyuNHmO/I58wVb4qp3gTxujQsPwU5MSVj+bSv7q+cldD4J
9Hphws77rmR+rTJh+fxqw8MJnQcCvalLyN5jO5sTqt/GOFsTsu/knxLCOxjf
6oTiW9qxhPIHrJdMiD8Fnu5PCP9g2MMJ8aGcd0L9q+RtE8JruCyaEJ5j/ich
vEf/mjA+f7HxTwnVa8Ff7JxQPyFw/m4J8+cvMP7dM2H14W8w/t07IX+N+R6Q
kL1nv01C/A/k+LCE7CHk78iE8cM1dj5Kws6/qrdzVBPi4+EfT0qovoL528Rk
e31GQv2brMdICO8Td5c+M39buh77+/uE6vmgN5cmlH9gP2ZC51WwLz6hfmg8
97qE2Zsa+rcbS/NlfWRC/X/M9yQU/2K8dyTUP4j1uiehfBnk+cHi50eIfx5O
iK+Avj2eEP/DODeh81DJUyR0ngrHnbB42viflxPqJwYMfSNRPMeYfOq7CZ2f
g2X4IKHzNamvCeF54uyEzoeFnn1Zkn/yxUnlB7BOM5LCR6ynSlr81mTnjyWt
vqCe8U110nCn2fv6pPAO9TUpvM/6i6TOV6C+Ji2/YfUTq5Oq98W6diZVT0S+
OKl8MfZ5IKn4F+8dTir+xXh9SdULMH6165+2c9CjSfGFsJ+ppK1/g61LUufx
MX5N6vwAxq9J1Ysyfk3K3jN+Tcq+w37uU/o/+aak5J3ntyRVD479ODQpfMW6
zKTwF5blmKT6jeD3TkgqvwExPDEp/A87fEpS9p48bFL17HjOL5Oml5/ze0zO
Teq8d9ZPJfX9BVCbC5NWv/sZ8/mXJq3eZCbxwBVJnQ+B516TVP8zzPafk5J/
3HdDUvwJefuk6td4HkpS/W3Yp0JS9UWY1t1J8TXAAw8kxWeynrkk3+zPTYpP
pVwk7ZyTFuZ3/51UPR37E5Kqv8Z4X0mKr4J9eyOpelOM++2k6k0x3w+K8ruY
+rAxqfPxYc83J43f+HoceOLLpPmPt8eprymdz8D8bEr1dZjfwpT61XgOZsrO
Dyin36lOqf8fYlOfsjqIWjvHISV7Sr4ppfOKMK8VKeFv1leklA9gfUVK+IfP
TYnPYdySojw/bufZjqSkTzwPJKXzB2B/QynVb8Avx1KKzzHfZMr45BrT15TV
Iywh3vlmyvxrOeV655ThdcsH75ZSPSnrl4vr8Yn515T6m+lfU9oPTPP7KZ0f
g3EcmhLeAf4+MqX+LPa1Ftff6vFPSKmejv41pfNk8PvnKfUn0L+mlB/med0p
4RPywynJL3FiSv6BcXLpM+ujUsJTjF9T4pfoX1O2b4083+b6lPoz2X+Qkv1n
HU5KeJ/HVqRUHwI7eWdK+RCWOaR0XhJ5npTVe22hfflXSvYG8vF4Uf5e5PcO
PZMyfd7C/v/nU6ovJR5O6bw34uGU+nfJD6dM7qusXjklPES9Tlk8Vm91CyV5
ZD1FSvaZ/HBK9Qywx1PTOi+V+Zy0+CLyw2ldDztWmbY4oMn2Na3+ZLy3Pq3+
a/iL5rT522ruS1vacJbVQ6xIS/7JN6WV7yI/nDa+wuS/Jy3/inXqT+v8QcYB
abNXr7M+yEkbHtg6zv6htNkbq5+PpiX/5IfTygcRD6dVP8e6zrT1E9fa+Zdp
yT/zOWmdR099Tau+k/41TfvV3EJ/cUBa/CjxcOkznnNoWvLP+uS0+H3sw4/S
k+X/hLT4KOZz0uKrYAdPSU/u3z8jLbxHfU3LH8Ien5fWeSHY39+mhf+ZB0rr
vGni4bS+n4J4OG31RJ/Z93ylJf/kh9OqFwae+Gta+QCeP5XW+fXM56TV38h8
Tlr5YPbTphUP4LIH0vIH9K8leWefWlr1PlDnZ9LCS+wvSKveAfHZi2nxn6yf
SCv/QH1Nqz4DePa99P87HzRt57NW065+mja+ZYnxS2nF/+SX0jofBPs8NaN8
IsY3IyP+B+ObkxEfDT2Zm1G9KORpQUb1cbA/izKyf9Cnsoz4TtjxyozqjzHf
JRmdb4F1rs4o/mV+NzP5PKL6jOQZ823MKB6mHmSEd8hvZcR30l5kxHfC/yzL
iO+k/cioHgPvXZmx/FMd4+PVGbMX1ZT3tRmLd5aQn+3MGN9cxvimO6N+Aujn
+ozZz6n8PqDejOH9j3l+RX9GfBvPZ80Yn/Ex44HhjPL1mJc3o35l7kOGeCFV
zjgmkBE+wLxCGZ3PCPmMZBT/Qi+iGdXrY1iJjDPpe09SGdlz9l9k7JwUj53v
nVF+DPubz4j/ZP46I34U+rhDRvE17V9G580wjsuoPhTP2S0jfYW93SOj80x5
3kpG9Q64f6+M5Z/nc7z7ZNQ/gPHul1E/JvbtgIzqEbGOB2Z0vgvtaUb9+sB5
h2SML5rL/pDDivpSxnjx8IzOT8b+HJlRfzvr1zLqP6P9zajegPUwGdl73H9C
RniG56OX5B/z+lnpM8+hyFi+3/zDaRnVF2FeZ2bEr7J/2/Tj7To7zzEjfpb9
YhnFu9CL8zKKdxkvZawecZ71g2aU34L/uDBj8dLH41iHizKGp8/n+V+XZJzi
9ymyXzRj8dJU4y8zqvdl/6hd/+MyrvsfMjrfCPjm2ozFQ9XEAX/KqH+R+C4j
+4r9uCFj8UWz9d1ndN4R+c+M8D724e8ZxbO4/x+lz1iv2zKy9zzvMCN+B/O+
I6PzvSCWd2eUj8Y47s0o3mW+I6N4F2r/YEbnk7JfxvTz5EXUq39ldB495Pex
jM6ngN48njF/8xrP738qY/nF58axXk9nVJ+F+T6XUf0K5OP5jPhs6MF/Svaf
9b0Z4WPYhZcyOt+I884IX2A/3soo/uT5UBnVR2OY72XE9+M5H2R0/j3zLaXr
IXYbS/qD8X2aUT4X67A5o/MnIL+fZfR9P5jnFxnVt8H+fZVRPRPs9ZSs8A3r
mbJWnz6T+jYjq3w55H9WVngS852bNXl6lt9vNj9r8f4WL56zMKvzqKCvi4vP
n0/5K8/Sjv2y3Oobs8L3wCVVWeF7yHF1Vv2V+HttVvJPPisrecR8m7KTz/9u
yUofoGetWcXDsCvtpf/j/mVZ5Qsw35VZ2XfMd1VW8o5lXpNVvxv2d11WeJ/9
/1nhffiLnqzyW7D3G7KKd7EOfVmLn+18zYGs6svhL4az4hfwezSreBfL5mRV
rwu98GdV/wncFszqvDvISTir+hfIx5jt7/FVzP/HsjqfHNuYyMr+Ayelsjov
C+uUzSr/hHG4WeF17O83ssoHM/7Pql4Idm/H0vU8zyhr+K+J+Ylvld6H/d09
a/jDvr9vj6zsP/DPd7LSZ8z7u1mdhwm7v09W/faY735Z4X2+p7jfn49D7w/K
6nxayMcPsoq/oDaHFOX1U8Zjh5X2k+fJl/Yb4z0yq/4Qnp+XFR5mn0NW33+E
+R6fVT0B7j8hq/oy2L+TSvqA8PSUrPAQ8xRZ9XdhP04v/R/TPTOr80zpX7PK
p9G/ZoVv6F+zOm8C0zwvq3wW9PV8k5ctlRz3b7PKd0DfLsyq/h/bflFW/WHs
98yqngrjvixr8eC/KP9XZHW+PHmDrOEJq/e5piT/sMd/LNk/ni9Xkn/Yp+tL
8g99vSEr/oT1dlnha9jjm7LiG1nvXpJX/P3W7OT6hNuzig9YL1D6zLqRrOUn
mmiP786KT8I4782qPxL7+0BW+S3iuKzwGuTq4azOn6EcFvW/nPN9LCu+B+v1
RFb1gSxrzhq/toXnaT5TnP/L4zxPIqv6f+zj81l93yDPl8iK/4f8vphVvzjs
8ctZ4X/Gk1nlg/D317PCQ/S3WfEr5G+z4tsxzveyygfQ35bkm/42K/zOvpCs
+E3626zOv6a/zapfnv42q/ia36+QVT6C/jar843pb3Oq18B8p+V0vgbzHjnV
e2K+s3LGK83jfOfmpA+Y77yc4ivyMDnDM//w4vfinPqV6G9zOh+Y+dyc+Gzg
96qc+j8w3+qc8XuV7A+uzQlPsG48p/oB+tuc4mHMtyUnvAL568hJnjHv5Tnx
ORjfytJn2M1VOfGlWJ61Ock/5rUup/408iQ51ffj/p6c2SPja3tz4vf5fTs5
fT8fz+vIqf+L+amczq+hnORUP4LfTk79qbCngZzwP94bzImfwHwjOasvm0M7
EM1N/v6beM7ir0ra/WRO37/J+uqc6gUg57mc8Ad+53Oq/4d92T6n+jfYrR1y
ylfBT+6UU70CtmWXnOJjyN+uOeEhnt+dUz0/5rVnTvU8mO93cjo/Ceu2d07x
LvR235zquaH3++fEb2F/DsyJ/8X+HpQzezKDOOngnPWXbvFi3Ifk9P2dkJMf
5lTfgP09IqfzVoDrj8pZPD2T/e3H5AxfLqQ9PjYn/g9ycUJO/A/05Sc5nUcE
MfhpTvgb8zo5p35ErNMpOeEXzPfUnPh+zPeMnOJbzPfM0mesyy9zigdYX156
HnDAuTnFv5DHX+cUj0COflMaL557QWk+kOcLS/PFeC/OCQ9ivpfmlB/EfC/P
6ftsgF+uzInvR1x6dU58P+Uyp3oUzPdPOcuXzSTOuy6n7zuEPb0+x3q906xf
+K851T9DHv+WUz8khnVzTviD8WtO5w9BHm8tySvs0HhJnsnT5dTfi/vvKn2G
Xt+fU/0O+0dzk/mlh0ryTn+a0/d1MV7NqZ8FZuGJkrwzXs3Z+SkLOL5ncuqn
RlzyXE58Mfb/+dL68nzLnPwv/WlO+V285+Wc+pVgd1/NCd+yTDQn/Iv5vpkT
Hw47+XbO+LUa5ofezYlfoT/NiW+EHfgop+/74HluOeF5PPfTkn2HGG3OKR8M
+fksp/o4hp059RuT/80JX1EPXMUfsGfTXNUzQ35muDZfq2ee5Qrv8Hw4V/E/
5H2+q/NnID8LXNWLYNiLXLMXz45Dbstd1dvCHlW6qkfHe5a6qs/CcGtcfV8u
xlvn6jxn9s+7khfqlav6GMyzxVX8y+9zcFVPhvXtcIV38Jhlrs6Hgx9Y6Qrv
M351J+P/Na7knefHu/In0JcuV/ktnq/hqt6O/tUVPws96ncVzzNP6iq/jTBn
2JX8Q568rvpDIfc+V/UN0J+Aq+8HgV0JueJ7YH8jrr7fEvoXdXVeCs/rcFXf
yXov1+ppy4i/M66+Lwb6k3OFH2An867yXbC/27uyt5CTHVzV/2O8O7uKf/Gc
XVzxQ9in3Uqfsc97uKrfoX91Zd/pB13VL2D/93PVn8n8mWv4cgnx2IGu+E3G
p67Oe8DzD3FV/8Tzf1ydPwq7crirfBbs0ZGu6gkhx0e7Zq82e7GvP3LF92A9
j3eF7xmfuur3hp0/0RXfCf97kqt4Ef77Z676XSCXP3ctn2bnM57m6vvc4AfO
cHWeCvT7LFf5Xvz9l674UZ5v4Kpen/l4V/4D+3G+q3iCcuhOPr/ld67qlxmv
uvJXuO8SV+dfYLyXuTpPDvO9whUeZH7QFV7EeP/gqt+d54W64vfhx/9UnN87
/H7u613D81uJR29wFe8yXnXVz4d53uTqvHLc/3dX8SFxoavvG+S5uMX9rmU+
dNxVfRn25U5X9ZaQj7tc5cPIo7uqB2Lc4Co+xrAfLMk7xvmQK34H8/2XK/9D
/+qK78R8n3DVz4j5PmXPe6SS/uYZV/kt6P1zrvpZmN909f3n/NoI1/q2P2F9
24uu+ukYr9r6bHyNfMSrrvAO41VX+V287y1X5/WzX8ZVvgfXvedav4V9P/kH
ruJd/P0jV/X9rEdyFW9ivJtc8TPgpba44n94jmhJ/lkPXPqMdfzKVT0D49W8
+rfoxvLCW6yPyIuPYv1wXvEs5Gd+XvkN9rPnjf+YS16iLK94lseI5cXvsB8g
L36TcWBe3++G9ajNC++wPiovvAN71JhXPSfktTmvenbwRJ685B160J5XfpT9
tnl9Hx3rqfKq74Tcb5cX3mc/X17nkWK8a/Oqz8Hfu/KKf7H/PXnpA/ZtQ37y
94f05eVfMK6BvOrtIHdDNt8rlnK8I3md54D9d/KKb1lfmVc9J/nfvL4Pmfxv
3vzVxnHWR+fNHj3A9Y3nVV8LeU3mLT74it8Xmi4+bzb1MJuXvWN8mld9I/zT
9nl9HxTs5w559ffCzuyUl73n+RwlecT9u+Yl3/Bve+SFd+g/8+L/+f00+cn8
5t551SuwvziveBbrvH9e+oV9/l5efA7ryUryD7/wg7z6E1i3mzf7UEY9+2Fe
9X5YtiPy4oP5/a951fOw3zEvPhn7fGxRXl4nvjkhr/wM9v0neeVvgDdOzIvf
xHxPzpu9s3jvlLy+Xx3zPTUvfh/rfHpe/Cbme1Ze9hiw6hd52W/M91d5xae4
/5y88Dzm++vSZ+LMkj7wPJK8+B3Wq+Z1vhX7pfPiN1mvmpd/wv+vyus8n/8D
KdjzPA==
"]]},
{RGBColor[0.6, 0.24, 0.4428931686004542], LineBox[CompressedData["
1:eJxdXXecXHX1Te9lW7I1uzNbUkjbmu07b3rv80NApSNVUFB6EUEQAUFREEWk
SxMpKqDADlVAmnQEkSaEGiAQasIve86dM5+VP1wnM++9b7nl3HPv/T73nofk
9pk2ZcqU6XOnTJn4+93Rec9c+p3bPZ8ff8Bt3ztnRdHTt+tfowvu8mTOPO/g
qrtdDj5Oe8LzTvaW5h9d0+Gc6z/9oDe+eM6zaO2Nv920b7uz/X9/f1/8P56j
3lzeNecgl/OPi4N/2bz1Jc8bX1z1weMP1zoruuZc27TLa57vn1M3Y8dFc52f
vXvs9ke87tll7+H/pM/8vWcK/tvo+dXBVScVH5xZxD+f95YH9zluSfHT/KuX
/+aedzzvTVz21+bixCjrZrzn2bLyG2fd9XFr8Yrf3OO6/tD3PZd9Z/tE9uoo
Lpi2+tSlz73vmRjOtd9YXrzyvnj/ad4PPRN3v3jm8uL1h+63fQibPZjWge1F
Pv8jz8MPbf/vDHeR9/3I89SRE3doLDau/3f7rBM/5vzWLLXnbfFw3nOLR9zx
u4b1/97iOabmuvDLR38+jnV6+xPPib+cWKi3PRjujp/a/aY7dz44MbHPPBOr
eNUHVbZen3uwPGubnOc/m9iILzxuDNTtTGzDScUvPf99rPX5z+5od/C49m1c
/xXLHcz70m0eTHvRcofzmeL8+vyJ/9odjPvaKdy3v7mdCyeG3T/VwXwTjQ73
f6qD9Y9VOhO3eeSTqc7EaG787Wdcp9XTHK7DL22e05yKnQb/dP/h0239pvP6
BxcUP3w8uWfFTqV5Li1y/NN5/dSmIi6vmeH4dt8+o6+7i7ztDP6+p624fbO2
fzPDqZ8YQHdH8bCJ7fLMdELbV+nJTzuKlJuZTml/12IjZlKumpcXKZ8zHd63
o/ijtyc2ZJatU1uR+zDbgZitay1i+qOzHazn75fZeGc7MQhSfXF3LPxsZ+JX
875WUdz2JG5g6zuz+C38N8f5+4SY7f7JOOc9x6G8f+Dh+Oc6vG6Gk9pzYuXm
OhOrd8fvqm2/5tm613GeR85zsP9rXc72xdq+YvOc7Uq093BLq+3ffOfRT7Yr
xtfb7T7zncKEmuxe0s/5Dtexw+nBfwuckv62QcAWOHNwww577gLOd8c2h/qx
0J7rtvEudLDuC5fZdYscTO8PdSY/i2zci+1+izRfTL9vsVPSd67vYod6vmWc
+rbY6Zg1oTGLilz3Cs7z5priMlxYQTvzjzrq5/dLn1uKE2od/EsFr/+Hu4jH
P1HB/X2vzfS5wqE+the5HpVch2M7irBTyfJnTGP/Sskf7M3Jlc6qidtc2V5s
mRCoCyspX0+1FWmXKimPL7QWIS7bKjme+a7iCbhBle1DU3HCOmQHqhxs26/r
ON58lelbTRF/Dqly+LeC472pyqEczynmJm7wzyqTz/+O005UOfe6Jv7Pm2Zn
qm1fvvJ8tHViI6qdkhze/fH2BfFVc1/+XOFMTGvlN6q5XzfUOBCbS6od2Mtg
k8lLtUO9dVFvn692jpuY9mlu2+9q2q0/tToTy35wVY2Dn93a5nx7YoFzNZSj
77XbuGr49/125+rtq7/n2TW839wOB4+5rsaBWl3R7kQmPv69xoGdXdZu+1gj
ecX1FUscrmurjXuJw31odmonlnevJQ729c0Gx/wK9aal1vZhCefdWu1A3h5d
4lAuFnEeny1xaPc/9XDdl9r3d3ko50ttHTaNU16X2n5NLULvDlzqwBz55xUv
mjDfpyx1IEfNlUXY7UeWOlCzSD1///ZS2SOY39m1lOeDXcVDJibornVgfu9w
F/F3rJbr8FhrketbK3tH+1Ar+YX+/q3W7E5HEXbtmVrpB+2X3e/s9iLtWJ3D
bW4v0k/V0S85beYP67jvj7vMPteZn2ou0v/UOcAVZzQUsc8P1Mk/8Ll1HN/K
6iL/1jv0+wuLti6yr4mJP/vUU9+arh4HTjmpnvZo7UcezrfeeWLCDQ1Ot/2s
N38w3/xtPeX+hSW0o40NDvelweyVfZ7VzHnnGziek122Dw3UhyfdpkcNlNfX
W83uNpietZsdanBK/pt2tNGBn3y2nfu8opHydWO7c8nE8AqNJk9tNu5GBzCq
vc2hvWk0e+GiX3qm0fR2GfXwo0ZnYtSvXl5v+mi44qMlXI90k/nTSsMbTdSv
f0/l73/e5BC3vOWZ2AXX9U0lnDcOfX68yeb55TjHu8zsxGzb/2Xy9wEAnWW2
X+4i7dUys++thjebDRe22/43O3S/HUXof7iZ8j7WUcTHPZpln6lnzfS3j7TT
Xzza7MCdrGm35zXLP9Aut1A/2lxFrFNHi/m7JuKHY1oMt1ab/rQ4xAnzi5Sb
Fhvv++a/Wuh/Xa958LN5Loe46QuzDy5bz1mUgzEX7dKrNZSHpMvsYT3t1P4u
yt0TyygHR7j4/OPcZldclJcPW83Ousy/ttOvPuOSPYW+/Ndl/rKd6/ahy8G+
rGp3gI+num1+bdQzl1t4A/rld9O+3tLAfc/Y97stIU75tpt69Jt55sdL93vP
g3X8tdvs2evj0L/b3fJnHK/b9KymyPG6nQcOnxDIetqXD90OcX9L8f0J+DO3
lev7tsvkpdXsQ2uRetfqYF/+3F6EHcu0OrjutA7ihcNbqZfXleSn1fBvRxHy
/fNW2T/Yn/sNd33iMntZ8nPLitj291u5jncuJZ7c2kp8/VAl9WFhm1OKF/D7
zjaz31M4n2ibxVmbPBCLfdpsPxcQNxzWZnaqhn7ix6Xv67m/l7dRDgZdJudt
3P/t9/3ndnE7/q022Rf6szbu3+86HGzLrHbT/w4H+H6onfK6tIPy9LV2s4et
fN4+7Q5xhot+5Aft8qfEde1mV6oc4rN28zcz6Afvbje79bwH+/ZSu+HFjYZn
2h3anWmG59snxxd1Heb3q239Osxf1Beptx3yj7jPdzqE1zjeDqcU7zLu63BK
8SPE6YIOBzircjnx4FUdTil+xPr8tcOBH764w+xNh+SNOLDDxt9GedvSIfsD
uLV4udmDZj6vaTnt1Tu1ReKX5Xx+djHx8I7LTX6mUT/2WW5+6L1x+LmjltOu
HP848cm5y83+zDT5WG74qML2Y7n8H/HVcsP1DRzX08sNnxh+enW5Xecijvto
+WT7MH2F8BjWY/EK+T/cJrhC8QaGnVth+t1Bv7b3Csknrj9rBXFjVSv9xgUr
KKchF+3NH1aYP2uiPtxv9//bUhv/CvObleaXVzgl/oG4cIXZxS3kKRauZHz0
9g0ejKN7JZ//+MfjuC61UvoMfHrwSuKbyxooD0evdC6YgEH7tVAezlpJ/3W+
uwj8fcVKxbeUk5WGT9otfrXvN7dTvp9dKXtE+7JS8kp7vUryRn1YRfv2QJvh
pVXEB8taiBf3WGU4o4Hxx5GrZG+x/6eusvnOL2L9zl1l/mwq5e3yVXo+6aJV
pt83jQP/fLyKchSeyn2ftoP5g1qu6+odFD/CLcR2sH9vdRAf7bQDn3dRG+X0
yB0c6Ena8P+pO8i/cXw7KP6FP7txB8kf48sdaA8C5hde2oF4faHb8NgO5leb
GO9+uYPz5QSc37OOz128WvE59Wa12b95xjusNnx73zh5pNWGB7aNYz9PWU29
OGlxkX5vtfQbuOjO1fbcFsaTL642v+0mvn53tVPityivq2lvXm4zPL7G7EO7
xZNrtD9c3zW8/21thpfWKD6lPbTvR1yML05dY/5rWRHrdVH5ftS3NfQLny/h
/R9cw32cN5/3f7k0nqmMR7atMf/wJHm+hWvN3n3poVyulT7SHqx1SnwhecW1
0m/yTGuFd7m+a50SP0Z/s5b2cX6b2Ye1Js9txPu3rxXeoR6vpT3b0G72Ya3k
D/5281rhK5iR6etk7+i/1ykeRtydXSd7Cjyy3zqtH/mKdcJ/jNPXGT76l4dx
2TqH+/DWONbt/nWGL+bR/j+9jv7n3irDs+s4zpvqDG+sMzvYZHh6Pe3qay1F
8FT16x3EmSk35WlsveI3/D6x3nBfO/HubuuJd45oN3u3nutwUrvh4/Uc7+wS
H7Je8sr1X2941k3+bny94lfK+3ryG5sabD7rqXdnLeXvv1pv9rnS8HqnQx5j
NvmPyk7zR5+NE/91Kv7Dfdd3Gl6dRfsy0Cn/B70NdFJ+f7LU7Eyn8WaNlLcd
OynvR7cYzu0kPvmum3Hyvp2GZ1uNz+ikvG/HZVy3TskX5nt8p+wX48xO8RuQ
p7Ptfvu2049c2Sn/B/t+S6fiT65np/ndRq7LfeX5YD0f7jS+oYq45tVOw4Pb
yLO/1Wnr+xj93YedimegZ1s7DW/PLEKOZnSZP1jMeH5BF/3N3BriKVeX+C3Y
6xX2fdRFPmt9l/APzEZ/F9dxhfETni7JH+6f6BIfQTvfJb4C89qrS3wG7W+X
5BHrdmiX4em2Isz40V22Dm7ytad0mT60EI+d1WXxSGMR+39ul/FvtdSv33aJ
n2A82yU8Tz3sckr8P+OxLuPnnhvHvv69y/iltymfj3Y5JR4bcvJ0l/Fqi4lb
X+yi3P6qxnBJl3gFyP8HXWa3mslffd5l8bbb5t1Ne/nNVtqFOd2ST+YxuhUP
Qi27uyWfGMdwt/gH7H+gm/Hwv1q5j/FuxaPk+7sVD1BfujVexjPdkk+ua7fw
GR57RLfxVZYfOr7b/OcWD/Thx91mN5/yQH7O6zZ78uU4/XS3xe9zySf9vlt4
jbiwW/aG8Ue32c8W82f2+zPMXv2n2/xdG/3jG93CZ8B3m7otH2Dxwpfd4iOI
f3q4D3eZfM7v0f2wT+4e8SGY38oe8WX0Lz30x94G8s+BHuN9KsgPxnuMp7J8
2dd65D8gx/v0GH75kHmtg3okb3jusT3i6/Hck3uE1yAfZ/TYPjYZ/u6hvC13
Wz6ph/bymDbLK/UIvzMO66F8bG2n/P6jR/KG5zzfI3+L/Xi1x+x/K+//To/8
J7b5wx7LN7RwXl/1WP6o3nBZr/njJcQ1Tb2mbwtpx9p7TS82eyDWPb2KnzCe
4V7D7zOL+J2vV/EX+a1ep5T/I/7rtbilqYh5HdhL3maVu8h17dX4IU8n9IqP
hRie2iv8jvGc0yt7h/Fe1qv4APe/ppfxxM5ttJ839xruddOf3tErPEd7U34+
7U2v4doG2tPne+nntlTxea/1Wj5rQZH+we537DTqzxe9lnd6YBzx4PQ+m/9m
47v6iMvum0EesKnP/FSV4aU+44kaqO/9fZSv/7QYr9enfAL8WahP/hXzyPcp
n8D4vk94Dv5m3z75W+jnIX3Cf8SPfcYvtNEOnNVHe+E2/vS8PqeUf8XPL7Tx
ROvMT/dZfF1jcthHXuWACsrFQ31ab/x9os/W75lxLNPzfU4pv015t/V4d1GR
/EyfxZPV9Ceb+4xfqDU81Cd8R3nfoPwS5XuD/Cue37OBz/tJG/dveIPiQ/J5
GyRPXN8Nij+wf9/YILwGu3fYBuON68ivHL3B7FM19eWHG8w+L6S8nr7B9m86
rz+n9PuPxmlPNsgfYv9+v8Hyy1s9eM4fN5h9nM2/t20weamkPt+zwfzOUsZV
D20Qf4FlenqD2bNm3vflDdTvjS6uw5sbxGfRL2yQf8O6fGbj27PNcEe/xRVt
5k/7Zb8g3xX9ij+Zn+lXfILfr+ynvF5l8UJXv8YHvRvsp5x9q9Fweb/iIeCO
SL/502rjX/tlv2n/+w0nzLI8cL/Jy+cezHf/frMnL3lg177bLz6W+9lvcfO2
cVz/g37D13PIr53Wb3x0hfEb/baeNUXc9/x+xSNY74v7ZR8xjiv7J+OtP/Yb
vjR7eUs/4+/WVuLJYj/nvbGV/vH+furl8W30j4/1i88DTnq2X/Exrn+pf3K+
f2O/8Cb5lH7q8bdb+fxP7ft93Yx/pwxIv2BnqwbE9zIvMWB4Ywn9feuA/DPt
0oDh5TnMx3UOiB/A74YGKLcHvTFOfzNg/PW/PeRvBlR/wfhywGG9yEzawZ0H
jJdbxH3bfUDywf0esLx9rcUtA2a/LO905IDho2bO48QB+odHXcYvD0h+6ZcH
iB8eNv04f4D83SGmHxcNyN4yfhkwfTX9uH5A+oLrbx2QPca/FweoH/u38vr7
B0y/3TavAcOjLbz+uQHxSbArL9v1q+pNvweYR15n+a5NA8TTdZXU888HjO+e
w+dPGVR8hOfPGTS/8boHOKNxUPEm9XvQ7MZsxqerB5XPxTp0DxpPvoT6MTio
/C550UHZc/I1g4rXIS+ZQcXrgHG7DFJ/j2q1+Kd0/zb6jwMGFf8wXzCofBpx
Wvkz9OyH5d/TT5TvRz82SL7hR62sfzl/kPj3MDeff+kg495OF+d/zaD0A3J6
wyDl9Kh6jv+vg7SP55q+3DVoea5K2pcHBi3vP5f69vig5ZGmsL7iX4O2X++M
4/pXBpU/oP8cVL4N8vL+oOwh46PSfCuMnxxSvQPj2CHDL3WGX4YU/zM/OKR6
GMjT+iHlY7GNG4bseZZX8QyJv8Rzw0Oqf2DdQPl74KqvDUl/oKe7DonP4r4M
iX9i/DQkfSXfMGTr2czfnTAkvEW8OSR/Cd7tp0OmL1UWZw5R3h6ZRzt00ZDh
yymM664ckr+mPg8J3+Cym4ekH8R9Q2bPZjG/eu+Q+FDi0SHay6GaIsb/zJD5
/7oi5PRFm3+8yeoDhhSvUe+GpB+Qqy1DxOs/azW8NGS8YBufP3PY6kLaaf8r
hsUf0O8MSz+4LsPCS4yPh8VvQZ6GhoW3iGuGjT92UZ9iwxYvLGP+MjdM+dmj
nv5j52HjS5YUmXcaNrxXYfFE6XmzqA+HDpv9+px48phhi+/+NY7rTxrW/kAO
Tx82/zCFzzln2PDqPMP5wybvlfzdpcNmT5dSj64ZFp6C/7lhWPlo5r+Gjad3
UZ/uGqac3O+2dRtWPQT1eVj4nfo8rPwQ7few7X+75XWHxYeRnxqmH6go5S+H
hbcw/+kj8h+sUxmhnW+wPPSyEdP3RuK+5SPKV7JOYET6AFiyYUT6ADUYHVF+
g/H4iK3fJg/sVmrE9OFR1gP834j5z0/HWV81YnUnM4nX9x4Rn0Z+dcRwY43x
xSOT9eH4EeEp8ocj0geM/4yRyfpw7oj0gfHMiPAT44wR1fMQj41I/hlfjjil
+ljy5yOKR8k3jki/gAMeHVH9EfNvI5Pj0xdHjP92Md/1+ojhimW8ftOI4lPG
pSPCV8wnlOZbyfHPGDX/PI/4rW5U+Qfu66jxv4/Qn68cNf7jCw/zjqOmH7OJ
JwZHzT5VEM84o+ITiL9HqQeV9ZSj7Kjh+Sbq086jimep56Nmv9wWn44abm81
PDYq/0E8Nip8RDw2KvxE/D1Kub2vFL+OCn9Rn0eFz6BPF4/KXxGPjU6OP24Y
NXzYbHo5qnpg5oFK4601fR6lXxypJp57bNTiM6uPe27U9HKG6fOo6csnXP+N
5f0gjh2VP+d15f3DNkwZ0/4Cj1SPkb/5YSX5i8Yx06c62s+2MdlbrPvqMdX3
kJcbE74n3zOmehH8zj9m+ag2s99j0hfgnvyY8vnAU18fk/zT7o8pvmAdfPn+
xE1jwk/k38bE15B/G5M+kIcckz5ADn8xZvpp/NMFYyZnxt9cNmZ84ALWs/5h
zPDYdMs3j9n6fkh7dNuY8t3MK42ZPdtsdftjrEN7chrzcE+Wvrf6uX+PWd1o
FeXy9THhC4z/Hfv8bL3xTKXvlxEnbxsTXwx7MstDO99tfHKdR3gH+97qsbx9
K3H6Ko/wEeMID+3lna1Wv1K+nn7GI32EHkQ94n9Yn+oxPTP/totH/g/yvIfH
7PlSrtuBHvFbkM/DPOIbGU97VP/M+mGPxYfWR3CGx/ii+z3cX4/yL3jMBR7V
jzL/7rF4fZ7tr0f8NvbpTx7lZ2mvS/evp7+4z6N4g9d55D8YR3vERzP/YOsx
t9XstcdwQavZaw/518Y28s+feJRPxDy2eaRPWN9pjq4nznAs/+1m/rjSET8A
OV7iWN1mo9VPO+Kf8GeZY+tTw+vdjuqlMZ8OR/WI5GUds5NbxzH/NY7ib9jd
Tkf5WOhLnyP+hHVVjvHrs7hPY474F+iZz7F8nNUthxzDa3Umb474HaxvyjF7
1ky5zznCU3jO1xyr53Qbz+04pbo1XL+ro/w0nruXY3rTZnbOkb5ALg5wxKdy
nRzxX4jnDnOEl6CPhzvyZ4wfHcN5TVbv5Vj9Rz1xxEml75dwvqc5wpfQy5/Z
eA+dRrvyC8cp9ceQT3AUT2B/f+tY/Pcp9+ciR/0W2N/LHfGnwCVXORYPVlO+
r3VM32pZ/3KDfR5qZH3Vn0vy0sz6wVsczuMcVxGw5XbH6mfd5DfvchQP4/n3
OpJ3zPcBR/4CcvRw+TProsu/Jz5yVP9KPOwoPwnY8aJDO/miqwg5eMVR/SPm
+YbJw18ajT82fZhZx/z+e47ys8A5m0v6sIj6vMURH41t+sKx/NOn41iXrxzj
XR5nve80r/YL6zXHq/iCuNyr/iHcp8ZLvuq7S4mf6ryqowbN0uS1eq1ltJNu
r+Qf8+jwSv6J37zKD0E+1nrFH5FP9RKv/aKNz+/1iq8lbvUqX0U990p/MH7H
q/4BTCvoVT6VvJDX/raQN0x6lS+Af8h61Q9DnOtVvoD40GvxRoXZea/4CfoX
r+wN8Pu3vOI3GNd4LR7cOA65ONhreZApxB+HeoWXYD+O8AovQ4+O8dIfVC8t
ArYc71U9GP79JK/6DVhv5RVex7qd7lU9Jflfr/HwrZSvc7zKN2Adf+VVvhP+
7gKv+CbECRd5xddi3y7zMl441OrXrvRKP6Dm13qlj4zjvKovYP29l3jym8vI
F9/itTxlvdWrldZ3Ce3BnV7xT5C3e0vyPYf1Mg94rd7kK9ZDPOyVv4Bc/NOu
f/NF9vc9bfJzy5fcr+dsPjfOph980Wt8v/FPr3hV/03/6jWcUk/7+abX6gGa
aAfe8wovwd5v9lLO93bTDmyx639o+fkvvKr/pT57FT8Ah073ia9iPYdP/BPm
V+lTPI31WeITPsM863zix+iPfZP1we0zfayjvW/3Ge9Vw3hrld3/qsXW5+aT
f4W97fYZ/vrMg3Fv8Cl+gPoO+dRvA3ke85Hna5hGe+nzqV6f/FtpvFXMh8V9
6j/B9Smf6ZvpQ750fbP1M/poR2518fqv+1TfBH+4u0/5CgxrL5/sP/ZtP5/k
HXb4IJ/0A/7tOz7lK+hXfcJPjA/t90Ot7Dc9zqd8M/ThRJ/wE+uEfLQ79U30
j6f5xCdgvc/0qd8M4/qZz3jOCsYLv/SJv8M+ne8TnwH/dKFP/hr25xKf+kXg
Jy/3iT/EMl7tU/0k7bLP7HEl1+WGkjwsoRzc7FP/Cvljn+IH4m6f+iNZz+GT
PkDN7/Op/oV1Bz7hIfKPPvFH0KcnfIqnGbf4FJ9DP17wmf62Ev+85FN8jf1+
1Sc+lvkmn+pzsN/v+KiPD1i/7ful72t5/Waf1elX00596jO+cjFx/pc+1Q8y
P+W3vOTnHvZ5+JU/wv4s8ls929ZxxoF+9Z/B3iz1W16+ivtb71d9A/Sh2a96
esZf9jmwjPHEcr/yY7BTq/30T31uxgfr/czPLWmlf+r2y18w/+9X/MB43C98
hOs9ftVvMT73C39hfSN+8UtY34Tf/K/L+j38xqc0078U/CbvFk/s5Ld6gTqr
5/Cbfa9h/mV3v9UlVLD+bW+/6g9hv/b3q/4I9u/bfouvXxtnPaDf5P1lD/zT
9/3KTzCP41d9Ip57rF/xBPOvpe+ruY4/8pu/quXf0/yqr8K8zvQLT5H380s/
8Pxf+mW/qc9+5feoz37FF5jWJX7FC6x/8Ev+gVev9gsvMW/jV/0G/MiNftXr
0o/7lW+kPvvFx1Kf/aq3oD7b5wdqTJ/9lg+voD49VFqvOdSDx/zK32G/nrT1
GH6D/NOzftXjsQ7aL7yL/XrJr3pH/PtrJs8fL+R+v+lX/R8e847f6gWW0n6/
71d/I48L8IvPwTA/K+sL9dlv/Stu1rNODQj/YxizAuKPMI3FAeWrqc8B5cuB
12oDql8jP2bXX+SiPrUEzN830z+1BdSfB7FcEbB60DritTUB5S8xj/UB4Ums
U29A9d+wlwMB9adAnkcCxi9+OE69DhgfsR/zFf6A6tOYFw1Yf/I02qFEwPD9
fI4zGzA5q7T+yIDVmyyhX945IPwE9ftmQPVrrIcIyB7DjuwTkHzCT+4fUH0v
1OKggPgjrPehAeEh8vMB+RfY7aPLv8e/HxewfKebccwPA07pPA3inIDiCVz/
k4D4ZOzXWQH5P+LrgPIzvG9A+QrqZcDw0Hxb14BTOm+CuCKg+mjs15UBixfu
sHM9Ambv3x+HPl0fEB/LfQ+ovhL3vSWgfDftTkD1IJDrYkD9+hjW3WV5Iw4v
yyPW+6HAZPv9WEB4H495KmB8civji2cD4pMgby8E5F8w7pfL3+M+/y3rC/U5
ID4WfNm7AcOHxhd/GJD/oD4H5D9YPxAQH8U6x4DwFPPLQeXzqM9BW885jJ8W
B40veZP9y9VB9Y8SXwctftlGvrApaPOfQz/pCiqewLDbg8pns94oKPyN9V0T
5PxfMfzRGVR/PHnjoPq7GC8HdV4I/MRoUPKPeXmDyjdgfqGg8n3ku4LiY5kf
C6ofh/UsQekb62iDpq8u+pddgk6pTxj6sFtQ/aesfwiaf62l3O8bdErnqTB/
GhQfS56ntF7Tieu+F5ysD0cGxYfDjh4btPqOD6weKqh6SNi1k4OlczeYf/px
0PIRlcTnZ5bma+efnB00Hrye8vzLoPIVrJ8Kyj+w3jxI/ONzE59fHNR5JbA/
lwfVzwN5vioo/IRx/CFo+Zw2yvONQeEt8l9B6u+Fxj/9Nah8Ntb99qDiHazj
XUHpK+zX34PSB9ivB4Pqb8I+Plpav2qrhwyqnpb1eUHr/5tF/Ph8UPEF8XXQ
8tVPjrMuJqh+YuC3jUHz/1O5L+8Ela9l/UfQ8nVV3O+PgrKfrO8LGu4wf7E1
qPgC108JKT+AccwLKX/APrKQ8BH7UULioyDPtSH1U2N9G0Lim+iPQ9IH2Ne2
kOIX2PflIfU7Qm5Xh6zPZBnXdX3I/G8D8VZ3SPkX+uOQ8jOQs5GQ1SfM5/We
kMWX0+iX/SHjcz/wAJ+HQ8a33jpOvitk+b0t5D+yIdWfQ57/L2R8lPGxO4dU
z0p8HVI9K8cRsrxLI/tjvxWSfGFeB4R0ngTc1MEh4SPWL4Ykv+S7Qsq/QZ6O
CameCctwQkj6Qb4rpHgd8nhKSPE18OUZIcXXkMezQ8qX0K6GuI9/bCJ//KuQ
8pFw6xeEjI9YwvzExSHVTzI+Dqk+kHUoIeUnmN8JKZ5gvjZkePIV9of/OaR6
WdjbW0PyD9jXO0LCy1jHu0Kqh2O/b8j4/Tri5H+ErN+9yfK7IdXbc9wh8aGs
twwpfsCfF0Lin3Cfl0LyB5Dz18qfIR9vlvWHdiMk/IT5flDWN+zjxyH1tzM+
Dine4bqHlK9jmUZY/cC0q2H1o8OOLgqrHx04oDps/M8HPFerNmx85/g4rm8M
qx+Y/U5h4v0FM8h/toUt3l7AeqYVYfPfVYanw+pvg33pDCteAJ7tDYt/Bb4a
CDO/XGv+YDSs/BzWxxtW/oz9bGHVe0COomHxp+TdwsJDrF8IK56AH90xrPpv
yNPOYZ2vgPXaNWzy2cJ83p5hnZdB/Q2r3g/rdWDY8uVL6A8OCStfyXxpWPED
5PGIsPwrnntMWPlq4KUTwoofmG8KK35gf1BYeJdxUFj5asRBZ4flD5h/Cls8
b/7g/LDOU6D/DUsfaLdsPp0ttHuXh4WXiNvDwjOMU8LSD/jPG8Pqd+a+hNXf
B978r2HlO7Ded4Slb5DPu8PqN2V/R1jyz/r3sNnDBvqJx8LCR8zfh1W/AXvz
bFj1w5DDF8Lil8hThsUvYb7/DSsfwfrasOrHYW/eC8t+EYeFLX832/JNJX2p
YL/852HVO0E+vgorX0f8HFG/FvzZnIjF28sov5UR+Qfy0xHxQbAv9RHlr+k2
I8L/PA4lIv4WeKojovPoIMerIsoH0m5GjC9qIR/WHZH9h7/eEFG+AeMciohP
w/VjEdVrsP8iovMs4LfCEcMLM7g+sYj8LdYhHREegh/MR8S3Ml8cEf/B/o2I
6pvIT0dMn6z/de/IZD5+/4j6DchPR9RfyrxMRHicPFFE+Ih6H5G8Mr8UUX8g
nntiRPEErj+l/Bn45vSI8A+m/dOI+FTM95yI8h+Y73nl8UAPfhOx81Esvrmo
PB/I/2UR8av0txH1A2PZro3If9LfRgwffeWB//lzRPWV8D+3lH7/T+aHbo/I
PzBfHNH5iMwXR6y/bIH1G0asHtz6uR+OqH6D94moXpT1sRE7t6yJ8fbzEeWD
2a9YllfmiyOqd4L+bIwIP9HfRsTPkr+KyJ/APn4UUfyNdf80on4N4uWI6r+h
x1Ojhm+XMR83M+qUzs+EniyOil+FHlZFzX4uJh9cG1W9K+OUqPHVX7C/syVq
/SmvjCP+ao8avn3V6vuiyr+xviOq/iHWd0SVbwJM7Y1O7pcYjFr9X63Fu1Gd
F8f8cFT2lvFuVPaY8W5U8s/zQqJmH9xW3xGVvWe9d/kz80lR5RNgx3eNSh9g
//eKGt9l+YX9oorfua5RndfHOCEqfEfcE7V4wuoZj4wq/wL5Pzaq85uwnydG
Ve8KOfhRVOcTsY83qnpXiPlPozrPkfXGUdkzDO+8qPnbRbRvv46KT6Xfiiof
h324NKrzVaDvv48KH2G9rokKH2G+10eF13Hdn6KSd9Z3RMWnYr63RRU/YF3v
jP5PfUdU/gJx5v1R8UW0K1HxRfjd41GndD4t+7mjio9hl5+LKt/Auo6yPlBf
o6pfwu9ejyo+wHzfjlq9+FbW12+K6vxHyNGHUeUb4Kc/iSrfAD/0ZVT5BqzX
lJjqEchPxeQPaPdisqdQm8qY+FPGtzHxmdTXmOQd8tAcU34AuK0tpviAdQfl
z5jf6vLvMb/1MfGn7GeMqX4VdnMgJvlnfBszfWyyOC8m/gv2KBhTPgH4IBpT
fAQ7kYjpPBLIeS6m8zPpZ2OGXzfyPLNdYqq/J98cU/8D8XFM+VPi45j6HzDf
A2PCP9z3mJ3XU2fnF8R0HgHj25j17xtfemxM/D5u+4OY8A/mfXJM8s78b0zx
AMZ7Zkx8KeTs7Jj0gefrxCT/5Kdiqi9nPXlM9atYr0tisv/U15j0l/1BMek3
rr8uJv2Hnb8ppvMeWX9u63PxDOOXY/KvUItiTP3I5Jdjsk+IT+83+Vlq/NBD
MeWfyS/HdP4A+eXY5HzCczHVe5Nfjk3OJ7wUM/tj8cB/y/pAfBwTngdN8l5M
+B/1ER/ElG8jPo6JXyW/HFM8DLHeFhOeghmYHlf+AtfNjSu/hvFVxFWPxHqs
uPE1NZSjurj6oYiP4/KXlMu46uVZFxBXvQvmtyou+8N6rLjyocB7XXHhf+5T
XPYNuHcoLr4ccjcWF5/O/FBc9hPyEI6rXo/6Gld/MuabiQvvAB8U4sIzGO/O
ceUPqK9x6Qf8++5x4SHIybfitCM/cDOe3j8uPhTj+nZc52th3w+L6/wT2MnD
4zq/EPt+TLx07iz7E06Iq/6I/TvxyfVbp9p83rDzY0+PW33yB8xXnh0XXw3/
/ou4+vGpr3HVb3Md4zr/lPoaV/4I870irvNBMd+r4jpfgfoaF75gfjcuf4Bx
3hx3Sue/Q+5uj1s+z01cc2dc/gHPuaf8GevwQFz5Y9rluPq16V/jymfjuU/H
dT4d/Wtc/a30r3Gd50X/Gle9Fdc1bnxtJf3c23GdP8L65rjqG+F/Ntv4ou8z
X/BpXPwQ5PHLuOGtzbRPUxKqv4c+z0vofDXMY2FC/CDEpjqh/lDalYTwPnBG
Q0J4H9vZkrBz0Vz0F60J4R/yTwnlgzG+NQnhefIYCck36yUTykdj3QcSqv/D
tEdK42+2frfy+CgXCdWLwCxEEybPFv+mErSDL1bRX+QSyq+Tf0qIT4bd+HrC
8mOfjAPm75ZQ/p79cgnl96Ev+yaE/zHfgxKyZ+RlErJ3iOe+n1C9NtbtqIT6
XdifkRCfyDrthM4jw7qckpD9Z/42ofwV5vvT0u9dxsslVH9BnFz+TNydsHNR
XLRzv0uI/4d/uzQhfWM/ZkL12DCz15bHi3lcnzD9t3Oo/5ywftBq6tUtCcNL
Vn93e0L1qBjvnQmT/62Mf+8trzfk+cGE6r9Y75wQX8Gy4YT1aU+3eueE4l/m
exKqP6LeJMQXsj4yoXoEpHXeSKgfgOfDJFSfB/nYlFA8QH1NiB9if39C+AX5
ua0J+QuGOUnxP5DjGUnFu6ynSio/wXxPUv14uE9tcvL53Y1J9a9RX5Pif1h/
kdR5K9TXpPAO+xGTqk+BXnYmDT89xfOWe5PGz230QH4Hk2YPt1L+R5KG52dz
P71J1Rcxfk3qfENsRzQp+cd9Ukn1D5M3Skr+Gb8mxYcyfk3qfDLGr0mdt8j4
NSk+H/Zzv/Jn8k1J9R/w/Jby/fD3e0nVm3IeSeXDACOPTaoeCrjtxKTOM8K4
T04K/9DPJNXvh3GemdR5AND3n5fWbwpx2rml9XuX+Zbzk4p/IVcXJoVPGb8m
xf+wfiqp/iyM65qk5B/78Mek6pNx/U1JvX+Cdi2pek6eh5JUvIl5F5PCQ5DL
e5KqxwMeeCAp+8965qTiY/bnJpX/pb4mpS+wb/9KCv+wPyGpfADG+2pS+Wzo
4RtJnV+FfXsrqXopzHdTUvif9Y9Jvf8BdvqTpPLDwBNbk8oPU19Tsj/Mz6b0
/gPMb2FK9p88S0r7zXqplPJhCBsaU+r/Z1ycUr0E+aaUzmtBfLEyZflLl9VX
pCS/5MVSwjfc95T6o1lfkfqf+oqUzrtg3j+leAJ2MJiS/GPfYymdf4H5JlOy
/9TXlPrVYJ++lrJ8S7Wdm5oyf2n1EbuldH4T65dThgc+Nf+aUn8U/WtK9Ssw
Q99JmX38ahxq9L2UzvcGbj0qZfi1gvnVY1Pq3yLflBI/Qv+aEv7HfH+SUvxL
/5qSvPO87pTklfxwSvksvt8hpXiWdi+legrivvLvGb+W70f/Wn4eeL4bUjq/
mf0HKfXjUE9S5u/qGK/fVp4vxnFXSvVBsA/3pVQfxLxASufFsK4hpf4PyMfj
KeN3nvGQHy7vF/bh+ZTxozMND5f3m3jY5O3ZKv7dmLJ4danVK6dUX8A8SVne
6AdSxq/YeSyfleWV/HBZnqGXU9N6XwLzOWnlx8gPp3W+HHBHdVr5XtrBtPmn
ZvqNxrTwPvxFS1r1o/SvaeF9PG9l2vxlpfFNacNHc40fTgvv83y4tPgE2KmB
tM77pR6kjY/8iPVBTlrnXbF/KK38DvnhtPoPyA+nlR8iHk4rf8rznNLKL1Ff
06rvZz4nLf6H+pqWvNK/ptWvQ31Ny94TD6cn80XfS6veiPXJaeUT4NaOSyve
Zd1BeXzM56SV/4JfOC2tfmXyw2mdX0t9Teu8MNjj89Lii7G/v0mb3dwyznPq
0/K3xMOl573D991cmRZfR301eauZw3+/Pi2+E3jiT2nhf54/lVZ9NfM5ab0P
hPmctOqD2EeTlj3Gvj2QFj9P/5qWP+D7etLCO1DnZ9KKj9lfkBb+By54qSz/
rJ9I63wX6mta59UCt7ybVrzO80HT6sfk+dxpxfvkl9JmHxYYv1TSjxn0T1Mz
Oh8d45uR0fmbpKUzev8H7NjcjOw9lmVBRudhwf4sysj+QZ8qMqoXg5pVZ5Qv
wnxrMpPPh6jNWL1Li+V3M+Lf+XqUjOoVMN9lGcXD5NEyqp8gv5VRfyXtRUb9
ZLDryzPCV7QfGck7aOhVGfXnw+ysyVh+u5byvi5j+ldNfrYzo/w39qU7o/5k
jKs3o34z6PGGjM6nZDyeUb0uz2fNqF8fdmwko/5a+HtPxvZzvuGwjL0HqZI8
lT8jPhx+JZhRvzLkM5xR/gv7Hs3I/kNuEhnxjbRnGfEz7L/ISB94vndG/D32
t5D5n37njPK70MedMjqfgvYvo/po1l1n5J9g/3fLqN4Bv9sjo/4JnreSUb4X
1+9Tut8cjne/knxN4XgPyIjvwTgOyui8e+zPwRnVp9CeZtSvDxx7WEb9Nli3
79v3MysZLx6REf+J/Tkqo/oH1q9lrJ6uwexvxuLrJtYPn5BRPIrrT8zovAue
j56Rf4C+/Tij+mr2aZblHfJ3Rlm/gCfOyijfxv7tjOr1eJ5jRu8vY79Yxuyb
9Qucl1G9D+OljOIf9oNmZO/hPy7MiO/Bsl6UsfjgBZ6Xd0lG9dHsF81YP/3n
7A+8IqP3XbB/NGP1wAvoh6/OqB4SendtRvYRenddRnw58Z3JX28j7epNGcWb
xHsZ1e+T/8zIXmM/bi3LP67/W1n+sV63Z8SX8rzDjM63g/+8M6N4A+O+J6P3
FcA+3ZfR+4KY78gI72NfHswovme/TEbnS0OMHsnIP0J+/5lRvQPs6uMZ+VfI
71MZ4zPvHsd6PZ0xf7x5HPN9LqP+D8jH82X5x7L9O2P5mko7nzFjfE4N7enL
GfWvs963tN/2/s03M+I/aefL9h/78W5m8vt5NpXtPfMt5e9pNsv6gfF9nFF9
J8b1SUb1Rti3zzKKRzCvLzKq98S6bcvofDvY6ylZnV/PeqasjX8B9W1GVngR
8j8rq/w55js3q/oS4JT5WfXfw98vzKreB/NanFW/MeZbmdV+s74xK3uIcS3J
iu+BXNVm1Z8Pu1afVf8x+ays+EfMtzmr+Bf+0ZVVvQ7i8das8DzsfXv5M65f
nlW8gPmuysp/4N9XZ3U+BuRibVb5B+zv+qzq9dj/n9X54tCbnqz6AbAsfVnF
P9CL/qziI1w/mNV5m9inkazh95c9eOxYVvku3MfJKt8F++TLGv89i/FiIKvz
FoAzQlmdlwv5iGSVDwWMimWFJxBnJLKT68tS2cnvv8pmdd4c9CGfFX+P/f2/
rPh9xv9ZvY8GcrNzVnwnzzPKii/FPnwzKz4V+7t71upom3n9HlnpA8Rw76z6
fWBWvpVVfgN6vF9W/UKY7wFZ9ROxDiIr/8k+3KzhoQ+oD9/N6v2ziN8Oy+o8
b+jv97OqZ+d58lnVs2C8R2WFf3h+Xtbwc43lMbKy/5jvD7KKL3H9iVnVm2Fc
p2TFT2JdTyvLN3msrPA99uPMrOIBTPesrPK39K9Z1VvTv2b1Pj/616z8EfT1
vKzlr+qor+dnFe9CX3+TVX4L63Jh1nineXZea1b1Pez3zKr+H/bpsqzwDuT/
itJ+bub7Nq7Myt7Dbl5T0of5tMd/yKpfkOfLZdVPCD24oSwv2KebyvLEerus
zsOHPb65LI+sdzd7cK+df31bVnwnYXJW/D7rBbKKj+n3y/KO+d6TVT0b5ntf
Vv1f2N8Hssrv0i5kVZ8He/xwVvE8+Zqs4n3M959Zyzcv5Ho9Yfbz8Rn0P09l
hX8YH2ZVX8LzJEr+5DUPtOD5kv34gu/VfjGr8xMgvy+V/MEi2uNXsqr/ZTyZ
Fd+D8b6eVb8h/W3Z3pK/zQqPYBzvZiefn76pLM/0t2V/wHGWP9PfZoX/6W/L
8k9/m1V+l+9XyIqPpb/Nqt+T/jan/h7Md5p9PrPK7GbO4pmFnO+snM5Tpr/N
6fwVzHdeTudl8745sxcvj0OuFud0Hif9bU7vD2A+N6f9xjYvyVn9ehXluTan
ek+Mqz6nfBffB5ezc8YaiS+ac8IjeI4rJ/4d8teRU74W67wiJ7yP8a3KKV+M
eazO6bxhXLcuJ/sOuVufU78mz8/LiZ/C9T055Xd5XmZOfD7ft5PT+ZY8r8PG
v4vFuyM5nTfO9xHlzJ68zfoGp7R+93owLn9O/XqIdwM59QtjvuGc+DysZzSn
/kjERfGc8j+Q82ROfA/rq3NW39vAceZyqveBXhdykkdMe8ec+d8WzmOnnOpB
8e+75IRnYEe/kZO+QP52zSl+4PndOfkX+OW9cjpPBfPaOyf9xLz3zQnv4z77
54TvgOMOzE2u7zs4p3gX/35IbvL5HIfm9L5y7O9hOdWXAH8cnhMfgf09Mie+
H7zD0TnxGeyfLO8/z0Epywfs6Yk59UdCX07KCU/DPvwoJ3+A+Z6aEx8Ev3Za
bnI/++k5vU8N8/1pTvVpmO9Z5c+Y98/Lv2d9eU71DZjnuTmddwF5/FVO54fB
/v86p/gX870gp/w15PnCnPp/MN6Lc+qPw3wvLdmDWZzv5TnVd/I16TnlV8BX
XZXT+Te8b1kfMN/rcuJ/wKNcn1O9G/b9hpzqHSGnfyrrA+TxL3b/gVrK4y05
8SuMX3PyB5DH28ryCns4XpZnnh+a0/lxuP7u8mfg1PtzwvfsH80p3oCYPJRT
Ppf+NKd6HsarJf20/N0TOfGbjFdL9mUBx/dMTngfdvO5nOpjsf/P5+Rfeb5l
TvwD/WlO75+G/LySU30D5P61nPqB2RaT03mlmO9G+zxtCfHvWznFu+xfzale
kv40J74HdviDnPAIz3Mr22/Iwcdl+w+1+SSn+ADy81lOfA/f55JTvEv+N6d6
CvKGedX34D7T8jovDPIzI29927WMb2blVc/K8+HyyvfhOfPzep8E5GdBXue7
Y5qL8jp/AHJUmZf9gT2qzqs/D+Ndmhd+xXDr8nq/PcbbkFe+l/3zefH9tON5
nf8MvtGVl7zzfQ552X+sb0de+Sfs7/K88l+IH1flxf8wfs2L34FcrS1/z/Pj
88I70Jeu8v15vkb5+fSv+cn5uIG8+htpl/KWr6imHI3kVe+Eyzx59bdgX7x5
40emUA/8edU3QA6CefE9WNdwXvgf+hfNqz6R53XkVb/Ieq+8+B7YxUxefA/0
J5c3e1tLvqeQVz8k7O+Oeck/9Gen/GT+5+t5yTPk6Rt51SfgubvlFR9gWnuU
v6d/zUtfiNvyOj8O+39A3uxpg+XP8nofHPzkwWV5Z3yaVz4X9z8sr/PkeP5P
Wd5hho7I67xX2KOjyvIOe3RMXv2NsLPH5YV3sJ4/yE+Ob0/M6/0WWMeT8+L3
sS2n5K1evpa/+3Fe/YJ4zE/y4ve5D3nxPdjXn+aFb6DfZ+cV/2Kdfp5XPyTP
N8iL/2Q+Pi/8g/04P6/8AeeRV30R+y/zqj9ivJoXXoMfvSSv92FjvJeV9R3z
vSJvfO1cq5fLC+9gvFebfl77PvuFri3pw9XjwDvX5XV+DeTshtL8jN+/KS9+
k/Fq3vJZFczf3pxXvgvX35oXv8+6j7zsPc/rzev9GdDT8bzyrRj3XWV5h3zc
XZZn5oHyymcxjskL/8PfPFiWdzz3obz4fsz3kbze/0r/mlf/Aeb7RF7v98F8
n8qL74RePJO3+LyK9XTP5Sfz/S/k1S+Ncbxo63XQx6xveykvvpPxal79jdiX
1/LiOxmv5lWviMvezKuekf0yefHfmOa7eeWHMM5NeZ3/gHX9IC+8zXqkkv1q
5ji25JXvBQ74tGzPsa+f51X/yXrg8vfYjm1le894taD7wwzOLOj5rI8oqH6T
9cMF1e9AfuYXjJ9aZP3sBcX/bPMsiB/A/lcV9D4b9gMU1E9KXrOg/cB61BdU
v8z6qIL6taGXywpWr19JeW2x+dxs74NyF2TfAaPaC7Lv7Lct6Dxq1lMVhG+g
nzsUjB9qIb5eUxB+x3jXFSTP2P+ugvgh7H9PQf26MAN9Bck35LW/oHod2O3B
gvgcrNtwwfpEl3K8owXxt9h/p6D+RdZXFvQ+IPK/dv3KKcb/FmTvWR9dML72
Fg/WN16QvYe8JgvCN4xPC7JnkKtsYTK+KRTU3wr/tGNB8g77uVNB8SP82y4F
nUfI8zkK4htx/a4F5V9hJ/YoCN/TfxakD+T1CurHIu9WULzM/uKC8rewXwcW
dJ4P7N+3C6rfYT1ZwfJddp70dwt6ny3fo1MQnw85OLyg/jYsy5EFnY/B978W
1L/LfseC6vfB5x5fkL3neZoFvf8c9u+kgvw59PLkgs4HxL+fWrD4rtri04Li
W8z39ILiW+zDmQXFkzxfpDD5/Uk/K6jfBeP6RVmecf0vC7LfmO+vCnr/POPS
sj7xPJKS/i8jP3mh/X5jI+Pbiwo6n4j1qgXjX2v5/ZUF9e/8Pxb9zcU=
"]]}}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0.},
ImageSize->Full,
Method->{},
PlotRange->{{0, 82.635}, {-17.318, 11.078}},
PlotRangeClipping->True,
PlotRangePadding->{{1.6527, 1.6527}, {0.56792, 0.56792}}]], "Output",
CellChangeTimes->{3.566417495260788*^9, 3.5664565173034697`*^9,
3.566456555093647*^9, 3.566458691802024*^9, 3.5664633611407967`*^9,
3.5664646008036757`*^9, 3.5664657684156322`*^9}]
}, Open ]],
Cell["\<\
Da hier gerade am Anfang einige st\[ODoubleDot]rende Ausrei\[SZ]er \
aufgetreten sind, nutzen wir die Sekunden 25 bis 80.\
\>", "Text",
CellChangeTimes->{{3.5664175349367733`*^9, 3.566417543950457*^9}, {
3.566417602122631*^9, 3.566417618913526*^9}, {3.5664565688891773`*^9,
3.5664565726649103`*^9}, {3.566456769464118*^9, 3.566456797746428*^9}, {
3.566458699087698*^9, 3.5664587125987043`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "sym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "sym", ",", "1"}]], ",",
RowBox[{
RowBox[{
RowBox[{"25", "\[LessEqual]",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}]}], "&&",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "80"}]}], "&"}]}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566416210895996*^9, 3.566416261044602*^9},
3.5664173353662987`*^9, {3.566417547400022*^9, 3.566417604524452*^9}, {
3.566456575282522*^9, 3.566456582586051*^9}, 3.566456769464508*^9, {
3.566458716456609*^9, 3.566458734267008*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "sym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "sym", ",", "2"}]], ",",
RowBox[{
RowBox[{
RowBox[{"25", "\[LessEqual]",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}]}], "&&",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "80"}]}], "&"}]}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566416210895996*^9, 3.566416271659527*^9},
3.566417337909851*^9, {3.566417550743938*^9, 3.566417606580274*^9}, {
3.5664565789639597`*^9, 3.566456586337864*^9}, 3.566456769465927*^9, {
3.5664587236482973`*^9, 3.566458737378929*^9}}],
Cell[TextData[{
"Wir bestimmen ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "1"}]], TraditionalForm]],
FormatType->"TraditionalForm"],
"."
}], "Text",
CellChangeTimes->{{3.56641766653157*^9, 3.5664176686717243`*^9}, {
3.566456605711183*^9, 3.566456619757758*^9}, {3.56645874045653*^9,
3.566458740456621*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"unten", ",", "sym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "sym", ",", "1"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416344367093*^9, 3.566416404499189*^9}, {
3.5664164749772043`*^9, 3.5664164803566027`*^9}, 3.5664165186680202`*^9, {
3.5664165522816677`*^9, 3.566416554473386*^9}, {3.566416667930216*^9,
3.566416697488927*^9}, {3.5664177507973003`*^9, 3.566417753419446*^9}, {
3.5664566242558537`*^9, 3.566456626936548*^9}, {3.566458741540082*^9,
3.566458743234972*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"26.247`", ",", "9.699`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"27.881`", ",", "9.566`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"29.536`", ",", "9.766`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"31.163`", ",", "9.988`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.774`", ",", "9.877`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"34.386`", ",", "9.499`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.029`", ",", "9.277`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.649`", ",", "9.388`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"39.3`", ",", "9.677`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.894`", ",", "9.632`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"42.514`", ",", "9.299`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"44.18`", ",", "8.966`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.786`", ",", "9.033`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"47.397`", ",", "9.277`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.015`", ",", "9.344`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"50.646`", ",", "9.1`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.277`", ",", "8.744`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.927`", ",", "8.7`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"55.537`", ",", "8.922`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.14`", ",", "9.033`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.779`", ",", "8.878`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"60.416`", ",", "8.522`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"62.063`", ",", "8.389`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"63.686`", ",", "8.567`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"65.288`", ",", "8.722`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"66.899`", ",", "8.611`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"68.539`", ",", "8.3`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"70.176`", ",", "8.056`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"71.808`", ",", "8.189`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"73.449`", ",", "8.389`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"75.024`", ",", "8.345`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"76.647`", ",", "8.056`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"78.292`", ",", "7.834`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"79.912`", ",", "7.834`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.566416365943509*^9, 3.566416383937974*^9},
3.566416480807665*^9, 3.566416519318247*^9, 3.5664165549251204`*^9, {
3.566416668287786*^9, 3.56641669808327*^9}, 3.5664168622938766`*^9,
3.566417345454031*^9, 3.566417755350679*^9, 3.5664565177026653`*^9,
3.5664566281073847`*^9, 3.5664587441130733`*^9, 3.5664633614625387`*^9,
3.566464601132922*^9, 3.566465768490226*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"unten", ",", "sym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "sym", ",", "1"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416788206684*^9, 3.566416811680894*^9}, {
3.566417771063353*^9, 3.5664177743940067`*^9}, {3.566456631497312*^9,
3.566456634192457*^9}, {3.566458746458943*^9, 3.5664587481707783`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"25.45`", ",",
RowBox[{"-", "9.615`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"27.063`", ",",
RowBox[{"-", "9.282`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.715`", ",",
RowBox[{"-", "9.349`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"30.359`", ",",
RowBox[{"-", "9.637`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"31.967`", ",",
RowBox[{"-", "9.704`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"33.578`", ",",
RowBox[{"-", "9.437`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"35.219`", ",",
RowBox[{"-", "9.038`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.847`", ",",
RowBox[{"-", "9.038`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"38.466`", ",",
RowBox[{"-", "9.26`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.119`", ",",
RowBox[{"-", "9.304`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.69`", ",",
RowBox[{"-", "9.215`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.321`", ",",
RowBox[{"-", "8.816`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"44.962`", ",",
RowBox[{"-", "8.705`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"46.608`", ",",
RowBox[{"-", "8.86`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"48.23`", ",",
RowBox[{"-", "9.082`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.848`", ",",
RowBox[{"-", "8.993`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"51.471`", ",",
RowBox[{"-", "8.638`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.105`", ",",
RowBox[{"-", "8.416`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.73`", ",",
RowBox[{"-", "8.527`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"56.349`", ",",
RowBox[{"-", "8.749`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.978`", ",",
RowBox[{"-", "8.727`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"59.607`", ",",
RowBox[{"-", "8.416`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"61.248`", ",",
RowBox[{"-", "8.128`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"62.884`", ",",
RowBox[{"-", "8.172`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"64.488`", ",",
RowBox[{"-", "8.416`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"66.14`", ",",
RowBox[{"-", "8.372`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"67.707`", ",",
RowBox[{"-", "8.216`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"69.334`", ",",
RowBox[{"-", "7.906`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"71.002`", ",",
RowBox[{"-", "7.861`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"72.649`", ",",
RowBox[{"-", "7.994`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"74.246`", ",",
RowBox[{"-", "8.15`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"75.829`", ",",
RowBox[{"-", "7.994`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"77.489`", ",",
RowBox[{"-", "7.661`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"79.104`", ",",
RowBox[{"-", "7.528`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.566416813683556*^9, 3.566416863962236*^9,
3.5664173476919193`*^9, 3.566417775282922*^9, 3.56645651774889*^9,
3.566456634534689*^9, 3.566458748703084*^9, 3.566463361516838*^9,
3.566464601182035*^9, 3.566465768541113*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"unten", ",", "sym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "sym", ",", "2"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416884021413*^9, 3.56641688700436*^9}, {
3.5664173643089952`*^9, 3.566417366486847*^9}, {3.5664177873744593`*^9,
3.566417790560857*^9}, {3.566456637568837*^9, 3.566456649334568*^9}, {
3.566458751418447*^9, 3.566458752770262*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"26.278`", ",", "10.227`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"27.881`", ",", "10.252`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"29.505`", ",", "9.936`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"31.163`", ",", "9.523`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.774`", ",", "9.547`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"34.413`", ",", "9.839`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.029`", ",", "9.96`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.649`", ",", "9.717`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"39.269`", ",", "9.328`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.894`", ",", "9.207`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"42.547`", ",", "9.45`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"44.18`", ",", "9.62`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.753`", ",", "9.45`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"47.397`", ",", "9.085`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.015`", ",", "8.867`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"50.646`", ",", "9.037`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.277`", ",", "9.255`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.887`", ",", "9.231`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"55.51`", ",", "8.842`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.14`", ",", "8.599`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.779`", ",", "8.648`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"60.416`", ",", "8.891`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"62.063`", ",", "8.964`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"63.64`", ",", "8.648`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"65.288`", ",", "8.332`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"66.924`", ",", "8.332`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"68.539`", ",", "8.575`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"70.176`", ",", "8.624`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"71.774`", ",", "8.405`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"73.411`", ",", "8.089`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"75.024`", ",", "7.968`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"76.673`", ",", "8.211`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"78.292`", ",", "8.356`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"79.912`", ",", "8.186`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.566416888434183*^9, {3.566417357006805*^9, 3.566417366938409*^9},
3.5664177920084963`*^9, 3.566456517798139*^9, 3.566456649842119*^9,
3.566458753210567*^9, 3.5664633615829782`*^9, 3.566464601269906*^9,
3.566465768627624*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"unten", ",", "sym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "sym", ",", "2"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416895715335*^9, 3.566416898579172*^9}, {
3.566417795714665*^9, 3.5664177982003317`*^9}, {3.566456654501189*^9,
3.5664566572810926`*^9}, {3.5664587555790253`*^9, 3.566458757306184*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"25.484`", ",",
RowBox[{"-", "10.184`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"27.063`", ",",
RowBox[{"-", "10.33`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.715`", ",",
RowBox[{"-", "10.209`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"30.327`", ",",
RowBox[{"-", "9.844`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"31.967`", ",",
RowBox[{"-", "9.626`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"33.605`", ",",
RowBox[{"-", "9.747`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"35.219`", ",",
RowBox[{"-", "10.014`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.847`", ",",
RowBox[{"-", "9.99`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"38.466`", ",",
RowBox[{"-", "9.626`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.119`", ",",
RowBox[{"-", "9.213`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.723`", ",",
RowBox[{"-", "9.383`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.359`", ",",
RowBox[{"-", "9.65`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"44.962`", ",",
RowBox[{"-", "9.698`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"46.575`", ",",
RowBox[{"-", "9.358`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"48.23`", ",",
RowBox[{"-", "9.067`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.848`", ",",
RowBox[{"-", "9.042`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"51.471`", ",",
RowBox[{"-", "9.31`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.105`", ",",
RowBox[{"-", "9.383`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.73`", ",",
RowBox[{"-", "9.188`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"56.349`", ",",
RowBox[{"-", "8.824`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.978`", ",",
RowBox[{"-", "8.702`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"59.607`", ",",
RowBox[{"-", "8.945`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"61.248`", ",",
RowBox[{"-", "9.091`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"62.849`", ",",
RowBox[{"-", "8.945`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"64.457`", ",",
RowBox[{"-", "8.581`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"66.14`", ",",
RowBox[{"-", "8.338`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"67.735`", ",",
RowBox[{"-", "8.556`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"69.366`", ",",
RowBox[{"-", "8.799`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"70.976`", ",",
RowBox[{"-", "8.702`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"72.615`", ",",
RowBox[{"-", "8.338`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"74.246`", ",",
RowBox[{"-", "8.119`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"75.869`", ",",
RowBox[{"-", "8.192`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"77.489`", ",",
RowBox[{"-", "8.386`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"79.104`", ",",
RowBox[{"-", "8.435`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.5664168993845367`*^9, 3.56641736972589*^9,
3.566417798769298*^9, 3.566456517853868*^9, 3.566456657653984*^9,
3.566458757667453*^9, 3.566463361653295*^9, 3.56646460136922*^9,
3.566465768745826*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["periods",
RowBox[{"unten", ",", "1"}]], "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Flatten", "[",
RowBox[{"Differences", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Part", "[",
RowBox[{"#", ",", "All", ",", "1"}], "]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{
SubscriptBox["max",
RowBox[{"unten", ",", "sym", ",", "1"}]], ",",
SubscriptBox["min",
RowBox[{"unten", ",", "sym", ",", "1"}]], ",",
SubscriptBox["max",
RowBox[{"unten", ",", "sym", ",", "2"}]], ",",
SubscriptBox["min",
RowBox[{"unten", ",", "sym", ",", "2"}]]}], "}"}]}], ")"}]}],
"]"}], ",",
RowBox[{
RowBox[{"#", ">", "1"}], "&"}]}], "]"}], "//",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"#", ",", "\"\\""}], "]"}], "&"}]}]}]], "Input",
CellChangeTimes->{{3.566416950448785*^9, 3.566417094263796*^9}, {
3.566417128819862*^9, 3.566417220526993*^9}, {3.5664172740031776`*^9,
3.56641728085063*^9}, 3.566417453279512*^9, {3.566417831280361*^9,
3.5664178422700863`*^9}, {3.566456665799644*^9, 3.566456676680572*^9}, {
3.566458759636613*^9, 3.566458800148424*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"1.6340000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6550000000000011`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.626999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6110000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6120000000000019`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6430000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6199999999999974`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6509999999999962`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5940000000000012`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6200000000000045`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6659999999999968`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6060000000000016`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.610999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.618000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6310000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6310000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6499999999999986`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6099999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6030000000000015`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.639000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6369999999999933`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6470000000000056`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6229999999999976`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6019999999999968`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6110000000000042`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6400000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6370000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.632000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6409999999999911`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5750000000000028`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6230000000000047`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.644999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6200000000000045`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6129999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.652000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.644000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.607999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6110000000000042`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6409999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6280000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6189999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6529999999999987`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.570999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6310000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6410000000000053`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6459999999999937`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6219999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.618000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6229999999999976`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6340000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.625`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6189999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6290000000000049`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6289999999999978`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6409999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6360000000000028`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6039999999999992`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.652000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.566999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6270000000000095`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6679999999999922`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6470000000000056`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5969999999999942`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5829999999999984`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6600000000000108`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6149999999999949`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6030000000000015`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6239999999999988`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6580000000000013`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6110000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6389999999999958`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6160000000000068`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6199999999999974`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6199999999999974`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.625`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6529999999999987`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6330000000000027`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5730000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6439999999999984`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.618000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6310000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6310000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6099999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6229999999999976`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6300000000000026`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.639000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6369999999999933`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6470000000000056`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5769999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6479999999999961`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.63600000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6149999999999949`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6370000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.597999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6370000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6129999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.649000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6189999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6200000000000045`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.578999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.652000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6120000000000019`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.639999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6379999999999981`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6140000000000043`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6280000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6189999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6529999999999987`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6039999999999992`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6360000000000028`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6030000000000015`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6129999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.654999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.618000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6229999999999976`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6340000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.625`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6189999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6290000000000049`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6289999999999978`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6409999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.600999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.607999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.683000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5949999999999989`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6310000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6099999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6389999999999958`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6310000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6230000000000047`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6200000000000045`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.6149999999999949`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )]}], "}"}]], "Output",
CellChangeTimes->{{3.566417037145218*^9, 3.5664170852269993`*^9}, {
3.566417129680561*^9, 3.566417140647348*^9}, {3.56641717581981*^9,
3.5664172224107037`*^9}, 3.566417281888981*^9, 3.5664173767611523`*^9,
3.566417453831401*^9, 3.56641784324682*^9, 3.5664565182655478`*^9, {
3.566456661337604*^9, 3.566456678927658*^9}, {3.566458766117362*^9,
3.566458801948751*^9}, 3.566463362781353*^9, 3.566464602882535*^9,
3.566465770071842*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["T",
RowBox[{"unten", ",", "1"}]], "=",
RowBox[{"Mean", "[",
SubscriptBox["periods",
RowBox[{"unten", ",", "1"}]], "]"}]}], ";",
RowBox[{
SubscriptBox["\[CapitalDelta]T",
RowBox[{"unten", ",", "1"}]], "=",
RowBox[{"StandardDeviation", "[",
SubscriptBox["periods",
RowBox[{"unten", ",", "1"}]], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.5664135644395313`*^9, 3.5664135932825413`*^9}, {
3.566413840931016*^9, 3.566413846450987*^9}, {3.5664172409639*^9,
3.566417250652793*^9}, {3.566417447558818*^9, 3.5664174599257507`*^9}, {
3.56641784719655*^9, 3.5664178532279987`*^9}, {3.5664567123476057`*^9,
3.5664567172458563`*^9}, {3.566458802645061*^9, 3.5664588059588957`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "1"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]"}],
SubscriptBox["T",
RowBox[{"unten", ",", "1"}]]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413595788748*^9, 3.566413604730227*^9}, {
3.5664138496182423`*^9, 3.566413852914188*^9}, {3.5664172604677753`*^9,
3.5664172659954042`*^9}, {3.566417462405601*^9, 3.566417465982563*^9}, {
3.566417856011732*^9, 3.56641785863536*^9}, {3.566456719284751*^9,
3.566456720332246*^9}, {3.566458807782136*^9, 3.566458808726152*^9}}],
Cell[BoxData[
TemplateBox[{"3.8652601238166273`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.566413602619113*^9, 3.5664136050051537`*^9},
3.566413853330969*^9, 3.566415031488805*^9, 3.5664150943028173`*^9,
3.5664152865403767`*^9, 3.566415352194001*^9, {3.566417267815569*^9,
3.56641728474636*^9}, 3.56641738194198*^9, 3.56641746640886*^9,
3.566417859152856*^9, 3.566456518404031*^9, 3.566456720830854*^9,
3.5664588091108294`*^9, 3.56646336302705*^9, 3.566464603240232*^9,
3.566465770395508*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "1"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]", " ",
SubscriptBox["\[CapitalDelta]T",
RowBox[{"unten", ",", "1"}]]}],
SuperscriptBox[
SubscriptBox["T",
RowBox[{"unten", ",", "1"}]], "2"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413681720048*^9, 3.566413748696438*^9}, {
3.566413855794153*^9, 3.566413863833433*^9}, {3.566417287240891*^9,
3.566417295474732*^9}, {3.566417441918975*^9, 3.566417475309024*^9}, {
3.5664178617474422`*^9, 3.5664178658833942`*^9}, {3.566456723957202*^9,
3.5664567266282473`*^9}, {3.5664588108778963`*^9, 3.5664588128375797`*^9}}],
Cell[BoxData[
TemplateBox[{"0.04857657768279903`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566413749146556*^9, 3.566413864296844*^9,
3.566415031562516*^9, 3.5664150958247833`*^9, 3.5664152921305733`*^9,
3.566415353714468*^9, 3.5664172959548683`*^9, 3.566417383528458*^9,
3.566417442368752*^9, 3.566417475991418*^9, 3.56641786640982*^9,
3.5664565185537243`*^9, 3.566456728724546*^9, 3.566458813875671*^9,
3.566463363183052*^9, 3.5664646033880453`*^9, 3.56646577051645*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell["Antisymmetrische Schwingung", "Subsection",
CellChangeTimes->{{3.566416149396151*^9, 3.566416152554798*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{", " ",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "asym", ",", "1"}]], ",",
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "asym", ",", "2"}]]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}]}], "]"}]], "Input",
CellChangeTimes->{{3.5664158836474*^9, 3.566416140980277*^9}, {
3.566456734485298*^9, 3.56645673599576*^9}, {3.5664588160137463`*^9,
3.566458817317369*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {
{RGBColor[0.24720000000000014`, 0.24, 0.6], LineBox[CompressedData["
1:eJxdnXecZFW1hScjEmSGPKTJOXTO3XWrunLqCoiIiAn1iSAKoiJIeIiAigF5
BsSIgqIiomBCu1EUkCyIgEgQJOcBZgaG4U2vdfs7v4J/huque+85+6y99tr7
7HN74buPbrx3xrRp0zZuP23a5L9HXPnRr+w164rEXxZcesz/1Nsnjn9sWfsb
fnplYvUZe9x108bN44P3jZ39tQ/9KVHuPSv5zv9uGv/N/qc/Uf/NTYn9Djl8
269mTCzcdtmXn7o98eAPv3n1gktnT1TfvcvB/b+6M+Gfz5mYpv/uT0xefcui
GRPbbjbvtIn/JC771jMX/bX02vj6fy+Zc+r/PZg4beJv38tc8eL48Bv/ecGH
hx9OHPXIKz9+7u8PjH978mu9jyV8nzsT/vxU4s8vrjj0i3/amEh0H/a7wo5P
J1Zu+/TiipnRyZrQs/H95kTXfeyP35m//rnES5Nff3G7yNc9l9j20NHPHbld
dOy2UZ6Y2BCPZ3b0Kd3whcSWbU+vvHt65Pm8kDhum5UO2nlj/NwXE77uv4lN
zcmZv5TwPP6cmBzNjNUbY/s9OP6jbaM9K7lp6nvjN94w+d+mxKQV9z/91fFt
N7/2Y3/cnEh/7shtM56yz8uJSWv9a/OsCd/vFexp+2xJeJzbTfzgw5M/2cLv
nz5x8hevJj6iL86a8HO3Yn/f77WEbvPGV8YP1MJNizSM7zw9vnzb6u97yLTI
9rlv/IFP7nZJ7oFp0eECwh3YRdPvfjzhn0+PdtFENiVmaOLTo5omsjUheB00
I5pcnUO/OD3+d0Z00M5rt5l8VrRWhp8RTa3XPP3PzPjn20W218xoav3+8YlJ
gM6KtNyHzomenYTDWbMiwXbf2fF1s6KUDDgtMm5mRx73lkSn/psdTa2n7T87
umry8Rv+m9AyPDc7sv1vSsisJ87BHnvPmhz5nOjJyeV74qkYn9tFrf6yXbTt
wzbLvzY+NW65y9kzJ4zTN0QvvHr7tpnMnrDfvCHyesyZ0GMeeUP08kmTQJ4z
cYCAsn3k58yZOFoG2j6aWl/f743RjjL8jAkt3+FvjOSut2wZv3lyGN98Y+R5
bBy3PXaI1+f5cS3jYTtExs1d477/DtEULwgW83eM9hHAH4v9fsd4HV9I2M47
st7G006R7To9krm+tRPrbb/eKfbLOZGfvzPrLx768s6sr9fpTfF1s6OGCOhN
kXE2I/r45G3+/SbW23ywS3T+1ZM32pjYBt5P7rZul/h+zyU0jqN3iZ93W0Lj
+Pku0W2VSUe/elzufu0u8bgeHzfv7RKPa8P4xZMw2mVutFSA2DRuvM6NcTht
Qv7yrrnRlD+fMOk+n5wbXbFhcsFnTpz3jcn/5sb+NmtCfnT5XPDgec2NpvhU
l+82j+/r523zwJN5a140xcfv03/zoj0FwGkTMsf/zosmUTF436vjpql5sR1f
jv17Xuwfz45fP+kGr86LpvhLj9lz1xh/t47b73cFH8bhrjFv3pPQeM/dFXvb
vrtGU3yt7123K/5ovO8aaRmXTIs03hm7xf41Pfbr3SLz5czomkk6fedu0RRf
G9e7RVkZeHYkM523W+x/s81Tl4ff2y92i8zXs2J+2J37b51chvbdY/tMM/+U
d4/t+0ri1m2scNIRu0fmtZdiHt+d+Qr/39095q1HE16H3bGP7bt75Dh7w7jn
twf2tp33iPSx+cy4cN/YIzLPvzBu/O4B/sQbn90jMq+/GseXPSLjbPqEcbdH
ZN6bOeF12zPS9EdnTdhf94zHO2vCcW1P8Kbxfip8X3z07T2j704u15yZE/Kb
3+4Zx9HpE/bTPaOp+H7hJIyf3zMyL70yLjPutBd8ZNzvFeNrQzy/vSLb+f54
fnvF9/v1uNd1r8i8d0Mcj/eKjPv/JMwHe8W88VRC8zhg78jxb0NCwxjcO1o8
efsrt8Txae9IdH/StJhX947j0IzYz/aOzPszY7/eG/zYn/Ym/ogHtp8PPo3r
+TH+Z/nf1PyYp2bFPDM/Mu/OMA4+Pj+airPm0fkxz21NmOenvv9iQtN4YX5k
P3omYX7aJ+bjh6wrVu4D3yk+ZveJ8fENx4NT9on56Q6vx4X7wAee3z6R7/uS
48W9+8AfjpP7xPpg63hRA9w3ft60CfvTvvCT57cvfGhe3Rf8mff2jab0j+x4
/b7EOy3zw+F642A/8Gic7gf+zMf7MV7jeT/mY77YL/K4nxu3nfeL48Gj4woH
L+0H/vy9/dFDnt/+sf8/khD8K/vHPDalM/dnvTy//SPH5ZetO6/fn/X2/PaH
j3yfA8Cb9cAB8JvHeUDMY3NivzqA+Op1PgD+s549II6Ps7wuNx9APLVdD2A8
5osFsX++5jxg6QLG73iwAPwZ3wvwR9m5tgB/FZzfsSB+/lXjctOjFuDvWvfj
F0SSUfOeGP/6pBz+7NT1z4+L/7+7AP7Q93+7IJ7/tIn85IJfswC8yW7/WEC8
FI8+uAB+s95bQLz1bRbG/jZ7wnJlIb/XvPdZGPvXbPPj8MI4Ls2ccLxYCP/q
MYcsBI+e98JoSn/bHxZGU/mBYHL6wkjz/ttz47LDOQvBo/1qYcxDvxjX+ly9
MJrKj4TzWxfG+H40oXHdv5D4JDnx9NR8Xkp8dXLZXllIfDN/LYr12msJrc/a
RcRj2bt/EXzmuLYI/MnMb1mEnjPvL4rXczvHoWPD760rF4FXxcsLFsGf8vtL
F8HHooE/LIr12GsJDfvGRXF+8HKsRxfhb7L3o4siTeeiZ+O8bBF637yxGH5U
/Jq3OMb/O+3/PYtjf3xkXOuUXhzj4/k4Pi+OdcMm6+d3LY4U947ZMq55Hb04
nt8052+fWhxN5WMy3+cXg0/lX+cthg8dpxaDR+Hmb+GzcHbXYvCoeT4Srpd/
vrg4jncznQ/OWsLz7c9LYnxMm7BOWBIJnv/cOK7bRkvwP/FEdUmMv8fGFRbf
viTWI/eMCycfXAJf2p+XRObFvyfkn2csifnmwThvXhLj6amEdc4S8gvZ9RdL
Yn292Xn3+JLYP151Xn7TEvS/hnnPEuKpeOXxJfCd138JfKjxbLcU/Ml+y5fG
z5sT895S8hHhILOU64XrxlLu7/VfGtmv4jz36KVxvjw95q2ljF/r9Pmp5292
vnXe1PdfMH5/tDTOr582fn+9FPtpmn9ZGjlPuSWumyzF/vrpf5ayPvKnZ5ey
fsLjq0vhG/PdMvhIdt1nGfpNOBpaFvvz9Andt7SM+Kvw+NZl6EXFhfcvI57L
zz62jHxH/PXp8Nl8twz8Wk+H+ynsXrIMvpU9r1wW5/3Tzb83LCMeyJ53L4t1
1Cvm30eXgW/Jgk3L0J+ex/L4fk+MKw/fdXk0VY8yHyyP493vXddJL3feMf/B
hPGwnPUyHpaznsbDcvBsPCyP9c0UHpajR42H5fCf8bAcPWo8LIePjYfl4NPj
Xk7+bDwsRz8YD8vhWz1363LwbDysiPOdmf75ihXk945/K2I8veLxl1cQXxz/
VqCH9L0PrEAvyf6fWBHnZXebjz+zIubfS+N8cgX5p+PDipgf/jNufpj6/VPj
5ocVrKfxsIL1lk6/ZwV4MD+siKwDtsZ4WEE+o7Rqu5Xk88LdgpXgz3F5Zawf
Z/n7uZXoU43/wJXkXxr/e1aiTzT+j6wkX9e4TlqJXhC/fWEl/ie7nb8y1oEb
Pf6LVzJf52MrsYfGc81K8Gs9tDKuy9xsez64Mo7DPzTfPrcSPSE7vLaS9XJe
tSrm82cT+vm+q+L5vuD8dnhVbI8Yz+VVcb47zTz9tlXgWXHlf1aBL/PDqrhe
MdPfO31VrH9mOS/+yir0sPGwCrxaFq3CP8wCq4gH5s1V8LHxsIr8SjB9YhV4
1nM3r6J+YTysjlwnej7heLE6tucTCfPDauqHjherqS+JT5qrqScaR6vRu/Kb
D6+Gj42H1dFUfVx2P3s19Ubr8NXRVD1Z9vzRauK5eOA3q9Gj8q+/rgZ/358s
R9y+Gv6WnR5YDb7tF6vBr3Gxhu9rfXdcg57Q9QvXgGd9PVqDv1k/rAG/Huca
6pGy/wfXwL/WD2vwd+uHNeBXuPnqGvhCy/iDNeBXOuyyNeDXeFgDfo2HNegN
42FNZLtsivGwBjwbD2uoV2mcc9ZS3zY/rgVvXve15Psaf24teNZzDgy/t5+v
xR+E42PW4i/yx5PXonf83LXgV/9+ay16WOP/yVr42PnS2sh1xecTqqdfuzb2
38cTmucda2P/ecD2fGgteHY9Z23k/YYrx8Ub09fF6/+vWD+si/n84XHNZ8k6
x4lXXxjXZUPr4ni+2fxcXke92uu0Dr2scX1gHfg1HtbFOmrGhMZ/5jrwaV5Y
h56WLvph+Czd/8vwfe3PXLUOf1DedMs69I1ge9866vme9zr0vT5uWUc9zuu4
fmofyf69YD37K96/WR/vY9wez399rLcm4ni5PtYT9yU8//Xstzhero/r9c9Z
/52+nnqk13k9+Zvxvh78OB6uB1/Wy+vBo+PhevSE42H4LPPObOP7et4ubfC1
62Bt1A/0/cVt1A9cp2wDn7JzRxv49H3byFe9f9ZGPivezbehF1xfaMP/9Zy3
tMEPzk/aiH9ax/e2wS+uP7SRz6k+8tE29IJ0/Alt8b7iFuvp/20DD4prn28D
L3Lfb7aBL8Hh+23oA/H6xW3oWftZG3rBfN0G/3r92sCn43kb/Co3vqkN/SKc
/KMNvvX6tpGfyh8fakMvCLdPBHvYv9tifn5gXH63uY16tXm1nfq/YLZdO+sh
++3W3lp/WNAOPvWcZe3EV/Hvunbwqu/1tMOnzjfao6n9XY0/3Q7+NK5yO/VX
jb/Rjv7VerwtfDZO2tmPsn+1ox8cf9vxj+cnp/GJdvSu/jm5Hf5XGD+jnf0M
rccX2tEL5qP2yPuCz1vvn98O3zrfbY+M8/sTWo+ftMf1s7/G8asd/WB9145+
UH400U4+p2ld045+EI/e3B7X115y/eiO9ng9XzZ/3TN1/63xflc7eNZznmyH
bwXrDe3wqfPcdvCsOD6zg/qa8dBB/db1sw70g+NGR+t+xcoO9IvqWe0dxAet
Y18H8cM6vYP9EcfXDvhWerXaEc/3Ie/HvnlqPP8wH7+9A/0rXB/eQX1X4zix
I64fPez1Oq0jxtumhOuTHex/arxf7oD/FKe/2UE9QD//fgfx3nqtA35VXesX
HeRj7rcIn53fhM/Wcx3g13zQgb9Yx3SAX+ubDvCr+T7UAX6tdzrYzxc/Pd8R
640NCdl/Uwf7K+aDTvJft1V0Uu/ReHbujPngR16vAzrRB877O1vrD2s7wat0
Slcn9Xvrh07w6vy7k/0G26Uzji/xflSjE7wJZ2/tBL/yu3d1wr+KL/8TPrt+
F74v3vx4J/mgePKkTvArt/1MJ/iVXji7E/zKH87tBL/O5zrRC85nOmN+fdb1
74s7Y7w97HrwZVP2uHNcYeW3wb7mg07qQdZ3YX3Eb7d0Um9znOtkfb2/08n6
Szf8txN8mA864WvXUTtb8f5KJ/pX/07vIh/TuOd2gVfZbe8u+Nz7keH7Gv+K
LvzH8aKL+KB17+kCz7psuIv9PceLLuZjvdVFPUbrcWBXvH/6TELXHdpFfVjr
9J6uWI/+w/7xwS7qw1qPY7rYP9M8ju+Cb8wrXfCR8HVmV2y/DebnL3YRn6Uz
vt6F3pB7fbeL+C7/uqiL+C97XNIF3vXv5V3gU7rmD+Gz9wvCZ8Wb67vgd+8f
dFFPc325C/+SvzzQxX6f6liPdaE3XD/oQj8pfm7qon/CfNFNfUL+P6eb/W/x
y17dsb3+HvcndZPPOd/uRl8YD93oReuH7jjPejFhPHRTX9X8093U2+R25W7w
o3VvdoNn6exDumO9P8N5zru7waPk/BHd8K3s95HwWf55fDf7awoTp3Szn+L8
pZt8znjoJp8Tbr/ajV4SbL/dTfxxvttN/iqe+lk3eHb/Q3c01a+mcf++m/im
ePbn7sh9Kudaf1zfTX5i3dwd89WD1oN3TX3/SeP7gW72B3Tdo93UK7R8z3bH
enzzuHCxsZv8SfPZ2k29S7Ce3QPeXF/oifXO9AndZ78e+Nb7F+H3+v6acL1o
oKsHvS47D/bAxxr/u3rQ/65H9ZDPGic92Ed2+3gP9jP/92Bf1y97qP8qTJ7d
E+uLDQnF43N76E8S35zfw/6b7HxBT2s96ic91M9c3+ohnssOv+0Bn+b/HvjX
erAH/Hm/N3xf47yjBz5Vnv7vHvDoONID38tfnuyhHiK33dCDf0nfvdJDPVB+
NKOX/Td9f9de+smkz/fpbe3nWNQb749eM664uLKXfETDaeulP0vD6O+N/fk5
80vUC/5cj+2lXqZ5jvWy/tb5veDP+WIv+NH839sLvrQOR/bCt7rtsb3Uv8QX
n+yFP50v9lJPdj9LL/pA4/5SL3rGuO6l3uv9j174VPO5qLc1fvy8F73gtKyX
/UrN5w+97P9oPn/pJZ/QfG7ojfn4uoTqk7f1Un8wDnrpZ5Js/U8vfGv+74Vv
7e+97G+Y/3uJx6oTvNYL39rf++BbjWPPPvDpde+DTzX/5X3wr/v7+sC7/b0P
ftX3BvtiPpvuPGG0D//S90p9sf22eP+s0Uf+5npMH/1Dmv+7+9C/wucH+tBX
inMf6UN/uV7Thz4z//ehF1zP7EPfiVa+0IdecH2zj/V2fa+P/geN+wd99BM4
f+wjPms+l/XRn6jb/q4PPMtuV/WBX/HStX3oAevF8Nmys496hNu7++Bj7z+H
54l3nu5Dv5j/+8C3eGxrmI/x0E99Qvvh8/tb483CfuoRes7KfvBrfuiP/fN+
83VvP/m2+aGffFx6PdtPP7DmW+uHjzXet/RTvxJ+39EPXqVf3tcP/oTHD/WD
V9Hccf3oWeeT/dTLZIdPh8/C4+f6qT9o/c7pxx/EL+f1s38h//pNP/pWy3pN
P/pI87ypn/4G14f60a/2g37w6PpQf1x/+m9cH+oHjxrP8/3kK/rxy/3wk/f5
BtCDun6HAdbf+0UD8KN07OIB+peF41UD1M9cHxwgf3P/yQD4Ex6SA+BP888N
wK9ezwH8QXY6aAB/Eb8cNsB+hP557wD7EcrfjhqgPub1HGA/wus5AB69ngPs
D3s9B+j/FA7OGWA/Qrg+b4D4aBwNwKfC948H4FPvdw4Qf73/O0C/qsw+PoA+
cBlpgPhvPAyAR+HsjgHyL/H0PQPUJ5RfPxS+b14dAN+uBw3At5rPywPoB+d/
g/H3t8bnDgbpH3N9aJB6tvxzwSDxxnp/kHhknTEYTZ23sF8Oohe0TTEyGPP5
veP278F4v+JR1xcqg+gF53+D9ANqXG8bRK9q/ocPoheE5w8O0l/gfqZB8jHh
8PhB9IHmf+og/CkcnDVI/iV8fmkQPGsdvhGuFwy/G+6vOPajQfSKYPTzQfS0
8H1FGL94ZXzQPHFwrIeuGYzj8bOuj900iF7w/vAg+tf140H69YyHQfjW/BDW
x/wQ1s/8MMj+v/EwRH+W+62G4vlttt7YZwh9YD04BJ6NoyH40PwwBB6N4yH4
03w/BP5lv/wQ+yHejxyCT+VXBw211hPePkS/juPWEPjVPI8cYv/CenCI/TXN
54Qh4o/medoQ+2uuHw6xv+b64RB6QW7+jSHqPebhIeoL5o0h8mnjYQj+Mu8P
wW/ethuiniaz/2Xodf3jQ+BLMLl9iHhuPAxRH3Y/5RD86/ph+GzeH0L/ep5D
8LP3D4eJD+7HGqb+4fg/zP6haHHhMHpX9ZQVw/RHym5tw/i/4/8welf+kBhm
v03xOzvM/oX5YRh+lj+8eZj+Vtnv0GHqR64PDZOPmx+G0Q+uDw3Df+aHYfha
+v6UYfDn/YRh8K77fHEYfnUcC59dDxgmfxMcLhyGfwXDS4bpl3Q9YJj6h+tD
w+DZ9aFh8KznXD+M/pXf/X2Y/Nb1gGHyX9cDhmO+uCvuvxxmv0jr8+zU+K7z
+mwM6yWcbg3r6frQCOvteDGCHna8GCG/8/7SCHiWXdaPgC/XC0fYX3Y9eQR8
mxdGwKd0cnkEvnf/xkirnjk0PM/1oRH8y/1OI+hb7+eH8RsPYX7Gwwh87Hrh
CPaR/b40gv3k918bQW8YD1PjvdP7bReOcB5AcfBnI+QvxsMI/SzGwwh62PWh
EffdDr8c42EE/WE8jIAv42GE/jXjYYT8y3gYAa/GQ/is+WwcwR+cL45Q/zAe
Euhx9xskyC+9v5Bgv9H5YoJ8Ve6zLkH9wc9JsP+m+Q8n4GPFgXSC8xLmxQT1
McX/ZgI9qOvemkAvGg8J6mOuFyaoTxgPCfoHXD9OoJ99PiPB+S3zQwJ+tn5I
gFfF+a+Hz44X4bP49aIEeHb9OEH9QWa5PIHecf0ggZ5Q/Ls6QX+oYHJjgnzN
8SJBvmA9mSC/dbxIoC9kj8cT9JN4vynB/qf3nxPoC+Ul0yLyG833DRH1Tt1m
x4j8XbDfJSK/1/N3jcj/df1eEXiVXfeJyO+Mpwi+db4SxfEprp8tC7/XOFeF
6423cH/vZ0bsF6pO0B3GJ53QH7XuVwxF5AOadxShl6Uz0hH9IZpPPkJfaN3L
EXjWqtcizg+43h2hL9w/EZH/aR/ukIjzrprPYRH1Ul33roj9OvdXRPCx6yMR
+lT+elREPqZpfSSCj8V7x0XU31w/iVr3o0+M0MPC/ynh+1qXM8P9hL/PR/iT
/SViv0V4+EpEPutxRZx/8v5tRDzSfb4dwcfSr9+PyD80jgsj9IXrt1Pr8W/X
iy+J0Md6zmUR+ljx5/KI+qn04e8i8j/PI4J/Xb+JqM+6/zeCPzXu6wI+7a8R
9QrZ/9YIfaxlvT383sf5w/VOYyP4XM+9Lzzf6xKhL4SnRyLih/uLIvSF3Pyl
iPjjr0XoMemXrRF6WLCdnmT/XvX0WUn2j7zfnET/ah5zk8Rf8dvuSepPeu5e
SfhV67Jvkv0CPXdBEny5nylJ/Ux+uTxJPUM6anX4vfenkuhf1zWS8K+u60ni
D/LL/iT6V3F4JBlNvX9B/pZMEj80n0ySfFbrXUhSHxfvlpPUz/W9WpJ+aj3m
wCT7G1rXg5PUi5wPJzlvoHm8I8n+sfTQe5LoQ9fDkq39EUck0cPC74eS8K9w
f0yS+O7+3yT6V/Y4Ptl6HvNTSfAp3XFqEvxaNyXJD+UmZyVb+x8+n0Qfi+e+
lES/uL84iZ7wuiTZ39D15yfR/87Pk8Qf8ekFSfpFxMc/SqKHBZOfJNHDsufP
k6392L9Mch5Ot7kirKfrt0nOK3peSfpfzAdJ9ITr/QHv4pXrksR781DAo/Bx
S8C7rrs9Cf9qXv8MeNa63RN+r3W+73X+8mDwJ/NBkn5l80GSfiSZ++ngr8LH
80n2j10XSaKXNZ/NSfSy5rMlCT9rPtNS8LPPt6XgZ59HTrHfL104NwUfO99I
EX/tlyn6g13PTBG/rRdS4Fv3XZwi/mv+y1Pws+a/KgW/mi9S6AvhuCP83vvb
KfSF8uOBFP7j/e7wfPNFGJ/5IgWeZY9CinqM850Uetn9lSn0hfkihb6QXd6S
gi/c35+in0rzPiwFvq2HU/CRcPy+FP1r0jVHpMC36+kp8G29nCJ+C1fHpajn
Ko4fn2rVr59Kwa/mixR4NG5S4N98ET77PE74vvki3E/2ODeFvhHtfy31uv78
FHpZ+PhOCr0s/rwgxXl/TeOiFP1RssfFKfbv5O+XBDx7HVLwicZ5+dT47/T+
1G9T5H+K/39IGTeHPJkQrK9KUa8Srq9OxftrL/q9OtcGvGgYNwQ86TG3pKhv
aJ1uS6EHZI9/Bnz6PFYK/hXe7w2fZcf/pKiPmEZT8LPs8XgKfeG8IUV8EY6f
SxF/xH8vptBTzieCf/s2Ad+y+7RR8K3vbz9KP5u+v9Mo9X7hcO4oeJbb7TYK
nsX7e41Sb/W4RtGbGvcBo9TnZL/Fo+Rb7n8aRb+KB1aPUm8QntaPol8UPzpH
waf1Rfgs3AyMwr/68cgoekN2SY221gczo/Cx7FEI45c9KqPoD9mjPsp5FsHs
wFHyY/X3HDzKfpP7rUY5r6hpv2OU/E/2eM8o+yc+TzgKXwtPR4yiR4SnD42y
vyfcHzsKnnXbj42CZ+/Xj4IfXXfSKPVe8ez/jlJvkD1OHwXf1uWj1Ivd7xc+
yx5fDtfLHueG+0t/fn0Uf9I0zx9F77v/a5R6hvXFKHrZfDFKPU467uJR9Ifz
+1HyZ+N6lH4L7atdEewvXvhdWB/n/6Poa+HiqlHqzcLRX8L6a32vfR0+bgz4
UVy4dRR+dL0g4E/jujPg27QX8G19ET67f3W0tT7yyCj8L9nzxCj6R+v+TPAv
+cuGUfjZ73sYpT6ndXo5+K/3q4N/m0fS4Fs8MjtNfUh42jmNvYWneWnej+DX
w6TZH3A/ZJr4K/vtl6a/S/NakIbfxNdL0pynkP1XpMkPdZ81afSA8NSWBp/O
R9LoE5m9N3wWbgbS8LH319LwsfCUSsP/em42Tb+o7FdMo5cUZqpp9JS+10hT
zzDO05ync79umv4K8fDb0+gNjeNdafSG92/T8LP7udL0ywuWR6bJ5xXPP5wm
/gpPH00Tn93/nwYf8pMT0uBH63JyGvzKP09Lw6+6zxlp6sWCy+fS1O9kzy+E
z4LtOenWevVX0+Db7wcIz9O+yLfS9BPLHt9LE08k636YRj9r3j9Oo5+lb36a
Rj9LJlyaJv/w+0LS6DeZ8ddp8kXZ+cqwHvLP8YBv148Dvt2fkG7dH7s+DT9r
3Del4T/3H6bhR9HaHQHPws3dAc+67b1p9IRw+0AavS2Y/Dd81vQeTVPPkD2e
DPh3fToNfzvuBP8SjjemqW9Ip72Spr9P/Ls1TX+19M2MDPtJ0oc7ZOBr+ecu
Gfa3Xa/MtNb798ygN/S8fTLsb2vc+2eoX3n/NAMfu16ZgY+df2SI9+6/z6Bn
xW8dGfJF4ak7gx52vTJDvU36cjhDvdn1ygx62vXKDHpEj81n4HvxbDmDnne9
MoPed709w36g7PiWDPmC7vO2DPmy6ieHZTj/5fwjQ3+xcZqhH8b1ygz9W84/
MvQTSV9+JAOeZY/jMvCX6/cZ+E14OjFDPVdx8pQM/bzuF8nAn7LHmRn0hfzi
cxn0s37+xQz49XsCM+yfyGxfC78X/56XwR9cvwz317p/LzxfeuDCDHpIl/04
Qz1dPPCzDPHI51Uy9K/IbpdnqG/Kj3+bYX/FrxfN0D8ge0xkqEd7fyFDfU/2
uDZDfJU9rs+wvyJevDmD/pDb3JYhXxSs/hnwI966O9Nab7g3g15wf2MG/tW6
//d1eH8s4N18EX7v/vcMfK75vJAhHohnNmXQ84pLWzLwt1/HmaWervWdmSUe
yT92zBK/fP4yS35ovsjSr2G+yLI/aL7IUo8yX2TZv5UfLMqyPyi/WpZFbwrn
q7LwtWC2Lgtfyz/as/C19zey4Mv9uln41PuvWfSF3zeTBe/i29Es+BVv5MLv
vb8R7mfcZskPvb+Rxd+Eh7dk0U+uV2TxV/H1YVn8Wfrm3VnyZdcrsuTT3s/L
0g/ufrEs51HNF1nip+xxXBY94vMBWfJ9jevELPtnms/JWerZ0imnZenncf9o
Fj63vsiir60vsq3nV8/Jwrfy969m0Reaz3lZ+F789+3wfdeJwv18vjoLX7tf
LUu92voii36S3ro0i762vsjC3+5nzMLf8qPfZzl/YH2Rbd1//XOW/QHriyz8
Itl/fZb8x/1vWfo7ZNfbsuRP7ofPUs/Wut+dJf+SX9ybRc+aL7Lwpb73cBZ9
INg+FvAv3fJUlv0/8edzAb/iiRfD73Xdpiz5ovkii772fmgO/eH6Zg79ITfe
KUe9Q36xSw5+Fqx3y1HvcL0iR73D9c0ces/1ihz62vXNHPzj/fYceNZ1q3Ls
H5ovcuyHW1/k0Ceub+bAi/s9c/C39+dz4Fv2S+bAn2gskyPf0zIUcvCt90PC
92W/Wrif6xU56ufeD8nBx8Lj23Lg1/shOfBrfZEjPukx78/Rr+X9kBzv25WO
OSoHX2tdj8nB165v5jh/5n6RHPra7xPL0c8gu5+S4/0W0sWfznH+xP0kOfhb
y/D5HPUQ6a0v5cgnvT+aA2/muRz49nn3HPj0+0Fz8K/884LwffnXhTn4WP51
ccCv3++Uaz1/elmO+rT3R3PEI59/yeG/fj9cDv8Wbq7K4f+yx9U59sN9nxz6
z/XNHHzt/vccfO3zEQHfssc/A74dp3KcZ9Vj7g34lg79T671PPbDAd+ubwY8
+n19Aa8a5/Phs/DxYvgsM2/OoW8Uj17Nka/qOdPz9GvLrWfl2U/U93bKkx8q
LM7Nk1+In3bPk3/oeXvn0dOy0755+mVEYwvy8LH4fkme9XB9M0/+4/pmnnqe
cZmnnie+6cyDB82jNw9eRHODefrZdH0iD37Fq6N58Op6RZ58Ungshs96bjUP
f4uvGnnwrPh5UB48u/8njx7Sfd6ep5/K9Yo8+aDiyOF5/FW3/UAefzbu8vi7
/SpPvu16RR69IXt+Is/+gOsVefhZ9jg5Tz+O8HxanvMVuuyMPPi1nsiTb/l9
VPnWfrZz8uhX1yvy8K/fX5Ynn3T+kUdvex3D7wW7C/PoC9cr8uDb+Ud4ntOG
PPUO5x959L/zjzAf5x9hvn7ffh5+dr0iT3+S/PuaYE+X8fLws/j/5jz6T/i8
LU+9yn6WJ1/0/kee+p7scW+e/Qm/ny1PvuX3wQY8u18qz/60+SGPXnD/VL61
Xv1invqI7LE5T/4ne74avi9/n14A78L19gX8RzjYqQCeZf+5BfhY9t+9AB97
HQv4t/srCvTDmB8K8IP3Pwrkg0oLVhTQe1qnNQXyQemR9QX0ovmhQP3D/FCg
/mV+KMC/0vsjBfSq65kF+NP8UACP4udioXV/sVIgvzM/FNDLuu+bC+Db9cwC
/uH3TxTgZ933nYXXnUcpED/MDwXyXQ3zyAL7La5nFqjXy0+OLdDfpXzh4wX0
hoZxQoH9cJ9nLZAfGlcF8h0t42cK5Ieyx2cL5Etahy8UyKdkj3MKre8T+L9C
6/tmv1GATxVnvlUAz7rN9wrg1eedC+BZl/04fJY9fhq+r7zg0oBnuf2vCviP
369RQH+4nhnw7fM0BfSTxvXnAvU74faaAnra56cL1IucbxTQ065DFdDTft9W
AT0t1rmrgN4wPxTI913PLFCvdr5RoD7gfKPAeRY97qkCetb5RsC33x8e8G1+
KLSeB9hSID90vlFsfd/cG4r4g+sTRfDs/ssiet75RhE8+7lF9lecbxTxZ/dT
FPF35xtF6kPupyjSP+pxF6mfCs/riuDZ+UYRPItfe4rk994fLYJn2W+4CD+b
H4rws9Y5UwQ/3h8twpcaV6WI3hCO6kX0hd//Fj6LRw8On7VOhxbBr/T5O4v4
i/dHi/iT90eL6HnnG0X0vvToh4rkt843ivQvyb8/VkQ/iyc/WUSvaV1OKlIf
FU2fWkQ/y+6nF9HPwu1ZRfSH90eL6Gf595eL6Gfh5Nwi+aH+/XqReO7+qyL8
6P3RIvwtt/pBEXz7falF8j/Z4SfF1v7qS8Nnvx8uXC98/bqI3pCdfl9EP4sn
/likHiOe/1MRf/Q2dhF/9d+/KLJ/KHveVKS+oR/fGvAtvvxHkf1Z4fCugG+/
v6lIv4fOD9xfpF9P9nio2Pr+uEeL6E3Z44mAB5nhmWLrfvOGIvUO/3mjInpE
9nilSL1PuHutCL8qLs0okQ96v6PE7wWzN5XIN7Ufu2uJeCE771kCv/LL+SX4
WPpn/xLzcf2yxHx136Ul9JjfJ1DCXsLp2hLxz3lYCT7xfUqsh/ixv0T+4/7s
Uuv5o6gEnn3evIT+dP2yBP/5/WUl9Ij9uNTan9wsgT/vd5TgV/nV28Jn91uF
79svw/3k3+8Lz3O/VQn/0n2OKlFvdH9miXzQ9csS/Cw8Hl9Cb3i/o4R+1nNP
LaGfhaNPl8hX5N9nloiP7tcuET993qUEH7nfqkR+KF349RJ8LZx8s8T+hMzy
nRL9xu63KoFn/72LEucP3T8R8Oh+7RL8KntcViLfk39fEb6vef4u3E84+kN4
nvsnSviX+7VL5IPuzyxRrxMMbygRn8ybJer17p8ooafdr12ivuHzeiX42ef1
S+gN90+U4Gfx2KMl+v/lr0+U0Jd67jMl9LXsuSHgRfZ8qUS+6P6JEvHf234B
j55nGf6W/d8YPmsaO5f5vqY/r9xaP9mjDH718/ll4odoZP8y/Cv7LyzDv1qm
pWX41/xQRi/77x+Uwa/0U3uZfgPzQxn8mh/K4Nf7oWXwa34okx95P7QMfr0f
Wga/3t8ov+79BGXiu+dVho/99xfK4NX8UIaffX6j3Pq+i3eH72tc7yujZ4S7
I8rwseswZfzJ+qEMfjXv48rg1/2YZfArf/hUmf4txf9Ty+DXurJMv4zi95ll
6knu3y6jL8wPZfp9dd+vlKlvmB/K1GNtpzL1WtetytRz3V9Vbn1/zEVl4r3f
rxHw6fevlOFfv5+tTP3O57HDZ/dvh+vlJ38I95cd/lRGv8uefwnjs34oE09k
zxvLxBv3V5Xp59C//yi37jfdVab/325fbn0/yf1l8nG/DyKsj/VDGf4RjzxZ
bn0f4LNl6hvyyw0BHz7fF/DjfomAZ132WsCzeHRmBbyK33eooB/cL1F53fmu
Cvysae9ZoR7n810V9kf03AMq6Huf76hQb3R+UcFffb6rgj87v6iwv+1+7Qr6
2OdNK+R78vOBCv0cWr/hCvh1v3YF/PrcQwX8yi/yFfDr/ssK9Q33X1bAj98/
X4E/df3BFfSBnnNohf4P5xcV9K+uP7xC/c12q4BnrccHw/3EI0dXqA9qPY6t
oI/9/sQK8ULrf0IFfeF+qgr87PPyFfI/1ycr6DGtx2cr6GPB+wsV9Jz3Oyvo
PdcnK+hjv0+lQn3O+50V8Ov391Y47+F+qgr49fs7A740rJ9V4FP3RwS86p9f
VcjfXJ+stP79hyvDZ9cnw/fdHxHw7f6ICnrDtBnw7f7sgG/3Z1eIN1qPf1bw
X63Hvyrws/zjvgr+r3V7sIK+0LgersDP4qXHK/CLz3NU4B/h7LkK+Z/L+BX6
ScVvmyvwm+uTFfSy9y+q6AnBZk4VfMtNd66CZ63fvPBZfLp7tfXvl+1dBb/K
u/erwsfy64VV4oHfN1fF3/z+oSr+6PfPVfFXrV9btfX8a2cVf9c69VXRY/p3
qNq635qowifaTxutko+7zlaFj1TPK1XRx+KnapV+O/dPVdEXfh9OFbz4fVdV
8Kz49PYq+tb9EFX4VnZ5XxV8Wy9UW+vTH6pSD3E+UQW/1gvhed7fDOMxj1TB
r/VCFX52nKvCz9YLwR5+/14VflZ+/KUqes35RJV8xO/frKL33I9dZb/WeqHa
ul9wQZV8SDi+qAqfaT1+UuW8rOpoP6+ij7VOl1XRsz7vFfDs85/V1+mFgFfn
E+GzHvvXaut58usCnjXvG6vEB9nl1ir+5fe/VNHPuv6uKv0onkeV/UDx1P1V
+uuU5zxUpV6v+zxahZ9ltier8LP//kyV+pzs9kKV/S7Jno1V6qsa1pYq9Vf/
fZIq+w9aj5lj4MXnw8fQz65HjoE3PW+3MfSGaGGvMfCudd43/N79D2Pkc96v
GKMeaL0wxv6k1mH1GPUK65wx9LHfXzOGPvbfDxljv8T912PgV/40MgZ+hdvU
GPjV+mfHeN+J/KwwRj4j/FTGiKf+u99jrKf3K8bQk7LjW8fYb/B+xRj1Lb8/
cww8+31JY+DZ+xVjUcvfvz5yDH2g9fjwGPU8fe+j4Xr54yfG4F+tx4ljre+T
PWWMeOH3c4+R7ykfOmMM//T7uMbI96wXxsh/FUe/MgYf+/0aY/Cx9zPHiH/6
59tjnE8RS39/DH3h8+Bj1KN8nmsM/Po81xj87PPgY/Czj3WNUS/w3+8IePP7
OgIefZ4r4NvnP8fQB/r5deH3nuYY/XDix1vC87Qet4fxyJ/uHIN/Pe0x6m+u
L4yhp1xfGKPe7vpCsJfD5Bj5nvOcYG+/T2oMPvb7AwOeXX8cg3/cbz1GPU7j
mF4Dz/Lr2TXitZZpuxr8J7/dvgbedN0ONfAoN94pfNY6vqkGn+q2c2v4g3C1
aw28ar12r6F/FQ/2rFFPEe/vXQOvfh9WjXqM1nnfGvrB+UuNfFh2XFAjn3Md
rsZ5KoXlJTX2q/XjZTX6v+RvK2qt9f9VNfShz5PU0Mey07oa/Oa/T12jXut+
0Brx3PuzNeoJslN3DTxqPXpr4FXX94fPWo/BGnjXY4dr+IPWIxGe7/6wGvmn
7jMaxq9pZWroJb8Pqsb7RbQehWAf4bJYI5/QOMo16vG6vlpj/9rn7WvEQ/99
ihp6WP51YA19KHseVGvdzz044EPjOKSGnvA8aq39c4cF/Mqd3lGDf/2+jhr8
q7j2nlpr/8R7a63nVd8f8O2/lxHwLT35wRrxQDx3VPAv4fvoGvref++sRn1C
fntMjXhk/q/h3/Lnj9Va/z77J2rU33x+rwYf6/oTa+hj//2sGvmMbntKwLPs
/uka8Vi4/EyN+K31OzPgS+vw2YBXrePna+gD+dMXaugHv2+k1qqfz6lRX9P6
nVuj/uH3vdbQK1q/r9XYT5ddvlGDfxXvvlkjnsgs36oRb1z/rhGPpCO+V+P9
GuKnC2rUe4SrH9bI56xna+RzsvuPA//4/SY19LCG/bOAX9fHAn7FT5fW0JfW
vwG/zo8D3jTPKwI+9fPf1NCz1uU19K7372voZ4XVP4brFX8mwv39voQa9WP3
/wT/cv0tjF84vaZGfic7XVdr7ae6PthH63FjrfX81M3BvtbftdZ+5dtq5Nvm
uYBfz7vG+Tjr88Bnzt8D32ka99SoV+j6+wKeZacHAv58PirgVfXPR2qt9YzH
wu/9/sdaa7/bU+H+8v9nAh+bFkK8EJ8+X+P8iJbxhVqrHn4pzF/xaVOwj92o
Rn4s2bAl8IPPa9aot/l8RZ39Kd1nRh09KPzMqlN/8ntn6+Rzov031MGv/HH7
OvgVfnaot76fZac6fKple1O99Tz13Dp49v5n+Ox+qvDZ5znC/TTPvevgV/ac
Xwe/es6+dfDr8x51+t90XnRBnXqMdPSiOuf/9JwldeKX7LmsTj4nP1pRJ5/T
c1bV0Rfu16qzHyJ7rquTz/k8ap38XeveUUcPy8xddfSn9UIdfhQue+voAdmz
v45eEG4G6/Cz66118Os6dvi94luyDp5db6mjV9xfHp5vvVAn39R6FOrko+LH
Uh1+1mWVOvysdR2rw8/CVa1OPqx1atTRF7LbgXX0nYZ1UB1+9vn6OvpCeuOQ
OvpRMD20Dj8rXh1WJ19SfHxnnXzPeqGOftV6HF4n/vt9X3X4VH78/jr6WNd/
oN56fvaD4ffeb65TH9Y6H11vfT/iR+roZem/Y+v0C/l9YXX0hfjm43X0hc/j
1ckPdJ8T6tSP5SefqqMvdJ+T6+QfWo9T6ugLrd/pdfIX4eeMsJ7i87Pq5EPC
z+cCHvS9swOeNd4v1sm39Lwv1dHLfv93vfXvfZwb8C7cfDXg0+8TCNe7vl2H
/4WL8+voCffj1uFjrf936+ghXf/9OvpY/vyDOvpYfnBh8G/h7Ed1zito/X9c
p19W/d8/DfyheV8S+EXL/vN6637IL+qt9bZfBn4Wfi6vU5/SvH4d8KFp/jbg
R/H59wFf4tc/BP7UuMcDvoX7qwI+Fe/+HL6v9fxLvbW+d014nt+fEsbj884B
r1rHGwJeDbMQj+TPt4R4Jb/5e536hPPzwAfuJwx8rPW4M6yH4uXddfSx1uOe
Ovt5/vsf9db35d9fpz9Mo3igzv6B1vHBgB//vajAh7LHI3X0tPzjsYB364eA
T8mMp8Jn2emZOvpBvPxcuL/1Q3i+4t0LYXyy50th/PL7TcFfxY8vh/nLblvq
1NvEj1uD/XxMsQEfC5/TG9hf/Dirwfp4f6JB/dj6oUG+4/7qBuvv/qgG+tLn
MRrws/VDg/zK+qHRiu9dG/C17Ll7A7zLHnuEz7Lj3uH7Ph/aAM8yy34N4oHG
fUAYj/8eQ6P172kuDfPRc5Y3yOfktisb8K307uoG9Uv549oGfKvnrW+Qr2ja
7Q3qw+LHjgZ8pPXvaqCPJUN6GuhL//3ABvmT1n+gwf6eaH2o0cqPIw3wqmlE
jdb+h1T4LH9KN9AHkjHZcD+/nzM8TzxbbBAfxHvlMF49t9pAD/s8fIP6sO3a
gH+Fn2aD+oTc7s0N6muy51saxDfh/K0N6muKr29r8P4XrcfbG8RPfe0dDfSi
8od3NdATwuF7Aj6Eo/cG/Li/pEG9wPXhBvpZ4zqiAf8KhkeGz7r+Qw341/Xj
Ruvfozgm3F/x7qPh+X6/YIN44feLNqi3KR/4ZKN1v+6EMH/p15OCffz3QAOe
tR6nNsg/5BanBTzLnqcHPLs+3aA/Ufc9q4E+tn5oUK+QX53dID5rnl9s0L+p
53454M373w340/qhgT6Qfv1qg3zN+iF8ln+cFz6LH88P11s/NOB3xfHvBnxb
PwR/E4x/0EAfWT80iDfWDw3qxX7/QAO9Jf/4abCn9UPgD+uHBucbrB/Ceom2
fxnWU/nA5QHP1g8Bz/57qw3yP/nH7xvkf9YPgT/lH+MBn8L3VQ30g+LC1Q3y
Q58vCvh2PeF1fHx94Hc978ZGaz3i5kbr38e5tUH9W/i5LcQb9wMFPnZeGfxf
198V8Cs73R34w/WEgF+/vy3gV/i5P/Cx3+fWQD/670c0iM9a/4cb1Ct03aON
1vcDPR741P3KAY/yx6cb6F+lUc800MvuNwjflz9uCPjV+r8Y+F3+vLGBPle8
2hzwq/j6SsCv1uPVEG/cvxT42f0KTfSE/z5uk/N7Wo/ZTfSxdMZ2TerHWoft
m5yvdH9kE30se+7YJL+TP+/cBL/az9mlCX61HvOarefhdmuCN9l5jyZ41Hrs
1QSvwsn8Zut+3L5N8j/3YzfBu+LignA/xbFFTfhZ1y8J49F6LmvCzwpjK5ro
fa3nyib5gNZzdbCH9UOwl/xrfZN8Q+vQ3oQv/P6rJvup0kvdTfSxx9mEj/z+
iibrLf8cbIIHn09vEs/9vqwmelXXJ5vwpdwo1UQ/CA+ZJniVW+aa4Nn9X+Gz
ri828Q//fdMmeNYwquH5mkYtjE/zbDTRG96PaKI3dN+DmuBZtHFwk/0Q4eGQ
JnrDdcgm+03Cw2FN6p3CxTub1OMUxt7ThI/0vPc10Y+uJzTJl3TZB5rkU1r3
I5vwsXTQUQFfuv7oJvrA9YRma7332GZr//tx4fuazseDf7g/pQkfq850QhiP
z+MH/Ap/Jwf8Kn85tUm/vM/fNsnvrA+a1HP0/DMCH4gWzwp8YX0Q+ET4Ozvg
1zzWJL8R/r7c5Hyx5vGVJvmRYPR/TerJ+udrzVZ98Y2AJ8XDbwa8af7fCp+F
3++Ez5r/95roET33gnA/Pf+HTeKB+PCiJvzrfruAV43r4ibxRcvw02br3z+7
pEl9TTC7tImekJ0ua7buH/0q8IPyrCuanAfx/kPgF+mw3wX+kdtcGdbX54Oa
9Ff4LVhN4rX87E+Bn8VTf26iV/33vQO+xRPXNsnP9Py/hc96/g3hs88XBX71
+wya5I/y378HvCp/ub2JHpb/3tFED3v/v4l+0vPvbpLfatr/apL/qj7474Bf
v7+xSX3C5xkD/6pe+2BYH79/KayfxvlIWF/vRzTRxz6vEPAhmD/VRG/4/ELA
s+LBcwFv4vMNTeK/3x8bPrueEPDq97M0W/eXXwn8qmXfEp7//8B5wZg=
"]]},
{RGBColor[0.6, 0.24, 0.4428931686004542], LineBox[CompressedData["
1:eJxdnXecXVX1xZOQBJBiCKG39F6mZvq8O6/3ioCI2FERRFBUpP9QAcWOjWJD
QbAhCoptBhFBqQqKIFKkSw0BEiDAj1nrzvd8HvwT7rx37z1nn7XXXnuffe9b
8M6jmu+ZMW3atE3bTps2+e/hv/vIV3afeUXixZMm/2/ZxHGPLu3c5se/S5T7
zhx7+4PPJ4buqX3u6x/8Y+K1Lx2w45pnE7/e91OPNX59U0Jf23tatODSY973
pSduS6z7z+LZp351ZlR955yDBn75r8RrJ809bWJWNE3/3Zs4VheYEfnv/+V8
n3c/9xt5w+0XfGjkocT+9//g3D/NfyDxracu+nOp79GEbnPCzeM+fiLx2kmp
zx7x3Hii99DfFLZ/MjE5qn0/NX3iZE3o6cR5f5r/2imzJv7y0T98e891GxKb
W5MXnD1x9XPLD/nCH8Pxhycvm9iYOOq1Uf31uzMnTtQFn028NonrPvqHaROe
z7OJa0uTA9w07vOfSyTf/uAtC//94Liv83zibwv//cJJh98wPjmaGas2JW6t
TJ54b+KHf548cXNicrYHv3tj4sYbJv/bnLBdXozv80Ki+NpZp+86PbbPi4nv
Za7Y+PJtMyJf76WEbvfCzMj22ZLw32dF3//Q5F+2YP8nT5icwMsJz2tG5PG9
knj4pYs3/L0yLb7eq4kLz5000ObYztMij+uRxDINdFr0j49PrtBtifs+Me+n
ufumRSsmZ738rvEtk5d55/TIdn58/N0CyPRo0sr/Wbx5fHIWd9w0Pfraa6vz
8EsvjwteB8yImgLO9InJqxzyhRnxPGZOrLns/NdWdEb0jclp/3XWhJYhs1Vk
PM6e8LjCscc1M9L0emdNPD0JhzNnRnNkyK3i682M7fjKuO08K8bp5vFu/Tcr
mlyNoXs2jtv+syKdVrpnfHLUF2+YFU2u5u8+8otx4252ZHw+kNhj0g0umx1/
viHG59aRYHLdi7G/bB1N4ft5wWXryHjYKrbjNtHUOGX+S7eJpvxFsH54m+hg
GXZWtJ+AvW00tf7G6bbxus+Ir/eGaLc7btrUun9aZJy9ITJ+Nidu3jQJgDdE
mua3n4lxt100OZtbFj6WkBkP3S56fNJ9Hvt57AfbRcbjHeM6bc/tI9t5w/g+
Gtj2rLf9YPto0irnPzVtwnjagfWQuc7fIbL/zJ44UkDcIXr25dteW8mtJ3z/
HTm+ZtJtv7RjbLfZE+aNN0bnfHPyv1kTxtEb4/WaMfExDeSN8fhfjflgTiR4
veG58dfA+4l5a+eAVw3nqDmR1318XPzwsznwltdxDuvrdZ8TpQWMTYlLJuE/
Z6fIuN6SMF53iqb4Tf7yjp1i3psZHT/pPp/YKdIyHTIrnsfU+bON48t3isyr
syP7z06R3PT02ZFOnzeX82XejrnRK5Pm6pwZ22FuNOXvh+m/uZFxOi2SOf5v
brSXCOLlhGji6rngw/49Fzxc/93JD+bG/nlnQjDcbef4/K8m7Hc7R/aL28eP
1hd3jqb4UOM9e+fIvPB8bN+dI/vdy+Pi17/sDF6M950juc3crSY03hnzIsel
WRP2o3mReXz2hHE0L1qkBdp6wuOYF/PLNhPC6znzIuNwmwnbd15kXtt6Qst5
y7xoiv+9TrtEU/HCdt0FvhL/lHeJ1+3lcfP8LtESBaDN4447u0T2k43juu93
dokcJx4dt1/uEq/Hf8Zt310iufNJf4/j4K4xXh6J+WTXSPC9fUNC/tLcNcpr
oTYljN9do6v+OnmhlxJaps/sCt+YL3eNPM6toslV/viju0ZT8cJ23S1e79mx
nXaL/Wd2jKNwrPGeuBv4FB99azf4S7x25W5xvNgqsn/vFo93eqQ488xukXXF
KwnRxw67R1Pxz36/exy3novnt3s0Ff89v90jx68/JmTOH+weTekB23n3KV0x
bj7YPTIPPzkuN99vD/hA9Di0R8xnr8bxaQ/4xHjeg/hkHt4D/jEP7AE/2Z/2
AI+67rZ7cmye3DPGy9bWH8k9wZ/5b0+uL/f/2J6R6XerCfPUnnFcmD7hv+8Z
eZ4vjus2z+4ZWWc8O25+2iv+/PFxjXfFXnE8vm9c65bdKzLO/uL4eMpeMT9f
4/W4cK/4fo/FfLFX5Lj4rOPF3Xuxfo5Le0XWTa/EOmZv4pH9ae9oSs94fnuD
R/P93tFU3HU83Bt+1LpcHz4XvT20N3zo+LdPHPdmRhpvap+Yr6fHfLwP+DOe
94l58sWE+WIf8Ge7TX3/6YTCwfP7oIc8v32JH57fvugH43Rf4o116r4xXjeO
e377Ro6jL4x7flPXmzbh+e0bxToo5sP9Yr+aOWE9sB94sa7YD33k++wHPv29
8LnjXDhf47h5v2hK/5ov9rPd7psxYb6YDx8qHi6ZHxm3r4w7HsyPROcXPWt/
TM6P7fGY8Vifj300zbfNj/XDn8cVNo+cH4/vOuPpuPnRdyY/nn1fQrrwM/Pj
9XjcOvw782P+2ejvXzmfeCzeuXZ+HK/i/OIf84mP0k33z0ePGVfzidf+d0E0
pactVxagv6Sn9loA/wlPIwvgP8eLBbH/TXdcOHhBNKW/HWcWxHy6JWF/WBDZ
bzdbT3xqQTSVL4jGvryA+QsWVyzAXlqfPy2IpvIPrdPfFsTx8r5x2eveBayH
5MSTC8CjeWEB8cz8tTBynNzi9VmzMI6f0yZkh4GF4NN+vxB8ii4PXAi+PI+F
6HvJgA+Hz71OC9Hz4o0LFsK/4uNLF0ae9/QJ/f33C+FvudGNC2O/fynWo1PX
e35c9n5kYaw3NozL3psWxv7xyLhxtoj8RvOYuyge35Xj8v/1i+Lx3+e8Mb3I
umrGU3F8XhQ5r3nW+vkdiyLHmRcSWoejFqG/NP4TFxGvZb6zFkVZOd502/mc
RY6bx8yI48gi4+7crRzH/roIvGqcdywi3muaDy8iP5AdngvX1/hnLsY/7M+L
GZ912uLomUk4HvSc8/hocYz3pxIKP9XF5EOSNW9dHPP4PxLSDR9YHDlOnztu
f14c65V/jMs/T18c5xcPjtvPFsf68Klxj3sx8Uz8+vPF5G/y4/HF6DHp7psW
x/idNuFlXBzrsRkTssv/FpOPeP0Xw3caz9ZLwJ/st2wJ+HScXAK+Rb+ZJV63
7WdOyD+bS+BLr/8S+NJ6Zkmc37wa55NLwKv44qwlMb8873zrnCXkW8LvD5eA
V43/V0vQk5rGNUvAq8e5BH6QG/93CXwqf3p6CfFdeHx5SYznja4T7LA0mqrH
yJ/2WoreFB6Hl0ZT9QrZvbSU+K4/v3kpeNV93rsUvMqPP7qU/EX89clwbL4L
51tPLwXP0nU/XYq+lD1/tzTWy6/G9ZWlxAPZ886l8Kv5YCn8qmXavBR+tZ2W
4e+y487Loqm6l/lgGXxhPlhGvDcelsGvxsOyOB/YFOefy+BXf28Z/Go8LAO/
xsOyOL5uNWE8LAO/xsMy8hfjYRl8azwsI38yHpY5br08y/z69DLwLxi+sgx8
Gw/L4/nM8P2XL4/1+fQJx7/lMT+/YDyXl1Nfcfxbjn2ky96/nPgku358OXpU
9v/0cvS+88nl0VQ9zfFhOfmq+WE5+DU/LCdfMh6Wx/WUl5xv3bUcvJgflqMX
jYfl4FkydesV4FfxdP4K9IHHtQI9oO/nVoBnjX//FeBZ43/XCvhd3zt6BXpZ
NHXSCvSq+O3zK9Crgt15K+L4EdcdL1kR1x82uO545Yo4/jyc0HiuXUF9w3po
BfUe33dFHD9uM99uWAE/y56vroCffZ+V6D2NZ++VrL/xsBJ8GA8r0Qvik7es
hE/lR+9bCR7NDyvRq9ZDK9Gzou+vhM+Nh5XgW8v485XgWcs2sRI94frKSvja
eFhJ/BCMHluJf8qeL6xEHxkPq8C348Wq2B+fiPXCKvSt48Uq+EPjbq2K85f7
47ryqnh8TyZktg+tQk8YD6si19FeMD9/blVcF3w5ru+tIp7Lnj9chd5V3P/1
KvAn//rzKvBrnK8in9I87gvH1seryNfsB6vBu9Z3+9XgXecvWI3/6OvRavBs
/bCa+fg+q6Op/QXd5wOr0RvWD6vRG9YPq6mfiOe/tpr4J7t/fzXxUX522Wri
p/GwOo7HG+J69WrqVcbD6li/vOR6/mOrqS8aD6ujqf0GjXP2GvSF+XEN9Svz
wxrwaV5aA35lp/3D545La+BvzeOYNfiL1vXkcD/jZA3jUd5x/hr0scb/ozXo
DedLa9AbyluuW4M+lt//cw32kj0fWBPXj++0PZ9Zg72Fu+lrwbfjxVrwrfks
Xsv6Ko4Mr0Ufmx/Woj993lrql5Kt718Lno2HteRvGv8Za8Gfcb0WfAs3P1gL
XqVjfrGWeoF05lVr4XfphFvC9TXve9YSH6xD1xI/dLhlLfmc4+Y69IbjxTri
k/18HXrM85/6/q+tVw5eF8evv417/utiPflAHC/Xwcfmx3XwsesL69Cbxvs6
6keOh+vQE5Yx68CX4+E69ITj4Tr0sMy6VQfHut+cDr7vuNQB3+v7izrQw+aR
DvZnpJe6OuI6+Yv2r4GOeDzPjTsP6IjrZU+PK4zlO+LxPxTXFzrYr5COOLAj
jo+XjDs/6YAv5Nfv6aC+6PpDB/yrOPmRDvSh8uPjO1hPhYX/60APi9fO6ohc
N3w1odPO7WA/QOv+vQ74UH59SQf5mnHeAd7M1x3t/DnRAf4dzzvQv8rnb+oA
j/raPzqID17fDvhW83qgg3qe4tpjHfCt/bsD/aB1fqED/WA/6UQ/aB227gSv
+t68TuqNxn9nfP4zrj8u7SSf06qt7WR/QLS5vhM97HyjE/zqz+lO4rfsX+6k
XqrxNzvj+u/MCc3jLZ3oZe9fhs/tX+F8x9/OuA45Y0J58Mc7qT+ID07uJB5o
XKdPXW+L6yuf72R/zDzUST6gf8/rpD7tvKYT/9Z6/Kgz1h9/j+NXJ/sv1ned
5NvC8UQneNZ6XNsZ5/tPuP5wcyd41jz+2Yk+1nju6mSf2XG2k3quZM/jnegL
LdPGTuoJXudO8F7XNk4X+tZ4CMeun3VxvnV8F/Ux/XlFF/FAdunsot6s8/q7
0L/2i67Yf56xPsh1kR9oXNUu8jnFtTd1Ea/ktm/tIp4pbr+7i/xO/5zQFceX
R7xep3VFU/0Ark92UY/QeL/UhZ6U3j23i3xO+PteF/xovdYF/rSuP+9Cr3qc
XeRjzm+64G/ruS78wXzQhR4wj3ThT9Y3Ybya7wNd6Hfrna5oqr9C/PRMF3pJ
9t8c7OF16aa+q9O27o738662P+zYzf6Cxr9fN/0Gvm43+13CwZpu4+i0553/
9XSzv2790A0+nX93g0+Poxt8uT7XDT417zd3g0fFl3eEY93nfeHY9btwvuLL
x7rhX/HsSd3U85SmfbobPSCe+1w3+63yh7O74V/nc93sNzufCfZxvJiy339c
D76sm/xYuLmym/zZfNBNfm19103+LZq4pZv9Stu9Gzx7f6cbvSicPtiNnjAf
dJPfOQ52Ux8Q3l/qRp+Kd6f3gF/5x0498LHWY48e8O7r9nC+xr+8h/05x4se
9o+F2/U96AnFuZEexu940YPetd7qob6m9di/h/1axZtDevB/XeddPfCD85Me
+EPrcUxPnK/91/x8XA/8a1z2wL/C1xk98K/W6Qs91Ce0Tt/oifH2quPtd3qo
t8m/LuoBj7LHT3vQC+K3y3vQF8oHfh+OvV/Qg94QT13fQ33N+wc97F+4vtyD
f8lf7uuJ6xUvJ2THR3vgZ9cPeuBnxc/NPeyn+Xu97HcLV7N76TeQ3XbvRQ8b
D70xn90f59u93kfc9FSsH3rhK+uH3hjvL8Z46GW/Sn9O94If4bLcC36F51Yv
fKx9wYN70QuKK+/spb6gYR/ei/6V/Y4Ox7rOcb3oa+H0lN52fJ/RC76NhzA+
fe9rvfRT6bbf6mX/0PluL/pff/5JL/mB+x+C/XSd3/aiL7TuV/ei54yH3piP
/+39jb/3tuvBO3pj/n3a+L6vl3qF5vNIL3pTy/d0L3pU193US7zXfF7pBW+C
1az14NH1hfXgV9fdZ33cJ7NVvH8RPtf3V4fzxas964kH4qeh9ehljf8d6xm/
61HrwaN1/Xr2M+SmH1tPvmH+Xx/j7+G4frmeeCk3/dx68hn56dnryXfEN+et
h7/ENxesh1+dv69Hj7q+tR58aj2uXA+fmv/Xt+9nXLv+dfu94XPh65/rwafq
cP9Zj76wHlwPPrXsj4fxyQ03hvFL3720Hj0hvTOjj/nr+zv3xf74tPsx9urD
nuLhhX3oXeFsRV+sT29PaDgdfeBRpw30tfNL1Ed8dT22j3qD1rnWBx69T9AH
Hp0v9oEXzf89feRfus8RffCt5vPhPvZ/xRef6INfnS+G77ufpQ/+Fr6+2Iee
8Dr1US/z/kcf+xmaz0V95KPur+qjvuJ23j7yWc3n933Uz/TvNX30M+g+N/TF
9aj3jevfW/uoB3s/tY/8RGH8v33kL+b/Puqh9vc+6qXm/z7qqfreq33kT/b3
fuoD0jG79YN3r1M/+kHzX9YPH7u/rx/9YH/vh1/Fd0P98Lt4IRXup3GU+qmX
WS/2x/bZEu9f9JPPaRjv7CefEz7f30+/jfT70f3wres1/eTH5v9++Nb1zH7y
a83r81Pjfyiub/aTn7u+1896K559v5/+ROeP/egJzeeyfuK15vObfvAu3riq
H/wpbl3XDz6tF/vRw5rPv/rxB/nbvf3wt/ef+9Er8uon+6mPmP/78T9N85V+
4oXxMMD+s/KWPQfwb/HCggHspXVbMQB+zQ8D7DfLDH0D7GeYHwbAr/R6dqAd
v/UB8KvxHjjQjt+3DYBf8fxhA+BJePzgAHwpGjt2gPzM+eQA/Y7ShZ8Mx7ru
ZwfAv9bvywPkj+KXcwbgX9np1wPoAYWhawfo99A8bxqgfuv60AB61us2wH6x
60MD5BuuDw2g1zSeZwaI/7rsiwPET9c5B6Op/nKdv90gePR+0SD5knC5aJB6
r9x45SB4dH1wEDy5/yR8X3gYC9fT/HOD4N3rGe4vvzpgEP4UDg8dJF4Ilu8Z
ZD9N+duRg3G95VHvnx07yH6k13OQ/NbrOUh/mNdzEPtr3F8epH4pHXDOIPHQ
cXwQPSd8XzwI/3i/cxB+8v7vIPmZbzuIfhS+/zxI/cx4GIQPxS//HARv0iN3
hWPl1w+E7xv3g9TDXA8K99N8Xgzjcf43xHjdhzmEf7k+NIReFczmD+Gv1vtD
9Bs7rx2ivuu8dyiOb7cklOaNDlHvsX8PxfHzf/FzEEPk287/huj/k355yxD5
uub/7iHqvRr3B4aoP7ifaQj8ya+OG2I/V/M/dQg867wzw7Hs/MXwfeHqm0Pw
s+LFd4bQA7LjD8N45Hc/G0LfCN9XDMGf+vN4mK/rx8Ee7p8ZivuE7473h4fA
s9PgIfBsPAyxv2Z+GEL/mh+GwLP5YQg8Gw/D1H/dbzVM/dT9JsPgyXpwGD51
Xj4MX5ofwrH9Mhyb74fhX9kvPwyfej9yGD4V7g4Ybq8nvHWY/UDn8cP0cyjf
OGKY+GE9OEx80XyOHwbPWufTholPrh8Ok1+4fjgMnnXaN4fBs3lkmPqm7TpM
/cx4GCb/tp8Ok5+7X2aY+pTue80w9QbXnYbhV+HmtmH0sPEwTLx3P+UwesH1
w2H2y8yrw+DddZhh8O39wxH8yf1YI9T7HP9HeH5Fl1kwwvz1veUj2Ee83jGC
/Rz/R+ALrVNihHxDPJUdYX08rhHqC/KHN43Qjyb7HTICfl0fGkEfmB9G4vrR
NOPzmBHqseaHEfAs3J0yQj3Y+wkj5HeK618YQf96nzocux4QzhccLhyBr6VH
fjqCPnE9YAT94vrQCPzs+tAI+Nb3rh+hXqi4/vcR9K7rASPkB64HjJA/uN9q
BHxrfZ4eIf/QfDaNsH+hePzKCPmL60Oj9Ps6Xoyidx0vRuFH7y+Nwqfyh3Wj
4NX1wlH0q+vJ4dh2DMfitfIoeHb/Rri+96tHqSe4PjSKf7nfaRR96/38UeKN
8TAKPxsPo/Cz64Wj6A3Z74uj8LPi39dH6TcxHkapxxsPo9Q3hdufjFL/NB5G
6Zc1Hkapn7k+NEr9yXgYZX/DeBhFDxgPo/Cv8TDa3r/2yCj4NR7CseazaRT8
O18M1zMeEugZ9xsk6J/3/kKC+orzxQT1B7nP2gT7yZ53gv0MzX8kQf1Xdk0n
iH+2ayLG8/WO/60E6yN+e3OC9TMeEvCz64UJ1t94SBC/XT9OkB/5+YwE+DI/
JOBn64cE/Ky4/40EeDdvJuBn8etFCfDs+nECPIvvLg/3c/0gwX6c4t+fEvSj
6bI3JugXdbxIwNfWkwn6TR0vEtTLZY//JeBr7zclyOe8/5ygXincT4vIrzXf
bSL4SP68fUS9X3F8TkT81v13jsj3df7uEXpD67tXhD4wniL0sPOVCDwqTC0N
xzpvZfi+8RbB997PjNqfp+iNiBdaxoGI/bkbHY7Bs/wlivBX/TkdUW/UfPIR
/q7LlqOYj++1vq5H7Be53h3F9YY/mE8OjKh/6ryDoxhvD7o+cWgEP2se74jo
b3F/RcT+nesjEfpDbnhkBD8qnh8doT+0rsdG7De4fhKBd9HOCRF4lZ1PCZ+L
t86I0OPC31kR9TP7S4S/CQ9fidBLjq8R+PX+bUR/sMz0rYj+JvHK9yL248WD
F0bUL12/jaj/yK9/GvG8muqjl0Xk64o/l0/h4xnrw99E7M95mSKe/3L9JuDF
/b9Re7/aXyL40f4aoUc8rAj+1mVvC8cus4Rj8fRdEXpZfnNPwK/XJSJeCE8P
R+zHub8oQl+IRp6PqKcJVi9G7F9Kv7wSsZ9s2hpj/1N52swx9iu83zzG/pvs
s9MY+kHLsssY+2+a3+5j4FP+tvcYeJG/zR+jnuB+pjHqWbrOsjH4UvnjqvC5
96fGwLfz3DH4XeNaP0Y+J14eCOPReaNhvMLF2OvmkxmjHqP1LoyxfyzYlsfI
7zSu+hjxS2F+/zH0sXTZQWPkJ86Hx9B34sO3jbGfLJ5+1xj9g66HjcFPwu/h
Y9SnhMMPjqE3xRvHjJFvuf93DH0hexw3Bt50mRPH4E/53anh2LgO35eOOHMM
/GueZ43B//KrL47hP+4vHoNvzQdj+J/OPy/M1/n5GP4ru10whn+Lj384hh7W
9340RnyTPX82RvwTzn4xRnzUOl8xRv3J9duw3p7XGPVg80HAi+v9Y8Rr4eAv
AX/GyRj5l/BxS8Cr4v1tAc+a9u3hWLx41xj6W+t8z1j78+b3j1F/Mx+Mwb/m
gzHihcz9ZMC38PFMmK/7Uqf84xHP54WAb81nS8C3xjktyfsc/HxbEnz7eeQk
eNa4d0qS7zjfSLL+/l4S/nU9Mwl+rBeS8K/usygJHjX/ZUn4V/NfmUTPmi/C
sfR1V/i+97eT4Fn58WASPHu/O0k+ar5Ish9nvkjinzqvkCTeON9J0s/u/sok
+bH5Ikn+LJwdGOzr/v4k9WTJsEOT1JOth5Ps3+k6hyVZX+niw5Pg2fX0JHi2
Xk6CZ63zsUnwrOsclwS/sseJSfjZfJFEX9iuSeoR5otk+/P0Z4XrmS/C/WSP
s5PUK7RuX09SX3bffZL6uPDx7ST1ZdnpgiT5gsZ5UZJ8Qva4JEm/idb9p0n4
2ron4Fn2uDwJX8seV4b11G1/H/Ats14V8K14+qeAb8X165LEc+HjhiT9ZHLD
WwI+paduTaKfZY/bk9QjXAYPx0LR3Un0sfD+34B/l8kD3mWP/yWpL7sOE/Cu
eW5IEm/Ef88l6Q9xPpEk//Xzb8n4fRv/8/7RtBR6Wd/fNsX7BvT9HVLoPeWN
O6XAs8w2LwWele/unmL9vW4p8KFx7pei/1L2W5RCb7j/KQV+xSurUuhd4Wld
iv0Rndcdjq0vUu37K4Mp8C6+HU3B3+LbZAo9omFkUtQvZI9CivxV9qik0Muy
RyNFvieY7J+iviNddlCK/Xz3W6Xi+HCR3//wthR6WfZ4V4p46ucJU8Rb3fbw
FPFYePpgCn5TXPlwCv4TbXw0Rb+x9+tT6FfZ46QUekL6/P9S4Fn2+FSK/M44
Csfu90uBb9njS6n2/uWzU8QD8cY3wv21AOeliCfu/0pRj7G+SJHfmi9S+LN0
yyUp8mHn9ynyZeMghR5Rv8oVKepz8uvfpNAjzv9T1Fdll6tS1F913WtS1De0
vtel2H8QPm5MEe/Fu38L+HK9IIX+kB3+lYJ/5bd3peBr64uAZ/evpsgHbeeA
b933sYBv5RVPpeBvnbcxhd72+x5SxBvN+8UU/Xver06xH++8N40eEe5mpdEj
wtOOafZbhae5afZP/HqYNPUn90Om2T+R/fZJ8/4SLcv8NPtn4uvFaeobsv/y
NHpasFqdRk9rmB1p8G0/SJPfyS37wrFwNRiOvb+Whu81j2QafhbvZNPoEdmv
mIafFc+r6fb+oGa6vX/vgDT+7H7dNP6udX1rmucLxMPvSFMf8v5tGjy7nyuN
HtSCHRHWR3HvQ2H9hKePpFlf9/+n0aP65/g09S7x+slp+FG4Pi0NvqX3Tk+j
hwWXz6bBo+z5+TT6QtP4cvhcdvpamnjg9wOkwa/6tc5PEz9kj++m2b9U2P9B
Gn+Urrg4Tb+89M2P0+TLws2laeo97rNI02+hZfpVmnqRxvm7NPm5/HM8Tf3U
9eM0+93uT0iz3yu9eH0a/tK8bkrDb67bBrzoMv8MeBJ/3xnwLnzdnUafCOf3
BXxqGR4Mx5rWI8E/ZI/Hw/muT6fRG17XNPwsntiUpr6h67yUbn++5ZU09Wfp
mxkZ8C19uF0GfAuGczLoOdcrM9ST3B+V4Xkm3W+vDPysv++bIV/0/mkGvel6
ZQZ97fwjQ/7l/vsMfC1+68qQvwlPvRnqd65XZsC3rjuSAa+uV2bAq+uVGfxD
18ln0M/SA+UM/SOuV2bQG663Z+Bj4enADHpLfvCWMH/N+9BgH+cfwX7OIzLt
/Ybvz/A+FecfGfZTpC+PzvB8pOxxbAa+dv0+w36h8HRCBn2tfPSUDPHc/SIZ
8Cx7nJFBb+vfz2bgU+HmCxn0gvOscKww8fVMO/+ek8E/XL/MtD+v8t0M9Rjp
gQsz+Jv88OIMz8eKFn6SwV/9vEqG/W7x4uUZ/F3juDIDH/j1ohnqz7LHRIZ+
OO8vZNgflD2uy1APkT2uz5AvCaY3B3xrFW8N+LDMDPiWProzAz9q3HcH/Lm/
MeBT6/xghnqg40bAv/kiHLv/PfiLxvFshnxV89oc8C3a2ZKBn/06ziz8rPXd
Ksv7ZuQf22fJD/38ZZZ823yRJR83X2ThE/NFFj1tvsiS/ygeL8yyP6Z4vjQL
nuWHK7PUb4X7tVnqZfKPziz62vsbWfjT/bpZ6iPef83Ct37fTBY+1rhT4XOZ
NReu5/2NLP7ivC8Lnr2/kYWPNc8Ds+QHrldkqX+Irw/Nop8VB9+Zpf7hekWW
+of387LsD7pfLEt8NF9kiZ+yx7FZ+nH9fECWfEn+cUKW/WDN5+Qs+aPqk6dl
0afuH82iP6wvsuDP+iIL/1pfZOFn+fvXsuhvzeecLHwu/vtWFny7jpBtf17w
B+H+7lfLtr9/48dh/OLBS7Pt/Ve/zOLP7mfM4u/i3d9mybetL7Lki4LZ1Vny
c+uLLPm7aOD6LPra/W8B3+KFWwO+3Q+fpd9OuLszS3wXz9wd8Ga+CHjWPB7K
oi/En49myfeEqyey7fXrDeFzLdNzAf/izc3h+uaLcH/vh+bQ/65v5hi/aHGH
HPMV387J0a8lt5qXg59dr8jRT+D6Zg48u16RY3/Q9c0c+b3323PgWbywMkd+
aL7IwXfWFzn40PXNHHzsfs8c+PX+fA68yn5jOfSz/DqToz4t/yqEz70fEs6X
/eo5+N31ilw7Xx+UA8/C41ty7fW8t+XAs/VFjvxY835vjv1C74fkwLP0+5E5
nncS/x6TIz66vpkjX3S/SI746veJ5ehXEq2ckmM/Tev4yRz6w/0kOfha4zor
B19Lb30xh37w/mgOPFoH5MCrn3fPgWe/HzTXnl9ekGt/nunCHHyufy/J8XyW
3++Ug7897xz1PO+P5tDTfv4lB3/7/XA56p3y+6ty8Lfs8acc/G2c5cjPXd/M
0V/j/vcc+4t+PiJHf77scXuO/MnPS+Soh4l/786xv6xx/zeHvpbOeigHX7u+
GfDu9/UFvAofz+TID4WP58KxpvVC+L7i0cvherLH9Dz3Ewxm5hmPzL1DHv0k
2O+UZ79fl9klT36o++2Rhw9kv73z8IXi+fw8+aH4fnGefl7XN/PUq13fzBN/
vQ+cZ33FN9151l/r0pcHH4pLQ3n4UOcn8uBLfJ/Kw6euV+Tb8VjMg3fhsRo+
F181w7Hi5wF59Ij7f/L4k+bx1jz1dNcr8ugn6dB35+mPlT3fnyefME/n0Wfm
tTz6zfWKPPU82fPjefSf6xV58Cx7nJxvx/NpYT3199Pz9DtYT+Thb7+PKg//
uZ89Dz+6XpFHD/j9ZXn0gvOPPHxrP82jL/T3C8PnrlcEvDr/yFOv8/NweeKH
8488/ub8I0/9xvlHnnzRdsyTL7pekSdf1G2vzVOvFl/ekIevxf8359v7aW7N
E09ttzzvx/b+R8C37HF3nnqA38+Wp97n98Hmieful8qTP5of8vRPu38qjz4w
P+TJ/2SPFwJeZc+Xw7HbdAucr/33bQvkp4pXOxSoP8r+OxXAr+y/S4H9FY+z
wP6q+ysK8LH5ocDzEd7/KKA/hIvlBewtXK4ukB/K79cVWC/zQ4H1ND8U2usD
QwX4TVFgtNDej5cs0F9qfijAj/pesYA+kP0qhfb8sRmOZY83he+7nhmu5/dP
hPvJzm8P43E9M4zX/BDmIzwfUUA/u55ZQD9Lt364AH7lpx8r0D+jyx5fIP75
edYC+aLz5kL7+6M/XaC/TOP8TIF6nnjr8wXqA7LHlwvkW3L3rxba3zf7zQL8
qHh1foH4Lzx+twCf+nnngE/Z4+IC9QzZ48cBr8LNpQXigeLdLwv4j3mnAB+7
nhnw7LSuQPyRPa4O85XfX1tAT/v56QJ6zflGgfzEcatAfdrv2ypQnxZN3FGA
n80PBfSG65kF+Nn5RoH6h/ONAnyn2z1RgA+dbxTYf/T7wwMezQ+F9n6oLeHY
+UaRY/HcNkXqKa5PFLmf+y+L4Nf5RpHn+bwORfSy840ietn9FEXyZ+cbxfb+
52VF4p1xXiQeCs9ri+DX+UYR/Mot1xfRz94fLaKfZb+RIvg1PxTRG6oPZYrk
h94fLYI/4blSBK/KqxtF9Ijf/xaONc2DiuBZdjqkCL/L7G8vot+9P1rEn7w/
WqRe53yjyPMp0qMfLJIPOt8I9hBuPlpEX8iOnyjCBxrnSUX4QrR1ahE+Udng
U0X4RvH7zLCe3h8twlfy7y8FPGhcZwe8CF/fCHhy/1UR/Hp/tIjekFm+X4Rv
/b7UIvpD6/CjIvys8y8NePb74Yr4g/D1qyL8rOv8NoxHfveHMF7pkD+G+fj5
uzBf//5FsIfseVORfFC3+VsR/Sy+/EeR+pLSjDuK5C9+f1OReKq87N4i8Vb2
eKCIvhCNPVKE32SPx4rwn27zVLF9v3ljET72zxsFPMseLxXRF9KXrxbRE4Lt
jBL5pPc7SnxfZnhjCX5WXWrnEvVn8eBuJfxP8WbPEvFF+mffEnzs+mWJeo/8
c0mJflK/T6DEfqFws6YEH/u8Enzs+5boX9I8Bkr0e7g/u0T+5/2OEnrZz5uX
0MuuX5bAk99fVgK/5pUS+NT5rRJ62Psd4Vh+/5Zw7H6rEvVrv++sBL617IeV
8B/3W5Woj2scR5bYH3J/Zgm94fplCb7WtI8roTe831FCn8mep5ao74vvPllC
L8u/zyihl92vXUIv+3mXEvm8+63C+us+3yiRDwqX55bgZ5n12wFf7rcqwa/+
vYsSeHX/RIn80P3aJfZXZI/LwrH8+4qAb8WP35Tgc/Hd70vwt/snSviX+7VL
1Gfcn1lqf97shhL5oHFbYv/J/RMB3w6TJeKfzVqi39TP65fa+38fCPhWXe6R
EnpD/vpYwLfi8VOl9v2JjQHfsuPzpdf1T5TgU9nhlVK7Xp5RJr+T/d9Qbq9f
71iGvzX9uWX8RTyxaxl/0rz3LFNf1DT2LVOPkf0XlKlnyA5Lyuz/mx/K7K/Y
D8rsF4qnO8uv+z2kMvrO/FBmv9D7oWX0ofmhDF95P7QMnr0fWgbP3t8os3/h
59nL6A3JllYZveHfXyiDP/NDGb718xvhWPd5Z/i+luWwMv6hOsfhZfjfOC6j
P6wfyuSnwuWxZfJX92OWiT+ax4ll/FkwObVMPdN9JcF+it9nlOkHc/92GTyb
H8r0R4r3vlKmv8P8UKa+4X7MMng2LsrwtfuryvCf37dSJt77/RoBb37/Shl8
+/1sZfSHn8cuw7/u3w7Hyqd/H87XOP8Yri97XlMmH7R+KKPvZc8by9Sf3V9V
pv4ue/6j3L7fdEcZf3d/VRk+EC7uLdNf6vdBBHxbP4T1Ufx6POBb03q63P5+
y41l3v/p5/vK9Pu4X6KM/hCPvFqGH6UHtqqAd/H7dpV2PTynAv69/xk+1212
C+f7+a4K8UHrt18F/vXzHRXw6/yiAn79fFeF+o3ziwr4db92Bfv4edMK9tM6
DlbQG1q/kQr7t+7XrpD/+XnUCuunuJOvEH/df1lBb7r/ssLzWH7/fIX3W+j8
gyrEe512SKX9edq3V6in6fx3V9p/P+F94Vjr8YEK/VCy61EV/EXr8eEK8cHv
T6yAV63/8RX2t91PVYGP/bx8hfqO65MV9LLW4zMV6kOC9+cr6GXvd1aIh65P
VsgH/T6VCnrR+50V+Nnv762AX/dTBXz4/Z0BP1qPn1TIx9wfUYEvNe9fVtr3
666swK/ST78Ln5unK9RH3B9RQR+7P6KC/7g+WSF+uD+7Qj7r/uwK+Z/W4/YK
/Uca978r1OPlH/dUyDeEm/sr6Df9/aEK8VDr9L8KfOLnOSrwja67oQIfy57P
BTyL316ooDddn6ygN7x/UW1/39XsKvyodd+xiv7Q+s2tglfx6S7hc8nMPar4
g+y8TxW8SoctqKIf/L65KuPz+4eq1GP8/rkq89NlO6rEI9m/u0p/rfypv8p+
tq4zXMW+8qdElfqoYJmq0s/reVTZH1AcKVWpZ4ifqlX0hfunquDD78OpEr/9
vqtq++85vLUK/twPUQWf+t5hVfBrvRCO3T8Vznc+UW2vnxxbxX+8vxnGZ9xW
259XODXMz3aoUr+wXgj28fv3qvi/8uMvVtvf93t2Ff7w+zer5C/ux67yvnav
QxV+8nsGq+gJrdtFVepxWo8fVakPKMz/rAofa9yXVeFPP+9VhY/9/GfAr/VC
OHY+Eb4vf/hzuJ6f/6yih2XWG8N4hO+/VeFjv/+lij7W+XdUyXe9jtX23xO6
t4o+Vn73QJV8T/z4SJV6vt2kCp/492fCemk9nq3CR4qrm6rwlfhtSxU+8++T
VKkPaD22qrW/f26bGvhzPbJGPVn3mxeORXu719AT8se9a+Dd/Q+19vcjLAr3
s16oUX/T31fVqL85T6vxvLbfX1Njvv79kBr1HPdf1/B/+dNoDXtKfydr2Fvr
n62xHsJFocZ6CT+VGuup+NSosd7er6iBB8H6zTX41vsVNeK7359Zg0/9vqQa
9WDvV9Taf+/hiBr6V+vxofC5zv9IDf0hO3+8Bp61HifUwLMuc0qN+OD3c9fQ
E1qH02vsB/l9XDXqFdYLNfSE9MZXau3Pw3+9Bl94P7NGPVR2/laNeqlg870a
fOznwWvk736eqwaf+XmugBc/D14j3/P7HAN+/fsdNfjV7+sIePXzXLX2/rtr
auRzild/qaGPtY43BHyLH2+pwf9aj9tqxAfZ/V81+NnPg9fYH3F9oYZ+cn2h
Rn7g+kKN/izh/rEa+Z11dg197PdJ1dDHfn9gjX4D1x9r9B+537pGvdWvxai3
Pz86qw7/KY5sXQe/yku3rYNf4WW7OvUG8eMOdfCrab0xfC6871SHn+X/O4fr
a712qaNXBPvdwnikb/YI4/X7sOrkcxrX3nXyAecvdewhvp1fpx5vXVVnf0T/
Lq5T/1SaurTOesjfltdZL/eH18nX/TxJnXxIOFlbRw/796nrxHP3g9aJ996f
rYNn8VFvHfxpPfrq7c/zDYRjrcdQHfxqPUbC+Rp2og4/uz+sDj/Lv1N18Cte
y9TR934fVB19ofUo1MkPpOOLdfIHrUe5Dh/o/Gqd/MPP29fhE/8+RR2+kX/t
X4efZc8D6vCz7HhQHX0p/XVwnXzP+wh18j3h/tA6+kLL9LY6fO33ddThU9VD
3hXw6vfd1tETiq/vDfj172WE68nNP1BHLysOHxnGo2kcVW/PT48O89E6HBPm
a/6vU3+TP3+0jh7TMn28jl7z83t1+Fnnn1BH7/n3s+rtvzd3SlhPDeOT9fbf
7/p0nXit9TujzvMo4ufPBDzpn7MC3uRPn6+T7/l9I/V2/fzl8H2t39nBP/y+
1zp8q/X7eri/1u+bwd8U786tw7/yh/Pr8K/r33XqxdJ7360TrzSPC+r0Y2mc
P6jTr2U9W0dfKN5fXEdf+P0mdeoV8qef1OFj18fq8LH46dI68dn6t47ecH4c
+FB+fkXAs9b913Xiv3k04NH79+FYeukPgW913kS4nt+XEO7n/p8wHtff6ugj
4fzaMB/h7i+BjxWnrq+T72o9bgz2Ej/dHOxp/R3srWHcGvjEcSjg13YO/Gx9
HvDr/L2OvhSO7qqjl3X+PXXqb/KD+wJf+/moevvv3T0c8CneerSOPvH7H+vU
H9zfXEfPyI+eqrf3t20IfCs/eabe3u/2bL1dDz9fRw/LbzbX6a/w+2Lq6Ae5
3ZYQ7/y8ZuBfP1/RgE90nRkN+Eb4mdkgfzcvN6hPKOxv0+D5QPndto32/b7t
GuDJeqGBfpY/vrEB/oSfnRrg2fuf4XP3UzXa62e7hevLH/cI95c99wzj0zLt
3UA/+HmPBvs7ylvnN9p/b3thoz0+LW7Qb6HTljba3+e3vEF9U/y4ssH6uF+r
wfrpPmsb6GM/j9og3qp+0NWAz8SPPQ32w6wXGuR7wmVfo71+MNAAv/KjoQZ4
db210f57wonwfcW3sQb863pLuJ/7y8N4rBfCeLUehTAf0VwpzFc4qDSor2nd
ag32P/VvPdhT69lsUI9X/rT/69bjgAb9MX6+vkG9VHrj4AbxVbLykAbxV/Hq
0AbxWcN6e4N8ynoh4FfDfHfAq9/31YBv5efvbbTrjfeHY8HyA+F87zeH6wvn
RzWot2k9jw7jE29+OIzf7wsLeNY0Pxbw7OfxAp5V5zu+gT4WX53YaH+f8MkN
9IPW45QG/KtxfqpBvV/4Ob0B3woXZzbQD8LPZ1+Hn88FfOl7X2jAr7rfFxvo
B7//OxzrvLMb6Afpo6+F8/0+gYBn17cb8LH+fF4DPnY/bgM+1vp/J+BX538v
4Fd2/37Ar+pcFzaoTwiXP2y0/x79xYEvdJ8fN8jnFEd/2iB/0bh+1qA/Ruf/
vMH7rMSvv2i0/77B5Q3qbYoDv2q0969fGfhT9/1tAz0gfv19Az2sdR5voHeF
m6sa1Idl16vD+VrPa8L1tZ7XBvz6/SlhfH7euUG9UPH9hgb1RPHzTcF/9b1b
An5l178H/Do/bxDv3E/YaH9f4r8a5Hc2cwP9oPW4q8F+ln//o0H/rvP5gGfp
0PsCnuXP9we8+feiGtQPTDsN9K/849FG+/PSj4VjwfiJ8H3541PhehrXhsDf
1g+B//XnZwO+LZsDP0vPb26gj8WPLzbQx7Lnlgb6WPz4SgN9rMtMa6LXdN3p
Ter3wu3MJvV97080qf9bPzTRi+6vbqIv3B/VJH77eYwmfGz90GT/1/qhCZ/6
98qb4FXj2qUJnmWPXZvt+dweTfDv50Ob7fjepwm+9e9+YTz+PYYm9QrBfEmY
j8a7LMxfumZFk/16uemqJvtHGseaJvsffn9vk/goGdHZpF4sfuxqUv/XOvU0
WV/R3vom6+/fD2ySP2n9B5vkV5rGcBN+Fj+ONuFXXSZqwr+uv4Zj+VO62d6f
n22CX7+fs4m/KA8qhvvrtHIYn/BTbcLPfh6+CT97XmH+wk8r2Ef++KZgP9nz
wCb8LH98c5N+CsXXtzThZ63HW5voCw3rbU3qp8of3tGEv4S7dzWJz/Lj9zTb
3z9wWBN+dH044Fn+fHgT/at1OCLgW+d/MBy7fhy+r8se00RPyMwfaVKP8PsF
m+R3fr9ok3xUuvUTAb+KN8c30RfSFScFPPv3QJvkE1qPU5vUJzSt05rws+z5
qSb5iuvTTfSyrntmk/hq/dAkH9K6fi6sv/zkC812/fmlJvzn/e8mfG390IQv
pVu+1iR/s34I+Jd/nBPwKn4873X+8a1wPdnhO03yS+uHJnpZcfn7YbzWD2E+
1g9hvn7/QLP9/XM/Dni2fgj2tH5oUg+yfgjrIZb5RZN8XHHk8ib5uvVDE/3h
31ttoj/kH78N+LZ+CPwn/xhvko9p2FcFvOu8PwW8+/miJnrF9YTAr36eIPiP
7ndjiA8a5s1N8jv3/zTR+8LPrcFf3Q/URG95nE3263X+HYGPxa93hnjnekIT
fez3tzXRF8LPvU36N/0+tyb60b8fEfhZ83qoST1Z6/RIk3qF+PV/zdf1Kwc8
yx+fbKJvhaOnmu31sg3h2GYP39f6P9ekHqx12tRE74hXXgh4FS++FPCq9Xg5
4NX9S03yA/crtMgf/Pu4LfSE1mNWi/08fW/rFnpZ67Bti3zP/ZGt9vx8+xb1
C/nzji30hepwc1rsf2k95rbQz4LxvBb41Xrs2oIftR67t8CjTtszHHt/NBy7
Hzscq94yP1xP+f3CcD+dv7iFHtZ6Lg3jVVhZ3qIeo3VYEeYru69q8byB9UOL
+KV1XtcivomHOlvoC+MwrIfCfG+L+r6/12I9/f6KVnu/zFALPPj59BZ49vuy
WuBZ54+1iO/i52QL/AkPmRZ8qq/lWuDX/V8t8Kvzi+F8/75pC39R3Kq22G9U
vKy32E/X35st6ofej2hRHxceDmi1/57ZQa32+tvBLfjXvNmCf4WHQ1vwr+L2
21vt9eN3tagf636HtdATricEvMoO72/Bf4oHR7Ta67VHtuBbnX9Ui/jvekI4
dn9a+L6mdWyr/fdUPtaCf92f0kIvqF53fKu9H+/EFvyrdTq5RT6n/OXUFnrK
z9+24F/rgxb5hO5/eov9JJn5zBb8a30Q+EX4+1wL/jXvB7wKf19qUW8VH32l
Bb9pml9tEa91/tdb8K346JsBj4qH57ba+9/Ob6EnZMdvh881/+8G/MqMF7TQ
C7r/D1rt/RIXhfG53y74m+x+SZifcPDjMH+/T6BFfNJlLg3207Jf1mrfP/pl
i/q8dMcVLfI57z+0iJ/CwW9a7Hcojv+uhV7w80Et9IJgPdGiniU+/GPAm+Zx
dcCnf9+7hZ7Vba5rtf/e2l/D57r/DeF8P18U8O33GYT7axp/D/4lXN7WYn9D
/vvPFvrX+/+Bf3WfO1voXy3Lv1vUJ4Tr/7Sor/n9jS3qm36esYWeU732/hZ6
z+9faqEfNI+Hw/p7PyLgw88rBP6TjHki4M3PLwR8CucbWuhb/bsxHPv9seHY
sG+hf/1+loBv8cFLwV80zy3Bn/4fKImZBw==
"]]}}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0.},
ImageSize->Full,
Method->{},
PlotRange->{{0, 79.952}, {-6.513999999999999, 2.995}},
PlotRangeClipping->True,
PlotRangePadding->{{1.59904, 1.59904}, {0.19018000000000002`,
0.19018000000000002`}}]], "Output",
CellChangeTimes->{3.5664161416479053`*^9, 3.5664565187322083`*^9,
3.566456737284575*^9, 3.5664588183873053`*^9, 3.5664633636047697`*^9,
3.566464603866816*^9, 3.566465770737878*^9}]
}, Open ]],
Cell["\<\
Wir nutzen die ersten 75 Sekunden.\
\>", "Text",
CellChangeTimes->{{3.566456924171784*^9, 3.566456946424758*^9}, {
3.56645882485561*^9, 3.5664588352947893`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "asym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "asym", ",", "1"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "75"}], "&"}]}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566416210895996*^9, 3.566416261044602*^9},
3.5664173353662987`*^9, {3.566417547400022*^9, 3.566417604524452*^9}, {
3.566456575282522*^9, 3.566456582586051*^9}, 3.566456769464508*^9, {
3.56645695676995*^9, 3.566456961161633*^9}, {3.5664588370752363`*^9,
3.5664588407441797`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "asym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "asym", ",", "2"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "75"}], "&"}]}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.566416210895996*^9, 3.566416271659527*^9},
3.566417337909851*^9, {3.566417550743938*^9, 3.566417606580274*^9}, {
3.5664565789639597`*^9, 3.566456586337864*^9}, 3.566456769465927*^9, {
3.566456959473802*^9, 3.5664569627305517`*^9}, {3.566458847722145*^9,
3.566458851699113*^9}}],
Cell[TextData[{
"Nun bestimmen wir die Frequenz ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "2"}]], TraditionalForm]]],
" anhand der Daten von beiden Pendeln."
}], "Text",
CellChangeTimes->{{3.566416291402357*^9, 3.5664163272865877`*^9}, {
3.566417437987132*^9, 3.566417437987214*^9}, 3.566417678885417*^9, {
3.566456817431726*^9, 3.566456817431815*^9}, {3.5664588553857403`*^9,
3.5664588553858223`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"unten", ",", "asym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "asym", ",", "1"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416344367093*^9, 3.566416404499189*^9}, {
3.5664164749772043`*^9, 3.5664164803566027`*^9}, 3.5664165186680202`*^9, {
3.5664165522816677`*^9, 3.566416554473386*^9}, {3.566416667930216*^9,
3.566416697488927*^9}, {3.566456823685152*^9, 3.566456825670598*^9}, {
3.566458856979937*^9, 3.566458859083514*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1.074`", ",", "2.995`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.475`", ",", "2.995`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.796`", ",", "2.839`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"5.151`", ",", "2.706`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.509`", ",", "2.662`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.872`", ",", "2.773`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.196`", ",", "2.884`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.578`", ",", "2.817`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.912`", ",", "2.728`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.289`", ",", "2.573`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.64`", ",", "2.528`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.958`", ",", "2.595`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17.323`", ",", "2.684`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.693`", ",", "2.662`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20.07`", ",", "2.551`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"21.415`", ",", "2.395`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"22.781`", ",", "2.351`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.12`", ",", "2.395`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"25.485`", ",", "2.484`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"26.836`", ",", "2.528`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.224`", ",", "2.417`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"29.562`", ",", "2.24`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"30.908`", ",", "2.195`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.276`", ",", "2.262`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"33.635`", ",", "2.351`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"35.011`", ",", "2.351`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.366`", ",", "2.262`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.708`", ",", "2.107`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"39.072`", ",", "2.018`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.4`", ",", "2.062`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.765`", ",", "2.151`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.152`", ",", "2.195`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"44.529`", ",", "2.107`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.886`", ",", "1.951`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"47.214`", ",", "1.862`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"48.551`", ",", "1.929`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.921`", ",", "2.018`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"51.288`", ",", "2.018`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.633`", ",", "1.929`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.019`", ",", "1.84`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"55.391`", ",", "1.729`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"56.713`", ",", "1.751`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.093`", ",", "1.796`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"59.447`", ",", "1.84`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"60.799`", ",", "1.796`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"62.19`", ",", "1.685`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"63.542`", ",", "1.618`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"64.872`", ",", "1.618`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"66.225`", ",", "1.685`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"67.612`", ",", "1.707`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"68.962`", ",", "1.685`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"70.326`", ",", "1.552`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"71.676`", ",", "1.418`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"73.005`", ",", "1.418`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"73.066`", ",", "1.441`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"74.358`", ",", "1.485`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.566416365943509*^9, 3.566416383937974*^9},
3.566416480807665*^9, 3.566416519318247*^9, 3.5664165549251204`*^9, {
3.566416668287786*^9, 3.56641669808327*^9}, 3.5664168622938766`*^9,
3.566417345454031*^9, 3.566456518847052*^9, 3.5664568261054583`*^9,
3.566456967090324*^9, 3.5664588608477*^9, 3.566463363806147*^9,
3.566464603992668*^9, 3.5664657708443003`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"unten", ",", "asym", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "asym", ",", "1"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416788206684*^9, 3.566416811680894*^9}, {
3.566456835318183*^9, 3.566456836990018*^9}, {3.566458863132226*^9,
3.566458865464364*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.386`", ",",
RowBox[{"-", "2.866`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.765`", ",",
RowBox[{"-", "2.911`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.113`", ",",
RowBox[{"-", "2.822`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.452`", ",",
RowBox[{"-", "2.711`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"5.782`", ",",
RowBox[{"-", "2.6`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.172`", ",",
RowBox[{"-", "2.622`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.5`", ",",
RowBox[{"-", "2.733`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.895`", ",",
RowBox[{"-", "2.733`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.258`", ",",
RowBox[{"-", "2.644`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.612`", ",",
RowBox[{"-", "2.511`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.941`", ",",
RowBox[{"-", "2.422`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.323`", ",",
RowBox[{"-", "2.444`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.667`", ",",
RowBox[{"-", "2.533`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.012`", ",",
RowBox[{"-", "2.578`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.409`", ",",
RowBox[{"-", "2.489`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"20.766`", ",",
RowBox[{"-", "2.333`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"22.116`", ",",
RowBox[{"-", "2.2`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"23.453`", ",",
RowBox[{"-", "2.267`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.813`", ",",
RowBox[{"-", "2.311`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"26.165`", ",",
RowBox[{"-", "2.4`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"27.538`", ",",
RowBox[{"-", "2.333`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.918`", ",",
RowBox[{"-", "2.2`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"30.238`", ",",
RowBox[{"-", "2.067`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"31.624`", ",",
RowBox[{"-", "2.045`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.94`", ",",
RowBox[{"-", "2.134`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"34.31`", ",",
RowBox[{"-", "2.222`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"35.687`", ",",
RowBox[{"-", "2.156`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.071`", ",",
RowBox[{"-", "2.`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"38.427`", ",",
RowBox[{"-", "1.912`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"39.782`", ",",
RowBox[{"-", "1.867`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.117`", ",",
RowBox[{"-", "1.956`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"42.477`", ",",
RowBox[{"-", "2.045`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.824`", ",",
RowBox[{"-", "2.023`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.205`", ",",
RowBox[{"-", "1.889`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"46.571`", ",",
RowBox[{"-", "1.734`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"47.921`", ",",
RowBox[{"-", "1.69`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.238`", ",",
RowBox[{"-", "1.801`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"50.607`", ",",
RowBox[{"-", "1.845`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"51.975`", ",",
RowBox[{"-", "1.867`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.375`", ",",
RowBox[{"-", "1.734`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.713`", ",",
RowBox[{"-", "1.601`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"56.085`", ",",
RowBox[{"-", "1.556`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.428`", ",",
RowBox[{"-", "1.623`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.785`", ",",
RowBox[{"-", "1.69`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"60.17`", ",",
RowBox[{"-", "1.645`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"61.515`", ",",
RowBox[{"-", "1.579`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"62.85`", ",",
RowBox[{"-", "1.468`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"64.211`", ",",
RowBox[{"-", "1.401`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"65.53`", ",",
RowBox[{"-", "1.468`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"66.912`", ",",
RowBox[{"-", "1.534`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"68.334`", ",",
RowBox[{"-", "1.49`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"69.655`", ",",
RowBox[{"-", "1.423`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"71.022`", ",",
RowBox[{"-", "1.334`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"72.359`", ",",
RowBox[{"-", "1.246`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"73.701`", ",",
RowBox[{"-", "1.312`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.566416813683556*^9, 3.566416863962236*^9,
3.5664173476919193`*^9, 3.566456518939184*^9, 3.5664568376073627`*^9,
3.566456969146302*^9, 3.566458866140726*^9, 3.566463363922552*^9,
3.566464604274444*^9, 3.56646577089633*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"unten", ",", "asym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "asym", ",", "2"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416884021413*^9, 3.56641688700436*^9}, {
3.5664173643089952`*^9, 3.566417366486847*^9}, {3.566456840317688*^9,
3.566456859680868*^9}, {3.566458868617325*^9, 3.566458870474519*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.112`", ",", "1.431`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.386`", ",", "2.719`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.765`", ",", "2.646`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.086`", ",", "2.719`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.427`", ",", "2.84`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"5.782`", ",", "2.865`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.172`", ",", "2.792`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.527`", ",", "2.622`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.895`", ",", "2.5`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.231`", ",", "2.524`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.612`", ",", "2.597`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.916`", ",", "2.67`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15.323`", ",", "2.597`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.667`", ",", "2.427`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.012`", ",", "2.306`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19.35`", ",", "2.306`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20.71`", ",", "2.427`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"22.116`", ",", "2.476`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"23.478`", ",", "2.403`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.813`", ",", "2.306`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"26.165`", ",", "2.16`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"27.507`", ",", "2.16`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.89`", ",", "2.257`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"30.212`", ",", "2.281`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"31.624`", ",", "2.257`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.973`", ",", "2.111`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"34.31`", ",", "1.99`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"35.659`", ",", "1.965`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.011`", ",", "2.063`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"38.371`", ",", "2.136`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"39.782`", ",", "2.111`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.117`", ",", "1.941`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"42.477`", ",", "1.868`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.824`", ",", "1.795`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.173`", ",", "1.893`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"46.541`", ",", "1.965`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"47.893`", ",", "1.917`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.264`", ",", "1.795`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"50.607`", ",", "1.674`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"51.947`", ",", "1.625`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.316`", ",", "1.698`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.655`", ",", "1.771`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"56.016`", ",", "1.722`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"57.394`", ",", "1.65`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.75`", ",", "1.528`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"60.141`", ",", "1.504`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"61.459`", ",", "1.504`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"62.85`", ",", "1.625`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"64.211`", ",", "1.625`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"65.557`", ",", "1.504`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"66.912`", ",", "1.382`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"68.275`", ",", "1.334`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"69.592`", ",", "1.382`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"70.986`", ",", "1.455`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"72.333`", ",", "1.455`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"73.701`", ",", "1.334`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.566416888434183*^9, {3.566417357006805*^9, 3.566417366938409*^9},
3.566456519037601*^9, {3.5664568440342216`*^9, 3.566456860276615*^9},
3.566456970866476*^9, 3.5664588708802843`*^9, 3.566463364149338*^9,
3.566464604374117*^9, 3.5664657709456587`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"unten", ",", "asym", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "asym", ",", "2"}]], ",", "3", ",", "1"}],
"]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416895715335*^9, 3.566416898579172*^9}, {
3.5664568464612923`*^9, 3.566456848029269*^9}, {3.566458872946477*^9,
3.566458874554558*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1.11`", ",",
RowBox[{"-", "2.846`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.475`", ",",
RowBox[{"-", "2.822`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.796`", ",",
RowBox[{"-", "2.894`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"5.122`", ",",
RowBox[{"-", "3.04`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.509`", ",",
RowBox[{"-", "2.967`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.872`", ",",
RowBox[{"-", "2.87`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.196`", ",",
RowBox[{"-", "2.724`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"10.578`", ",",
RowBox[{"-", "2.7`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.912`", ",",
RowBox[{"-", "2.773`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.261`", ",",
RowBox[{"-", "2.87`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.64`", ",",
RowBox[{"-", "2.822`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.014`", ",",
RowBox[{"-", "2.7`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"17.357`", ",",
RowBox[{"-", "2.579`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"18.693`", ",",
RowBox[{"-", "2.53`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"20.07`", ",",
RowBox[{"-", "2.579`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"21.445`", ",",
RowBox[{"-", "2.676`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"22.781`", ",",
RowBox[{"-", "2.7`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.153`", ",",
RowBox[{"-", "2.554`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"25.517`", ",",
RowBox[{"-", "2.384`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"26.861`", ",",
RowBox[{"-", "2.336`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.224`", ",",
RowBox[{"-", "2.384`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"29.592`", ",",
RowBox[{"-", "2.506`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"30.939`", ",",
RowBox[{"-", "2.506`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.303`", ",",
RowBox[{"-", "2.384`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"33.693`", ",",
RowBox[{"-", "2.214`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"35.011`", ",",
RowBox[{"-", "2.165`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"36.366`", ",",
RowBox[{"-", "2.238`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.708`", ",",
RowBox[{"-", "2.311`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"39.072`", ",",
RowBox[{"-", "2.336`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"40.458`", ",",
RowBox[{"-", "2.214`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.793`", ",",
RowBox[{"-", "2.093`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"43.152`", ",",
RowBox[{"-", "2.02`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"44.504`", ",",
RowBox[{"-", "2.068`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.853`", ",",
RowBox[{"-", "2.165`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"47.24`", ",",
RowBox[{"-", "2.165`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"48.579`", ",",
RowBox[{"-", "2.068`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"48.641`", ",",
RowBox[{"-", "2.044`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"49.982`", ",",
RowBox[{"-", "1.947`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"51.288`", ",",
RowBox[{"-", "1.874`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"52.664`", ",",
RowBox[{"-", "1.898`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"54.019`", ",",
RowBox[{"-", "1.971`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"55.391`", ",",
RowBox[{"-", "2.02`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"56.739`", ",",
RowBox[{"-", "1.922`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.125`", ",",
RowBox[{"-", "1.801`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"59.447`", ",",
RowBox[{"-", "1.752`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"60.829`", ",",
RowBox[{"-", "1.752`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"62.157`", ",",
RowBox[{"-", "1.825`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"63.542`", ",",
RowBox[{"-", "1.85`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"64.903`", ",",
RowBox[{"-", "1.801`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"66.252`", ",",
RowBox[{"-", "1.679`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"67.612`", ",",
RowBox[{"-", "1.582`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"68.962`", ",",
RowBox[{"-", "1.558`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"70.296`", ",",
RowBox[{"-", "1.655`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"71.676`", ",",
RowBox[{"-", "1.704`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"73.066`", ",",
RowBox[{"-", "1.631`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"74.417`", ",",
RowBox[{"-", "1.534`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.5664168993845367`*^9, 3.56641736972589*^9,
3.566456519119944*^9, 3.566456848789443*^9, 3.566456972000711*^9,
3.5664588749203043`*^9, 3.5664633642026997`*^9, 3.5664646045076017`*^9,
3.566465770996799*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["periods",
RowBox[{"unten", ",", "2"}]], "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Flatten", "[",
RowBox[{"Differences", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Part", "[",
RowBox[{"#", ",", "All", ",", "1"}], "]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{
SubscriptBox["max",
RowBox[{"unten", ",", "asym", ",", "1"}]], ",",
SubscriptBox["min",
RowBox[{"unten", ",", "asym", ",", "1"}]], ",",
SubscriptBox["max",
RowBox[{"unten", ",", "asym", ",", "2"}]], ",",
SubscriptBox["min",
RowBox[{"unten", ",", "asym", ",", "2"}]]}], "}"}]}], ")"}]}],
"]"}], ",",
RowBox[{
RowBox[{"#", ">", "1"}], "&"}]}], "]"}], "//",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"#", ",", "\"\\""}], "]"}], "&"}]}]}]], "Input",
CellChangeTimes->{{3.566416950448785*^9, 3.566417094263796*^9}, {
3.566417128819862*^9, 3.566417220526993*^9}, {3.5664172740031776`*^9,
3.56641728085063*^9}, 3.566417453279512*^9, {3.566456851629588*^9,
3.56645685628512*^9}, {3.5664568864878674`*^9, 3.566456888705738*^9},
3.5664569956342382`*^9, {3.566458876955701*^9, 3.566458906638225*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"1.401`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3209999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.355`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3580000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3629999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3239999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3819999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3340000000000014`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.376999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3510000000000009`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3179999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3650000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.370000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.376999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3449999999999989`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3659999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3390000000000022`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3649999999999984`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.350999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3880000000000017`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.338000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.346`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.368000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3589999999999947`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3760000000000048`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3549999999999969`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3419999999999987`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3640000000000043`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3279999999999959`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.365000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3870000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3770000000000024`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3569999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3279999999999959`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3370000000000033`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3699999999999974`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3669999999999973`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.345000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3859999999999957`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3719999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3220000000000027`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3800000000000026`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3539999999999992`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3519999999999968`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3909999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3520000000000039`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3299999999999983`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3529999999999944`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3870000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3500000000000085`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.36399999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3500000000000085`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3289999999999935`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.2920000000000016`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.379`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.348`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.339`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.33`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3899999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3280000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3949999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3629999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.354000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3290000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3819999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3440000000000012`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3449999999999989`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3969999999999985`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3569999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3500000000000014`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3369999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3599999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3520000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.373000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.379999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3200000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3859999999999992`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.315999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3700000000000045`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3769999999999953`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3840000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3560000000000016`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3549999999999969`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3350000000000009`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3599999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3470000000000013`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3810000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3659999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3500000000000014`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3170000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3689999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.368000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3999999999999986`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.338000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3719999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3429999999999964`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3569999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3850000000000051`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3449999999999989`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3350000000000009`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.360999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3190000000000026`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.382000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.421999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.320999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3670000000000044`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.336999999999989`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3419999999999987`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.379`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.321`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3409999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3550000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3899999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3549999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3680000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3360000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3810000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3040000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.407`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3440000000000012`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3449999999999989`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.338000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3599999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4059999999999988`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3620000000000019`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3349999999999973`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3520000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3420000000000023`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3829999999999991`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3219999999999992`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.411999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3490000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3370000000000033`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3489999999999966`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3520000000000039`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3599999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4109999999999943`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3350000000000009`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3599999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3470000000000013`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3490000000000038`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.367999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3520000000000039`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3710000000000022`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3429999999999964`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3400000000000034`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3689999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3389999999999986`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.360999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3780000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3560000000000016`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3909999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.318000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3909999999999982`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.360999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3460000000000036`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.355000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3629999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.316999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3940000000000055`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3469999999999942`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.367999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.365`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3209999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.326`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3870000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3629999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3239999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3819999999999997`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3340000000000014`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3489999999999984`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3790000000000013`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3739999999999988`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.343`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.336000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.376999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.375`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3359999999999985`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3719999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3640000000000008`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3440000000000012`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3629999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3679999999999986`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3470000000000013`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3639999999999972`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3900000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.318000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3549999999999969`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3419999999999987`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3640000000000043`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3859999999999957`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3350000000000009`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3590000000000018`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3519999999999968`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3490000000000038`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3870000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3389999999999986`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.341000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3059999999999974`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3760000000000048`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3549999999999969`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3719999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.347999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3860000000000028`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3220000000000027`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.381999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3279999999999959`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3850000000000051`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3610000000000042`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3489999999999895`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3599999999999994`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3500000000000085`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3340000000000032`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3799999999999955`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.3900000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.350999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )]}], "}"}]], "Output",
CellChangeTimes->{{3.566417037145218*^9, 3.5664170852269993`*^9}, {
3.566417129680561*^9, 3.566417140647348*^9}, {3.56641717581981*^9,
3.5664172224107037`*^9}, 3.566417281888981*^9, 3.5664173767611523`*^9,
3.566417453831401*^9, 3.566456519221681*^9, {3.566456866613173*^9,
3.566456892827619*^9}, {3.5664569746173162`*^9, 3.566456998374814*^9}, {
3.566458884154523*^9, 3.5664589089532547`*^9}, 3.566463366964374*^9,
3.5664646066972437`*^9, 3.56646577280997*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["T",
RowBox[{"unten", ",", "2"}]], "=",
RowBox[{"Mean", "[",
SubscriptBox["periods",
RowBox[{"unten", ",", "2"}]], "]"}]}], ";",
RowBox[{
SubscriptBox["\[CapitalDelta]T",
RowBox[{"unten", ",", "2"}]], "=",
RowBox[{"StandardDeviation", "[",
SubscriptBox["periods",
RowBox[{"unten", ",", "2"}]], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.5664135644395313`*^9, 3.5664135932825413`*^9}, {
3.566413840931016*^9, 3.566413846450987*^9}, {3.5664172409639*^9,
3.566417250652793*^9}, {3.566417447558818*^9, 3.5664174599257507`*^9}, {
3.566457005528328*^9, 3.566457013537655*^9}, {3.56645891136276*^9,
3.566458915831978*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "2"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]"}],
SubscriptBox["T",
RowBox[{"unten", ",", "2"}]]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413595788748*^9, 3.566413604730227*^9}, {
3.5664138496182423`*^9, 3.566413852914188*^9}, {3.5664172604677753`*^9,
3.5664172659954042`*^9}, {3.566417462405601*^9, 3.566417465982563*^9}, {
3.566457016193658*^9, 3.566457017281163*^9}, {3.56645891700006*^9,
3.566458918222684*^9}}],
Cell[BoxData[
TemplateBox[{"4.630424043667277`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.566413602619113*^9, 3.5664136050051537`*^9},
3.566413853330969*^9, 3.566415031488805*^9, 3.5664150943028173`*^9,
3.5664152865403767`*^9, 3.566415352194001*^9, {3.566417267815569*^9,
3.56641728474636*^9}, 3.56641738194198*^9, 3.56641746640886*^9,
3.566456519317068*^9, 3.566457017800802*^9, {3.566458918820698*^9,
3.566458923808474*^9}, 3.566463367407484*^9, 3.566464607138097*^9,
3.5664657731017103`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "2"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]", " ",
SubscriptBox["\[CapitalDelta]T",
RowBox[{"unten", ",", "2"}]]}],
SuperscriptBox[
SubscriptBox["T",
RowBox[{"unten", ",", "2"}]], "2"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413681720048*^9, 3.566413748696438*^9}, {
3.566413855794153*^9, 3.566413863833433*^9}, {3.566417287240891*^9,
3.566417295474732*^9}, {3.566417441918975*^9, 3.566417475309024*^9}, {
3.566457023953312*^9, 3.5664570266246567`*^9}, {3.566458925358451*^9,
3.566458927326165*^9}}],
Cell[BoxData[
TemplateBox[{"0.07789677349785892`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566413749146556*^9, 3.566413864296844*^9,
3.566415031562516*^9, 3.5664150958247833`*^9, 3.5664152921305733`*^9,
3.566415353714468*^9, 3.5664172959548683`*^9, 3.566417383528458*^9,
3.566417442368752*^9, 3.566417475991418*^9, 3.5664565194538527`*^9,
3.566457027338031*^9, 3.56645892819667*^9, 3.56646336759156*^9,
3.5664646072947187`*^9, 3.5664657732227983`*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Schwebung", "Subsection",
CellChangeTimes->{{3.5664180333680267`*^9, 3.566418034246147*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[", " ",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "schweb", ",", "1"}]], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}]}], "]"}]], "Input",
CellChangeTimes->{{3.5664180434247513`*^9, 3.566418047212668*^9}, {
3.56641808286226*^9, 3.566418086236058*^9}, 3.566457032026518*^9,
3.56645893179807*^9}],
Cell[BoxData[
GraphicsBox[{{},
{RGBColor[0.24720000000000014`, 0.24, 0.6], LineBox[CompressedData["
1:eJxdXWWYXdUVnSQECxYhIULcdXwyeu9zm+dC8QItWqy4F4qUFgqUUqx4C6RI
cW14g0txl0IIFiBAQghJiNHMWnfW/m7mz3znvSvn7LNl7XX2OW/C/kcWft2/
pqbmmkE1Nb3/44tPHnZn7HHn6fF3/fbgfF3P4y/cEHngh5ecA/H3jHPwJd+e
6jS97bz0Yu/fl85bJ341tW7r/zlL1i34/vX0cmfjm70ffOzsv9MvWu97boVz
1ZW9f4ud8wO//PzViT84a4qf/vPqpz5zvtv0lH0e+d5ZlL3w8iOGLHFw+fHf
Oc8f/9h1o+Z95eww555rlt3yhXPof469dJctvnZq8PeuM3reh5O3PPNbZ33v
6/b/ZfX3Pb0dXOYUHhp7ztL8u9Xult43LXc2NTZ9sqS6aRSbevy9M2Ovi574
cfqKKu9b4fC+H6vHYEA/OO/cdFTntu+srvafdd7w917+weFz1lRP6O3Ohyud
LSq9PfqpeuZloT/9ZsmP+n7ToD746fRVzmu9/w5dVaW8Vut9/+1tbljjhDfd
tW7BV9W6rW8fs8evfnKO3vS2m456y7t/reTL8a1zNglj05sXOejO6nXOPo8k
tus/a5mzLTq6wTluk1QqO6x2zoCANjqvrO4V7FqHz9voXLvslmdSLT97z6lx
OW/93N63ty+qcXt7t9dF/dxnU70D6edimJNr3Cd7P36in7tr72XZdU47Jqi/
G+ydvg9+cDBNj/V3++aH8zXA5Tw94I1jgMv3v1Y9ckivpAd47/ukSj3Ywk1u
1yvp76ubBrep41u4/+qdlp1WVdm/LVyOa30V3d5noMv5r+n5FTo00MXrn+nX
czgUb6CLx73Xv4fzuaXbgL8BPdDjS7Z0Kf/+PZuUe5OGb+WyH/178JjUVno+
5b+Vi+l9dX2V49ra7dMXiOXCrdV/6vPW7pQtezXjf9W/9arHuq3dCVC8/1Rp
D9t48njegZo+tI033i8dXreNy36tcKKbtOXNE7d1++bzpF7zun1bt28+oT7t
g1zKtb9789VPbRrhIHckFHSAy/cPcnHbmIEu37+dy3EO9MZhbaj1su08vRjg
9mrxf47dXs/vHd34u7Z3aQcbnXEwrB3UP+rHDm6fPVNfd3Ch/nst8fzBjtKP
v/d29+AdXajRda9X+X9Hl/d9WqVcd3JzvW7h9yuqeH/tTi7fu7pK+ezkvpHu
9TAbvft3ckdAkWp6buw1tzd3cmn3/Xs4rYM9PR/QQ70Y7F7fq+5bDuihng+W
/mA+Dh/sruo1gx/79SzvFfv5g/X8f/S6iZsGu9Tbnz1/MFj6Av3pN0T6XMIA
hkhfYD9dQ9w+f7Ci97JfDHGhPr9ZVIUcThjict5frGKcDw9x6bfu8vzUEJd+
6lOH/maI2+c/oe+Dh8pe6TeGun3+4rTeaUoM9cbzk4P5P3Ko178NvP62vvtr
XKjB00Nd2n0/F+Fh8VB+HulPOa8fKn2BeYwY5ullf3caHN4wXc/xDXMZN/q5
a3vV7dJhnh7+TH/y72Eu/eMG9vf5YfJH0J8vh3n67fnVGTt7/mWlA78Q3dmF
mnz1tYP+7rezS7/0iXMKDG1nl37rLfrPK3Z2acc9TgaBa2fPPh6s4r2v9D3v
7Srj1XC3L77AbOcO9/R7eZXxc7hnrz9U+d7hLuPAymqv9Lc7a7j3vlW8/tnh
bl884bwMd+nn1/H6/iM8+a+r0g5GuIwj66qwu7YRnr6spf85xdr0lyPcvvgG
9b93hPwZxzfCpZ/8oQo9/GaEJ//vq9D/bXbxxvOtZ4+7ePb3ZZX2vIvbF38p
l77vn2J/r93Fpdz/6uCxC3dxGR9fdKAf7+9Cvbn8bU+fd3Fv7TW7wMcOnzPS
pV/+yoGbKI704tS3Duz0uJFuH/6A3V08Uv6IdjbS7cMfGNfykbIPynmUN78r
iTumWZt6a236kVHSN8p7lJ7P8Y1y+/AP3zPKpZ9YRv++ZpRnF9840P+hozU+
yne04usVm7xgT3K0yzj+qTe+vvYiB2Z9x2hvPt/g9S+MdvvwBP59MVr+g/5w
jOd/7qb/HDdG8YrxZYzmj3hijNuHV+j3x3jyfY/698gYxT+YwdtjPHv4qMp+
7qo2cciuLvHSx1XE78Kunn9fXKX/te/hJ/5gbfpdu/6bXnVbas+Hu9tqrDcf
H1ThrydZm3o1Vv1HXNt7rPQXV500VuPFtFw2VvGK+jrWJR58hf56tbVx/c7j
5L8Z/8Z59vxslX5lnOQLf/IXa/O+cZoPXP/fcZov6tE4L77cWkWYrBnvEmdf
WUX8G2Zt3FY3XvEX0++O9/TxUQdxJDPe5TifdPD6vcYLr1Du4z37et1B+Lhg
vPwn9XS8y7jyPwd+buF4D48sdqAX/x3vEpd97iDevTte+o3/S8YLLzDujnf7
8gvggAETPPkudRinrA1/3ThB9gS/EJzgxbtvvTxmgvwF1Htf+x7/DrfnQf9P
maD4wfg/wcPPXzvUgwnqH+PzBNkn9O/ZCbJPqMcbE9y+/AV6+MkEz9+/6vmj
CYo/sLeNEzx/8E/mWdtN1PzD/kZPlH5B3p0TZR/Ur4lefPyiCj3YfeJm/nqi
/Dn8xvET3UkAfss9/z3R7ctfqJ8TPfy3oorL7puoeIb5eXKi8A7s6LWJii/w
lx9PdIlzfqR9f2v3M8xP9PRnZRX6MmiS4ifzgEku/dr3VcSRtkke/l9ahV0l
J3n46wte/4tJ8g8c7yTFb453kuwNjz97kuIT9XKSCz/w08vMSx+Y5DIufc68
8ulJ0h+Od5Knv987wHsfT/Lm7wfimWWTXJhfZZUDOa+f5BKnrnEwjEGTPby5
1svnJnvzsZ7Xd0wW/ud4J3v+qoZxfbfJwk8re4d5oF1PPD9Z+J34Y7Inzw3s
/yWTvfiw3tPvyS7mpXOtA3xz52TPflY7dEuTPbz3o2ffk5W/0L4nC4/Sz0yW
vXOckz3/8KGX308RHmA8muL25ffof+MU6TfcVGiKy7zw6yr0LjdF+JrxeYr0
i/nJFOEfxuspnvzWVmFfF0xxiZM3MF5dNcXDfz9X2e8pLv1ATQ/8/YNTPLze
r4f42Nq0d2tDToutjf58N8UljuzXQ/2f4ulPTQ/1f6reD3uZM1X9Q//bpyof
ot1MlX3Szqa6jIvfVqkPU2Uf1IepipfUh6myB+rDVMUH6sNU+S/ijany57Cb
R6bKv1Kvpkr/gevemar8g8+dKv2iPkyVPtLfT3OJO2qIY6ZO88bTz/PD0zz8
PcClPkxT/go8VZzmUtG3YL6yn33PfGea8mWo6enTvLy5P++7wN5HfZjm+dsa
F/7k1mlefrrR45Gmef55ncdvTVN+gv68MU14k/nTNLePz6HdTpN/oT5M8+br
fdrXoOmKz/DnI6ezHwc/XqV/mO7lt597/nC6Zz/LPX84Xf4V+OnX0z1eYA3x
2HHTlU/gNb+frvya/n+6F+9revCe66d789+P+fId08Wn0D9MV/5N/zBd+TX6
8+508THM5+x6+I1V08XvUE9nKP/GvykzlH9Dbg0zPP7gJ+pzcIbiEaSSm6H4
AbvZZ4biB+P/DPFT9A8zhP8gt/NnKP7Cvq6YIXwE+7p5huI9xHL/DPE7jI8z
hP8ZL2bIPmBfi2bIPuBGv5sh+6A+zFB+Tn2YKX/PeDFT+Tr1YabHn/Un7kzO
VD5OPGBt6pFdz/g409OffsQlZ8+U/jNfn6n4An2+YabiFfr175n+/i+cqfFR
H2Z6dryS+vzeTJd57vdefj9TeAvvWT1T+TvsfuAs4U/Ic/As5Te8b5bwPOQf
miX74OezNP/8fJbiB+PFLE++PxCfnDZLeIZ5zizFE/IHs9w+fpj+YZbyd/T/
wVniMxkvZokvYryY5c3HevLTn8ySPSIfXG7Pg7/aOEvxi35utuyZfMRs8QvU
h9nCc8wnZys+0D/MFj6kf5jt+dVPPf8wW/kS/cNsT9+e9/zDbMVr+ofZsg/I
887Zyu+pD7OV31MfZiue0D/MFv6mPsyW/WAeVs1Wfo/+DJij/Bv2OHWO9Iv4
YY7wF/VhjsdrrvLWDawNe9zXroc8j7A284M5wj+Q5x/niA+gPlh/qA9z1F/i
yTkeHlruxYs5wkuMF3Ok/4wXcxQfqJdzPLz4MfOtDXMUL4gn54oPIH6Yq/mA
n+2Yq/yQ+jBX+Snxw1zls3jdQXM3w89zle8zDs715/N/mSt/Cjx8/VzpE/Hk
XM+ffMb8ZeFc5SvMd63NfNva7Mdc4RnGC/ue/mGe2tSHeXof5NY0T/1jvjhP
/Se/NE/4iPhhnvgD4od58i/ED/M8PvNN2uMF8yQ/4od5shfO+zzhLeLJecr3
6R/miX+Efb0+T/NFfZgne6M+zFP+Qv8wT/6QPHet8BzzyVp/vjm2VnwR46u1
QbvOqRU+x2saa5UfYVzttcpnKc9a8QXEHbXSR+L1WvkD6lut8CXz81ovLr3H
/vza2ujP4bXSd+RRx9aKf0B+fEqt4jEuO6tW9gK5/qlW8QT6dVWth+c+8+KZ
tWm/1qafsDb9e638F8z2sVrZK+T/jLXR/5esjf9v2PPgXz6oFb8PeX5ibczD
l9Z/yHN5rfwpcZDJA/3ZaPKFfg2sk/wZP+o0f7h+bJ30B59PqRP+wfWz6+Qv
yL/Uab0P8m+vk78gHquTPeHzRJ3sj/pQp/iM/u9WJ34darZPnZcvLfXiU534
C+pDnfh35jfWpr+uE78BeZ5VJ36b+K5O+JD8qn2P/lxu90M/r6sTvsb83lzn
0m8sY752h/UP9nJfnfJV9OdRGx/zpjqtf3G9o07+CP15tU7+Bte9Uyf+h3lN
nfwH+vNFnfgjyOfbOr/9rqyTPRFm1Im/Qn/61wu/Yr1gaL34NV5XL34b10+s
Vzzke+rFF2BWa+u9/Pkn6mdLvetbr+6q1/oO1Dpar3wKH6frvflc7/H/1kb/
96wXf4L37l8v/Al5HlLv4cW+dXfrH9T4BOs/5un0esVv6Ns59cKn9O/14n/o
duvFb6A/V9fL//C59fKHHFe9+FjI56565XP0J/WyH8jnsXrZC+NDvfAauvFS
vfQP/XmzXnwA/Um98Cv9Sb3wIuTzVb3yJ/qTeuFVqN2aevEP8HM/17sYxvcb
ub61ZYP4Cq7/WZvxpUH5JPRzaoOeh/7PaRC+hT9vbNB6GPmOBuVzxG8N4gdh
J8kGjZ98b4NnD1+y/79ocFknsJj937dBfD79aIP8G/1Jg+Ij5Hlsg+IN4t0p
DfL39CcN4j/wnPMbxIfhvosbpF/0Jw3SR8jn2gbxb/QnDeIXALNubxDfR/61
QfUckM+jDeIr0M0nGpTfoT/PN3jxoz/92qvWpj+x6zGuRfY8+pMG5YP0J9Yf
9OPHBq3XkkdpkH2Tz2mUvcHOd2wUPgduGdUofwM7m9io+MX13UbhEfqTRuEj
6kGj8hPMq9OoeML14EblO7TDRtkH9K3UKP1Cv/dslP5Bnvs3av0V/TmkUfrM
cTf661NOaBRfAXme0ejht349GMa5jaovYD2JtaHHlzaK/6A/aRTfAjne2Cg+
EnJa0Ch7Q3/uapR9EV82aj2Y+KRR+SvF2ih+iPikUfGT+Wmj7Anz+0Gj4hPX
MxqFd9GvrxqFT1mO1Sj/Rz/TKLxCf9Ko9RT6kyble8SrTeLPyHs2qX6B+KRJ
+ke82iR+hPlfk/gLrm82qf6JeLVJ/AflYG08N2dt4pMm1UPQnzSpngH2cmCT
+Ev6kybZM/1Jk+IX/YmNh/6kSXwJ/UmT+CL05+ImrXeTj2qS/IhPmoR3Ic+b
m4S/0Z87moQPMB33Nik/IT5pUr5Du20SPkF8f65JeAZx5LUm4SPy/02qJyC/
1aT4g3zsiybpH/1Jk/gT2OPKJsUDwIn1TeJHiE+axZ9AD7e1NtfHmsWfEJ80
S//pT5pl3+hnXbP4dLi1+c1aP6DdNYs/gVrFmuVPuH7aLPsgT9CsfBdquXez
/BPm/VfNwm94zmHNyt8Qp37bLH8Hv3FSs/Aa561Z84vP/9Cs9VPElYuahU8A
0/7WLL4B83Zts0uea4UDN/iPZvljxptmjw//0dOPZukjwuYjzfLn/N/s8Rde
Pc7z1ua8NIsPp37Y/bjso2bxL6xXaBbfQv1oVv0F8Wuz7IHT3Cx+hTitRfbB
+oqWzfBri/Au4vKEFskX/mtGi+yF9Rgt4t+JX1s0X7A3p0XxCGYcadH8Er+2
CM/BTEot4k+IX1u0Xsl40yJ7Y7xpEd8Bezu6RfoGeZ7Yonoy9OeMFtkn/NG5
Lcqf8NoLrM1h2PWM2/Y8yPNGex8/bxH+JH61/hG/tohvIX5tkT1APk+3CI8R
v7YonkA+b7bI/xC/toiPZ7xpUbxBf74yeTPetAhPE7+2qF4Cct7YIv/HeDNf
+S7kPmK+8Dnsf9x88Wdcj5qveEb8Ol98NPHrfOXXxK/zlX/Dz4fmS9/Iv1kb
4s3PF/5BvdAvrI3H/HK+8CjM+kBro1+Hz9f6KvkRa3N9w9rkR+b78db585W/
EL9aG3K43NqMN/Y84lf7nvmwtdGf+6wNfXt0s/48YW3EgRc268+r84UfmBbb
9ZDPxzYe1peYfOCvv7M28avJnzDCvofb2KJV84f52rZV84u4N6ZV/Anyhsmt
0hf4hVmt8h/oZ32r+Dj4pbZW6SP8UaBVfB/6FW+VPsMf5VoVr9GP3VrFv5Av
aZW/IV/SqvjDdehW8THEI62yR/IlrbJfrg+3Ck+TL2mVvROPtMo/UD9a/f7o
ula/P7q51e+Pbm/1+6P7rE08Ys+DfB6395EvaRWfwvymVfwv85tWvz/6yMaL
tOxzkwfjTavfX680+TIu2nwwv2kT3sV927Qpf0T/R7dJH4lH2sTn4fMZbYrf
zG/atP7BeNMmPEy+pE3xm/WJbeIr4I/Sbf71j1Kb4jnjTZviOeNNm+Ix7O1Q
awMfHW1t2NuJ1ma8afPksZr+6Nw2xXPM04Vtyn/BF/7V+odx/93GA3ne1Ca8
AjksaBOeQfy72+TFevo21ZvBvz/W5vePz7SJr8a0v9Sm+E2+pE18JtTqf22a
f9QPftom/gVxe2mb9A16tKLved+w3uqnNuFh8Mn92oWHgWOHtAsPwy5HtQv/
wq9NaBf+Bc82vV35J/S7tl38DPWjXXgX4+9qF95l/mvPx3yk24V/MR+lduFf
6Mme7S7r3L36rgPaVY9PPq3d40++Y33h0e3CA+jXie2SF/zG79rFX6Le+bx2
rX9g3v/crngLXHtZu/AX+92u+YVd/aNd+Q6m97Z22QfU6J524UP6vXbpI+T7
eLvyLeRtz7UrHyPf2u7h/Y1e/Uq78kni1Xblk8Sr7cr/6D/alV8Sr7aLP2G9
fLv4G8h5QIfyReYzHVpfx3yM7hCfwnrWDo2H8aVD+THGX98h/Mv68A7VFzNu
dkiewLuJDuEZxpcO2QfWxSsdwleMLx3yl4wvHbIH5rsdyo/Ix3eIb+H6TIf4
FuKPDukj8UeH9Jl20/f8Ddz/cUWH6j8Qlq/vUH0K5uHWDk9/anq4n6BDfAn0
6377nuuPHaq/Ir/aIT4F437R3k9/Yf0jPu0Qn4p4+UmH7Jv41MZPfNohvhL6
tdrkR33oFN6F/IZ1blb/2Sn/Bj2e1Cl/CP2Z2an5Z/1vp+wB8pvfKf1hftsp
e+D+hU7VczC/7RR/gceUO6WvjOud0n+M49ed0nfmt52yB4z7GPsefMC5neIT
8b4/d8r+IMe/dYofhf383fqL9/3TxkM8YeNF/ndvp9bXiSc6xTcyjnUqnyae
6JQ9EE90brb/plP+i3izU/gK8lvSKbzEer9OxQfizU7FB5jhhk7Vm0BNtuhy
+/YTQn6Durx8cQ3Xm8d2KT6Q/+oSP8J8xNrkv7rEjzAf6VL8wMfBLukz1+e6
tB4Avc53Sb/Jf3X563t/2SU+nvUCXRof7O/ILuE5+JPjuyQf2MVpXfInGM85
XcrvWJ/ZpfyN9UddwtPkR7uEx8mPdml9FHa/oEvzzXy1S/Xe5Ee7hDcYZ7uE
p7h+2yX8Qn60S/oGvXmry+3bL0s77xL/gXF91iW+n2VHXdJfrK/90KX1MeQD
a7tUH4z39nP0PMTrYY7wF/GlI/9PfOn497/McFRvSHzpqL4EcmtxtB5N/ODI
HogfHOVHxA+O8h3iB0fxG/O+lyN/Rb1ylK+gH4c5wlfMPxztfyMf6ogvIB/q
KN9g/uEI/zM+OLIv1t84Wn9lfHAUjxgfHOEX1qtZ2xuG2tQHa1Mf7PnEIY7q
ychfOMp3iCcd4SPiSUf6z345wkvUB5MH5nGtI/yEu2pcrV9B/lu4ki/Cxvau
8hHU3+zkKt/k/hBX/CLw5S6u5hNud4wrPgPyG+8q/4VbmOQq/sDfTXOVf1PP
XD+/P8+VPnH/pSv7hP9vdsXHwe+12feQY5d9j3EFrY35itr1EEPC2uTfXOEd
8vnWhrmWXD+f+gtXfAOmdU8bH+vDXOVzmM8DTB6Q80Gu7AXzcpjJD/p0hLWh
37915b/Q7eNN/uR/XeFhxKXTXMUn6P+ZrvIb/D/f1Xo/9OFCV3wE/PglNv/Q
h7+68qfo9xXWZn5m+oP1u+tc2Tv82E2u8CLC0i3WBl/yL1d8Buu/XPkHytX1
86f3u8rH4BcfNv3GfC50lY9jPI+7qr+Cv3nKFX6C3T3vKj6Tb3TFL8IOX3UV
f+h3XfGRkMe7rvgC9PMDV/6J+1usjfj0qSv+lnjA2swfrc39IXY/+rXC3odu
rbL+sKzB+ovLNth4II9+AY0fdj0wIH8Bv7l9QPUigHuDA+KfYA/DApp/uJ1d
AtIv4OExAekn/Na4gOyBeDQg+8I0TgsovkAfZgaUv8Ee5gYUj4Gf6wOKV9CH
poDiM/mygOIb6zwCqkfBeAIB4T+MJxxQfMR44tbGeLoD4iMgp6y1MZ6iPQ/d
qATEV0CsewS0/wf4dR/rP/1wQOsPgBG/tvGjG4cEVE8AORwekP/Be48O+Pnl
YwOyX+6HD8je0I9TA8KnwCm/M32A2v0+4N9vfl5A/Bjk8qeA+DbGpYDyFcjj
0oDqpbi+FBC/wXq6gNbP8P+agPI9ricEvHr/1d5+zoC/HmVBQOuDwFN32PWQ
x93WxvzeFxB/AXt9KKD9ZqyPCPjXI6sB8RkIR08GVM9FtxMQXsU8vGDygb6+
HPDvn3k9IH8Ee3srILzK+nazJ+LDgPw9xrM4oHgF/PCZ6Qf09cuA8heMZ6np
H/i3ZQGXeduPHp4MCB9CX1cFhDcxb2sDqq/iekhA6+ew2/5Bf743MOg//2GH
oPgJyG2IfQ+xDA/qedCHUUG9D/5/bFB4l3xXUHwkzGBKUPZH/iso+wK+nB0U
Pwo51wZVP8l6xKDiL+TSEpT84b/bg/J/tLug7IP1RUH5X8g9GvSvfyWCsgfo
dzqo/IfrN0HpO+tLguI3MO7dg8rfMM97BZWfwV5/GfTzDb8Kevqy0cuvguIn
wAccFlQ9FsZzpF3P9eSgt/9pA/nA44PK/6DfJwe1nwDjOS3o5zPOCsqegJPO
Ccp+sG3i/KDwMetZgsLrXD8Kyt+Q/w2KT8JrrwjKf+HzvwcVbyCP64PCk+Ql
g8rnIPdbgvK38F+3BRUPYDZ3BsV/Iy++J6h8jLjK9BP2+nBQ/AP5oaD4P/KH
QfEfUJ+ng+I/INfngtqPg4D2orUB+161+6GWbwR1/g79ntkf4tz7QfEfmNaP
grJn2OsnZj+s1woqvuHfV0HVL5KfDCreYp6/D2o9gvUXQeFZyHFN0I8H1weF
34hjQ8JfwD8DQrIfiG2rkPIf6MmOIdVTcH0+JL4Z+jk8JP8OfzUq5OGjn7zz
L0KyH8hlYkj8OPzP1JD0m+srIfEhMPM51iafHhL/wfXbkPgPPGd+SPwL/UdI
+2uAhx3rP8YTsvExfw7JX3C91+SB8WRCWv/HPBVC8keYz0pI8RzzuXtIfBT8
0t4h5QPcrxBSvkI+LiR8gfk8OCT/Cf38TUh8IcZzZEj2A7kfE1L9BfK140Pi
P6CfJ4cUbzCO00OyL/TzrJDqcTE/54b89bnnh8RvI45caN8zXwkpXmA8l4VU
T4J+XhGS/mM8fw8pHjJfCQm/QS3+EVI8gVu6JeTnB28L+eup/h3y1+PfY/IF
n/VASPkzuv1ISOt/uGxhSPkP/UdI+Q3i/VNmP/QfIeELxLsXQ8oPIPdXQ+KL
4QfeCAmvwR++ExIfQn46JP+MYS8yfYSdfhISXwd/+EVI++GQd3xt33N/orUx
nu9Dwk8Q84/2fOjNTyHxL5Dr+pD4EvIZYfWf/iKs+AF/tX1Y8QPzODgsebHO
Nix5ks8IK5+EPowJK75AH8aFNT/cbh9WvozwNS2sfBvymxUWnoA+zAtr/uFH
6sN+vqw5vBmfEZb+wM46w7JHxrWw+Ht8HAkrvgHfx8PSR67vWpt8hl1PPs6e
Rz4jrPwL8XUvez/rScLCT9CzA6z/0KeDwsrnyN+FFY8B044IK18hnxFW/CDf
a/LDPJ0cVj5DvBGW/4K9nxmWPUHNzrb5gTz+EFb+w3r8sOIT8vGLw+In8P+v
1iYuCst/Qi+vDosvg9iuC/vr8W607zG/N1ubehsW3sc47ggrPvJfWHiT+UpY
9QMY10Nh/37u/9j1zFfse4zjKdN3mMWz1oa+/jcs/hz6+oq1MT+vh5WvYH7e
DosfIN6wNtU8rHgEnLg4LP4WfujzsPhJfm7fw59/a99zf4G1WV9hbdZrWRtx
YV3YX9/9s30P/zcgojbGs2VE/WW9eUTjh5oMjSieAjaOiMhfsB49In/NuBzR
fBNvRPz766ZGpH/k2yPSV+jDnIj8CeymLiL74PpMRPaD++ZHlA/Czjsifnt1
I7J34JZwRHw+/GI8Ir4BuDcV0f4EiCEbUbxDvliMKP7j84q14b/2sDbsdW9r
Y31iv4jW34GffmVtyPkQez/321v/wE8fZf2Hfh8bkf9ifWNE/pP8RkT+B/L4
XUT+hfuTI8ofML/nRWT/GM8fN5vfP5s+YF7/Etns/KeI6jWBQ66MiK+Hfl8T
Ub0R9w9GxB9wfTKi+Iv4dGtE8RXzc1tEeBH+666I8kn0+76I1geBax6MiF+B
3j4aUX7GesuIv37jyYjq+4HfnrHnk9+w92MaXo4ovsN/vRZR/MY8vRXR+gbP
dbDxI15/GBFfibDycUT+AP7vs4j8Ffd3m33B3pdG5N8ht2UR8eXA1z+YfZDf
MHsgvxFRvRD5jYjyH7ynf1T5Eex1m6jyQ/jLHaPCrzDTIVHtL4MdD4+qXoT1
O1HlZ5iXXa0NvzTBrgf/N8WeR7lHlc9x/TYqfMv1uqjqofGcxqj4EdarR8WH
cn03KvvCOJyo4j/sPRSVv+F+u6jiL+5LRmUveE0mqngEe89HNZ+I0+Wo8j2e
LxEVX8Lz1aLCg8xPouIPmJ9Epb+046j4P+YnUdUvQQ2Oiir/g9yOiSrf4/6b
qPI72O0p1obdnmFt9Pssu5/10lHVT9FfRJV/YpgXRsU3wj4uicreML+X2fhY
r2Ljx/xeE/XXT18fVf7H/CQqfIv5vTWq+MR+RYVfmZ9E/fXF90blL2HvD0SV
77F+P+rfD/BYVPkR8xPTN3z8dFTr0VxPMf3lekpU55Owfioq/gL9fDPq8a8/
sx73naj4Du4nivrP/1xk13M9xZ6HaV8SFb8IPfja7Av+77uo8kXEnRVR5Yfs
t9kP19uj/vWEDWY/6Ee/mOwH9w2MCf9DH7aPyX/x/NWY5g/jHxbT/DI/iSm/
YX4S869Xj49p/zH0blJM/h/XTYupPoS8V0z8BIY1NyZ7YT1YTPYC/W6Oie9A
XGiNiT/heXLWBh4PxPz1JhF7PvxXPCa+EOrZbf3DtOVisg+8txSTfbCeJCb7
4P67mPJB7q+KKf+Fve4fE95j/XvMz48cEtN6FsZzeEx4gPWKMa1XQQ+PjSn/
4XpKTPVyGM+pMeEZ4o2Y+HfkW2fHdP4H11Ni4kcQN/8Ukz8n3ogpvvC8jJj8
P8bzt5j4D+jlVTHxI5S7XQ97vcHa0M9/2vMxnltj4mcQ12+PKd6x/iEme+B+
n5j2r7I+JiZ+FeN5NCa8Bj/zWEz4FON5IiZ8xjw/pvUO6MULMeFl1uOa/RBv
xJTvcD0lJjxGvBHz12t/aPrB9ZSY+BHMz2cx8Q3EGzHhMfjTb2LiL4g3zP6I
N2Ja74IZrLY28UbM9Z/3bm3oab+4//pt48J/uH77uPrD9ZS48BXXU+LyF7CL
kXHhT8TZXeOSB8+bjkte8NuT4+LbEeemxxXPeZ5DXPLnekpc8YXna8VlP6w3
jm+2vyUueyLeiIsP4X6XuD8eReObnW8bF37DYzNx8Ru087j0DWpejou/Jh8a
l78m3rA28YZdT7wR958vdLA9H/bxG+sP3MJR1l/I45i49B2fnxAXXwL7OCUu
fIp5PSMuvAV5/D7ur08/N+7fX/LHuPAY/UVc+SRw7F/ish/I47K46jOY18SV
n0INron77euGuPgK2Nc/4+IrmJ/EhTegNrfHZY+47664/C3EfF/cf37QQ3HV
ayAuPWr6h2moxsU/QB5Pxv18xDPWpt3Elb9DP162Ns9Ts+shl7fse+jle9am
v7D+0F9Ym/5iM3v50u7HNHxj3/N8LmvDf/5gbeRrq61NPsPkA7vYaM/nfpKE
rmd+Ym2unyR0P+Q3NKH5oF9JyL65fpLQfEJ+Y63N/fYJ5cM8/ychfeH6ScJ/
nsichPIDfF6XkP5x/TWheiOunyTkPzCMjoT0m3xGQnwg+YyE7IPmnxDegvxS
CfkX1mskxE/y/MeE4jnPR00Iv4Hf2SMh+6afTcjfIC/Y39oY5oEJ+Qvux7Q2
99sl5D+QHx1t38PfHJcQnsA8nZQQv8F1roT8C/r1O+s/z9+z8fE87IR//9yf
EuI/II+LEuKbkO9davKHPC5PyL9DP65KiO9E2L/W9Ad6cGNC+gl53Jzw11ct
SIgf4X6/hPJB+N+7E6p35P6/hPJD6MdDCfEl5DMSwsP0FwnhQ8zvkwnxE3Q7
CcVT4JT/JhS/yWdYm/ynXU/+056H+X0vofMPII+PrD9wk4sTis8Yz2cJ4Q3I
46uE8AiG+U1CfAjksNzkh3lYmZD/xPyuMftDPFln80X+0+yH/GdS9gG92Dap
eAT57ZhU/KO/SIoPQTwenlS9M/oxKqn1PvqLpPJB1hcnhSfpL5LKD3H/zKTy
L+CbOdaGv65LCp8iX25Kqr4Z09Jqz4e/6bT3Mx9JCm/TXyS1Xsl8JCl+kvmI
jR/+JpdU/GY+kpQ9kYdISr6s/0zK3+Ex+yZlH9wflVS+h2k8KKn5hn0dmhR+
Qx56RFJ4lOslSekf6zOS4ud4Hn1SfB/PJ0qKf4C/OTOp+hLI85yk+ArM4/lJ
rWej2xdYG37pEmsjH/qr3c/6jKT4GNZnJLX+Tdya9K9/35TUfhfWg9r4kM/8
y8bP+oyk+EPWZySFZwGjHkhqPYLrq0n/esvCpOIN+Yuk4gf5C7MH8hdJ+XfI
48Wk8jvu9zB94vknSdX/Y57fTSqfI3+RVL7G83OS4iMQdz5Niq8gf5HUeceI
40uTqjchLW/fQx4r7H7IY1VS+3P42qTOz2I9qNkb/FW/lPZnoltbpvz2vUNK
/Dz8wpCU4iX5zpR/f/jIlPAo+c6U/BX5zpTwCuL0lJTmEzhjRkr1dOQ7U9IH
8ggp6QvrMVKyB4xjfkr7T4gnUrIHhE03JT4E8xdK+c9njadU78T6z5T4PuIJ
+571nynZB/fD2fMxT3ukZA88XzglPhN+eX/rP/FESvGHfEVqs/PsUv71hKNT
4o94HmtK/Cv5ipTwH+R2akp4jflHSvGf592nFC+Qx52Xkj8kX5ESfqGfTcmf
wqz+kpJ9IH78LaV6C553mfKfZ3xtSvaC996Ykn6ymynxG+jnAmtD7e+wNs83
SonvIJ5IKf4QT6QUP1j/mVL8AF7vSSl+cD01pfiHeXsuJX6U55Gm/Hz6Kynh
NZ7XmhIepZ9M+fmO91PyT/DfH9n88Dw2mz8M6/OU8AH5zZS/3vvblOrHWb+V
Ev7gz9WlhKfw3J9S4he4/9T0D3xBTbf4CdZfdIufgx/fvlv+HB/vZN+zXtza
5NG7hbe4n6Rb/ArP0+jWehL5zW7hKdBM07oVL7mfsVt4CvnS3G7Vg5Df7JY9
EE90y/9w/2u38h3WX3QL78I/BrqVT+N/pFvxn/UX3crPIYd0t+ab/Ga3+A3i
iW75T56v3K18A250r27lC8QT3dIvTOsB3fLH3E/SrfVa7qfsFh8HPT7S2qz3
tPuJJ6zNei17H+svumXvxBPWX8jjHBsP6y9svKzX6lZ+QjzRLf9CPNGteMz9
Jd2yD8zL1d3yT9yv1a31P+KJbuWXrPfslv2w3rNb+SvxRLf4DLz2nm5/fvxA
t/A2rnvY9AXdeqxbfALG8US38B3xRLfsk+cdWRv/XrI23OJrpp/0U9bm/hK7
nmHWvuf+Uvuefs/6AzkusTZo/aXWf64bdCt/Y324tSGPVd3iE2AXa00+XD/t
9v9eUf+0+CDyE2l/PfWOackffmFoWngN0zo8rfmCfY9KCz/w/Nm07BPyn5jW
fDPfsDbPa7I2z7tOi/+C/OvSwu88Ps7aiGPz09Ivnpeelj8gnkjLfzPfSAv/
wAxiaekv/Uxa/oN4Iu3Px4tp+ROY7W5p5e+w4z3TwluIo/ukZU883zQtfp12
kvbvXz4kLXvk+kdafCTuOzotPIxxHmdt6N1Jadk3+Ym0+AjK2b6HfZ9tbcCm
P9j7WJ9l/YHaXWT9534SGx9wxOVp+QvI4+q0f7/RdSZvXHajzQ/85M02nxjX
v0w/oF93pjerz0pL3xE/7k/LPliflfbb98K0f7/V42nle8jDnk6L/+B5eWnx
H4hbL6YV3/j7e2mtB/N8gbTiIddL08LH8FP/szbuX2Rt+oe04j/zjbTW02BX
X6fFv8C+v7P3c1krLXzO/WdpxV+ul6aFR5lvpFWfxfXSjPI1+oeM/AfXOzLi
MzDvQzKyF/5+Wkb6j/tGZqRPXO/ICH9hWBMyyu+5Hz6jeMj9IxnxHcw3Mlq/
A/6pzagehPVYGeVHzDcywres/7bvyV/a91zvsDb8c8yuR96QsvdxvSMjPA21
KGS0Hs18IyP8zfWOjOpbgK/3yShesx4rI3vmfrOM7Al+95CM6itZj5WRP+T5
chnhJe43yyieQB4nZsT3Md/ICI/yvJeM9I31WBnhPczbeRnhTz4nI3xJ/jLj
5xMuzWg/DfONjPIt+oeM9gvAD11rbZ4HkFF+CD98s90PeSzIKF9j/WZG6+3w
U3db/yC3+zPKT7lfJOP/PZmFGeFx+oeM/AH3i2RkL5z3jOIvYUhG8Q9u99WM
4g3m6c2MH0+9m5H/pdlk/PhyUUb8Bs8jMP0nfjD95DxllL/B3y7LiJ/j/tSM
8i/+/kJG9SD0DxntpyFvlREfwvqrrL6nf8jqfrxvx6zyN8htSFb8C/mIrOpV
iB+ysm/ih6zwLv1DVvZBPiKreMT1jaziC/eHZOWfyEdkZQ/ED1n5N56nklU+
Avl3ZJW/471uVvqBaQ1npT88TzQr/WK9ZlZ8H+p7slnpP/mIrPSb6xtZ1V9A
r/bIig/kflRrEz9Ym341699/eYg9n/ghK76F6xtZ7afEtByXVb4HPT0xq3wT
/vq0rOIN3OKZWa1fQ0/PyaqeA/f/ISs8DjldkBU+RLy7KKv8gOclZ4WnyFdm
5f/IG2TF93E/mekH662y8rfw27dk/b+ffFtW/hz49t9Z2Qd/Tzcr+2C9VVb8
NuutsuI7eD5ZVvaDcT1h18NMnrHn8fxDswfMx0tZ1W+wXiIrPoPrn1nVb0Ce
72Zl/9SzrPI9qMHHWcVTrn+afXD9M+v/vYhvTP70k1n5K65/ZpUfcP3T7AVm
sM7sBff/nBU+gj/tlxMeQXwYkBOewfxvlZP9QF+3yYl/QLwYlJN+Qr+2tzbz
E2tDDoNz4ue4PpJT/Qbu3zkn/Ya9jchpPQrzOjIn/g79GJ1T/IPaj8lpfLh/
XE74CZ+OzykeEFfmFG+ht5Nzkifi5tSc7AHDnp6TvyJfkhM+Rr4yOyf7YH1Y
TvkC5Dkvp/gB/12fkz5gnA05rV9yP35O/AHub8mJn2A9WU76hvjfnhN+wWM6
c+LXANMca3P/vrVhhyF7Hsvx7X2sJ8kJD2Ge4jnpN/jzZE72z/UgGx/kmbHx
8/dITD7cj5cTHuX+mpziBcyskhOegp7vlpN9wF/unhO+QnzdMyd74f69nOIL
+aCc8DL+75eTP0R+f0BO9gT9/HVO+Qmm/UDTJ8Sng3PCa9y/k/Ofd/GbnOwR
cjjC2qx/sTZe+1trww6PteehvvB4ex/Pi8wpX4JfOTknf49xnZoT30E+Kic+
A9NyhtkD/MOZJg/uJ8wpf4M+nmfy5P7CnPI96OOfcuIjIL8Lc+Ij4B8usvlB
vy6x+YM+Xmr2hvsvszb88OU2/4C5V1obcrgqp3yV+wesDX2+1uyX9cG5zfLd
nH9/1D+sDTd9c075FPzOrdaGf/hXTnwEzPh2a/N8FtNv4OK77HvYwz3WRhy6
N6f4gPfcb/4G8nzQvsc0PJwT38F6QmvDPyzM+c/TqVob/uFxs0fWG1qb+Nra
ENsz1sZznrPnwT+8YO/neqC14WdetvHg81dNPjRDky/s4U2bD9jD2znhd6p9
TvwS/Pj7OfEVzO9z/vrVD00/4bcWmT7z92XNX3D/t9kHuv2l2RfDkvkH8LpL
zX7h977Nic9Av5bllL/wnIGc8j3WR+bEF8A//2jxDvaw2r7H/P1kbTx3rT0P
9rAhJ76Bv4edE16EP6vJK37CTvvn1X+4nS3yGh+u2zIvfwI/uXVe8qHfyMtf
YP62yyu+Qs93yGt+IM+d8ppP8hd56QOeOywv/YI8d84LT/F88bx//+fIvOIT
7GF0XnwG3PqueeFVvGdcXvEQ8pyQV/4DPDopLzzL+s+8+AWex5PXehf6OT2v
fBD2MNPasIfZeeFJhM25ee2fxnNr84rX6Ge99Rdm15hXPgp5NudV/4R5mZ8X
XkdcaM2LD4Q8O/LyN6xPz8t+ICYn769XC+SFl7gfP+/n7yN5xSfMQywv/eZ5
qHnxc8CDqbzwJ8aRziu/gTyzefEZ0ItcXngU+lnIC1/yvLG8+AWeJ5TX/iz+
XpF9DznuYW2er2fPQ1jZx96H+3+ZF16Fn9gvr3omyP1XeeWjmNYD8+IrMK6D
8rI31rvlFb/hLw7LKx5Dvw/Pyx/h/iPNXuB3js7LH3K/Tl7+GJ8fl/fX652Q
F37DfJyU95/vcYrpI/PUvPI13H9GXnwBXvu7vPI12MPZea1Ho5/n5bV+DHs6
P698jOch2fdc78orH0O8/nNe68uY/4vzysdY32/2h/7+1eyV9f5mL7j/irzO
k4T+XGX2wfNPzd/Av11r9gBcc31e+Ib8V96fT//D/CP5MJtv5Me3mj4A5/8r
r/wGenR73l+/fkde/AXw17/z4u+oFnk/f3FvXvwb1PT+vPgG4IQH86o3wnw8
bN/j/kfz2l+C9y7M+39f5jF7P+a/x+yFcs4rf8Rzn7LxAf8+k1f+CTt6Lu8/
j/IFswfgpxfNHqBnL5v8eb5c3r8/+DWbP/J5ea2HQJ5v5bXeSthh8YD1iXnl
UxjnB+bPYY8fmv4RpufFFwBHLM6rHgjx5tO8+AbI83PTd/jHJWYPrG+076HG
S82euN/bns/z7ez94NuXW/+g3yvMPhAHV1o84f7OvPJNzMcaix+sf8prfQDz
uj4vvAa92Jj3ry/XFISvuD+joHiB525RUH6FfHdgQfgCt29dEF6BHW9b8J/v
Oaig8ze4P6wgvgD37Vjw1/8MLsh/g68aWpC+Ej8U/OeXjbA2/o8syP4Q70bb
87heUlA8gBsdV1A9Bu6fUJD+o79TCuIvYM/TCtJ/8qUF6T/scVZB+k/+tCA8
BXueV1A+BX9eV1A+hDjcUJA9oP6pqeDH780FzS/3xxdkH/CvbQXxE9DLjoL0
BfbcVRBfgHl2C8JPqHsJFqRvPH6hIP+MeYoWhKcg1ri1oX9Jux7D7LbnQf8y
9j6er14QX4F5KBSEj8gvFMRXc79LQXiR6xQF4UnM0+4F4SWe319QvgX92bug
/AT92Nfkj2ner+A/D+OAgvwX98uYfbAepaD1CvjnQ8xeMM+HFvznPxxu+kJ+
wewJeP6ogv/35H5bEB7j+cDWZj2LtTEfJxYUv8gv2PdcnyooX8B8nG7vwzyd
Yf2BPzjT+st6uYLiJfzzOTY+8g0F4Uv48fMLWj9mfX5B+Rl/D6OgegnY40UF
4SfadUF4Fmp1qfkrntdaEB8Bvbi8IP4B77nS5pfrYwXxC1CjawrKX/D+6wry
j3jPDaYvuP+mgvA3zzOwNuLtzaZv3G9o9szzXwv+/R232/X8fXhrQ8/usjZ/
z6Hg55/vK/jPj7nf2piHh6wNOT5ibfjhRze7f6GNB/69x9qQy+MFf/7xdMH/
+2DPmbzgB14oCO/y9wOsDXt+ydrQv1esDdz6mrVZX2jzQ37f5g/8+js2v5j/
92z+ef5TwV/f9qG1Mf+LNtOfxaZfXKcw/8D9DubPcf+SgvgJhLWvzP+zvtn8
B/TnW/MfwHnLzF74+whmT8QHBf/5ESvNHlm/ZG2sV6wx+4VbWltQvgf9W2/2
j/s3Fvy/t1xTFL9Jv25t/h5UUf4CerCltbk+UfTzndsW1X/o36Ci+FqMe/ui
4if0Ycei5AO5Di7KX/D8mqLkjc93Lso/8DybouaT+KAo/cF8ji5KfzGfY4ri
K4gPisKjmM8JRcVf4IpJReVrCGNTisJjeM3UouIx/MH0ovAr5nNmUfkO+YWi
8juY+dyi4iXury3643W9XY/5aNzs/uai4iu6Ob8oPID5aCsq3uLjDus/+YXi
ZuftFBVv8T9YFD6BfYeLfn8SKcoeoQ+xouwH9p0o+n/PI1UUf01+oeiv78sW
pb+Yl3xReIz1ZEWtN/M8jqLWW/n7YEXl+zx/tCj+AvqwZ1F4EPhr76LwKX/v
pSj8iHndr6h6Ycj9APse03xQUXwD8UFR+BL+7LCi6pvQ38OL4lvwviNsfPz9
qaIfbx5j9sL6lKIfn5xQlH/C+08qyh/yc5svyPs003eey2n6DT/7O9Nnnhdi
+otpObsovAeccW5R/Bnk8oei9tfjvj8WtZ7M9e2i8iN0889FnR8APudia0NP
/mJtrn8XxT+AFvlbUfwH9PeKovItSPHKovJFyPnqovg83HZNUXgZ83ldUXwM
4sMNJh+e/27y4/kDRcVryPNmswfIcYHND+vzisJHUNvbTf+BF+80/0t8UBR/
zP1CReUruO4+0zeI/QHTb/5emOkv9xMVlU8RHxTFH/B8lKLqMYgPiqoXgl95
wtrcT2Bt4oWi+Dv8e7aofA3z9LzZG/zBf4vKFyHPl8xeINdXiv718teKil/w
B29YfOH5CeZfMM3vWPzAfLxn9sG4Y/aBeP2hzS8es6io/Iv1A6Yf6Mcn5o95
3lNR+RKXXYuq30He/2VR9UeYz69Nn+m2i+IT0M3viuLfoIbLrY35WGHX4/6V
Zi+Ie6vMPuCfV5t9wr+vNfvAPKyz/lMPzP5x/89F/+9r9SvJPrjfqqT9hcj/
tyr5+aBtSsq34AcGlfz7p7YvCd+QPygpv2H9Qkn+n/igJHtgPWXJv592REn+
mesPJfFhmP/RJdkH9GfXkuohYIbjStJf1A1NKPnPU59U8tdPTLHnIV+YWpI9
8rqS9B1ymllSvMJrZpf85+XOLYl/4fm9Jek//teXhLcwrkaTJ8+/KSn+8vys
kuIz/reV5K+4/lDy80ldJeXb8FNuSfwszCdQUn0B8UFJeIO/11gSPmH9V0n4
BnaZKCmeEB+UxC/g/nRJ/hr9zJbEh2Pc+ZL0Ffi/aNfjtWV7PnDObiXZK/zg
7tY/zOueJdk38UFJ/AQeu29J/oD4oCS8BH06oCS8RD6hpPjA/bIl5TPwJweX
hF9hh4eWlA9DH35T8p9ncERJeJnnCZbER/Ccr5LqDeAPji0JT8GfHF/y1zuc
aPYFfTq5JH4Bcj7V9A9yOr2keMT615L8M/zuWdYmn2D3Qy3OLQnvsH6+5F9/
Od/6BzFdUFK+AX90ofkHxJ2LS/79KZeUlF8RL5QUb3leWcnP111u/gh+8sqS
4jXm+eqS8kPihZLiB3DNdWY/0KcbSv7f3/xnSfky9O8Wsy+Y5YKSvz7gNtMf
/h6E2R/r8awNfHu3+VvM873Whh3eb23EuQftfuQbD1kbevCIvR/z8B9r8/wj
6y/iWY+NB/PyhOk79PepkvIvnndS8v/e3HMl5f+sTzD5cf+A2QvPNzD5s17Y
2jCP120+cNubFn/Qj7etzf3NZn/Q3/dLWs/D/f+zNvr9obVZn2D6wfUGa8Of
fWr+FnnK5yV//rrE7J1+x9rAm0utDfz/jekr1xtMnyGn5dbm77WWlC8Ab640
e8B8rioJL3G9wfwL+YSS8g/Mx3prQ+wbzf9QD8pqs/65LHwLexxgbbjxLa3N
9Yay7Jl8wmb3Dyrr/dxfUZa9k0+wNuxrcFnj4XpDWeMnXihLPvBDI8qSH/FC
WfiRvz9X1vzBPnctSx+g9+PK0keuN5Slv+QTyrIH4oWy7AXzOa0sfoL1CmXZ
L+NWWfEGbnh2WfEYeGNuWXiM+z3K/vOn6suKZ9z/UVY9BvkEa5NPKAvv8Xxv
a4O/77DrMewuez78u2vvh38OlMU34H3Rsv+8l3jZ//vRybL/98e7y/IPwDeZ
suwXcSdn8wO9Lth8EneVpe/E3aav6OduZcUX7j8pKx4hHuxZVryCP9i7rHiH
OLdvWevJ0J/9ysKnuP+AsuoruF+lLPyH+veDylpPw/2HlP3n2x9W9u+/ONy+
h3ocac+H3h1VFj/C/bJl8Q/4+Niy4jnXG8paP4AdnlgWfsB8nGz2iI9PNXki
jT69LP/E833K8oeQ61lmD5jPs8uKH/AH55ZVj8rzf0yfke/80fQLz72g7N/f
e2HZf37hxWXhQZ4nVhZfQXxQVn7G88XKqq9AvnN5WfkS9PJKa4Pfudqux2Ou
sedBz68ra70X8fqGsvAq5HpTWevb5BPKwqPkE8y+kDYvMPthvX5Z+Spuu8Ps
Bf7gTpM3/t9l9gF9uKcsvhV2dJ/5V7z/AbMH6MNDZeFF+JNHysrH4E/+U1b+
znM1y9oPBb66p6x8iHllWXwa/MlTZeVX8JPPlJV/8fery+IvyCdYG/rwol0P
PXqprHyM+w/L4h8wn6+V/edxvlFW/gi5vFX2/z7YO2YvkPt7ZeVjXH8o+9cD
P7T4g3lZVPavfy02/4XrPt0sPnxeFj5DfFhSVv027PhLswfWJ5TFP6Ob35g9
4L7vTP+gl8vLyv/hBleYfvP3vMviD/DxqrL4O7x3jbX5+53W5jHDZfF/rE8o
i//AfNZUZD/8/deK7BNy3qKi/A3zObDizye3qsg+EKe3qUg+mM9BFdkHfw+w
Ir6H519XFK/JL1RkH9wfUZF98PdEK4oXkOuIivwjhjmyovgAOxlVkb+FXHet
SJ9gX2Mr0jfY5/iK9BF+fWJFfAVeM7kifYafnmptnndpbfIL1sZ8zq74zwub
W5E9AgfV2vt53kRF8QVupLEifoL8QkXxD/nY/Ir8A3+/sCI+G89tN/khLHRV
/L8v7VaEd8kvVPznc4Yqyh94Pm9FeAHPjVWEJ8gvVOQv4a9Tpi/8fd+K7IXr
DxXxwZjPfEX+mfxCRfEE/EC5InuCXu1mbYxrd9Nn6MmeFX+96l72PPIL9j7E
i/0q4t8wD/tXxE9wP4SNB+8/yMYLPT6kovUszMuhFfkTjP9wsweI4ciKf331
6Ip/ffSYivAwxn9cRfiZ9YwV4W+42ZMqwgvwT6dUFE8AM06rCF9xPcL0h/WM
FfEFeN85FflfvOY80z+e/1VRPGI9o30PfbnQ7qed2vMh70vMfrlfvyI8hPdf
VhEfgfdfXvH/PsfVNn7WH5h+Y3zXVoSP+PsJFfEN4BNvMnkTD1SUr2Kebqn4
6xcWmD1Av26rCE+hv3dU/Oud/7b5R7/urii/4O/Hm7/k/t+K8Bj85YNmX5D3
w9ZmvaLpG8S20J4H+6ra+xD/Hq/4z4t90vrH/Q1m33j/szYe8LHP23jx8Qum
z4i/L1UUTym2ivgG6OdrJk/4yddN/2FXb5r8gaferijf43qCzRfuf9/iB8LU
hza/8CsfWZvrCdbm+UhmXwg7n1kb7//C2sjvvjR9wvu/tjbCxjfWRhj9riL8
gXix3NrA8SsqypdglyutjWldZfEQ/n6N2T/c3NqK/7zl9dbmeoJdj3WKmt1k
H+hHP2tTrrvpetw/0L6nX7H2/wGmgh6b
"]]}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0.},
ImageSize->Full,
Method->{},
PlotRange->{{0, 92.128}, {-3.877, 2.662}},
PlotRangeClipping->True,
PlotRangePadding->{{1.84256, 1.84256}, {0.13078, 0.13078}}]], "Output",
CellChangeTimes->{3.566456519809661*^9, 3.566457033171077*^9,
3.5664589322503443`*^9, 3.5664633677600937`*^9, 3.566464607445415*^9,
3.566465773361267*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[", " ",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "schweb", ",", "2"}]], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Full"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Red"}]}], "]"}]], "Input",
CellChangeTimes->{{3.566418094323538*^9, 3.566418098142885*^9},
3.5664570384808617`*^9, 3.566458943349845*^9}],
Cell[BoxData[
GraphicsBox[{{},
{RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJxdXXWcXdXVnRgOIQIhnol7xjUz77557vdpcD6kUBxa3J1SoEApRVK8xd2l
MAPFXYsVQvAQICEJIcT4mLXurP27yT/zO3lXztlny9rr7HNu9T6HF37Xv6qq
6uqtq6p6/8YXnzD8rthTgbWnHPTvoy6d1vPUS9dHHlr5amD82Uvzj4zbEPj9
Jd+fFGj8byB8/iFfr7u1n/PucUum1m7xv8A+2+/c+sALawMb3+n9j08DR1+6
08DKdj8Grrqy99/iQBYXvB9YU/z8Xwuf+SLA577bvSh34eWHDf06gMfuubz7
xWOevHbUvCWBsbvu174o90t3by92GvhtYMbuFz390/SqntHzPp682enfB+75
Q29P+vec2dP7oGUBdHtx/55083nB//tyuX7n3x8DUzY7/bLQ+VU962/98a3M
PisCx/a+5uO13X/EgFYGnk/13vhzd/9Z5+74wWsr1R9etyrw5sSPfjnloE+7
e59yyNc/Ba5ZdvNzqeYXu798o/eH1QHK4R1vXD8HXn2l9983gZd7mxvWBN7O
9ApgRaB2izvG7LrfLwHK+ecA718b+E1Yc+67+pcAx7cuUIV/awPozs/W3uq9
G4/o2GqDJ/+fA6dCQBsDP/R297GfvOdtDPT29t9H/Rh44IVegVY5mJ5jvgr0
vr19UZXT11+Ou5/TN57//DT9N0n3czDdZ3/e3Y4J6u9QDt914zFP9ncKv/26
NL/Cm68BDp+7snt//BvgsJ8/dR8+tHeGBjgQ/yE/dffOzhsTBzq9o11286ru
3wb3m0YM1P38O9CBOJb92M15GOSs2tCrWD9274cODVJ/Dv1NCj++Ncih3n3j
zedmTlfvaz76svvZCb0asJnT+7bnUou6e7XkhOGbO9SL97r5/5tr/JT/5g71
9lFP/7Zw+P+XBaCWF27h4LWZpz193sKBOB55LfD3XvVYt4XDeXjLs4ctHfbj
3QCv29LZ87HENv1nvReoRkesHf1NW945biunz16O752mO6wN9WnfWtfftPCZ
3568tZ7P91ub799G8017sTblvI36S73Z1qEdvRHoHd2Ee7Z1OE8ve35gO42X
+rGdQ3/xgqev2znUq2e99w+WvP7R293fD3Zu6zXD7R8JQJ2uHexQrjcHktv0
WuD2DoY95rZuvL9me4d6191N+Wzv0B5f6eb9fe13um/oNbd3tnfoL/7XTbsZ
4lAui7vr8W+Ip49fd9PPDJH+YD4OHeLQDpZ0L+9Vi/OGONTj77v/+ZtWv3fj
EIfPWeb5gyFOn7+AnvQbKv0tYQDWxjg6rb2iVww7D5U9QX7H2u/wG48OddiP
H7thVu8NdSjnZd30N0NlD5j3IcPUf+rJMI335F43kRgm+8Z7Dh/m9Pk3XH/7
MM8+Xu/GsJ8dpvmgnx3m+ZMn6WfXD5O+YBpHDHc64AA+DEyDwxvuXHFY75MW
Uz+OHe7QDyz14sxwB+7guWUB+JO7hzsc548B9PfF4Q795krqzzfDHbi/H1fR
D87Ywevf6gCeE93B6fOv+LO3tU+EA9jB6+9q+s8rdnDc3jB05movTu3g9PlT
6MfrOzi92rT7RasCjFc7On3xDe5k7o4OxbvU8+s7OrTTrwP0hzs6143qVYzF
kP42Z+woe8b1z+8oexkBQ9vRoTjf6sb1/UdIf2l/I5zVvdP70zfd6GfbCOkj
rjtxhEO/v9LzlyMcxr811P/7R3j2v576//oIT383duOy70Y4ffEWerflTp4+
VvXQHnfy9KdfD+15J2/8/Xr4/9ZGf6/ZydPvfj3Qiyd28uy5qgf68eFOzne9
ty391dPnnTz/u4H63zrS6YvPUPviSMULyOHokbIH+JWLR0rfGSdHOiMRYD/u
PrK3A8tHyn8wTo2S/8Mwp41yaLdfBKD/kVEO/fB3Xrwc5fTFc8p7lPSF4xvl
zf8vAcahvvs30r+vGeX1p4p+c9hoTz/7OZTvaE+/+tNukqMdxrX+9JsXWxuX
3Wn3085Ge/GqyoH6fTXaod1v9HDEGIdyXkf/O36M+su/Yxw/nhjjIAxWvg28
3hsGFo7x5uNjD3eMkT/Adf8d49BO/tNNPRzr0E9/2E38OFbzhfhdGOvw/1d7
/nesQ1yztht6+qex0gfGobFOH56j3oyVvsHdbT7O8z8De+CvJ43znj+o55Ze
Nxoc5z1vUA/85h7jHOK0QT2YruPtd4b9cQ5xwCBPX8d54x3Qw3GM0/tx/Q7j
ZT+MK+Mdxsn1Ht4Y78BdT15D/PvX8Q77taqbejJe+AXXvzxe8Y3vGS88ArdV
NUH6i/g3fILnrz4LQP1rJ0hfMf3OBPk/4N3sBOrJ/msDeP3uExz6oQ0e7p3g
xe8qB2p0wQTpG3HcBIc4pD/l+IS1MU8vT5C+It69P8FhHPfu/3qC9JV+bYLs
BX55QLX0lfig2mGcX0N/3VDtXb88gLjXVS3/i3iYr5a+4r/3qpa/hf0cWi18
gftOrJa+Mu5WO3zvlx7eqBYeYHyudjBdv6zuhv49X+3hpXX0V29Xy7/CrX9W
Lf2lP6qWP8VjNlZ7eLV/D/KIbSY6ffkN7G/0RId+aUAP5N0xUfrI+ybSj9zT
vwd6vMtELx709/z1RPljPOaYiQ7jdJXnvyfK3qifEx3GzbXdwIcPTPTwwcpu
zM9/JkoeeO6bE6W/kPOnE4XHiHcnyj/ATjdMFP6DXLaeJH2mH5jkQF2WfML4
3TbJ05/vmQ8lJ3nztYLX7zxJ/ovjnaT4z/FOkv7g8WdNkv5Tnyd5/VkXgFwf
muTh7XUByOdZa3O8dj/ixqf2fOCZZZOcvnxtUq8A11v/MF9bT3YY51d6453s
+evlvH7+ZOVvHO9kyQPha8FkyQt50v6TJU/i+cmSN/HHZOEL9P+SyZofynGy
px9fdAPf3DVZeBLT9+/Jmm/a92ThX9r3ZA/frPD81WTle7TvyQ7ztp+8/GqK
Q5yymu8fP0X2hP43TPHe/3M3vF5oivAA4qFrbf6donhCvztF+Sjj9RThB9jX
BVOEtzH8q6ZoPOz3FI0X/v7hKQ6m/9xvPXw8xRvfV569TxG+xn2Lpyj/RH9+
mOL08R/U/ynC29T/qV58eI72Mmeq8Df63z5V+RT1ZKrwN/OJqcrvqA9ThTep
D1M9fP2Rh0enevHhU+rzJdamPkwVfiXesDbs8bGpijfEH9bGvL43Vfif+mD3
Ux/sffT306TfMKup0+S/Oa/TNB7qwzTlu8BTxWmyB+L/aZIP851pymdhVqdM
UzxgfJsm+VIfpilfhT+5ZZqHV+/18mlrkw+YpviM/rw9zcuPf+/lT33vX8j8
a9k0h/Nyv6cP0zTf1Ifp4iPwd+R02TP9w3TxF/QP06VP9IfTZe947++mC09A
nkdPlz6i12dO9+LdB57/n654CDldN93vz++crvyR/mG6Q15osecfpjvAKT2f
sT/vT5d9MJ+brvgKP7d6uvA7/cMM5efo/5QZyn/Q7/oZskfoc9cMz96WdmPc
7gwPT37H/GlP+53x39r0D9aGfZ1nz4d9XTFD/hD2dZP1D/J8cIbiH+PjDI2P
8WKG/CvkumiG5Ad/+8MMyZv6MEPzR32YqfnmuGYKv1AfZkpfqQ8zpf/EAzOV
nzM+zpQ9Mj7OdDC9u39OfT5rpvAU9Xim8gHo8/V9z/uB9nX3TOEx5kMzlS9T
H2Yqv0d/Ppip+E19mKl4iHH+bG3ozaBZuh5yHGJt+odZip+Qf2iW8ALlPsvz
F0u8fG6WJ58vPD5rlvwR+n/yLPkb4rZZ4r/IH8ySvdM/zJJ9ov8Pz5J9MV7M
kn0wXsxS/AA//dks6Stw3PJZDv3KcvJHG2cpftGBz1a8Ix8xW/kF9WG28n3m
k7OF7+gfZguf0j/M9vimXz3/MFv5Of2DtekfZnv87K+ef7DnQZ53zfb4iQ3U
5ydmCx9TH2Y7fXw//YONh/owW3gT+rl6tuIz+jNgjuyV/Zgj/0L8MEf2QX2Y
I39PfZgje8Ble81R/g95HjZH/A7zgzlOH78Oef55jvgh6sMc4U3qwxynj78n
npzj2c96L17MUX7OeDHHQV5wxK/eusYc5V+MF9Zm3mpt4sm5ahM/zNXzIMf5
c5VPUR/mKv8nfpgrPg2vO2Cu7I/+Ya7snbzZXPkH4Lq/zlW8hhyvmyt5E0/O
VbxjvjhX9sF8d678I/PtueI3iQvmCl8yXsyVvtA/zBN/QH2Y5/FnG4g/G+cp
32K+OE/5EvmlecqniB/mMe/dZmAP8cM8Dw8O7CF+sDbxg11P/GDPo53b+4gn
5znEEf166B/mKR+Dfb01T/ZKfbDxUR/mCT/TP8wT/0e/XiP5MZ+skXyBk8bV
CG8wvtYIP8Es59QoHiANbKgRH4Y4114jfoHyrFF+Q72uUT5EvF4j/aO+1Sjf
Z35eIz6A/qhGfAP6c2jfePrxuUfViC9DfnxijfgGRL0z7Hfo1/k14h8g56tq
vHjk2dv1NZ5/X+/Zb43sg/Nm46N/r1E8gxo+afKB/J+rkT9B/1+t0foN5PB2
jfAj3vNRjfA/5PlZjfhL4K5vahQvIM/lNeJ/yUfVyF+iPxtrlB9BvwbVSn+o
p7XSL1w/rtbrbz+up06pFR+B62fXio8g/1Lr5yfaa734N6CHeMzaEHuiVvpP
fagVf4b+L6gV3ww93LNW8Yj6UKt4Qn2w8dCv1Cp/pL+ulT1AnmfUin8kvqsV
fiO/Wis8husur/X0702uT15bK3vB/N5Uq/Uv4uFaxRPYywO1mn/05/FaxRPi
yFrhI6531HrrIStpL2/USt/Qn/dqPXy3xlvPrVV8QX++qhU/Afl8Xys+A/1Z
Vav4g/6sq5W+oz/96/Q7xDysTs+jHOs8fm8Nr59Yp/UT5gV16j9gVU2dxof+
N9fJPjBNnXWefn/JfC9ap/iBfmfqlM/SP9eJb0b/d6tTPEF/9qnTfEGeB9b5
+f8j6uT/YLfH1gnfQ/9PqZM9Qd/OrtP6G/17newL8vxbnda30Z+FddI/xoU6
4THyQHVaj4F87qkT/qE/qfPiwS/0z09am/HB7odYX7U2+vNOnfgS+pM6xUf6
kzrxMZDPkjrZB/1JnfAmxLSmzuOvf+D6+q91yn8wX5vVK1/j+l+98j3Gl3rl
L9DPqfXCY+j/nHrlx/DnDfXKX8h31CtfJ36rV74PO03Wi88g31sv/gD937le
/AP6v1e97JG8Xb30j/6kXnwb5HlUvfAN4t2J9Z69fUP9P8PamN/z7HqM+2J7
Hv2JvQ/yuaZe+Qf9ifUPcr2jXvkZ+dd62Qfk83i98hOI+el6xRf058V6xXPo
/xv1yl/oT+qFzyCfRfWyL/oTmw/6k3rlO9Crn+r9/NS6evEV5HMalA9Bzwc3
KL6BPxrVIL4C8WJig+yX67sN4ivoTxqEF5kH993/HvPpQIPyZ64HN4ivIC62
NvSt1CD/gPi1m/0Oee7TIP4O/TmwQfGB/qRB+Rz0/1j7HfI81dpQt3MatJ5L
v9wge4F/u9Ta9CcNymegbzdYG/Z7a4P8Gfpzj/1OfGm/E580iI9Af56zNvGJ
Xc/81J6Hfn9k/eN6hv0OP7nE2izHsvEy7m4in19NvvQnjZI/8Wqj5pfr343S
D+KTRvEhxKuN0j/mf43i22iXjcJbxKuNit/Eq43iSyBPt1H2RHzSKH9Df9Io
+8Tf/RuFl+lPGmXv9CeNm/iTRvER9CeNqo+gP2kUXkB/Lm5U/CQfZW3ik0bx
HZDnTY3K19CfO+16TMf9jf789vFN+vN0o/wb5uUFGx9w05s2fvL/jf58epHJ
E/nYV43yN/QnjfInsMdVjYoPeM96m2/ikybpB/RoqybpF9fHmsSfEJ80qX6M
/qRJ8RvjrG3SegTUvqVJ8Zt5RJPiK+JmrEl4k+unTU5fPSFxU5NDXnod+Y49
msR34Lb9rA09PNiuRz/+0KT1Nujx8U3CB5RTk/AE8pM/Wf/hhy6y8cGP/93G
D/u/pknrGXjOP5vEpzLemDypH03yt3CrjzXJn1M/mhQfGG+aNN/806R4TP1o
UjzEn0+apI+sV2hSPkX9aGKdw5xVHn5tEt4kfm0SHiZP0Sw8zPqKZuFf4pxm
4V3IobrZ6atvhf+aYb+zHqNZ+Srxa7PTV+8Kews0Kz/EvEaatb5O/Nqs/sMf
lZrFHxG/NsteGW+aJR/Gm2bFe9jbkc3CQ5Dncc3yb+jGqc2yF9jlOc3yt5jf
C5qF14hfm4V3Wd/RLDwIed7QLHsgfm2W/hO/Nnv4br2HX5uVrxG/NqveB/18
tll8B/Frs/JLyOWdZuWHxK/Nyh8Zb5qVb6I/S+x6xht7HvFrs/gezPPGZq2/
M960iK/E/I5okX3C/se3CC9zPapF8uK8tigfJ35tkX8ifm1RfEJdRahF67Pk
31qEZyHefIv8K/Ri5xbZB9T6/1qkP3jt/i2qh4MbOLRF9kB+pEX6yvWNFuk7
+ZEWLz/71Ys3LeIPiV9bvHqQKo7j8hbxMYw31iZ+bfHwRD/yj3e2qN4J/Xmg
RXwL9O3xFs//e/15ukX2ijDyUovsi3rWIvvH/L7fIv4f8vm0RfbE+pIW4Wv4
6x9aFM+JX1uEd7ne0qL4AxpuYKvwB+Zrq1bhJfDrY1pVv4m8aXKr8i/o4axW
+XfIoa5VfCT4p7ZW1QvBHwVbVZ8B/x5vVf0G9Nzt60//HohpQavsgXyJtcmX
2PW0e3se8Uir7IN8SavslevDreL3yZe0qp6JeKRV+Sn1o1X5JvWjVfGI+tEq
+2G8afX7owda5a+IR1rlzyCfp1rl78iXtMofMr9plb9kftPqz7c+aRXeQRj8
slX2xHjT6vfXq1qlb5y3VvEfzG/aFG+gdlu2yd7Q/9Ftfn5lYpv4FfR/Rpvi
C/Mbu5/xpk36T76kTesLrANqY13Vzj9xfT7TJr6e8aZN/AvjTZvGz3jT5q8v
OahN8Rp+6cg2xXOM47g24WfGmzbZC/zROW3K12D/F7ZpPpGn/q1N8w21/0eb
8BrkeWOb+Af049Y28f2If/e2qZ6Dcm1TfIJfe7JN+Ig8VJvwE/zaq22KX+RL
2oTfoKf/a5O9on7wc2sjbixtEz4D7lphzwde+8XeT7fYLn4eejO0Xf0Hrzeq
XetZqAOsbhdfj2FPb5e8oN817f58qrld+S7G39mufJr5b7vyIcxHpl3xB3It
taveAc/drV3zjfnYt138Avm0dq2PIu4c2a56D8j1uHbZG+zwtHblD9Dbc9u1
fgyx/KVd+Q5w6GXt0k/ui7E29OKf1sb03m73wy3d1678hbyptSHfp6w/4BVf
aFd8IN/avkn9io2XeLVd/oV4tV3xm/7D5Ee82q78kvXy7Yo30K8B8zUfzGfm
y79hPkbPF35gPet88WmML/MVnzD+uvnSB9aHzxe/wTrT+cq3gdMS82WfjC/z
pV+Ic5X5fj5vz/nK7xlfrM18d75//fUoa3N9Zr74BeIPaxN/2PsoV2sjrl9h
/cM0XmdtzOct88XHcD+BtaFfD1qb6482fvKr9jtw1yv2O/2FyY/41OQLv/uZ
tYlPbT6IT62Naf/Z2tSHDs0n5De8Q/kX89sOzT9w2aQOxUf0c2aH6ttZ/9sh
vg3ya7E289sO+Qc+p0N8OvPbDvGzgGnlDvl/+q0O6TPm+XcdisfMbzvENyKf
/GOHv17xnA7xBXjfXzoUfxDe/t4hfgFy+UeH8DHe96+OTfjSDtkz+n2/tYkn
OuSfiNPsd+IJaxNP2POJW+39xJsd4pchv6875B9Y79ch/0m8aeNHNzaYvDAv
AzslT8hv607xI/jvcZ2aX/JfndIf4pZO6Sv5r07ZF/ORTuX7UKOuTvEBXJ/r
1PoY4m2+U/WR5L86lR9ynJ2qX2e9QKfWQ2BHh3cq/sGfHNMpfIw4d7K1MZ6z
rc36zE6tX1IPO/3rews7/esbN3QqvsK/3dop/MB8tVPrOeRHO4VHKfZOrQdx
/bZT9VzkRzv9/uTdTqdvvyzjts0PYMYXnfLv8BtLOxUP8NqVndIP5ANrO6VP
mJd+AcUrXDc8oPyG+DKg9Tbiy4DwKvmugPJB4suA8Cu61Rxw+vafEj9Ym/gh
IDxK/BAQ3iV+sOuRD+1uz+e+LesPYOnBAT+fc1RA+Jt8aED5LvnQgOyV+UdA
8ZjxIeCvF78iID6K8SEgfMr4EJA/Zb1aQPEFuOShgOzDM0PhM+pDQPrOfb4B
6Sf5i4DwJfFkQPwI8WRAfAP9aED5H/UhIH4C8XttQOvxeE6VozbkP9DRejn8
6LaO6rNw3faO8k3uD3FUD4Z53clhnv79GuLxMY7sFfKb4Mje4RYmOfIX8HfT
HPEfzKsdxT/El3mO8AvtzFH8gP9vcrS+C7tpc+RfIadOR3gR9XFdjuoL8f9R
R/oEM004qrcn/+aoPp98vqN8DOZaclR/hXx7Z0f1UjCr3RxvfauKfnYvR/wI
5nNf+x1u7wC7H/p8sD0f+nSYI/4F+v0HR/aFbh7jyH7I/zpa/8d7T3ZUbwP9
P92RP8D4z3MUv9CNCx35G/jzSxzZA/Thb47iB8Z/hSN+g/mZzTfynGsd8R3A
Hzc68r9wuzc7yofgx24zfWP9lyP9p56YviIOPmj6DT/9qCN+Ao99whF/gfE8
ZW34m2cc8YuQ04uO+BTyjY7qq2C3bzjiN1in5MheIY/3Hdkz9OEjR/GH+1sc
8RuQ8+eO4ifxgKP6EuaPjuIz94c4ytfw2hWO4j30e7WjfAJxba0jfAR92OBo
PQnv6RfUeg/uGxQUnw473zYofhpwb0hQ/ALsYXhQ+gix7RQUPwG7GxOU/cBM
x1ubeDQofgPvnRb01xvODKqeBHo4N6j4AfxcF5T9Qh8ag+I3yZcFxfdxnEHt
H8Z4gkHlexhPOCh/gn7Gg/799emg7APPzQWVf2E8xaDiOd5TCcpe8GfXoPAV
8OueQeEHnjcRVPyAGf0uKH8KPTowKLwCORwaVDyBHhwZlH8mnxsU30a7D4q/
wDhPCoqvgBmdZm2o5ZnWhp6eG5R+w1+dH5T9Mg8Ois+APC4NKj5wfcn6z3q6
oPAW8qurg+JzuJ4QFN9DOQf9+9NvDSqfw7juDGo/AuRxb1DxBP16IKj6A9jr
I0HhZ9ZHBJV/0O3Z/CMc/Sfo30/1fFB4H/P0UlD2hce+FhTfgPG8tYm9vRv0
+LdlXn276SfnKaj6dIxnsbWBH76wNvr9jbUxnqX2fHRrWVD+n/jB+of3rrb+
w/7W2vi4HhIU3oQ/7t+l/AVuaFCX+HJcv12X7AX6PbRL+BZ2v2OX8kfow6gu
rRfC/4/rkr8j39Xl348ypUv2Rf6rS/4S+HJ2l/QDOK+mS/wC6xG7FL/gf5u7
/Ptp27uEV5j/dkn/WF9kbehRtMu/nzxh90O/M9bm+o29j/Ul1kY826VL/gL4
cXfrP6bl/7qER4GP9+tSvsH8qkv8A/iAg7v8eOtwkx/Xk7v89TDHdIlfwH+f
YPLHeE62Nvn/LvENwMVn2/xBzOd1+esvLuwSv8D1I2uT/zV9gBiu6BL/AH/8
jy7hE8jjOtMnnr/RJXvHe2+2NuR8e5f4Cjznri7FU+Cq+6xNP9qlfAH9eLRL
fCj5oS7VK5A/7FK+DvV51trway90KV7DbF+xNvD0G13Cu+jF22ZfjNNd4kOA
+z60NtzuJ12qP8G8f2b2ynota0PtlnTJv5GftDbwwo9dyqdYf2G/w/7W2PNY
j2HvZx4Ykj+F3AeExIdCXzcPKT/DtA4OSb5cnw8pH4B+7hhS/IVfGhWSPhA3
hxSP4X8mhqSv8D9TQ9J3rq+E5D8gxzkhf71UTUj2zfXbkOobMZ8tIfHx9B8h
8QWIk4GQ4hvGEwqJL2H+HBJe5npvSPER48mG/OvthZC/fr8S8uOFXex+4II9
7H3crxASv0E+LiT8gdt+HxKeh34eEtL+GYzncJMH9POPIfkj4ORjQlrfhn6e
YPLHeE4Jyb4xP2fYfGJ+zgn596+eZ/oBOV8Y8tc7XBLy832XhZy+87UwnitC
in8Yzz9CWu9ivhISXgTs+GdI+SKGeXNI+BJx8vaQ8i2EzbtD2g8DvbgvJD4D
ceYha8NMH7Pr4ZafCGl9jv4j5F9ffCakfI7+I+Tf//1KSOsd8IdvhBTPgcfe
Dil+wx++F/KfF/VRSPEaYlwUkn9EfPjM7An+8CuzH/z/tyHFJ+5PNPvAeH40
/YJb/cn0FdPyS0j5IeZtfchf/1wV1noa/UVY68vwV9uGlS/Cbw8JK1/jeV5h
Tz83enyGXQ8xjglrfwP0Ybw9n9vt7f0IX9PC6h/kNyssvAuxzwtr/x3iSV1Y
44e9N4UlH/IZYdkP9L4jrPhLHiks/wY5RcKKR9DreFj+lOu7Ya1Pkc8IK98h
HxeW/pDPCGs9GPF197D0k/UkYe3Pgb3vGxZfAn06IKz8jfxdWPwFxn1YWPUb
5DPC4jvI91ob9nGC3U+8Yc+HvZ8eFr8I+zgrLP4S8vhTWPbJenwbH/zGxTZ+
zO/fwvIXnMew1hMQdxaGFY8h12vDikewjxvCwi+Y35vCsg/mqWHFE8zvnWH5
U/x8b1j+mflKWPkS/OgjYf9+zX+Hlc9RLcLa74LxPGP6Dr/wfFj8IfT15bD4
QOjp62HxH5ift6yN+flvWHwL8UZY/CNhZVj8DO5bbPaFafwyrHop4oaw8keM
4/uw6hO5vyAs/8D6irDiKeu1woo/wLfrwsK7kMevYf/614CI8CHGs1lEeI31
5hHlO9DvYRHFC8CuERHxI6xHj8g/U08jshfijYj4Oe5niEhfybdHxJ9g2HMi
0m/Ye21E9U1cn7HfMY8t9jv0dn5E9sjzeyJ+fj0cEZ8DPY5b/5EnpSKKL9CL
XET5I8RejMg+0O1KRPEE/mvXiPwP7HWPiPJr4Ii9I8Lv8CP7RbQeifceGFF+
wv32EeVDmJcjIuID8OeoiPAU6xsj4tfIb0S0vgR5nBbxnw9yZkT8CHmYiPw7
xvPniPQV8/sXa2N+/xoRX8k0ISK+BLjqyojsE3+vjkjfuX8wovjB9cmI+ELo
xS0R/3kkt0eE56C390QUTyCPB0w+kOvDEeWbsIvHI8K3rLeMaH2D5w9ElJ8h
bj4XER4jvxERPsB7X4v46xHfjCgfQHx61+yJtExEeARi+Dgivh5+6lOzN4jt
i4j4EO7vjgivwd6XRrQeBC1bZm30c6XZK/kNa5PfsOvJb0QUDzC//aPia2Cv
W0bFl2AYg6Nab8L/D40qP4Je7RgVvmL9TlT5HexjbNS/v7w6Kn4EsHtKVP6K
fjuq+aHdRuXfuF4XFf8FNWiIyh+yXj0qfMH13aj4D/AGgaj8Kew9FNX6Fvfb
RYVXwNckrQ19yEbFZ8Le81HFN4y7bG2eLxGVvvJ8Nbuf+Yk9n/mJ9YfnUVh/
mZ9Epe+w9yNsfPD/f4wKn3L/TdR//siJUfkfxPdTo35+5Iyo8BjrpaP+eoo/
R4WP4c8vjAoPwD4uiSrfwfxeFpU/ZL2KzTfm9+qo7A/ze11UfATzE2tjfm+J
Co9w3Svqr7+7Oyq8CHncH5V/hr0/FPWfZ/OY6Sf3A9nvzE+sjW48a9dzPSUq
f8H1FGuzfioqPgR+/B1rYx7fi/rPy/3Ifse8LbI211Psetj519aGGX9rbfi/
H8weoWcrrE09szbX26PKP1n/a234wX4xXQ//N8jakNO2MfWX56/GJA+Mf3hM
8mN+EtN8MT+JaT653hpTfgYtmBTz813TYtIv8kYx6SPmc25M/BzrwWKKB9Dv
ppj0HX6xNSb74HlyMdkP8HgwJvvCuCMx2R/8Vzwm+0Q/0zHZM/ySG5N/AF4p
xcSnsJ4kpv2l3H8XEx7k/iprw173iWl9jfXv1uZ6ij0P4zk0Jr6D9Yox+Sd0
4yjrH+OU9R/jOSnm9z+nxfx881kmP66nmHwxr+fH5E+IN2LyFzwvw+Ybr/l7
TPaL+HKV6RfXyWLiC2Gv18f88flfMcVnjOeWmOpHkF/cEVO8Y/1DTPGZ+31i
is+sj4kpPmM8j8eEJxGVnoyJX8F4no7pvF4+J6b8DH70Jbue9bgxxWvijZjW
97meYv1hGIypPoR4Iyb8yvUUGz/m5wuTD/FGTPkenvNdTP6OeMPmg3jD7Av+
52ezJ+KNmPAXz2MxfUH87xeXfnH/QFz4FtdvGxce5HpKXHiW6ylx4UvglZFx
rdeB/xsbFz7luOPCs8Djk+PCs7hvurV5noPdz/WUuPAyz9eKa/2R9cZx4Vni
jbj2xxBvxP31AaG47BfxKBqXfZEPjfvPm8/GFZ/5nLjkj3GV44qP5EPj8v/E
G3Hx08QbcdVDEG/ExacRb8Sl37CPQ+LSX/ivI+LK/yCPP8a1Po1xHxvX+jns
48S48jWM49S48kHI48y41r9ZLx9XvsfzhOx6+ou4f338r3Hlf5DHZdY/xgXr
P+LZ1XG/fV0fl/1ALv+Kq/6f+UlceBeX3RFXPIR+3BNX/MJ7HrD5Qb72SFx4
Ffjr8bj4EQyjOy48CHn8J679ibjvubj4Neahpm/Qj9fMHniemuk71OLduOqd
EN8+iIsvob+Ia38a/UVc/Ab9RVx8CuzlG2vjz3d2P8/nsvfBf66Mi1+E3//Z
7Il8Rlx8D6S00eyH+0kS4ouYnyQUL7l+khD/DvkNS0j+lHtC88P1k4T8Hfo1
LqH55X77hPwnz/9JKB5w/SQh++D+6oTqDSG/2oT0j+uvCekn108S4kdw3fyE
9Jt8RkL2QD7D2jR/ux7yS9nzWK+RkP3x/MeE7JPno1r/MA+7JhSPmGfb+NDv
fRLKX/F3/4T8B/djJrQ+wf12CeFB4IwjE/JP8DdH2/xA7scn5N+IExLyf5i3
0xLyjzx/LyH/yfOwE+ILII/zE4ofeO5FCdkLbrs0If+Nyy5PKH5AP65KiM8A
nX5NQvEA8eiGhOwL8rgpofiB8dxqv3O/X0L6Dv97b0J8DPf/JRTf0I9HElof
IJ+RkP3TXyTkHzC//zF7YL2GyQvT+rLJk3yG2Qv5z4TwGPnPhPIzzO8HCeEv
yOOThPwf1GpxQvEF4/kiIT4e8liSEN6C2L9LCG9Bb5YnxL9hflclhHcg1zUJ
8RnwS+sSwkvkP01/yX8m5e9x2VZJXQ/5DU5Kv+kvksJTkOuOSfEh+DMqqf7S
XyT9551MTApf0V8k5U9w/8yk8CnwzZyk8iH469qk8h3A8sak8mG4r9akv56g
I6n1ReYjSc0n/UVS+QrzkaTiDfORpPgEDMNNSl+YjySVD3CdLql8gfWfSeUT
kOdeSdkj90cllX9g3g5Iir+DfR1k92MeDrM210uS0mfWZySFF3kefdLPx5yS
VD0h+nl6Unwqun12UvoPN36eyQf6eEFS+Qr81CVJxWt0428mb9ZnJJVPsj4j
qfyFepaU/WCeb7T5ZD1oUnga+cxtSfFhrM9IKl6xPiMpPA4Y9ZDpD9dXk8qH
cN0T1iZ/kRQeJH9hbfIXSflrjOuVpP+8jzeSsneef2Jt2Of71iZ/Yffz/Bx7
H/Di58lN+AvrL+ZtqbUhjx+S4gsgjxXWhjxWW5v1oCYv1oMm5b/gr/ql/N9n
2CwleUMPt0vJHuFXhqY0P+Q7U4pnzD9Smk/ynfY7+c6U5h92NiUl/gL4dEbK
z4fNSYnPoF6n/PXJDSnFT+D1lpT4OOKJlPw5cJ6Tkv5i/kIp5WvcT52SvrP+
M+U//zyXEr/K+s+U7If74VLiW2Hfu6ZkbzxfOCV+BHa2T0r5IPGEtclXpGTP
3D9nbQzryJT8Fc9jtd+J0+x35C8n2e/MP1L+85TPSslfYJrPTclfkq+w8TKu
mTyg5X9NCb8gfvw95T8f5CqbD+KJlPwF5HGD6QPU5l+mb+jWrSn/fvw7U7If
nm+U0voE8URK8Zh4IqX1XdZ/phSv8KcnpfUKrqemhPfg/19IKf7xPNKU8iXI
5fWU8DHPa00pfrIfKcV36OGH1ob//sSu53lsKeWjsJsvU1rPJ79p/YV9f2/j
Yf1WSvGXn6tLqV4M//9LSv6K+09NvnhOVVr2zPqLtOIv4tK2ac0/9H77tPSH
9eJpxSvG0bTiI/eTpIXfeJ5GWut55DfTwq+ADdPSwoPcz5gWnoXVzk37v59S
lxa+JZ6wNve/prUex/oLux/+MWjPhz5G7P2sv0hrvw/kkUkLf5PfTCveE0+k
hSd4vnLav56xe1r2RTyRlv3AX+2blr/jfpK0/Cv3U6ZlD7DPw9PSf9Z7pqUf
xBNp5Xes10pLf1l/kRY/QDyRFr7Ea89Oq36J9Rdp1TuxXiutfIt4Iq16DeKJ
tPJB7i+xNvRmoV3P/VpprWcTT6T9563enNZ5y6z3TIuPJJ5IC9/Cju9Ly55Z
r5X253OPpv37NZ9MK57DXz2dln8inkjLn/G8o7T4Xtjdq2nFB7rBtPAb62zS
wovcX2L6BP34X9q/vv1p2l9//3la+Ru69XVa+Rf8xNK09q+QR0iLn2B9eFr1
G5DHamsjb1trba6fpv3fg+mfUf5HfiKjfA/2PTijeg/oybCM+EB+Di0jfA37
HpWRffD82Yz4VMh/YkbxhPlGRvGD5zVlhH943nVG+Qduq80oP+PxcRn5U4i9
JSN74HnpGeVLxBMZ8R3MNzL+81hjGZ3HQT+YkX4TT2TE37HeIiP+At1cYG30
e7eM+Az0Y8+M/7zVfTKyD/KMGdUv8nyGjPJBrn/YeODHjswonkGfj84ov4MY
js+o/oN6nVG8pR8yeUMvz8oIz2Ga/2TzxfqsjPINiOGijOIH95Nk/PUNl2fk
TyGPhRnZB+uzMv7vid6Q0X4ZxLWbMvL/wCO3ZWQveO5dGfEbrM/KyH6glg9a
m/VZGfEjPL/e9J37zzLiNzAvz2ZkrzwvL6N4gn6/klE84ff3MuL7eL5ARvkh
10szwneYt/9l5F9w/6KMnw/83OTPfMPmB/3+NqP4D/v+ISN/h9euyCiecP+Z
2Q/XSzN+PLIhI//K9dLsJvUVWfEbXO/Iyl9DL4Zm/fFmB2vjupFZ8Rlc78iK
H8H8VWcVv7gfPqt6D+4fyUrfmW9kha8QJ2uyqvdgPVZW+JH5RlZ4ivXfWeEp
8pdZ2QPXO7KK1/DPsaziBXBIKqv54XpHVvEDcixkhbeYb2SFz7nekVX+AHy9
Z1bxhfVYWeEx7jfLyt/Cjx+YVfxhPVZW9sbz5bLCa9xvZm3I47is1q+Yb1ib
571k/d9nONPeh36fm/V/P+r8rNYDyF9mpe/EpTZe5htZ5Vv0D1nhKeDDa7J+
vu+GrPAV7PQmkz/kcWtWeIv1m1nlo7DTe7PKZ6FfD2aVL3O/iM0/5PlE1r/f
9qms8Br3i5j+kNfOip+Hmr6SVfyCnb+RVb0R3Ng71iZ+sDbxg90Pv7LI2jyP
wNrED1n5d44r66+HXWb95f7UrPwFv7+QFX9B/2Dj53poVnwF669ykhf9Q058
BN43OCe8BRwxNKf8hHxETvNB/JATHiB+sDb9Q07+j3xETvPL9Y2c+AbuD8nJ
XplHW5v4IbfJeSo55UuQ/3xrY1xOTnwF/Hs4J/3jeaLWZr1mTvVfcLO5nPSX
fERO/oLrGznxGcAlu+aUn3M/qrWJH3KKx8QPOfkb4oecfz370Jzsi+sb1oYZ
H53TfjzY3XHWhr8+OefHw6dbG/ZwtrVx/5+sDf9yQc4f7y7K+c8nvdT6S74y
598ft9DGz/1kJj/WW+XEF2Eebs6J7+T3kG0+gW/vNn3h93RNv1hvZfrLequc
P94+mfPvn3w6J/tCvH0uJ3vk+Yc5xR/Mx6s51TOwXiInvMb1z5z2y0Ce7+eU
7xDH5LTei//+1Npc/8wJD3L909rQ7+9yiv/ELXY/1z+tzfVPez/mZZ31F/f/
auOBXfZz/d9bGuBKPpj/zV35X+jrlq7sGXLd2pW9Qb+2dTXfzE9c6QveO8RV
POH6iOv/ntcOrvAp7G2EK34D+cdIV/EP+c5oV/kO3jvGFd+B+8e7Wu+FWCa4
4j+Io1zhW+Ttk60NO59q18MuptvzyJe4Wj9DHjDbFb5kfZir+Ax5znOFN+G/
61zFY8xnvSu8zv34ruwP9ze7/v12ra7sB/G/3ZV9QD87XPl7vCfgKp5w/74r
fcd7Q64/f4u40j/Wk7jCn+AH467yf+RNSVf4kOtBrvAl5Jl1VS/P75G44ju4
H89Vvsf9NdYG/qrY9ZDDAlf5GPzlLvZ86O1urh/P7uEqPyMf5CofBf7d2xVe
xbj3dcXvQD9/5wqvw072N3niOb83e+H+HdfPrx/iyv8hXhxm9sH6F5t/dPsP
Zg/wz0eZ/gM3H+NqfwfPi3TFByDunOAqXwMuP8lVvkY+ylV+Bdx4qqt8DHZ+
uiv+gfsJXf/3zM91la9xf6GrehHo4/mu8jPI70JX+7vgHy4ye8I0XOJqPyXk
cKmr9Trcf5kr/gJ6ermr+IiwfKXJF7Nylcmf+wfMHqDP15i/Y32wK//IfNeV
P4Ve/9P1r9feZPoPOd/iKt9CP24zfYR/uGMTfb7LFb8Avb7HFb8He7jPFV8H
P3C/q/1jmOYH7XrI82FX/Aj++1F7H+sJrT/wD0+YfUKs3a7yRzzmKVd8OesN
XeVvxNcmL8jxuU3k+YKreAz/8JL5J64HusJjuO41V3gJePuNTezhLVf5Fuzh
Hdd/XtR/XfEXPK/Y9Avx/0NX/DPz+03s4WNX/AXuW2T6ze/LuuIzuP/bfmfY
Nv2H/Je4qr8Arlxq+g98/L3FF8h5mfWffs3Gx/pIGz/8808mH9jDz+ZPINZf
XOFZzN9aV/ga/d7gKn/m97Bd4SX4s6q88BH8RP+85ht2ODAv+wDe2iwv/4n4
sEXeX++wVV76hfnbJi9+AfnGdnn/+dLb56Wf5C/y4tvwnOHWhjx3sOt5vnhe
9oj8cmTeX187Oi/7RT/H5v3rT+NtPJBndV76D1gyKS/+gvWfecUHnseTV3zA
n+l5vz3MzCu/ghrOzgv/ol9z8/JnUIuavOwDelWXF16Hw2jIK3+HPJvy4ivg
t1vyiifATa154SuMe35e+sb69Lz4CMTLQF74Bv4+mBf+4n58a3N9x66Hf4rl
5d95Hqo9H3gwlRd/Af+SyQsvQZ456z/wtpsXfwH9LOT962Ulkw/PE8r79/Ps
nBdehZx2zcsf8Xy9vPJPpG975oV/cf//5ZUvww/vnVd8QV6wX97/Pcb98/7z
cQ7IK/9nvVve/726g/PCZxjnoaZfuP9ws0f8PdLa3K9jbejh0XmtX/J7XNbG
fBxv1/N8wLzWaygn6w/uP9X6C/0+Le9fLz7Lxgf/dm5e/gViPs/sgech5ZXP
cb3L5As9+YvZC+b/4rziCev7bX7Q37/l5e9Y72/2hfuvyOs8SejPVTb/PP80
799PcI21Mc/XmX2S/8rL30J//mn6RT7M2oCVt+TFJyAfuC3vz5fvsN9hj3fm
hf8RZ+62Nvl1u5/7k+x+zNuD1oaYH7b7MaxHrY37H7c25uOJvPg+zMeT1sb8
9+T9fODTeX/95TP2O3rxnP2OePFC3s+fvGRt+PlXrA0//pqNh+fL2fhhT2/a
/JDPy/vP33nX5hPx5v288inWJ+b950F/ZP4A9vhxXvgS+r3I9BF6uNj0FfHm
8030+0vzF/CPX5s9sL4xL74PdrbU4gn3e+eFt3i+ndkf8pbleeX30O8VZr/I
d1eZvXN/p/kDzMcai2+sf8qLT4B+r8/7v2e90drkMQpqc39GQc+HGgwsyL9g
nIMK6i9u36Kg8SGub1WQ/8R8bF2Qf+X+sILyL8SRwQXJH2FhSEHzBb5qWEH8
BfFDQfqBy0YUpG+Q68iC8g34jdEFrRdwvaSg/ARucXxB+T3ury4on0F/pxT8
59tMKygeki8tKF7CHmcVFE/JnxYUb6FW8+x33Fdr94PfqS8ovkMPG+39kHNT
wR9fWwrCD/CvbQX/eVvzC+InYIWdJi/gd6cgfhV601WQ/fD4BZsf2HG0IL4a
cTtu88/vqxf83/tMF6SP0L9sQXwYz1cvCL8B/xcKyvfJLxS0fsX9LgXhQ/IM
BeFT+INdCsKTPL+/ILwK/dnD2lCDvex6+Oe9C+JHoKf72vu5X6YgvMx6lILy
TbipAwviY2DPBxXEP0KvDi0IH5BfMPlh3EcU5F/w3D8UxN/zfGCzB9az2Hxi
Po4z/Se/YPrO9SnTH8zHKQXxFVDLUwvKb6C3pxe0Pst6uYLyI/jnswvKn8g3
FMQn4L7zCsrfWJ9fUP7F72FYG3Z4UUH1SdSLgvgR+NdLC8oPeV5rQXwK/PPl
BfF9mNcrzb64PlYQXgV+vbogfhPvv7Yg/hN51/UFxS/cf6PJn+cZ2PzAL9xk
88f9hja/PP+1IH9OvqGgfIXfhzd9gn3eU1C9HL/nYPoOtXygoHwK8/FgQfVA
wHWPFMTHwb4eK4hvAIx/vKD6JZ7vVhDfAf/eU9B+Ecj9qYL4PFz/rL0f9vyC
9Rd/XzL75vcDzB5gz6+aPUD/Xjd5IZ9/s6D4y/rCgvAj+X3zX8AJ7xWUf2H+
PzB/yPOfCsrPcf/H5l8x/4vMP+P+xab/rCcoqH6B+x1M/3H/16a/UJslpv+s
by6oPgL6831BfAbksMzsgd9HsOcRH9j7WN9o+s/6JesvnrvGxgM3sdbGC/1b
b/ED92+0eAm5VxX933PoX1T85fegiorXGNdmRcV3rk8UhQfwnK2Kwg/Qv62L
ig94zbZF2QO6Pbioej3M+5Ci8n+eX1MUPwA571BUfOB5NkXZC/FBUf4f8zm6
KP3FfI6x34kPiooPmM/qouID7GZSUfEBr51SVPyCHk8tqp4W/z+9qPiH+ZxZ
lD2QXyjKP8AfzC0qP8P9NUXlZ5BbXVH8EOajweYD9zcV/fXgLUXFC8i5rSh8
gPvnF2Uv5BeKyt9Z31FU/MD9XUU/PxEu+vfzRoryv9CHWFH6CPtOFIWPuJ/N
fie/YG3EnZxdDz3P2++sJysKn/E8jqL4Cn4frCh8x/NHi/79l7sVxc/ADPco
bvK9l6L4Cch976LyGajRviZv9OuAovAT8UHR788OtvlEfw8tKn/A+w4rKl/g
96eKwlfkD0xfWJ9i9oSwf6y18f7ji1o/4rqC6R/kfbL9Tj9sbeDN04rKF3he
SFH5AtzUWdYf5OPnWH+Rr/ypKD4CfufPpt9c37bxg8/5i8kH035xUfEVj/2r
+RuufxfFR4DP+XtR8Rn6e4XZB9T8yqLwLqxoYVH5Jdbzr95kPq8tKt5g3NcX
/fUIN5o+8PyBovAD5HmT2R/059ai8m3W51kbz7mj6M/H7yr6+fd7rM39QtbG
fDxgbYSth+x59MvW5n4i6x/xgfWf56NYm/jAxgt+5Ominx95xuRDvGC/w86e
t9/hD14s+r/v87LJG/J81eYD9vx60V+/9KbNH/zB29bm+QnWhl6/VxSew3x8
YG36QdMPxOuPi+KrEFcWWZv1A6ZfeM5nReEVnvdUFP9AN2P+AWHxG9NfzOe3
m/j374riJ2AfP5g/gZ9abm3Mx4qi8jXcv8rsCfF6tcVn+Oefi/5677VF//6v
dWavrGcy/4T7f7U2/HO/ktrcb2Vt+OXNrc36p5Kej7i0dcl/Xs22Jf/32geX
NB7WL5Q0XuKDkuTBesqS5At7HlGSf+D6Q0nzh/kfXdL8ox9jS9I3+NfxJekr
8ojqkuyJ6w8lrffwPO+S//zYqSXFW95XUr4GM5xZUvxFP2aXFK/gX+eWFM94
fq+18d66kvId+NcGa/P8G2vz/Cy7H/lCW0nxnusPJeFn6E+n9Qfz5lj/Maxg
SXiS+KAkvMHvNZbkn1j/ZfKE3SRKslfiA5sf3J+x+QQPmLP5hz7kTV+A/4sl
xR/gtXJJ/BbyxwUlxTvo5S4l4TXgvd1KymeID0rK13DfXiXhP+KDkvIhzPO+
JeFV8gnW5n7ZkvAk1P73Jf/+jYNK4h8wTYeUtP7LeSz563mPKAlPs26+JDwA
f3BUSfkXv7di9kc+oST+Dvp0gskb8OGkkvwfcPcpJeUHrH+1+UW3zygpvyaf
UFL+jfhyjukf6+dL4sP4PbyS8B/M5YI+/VjJ+HJhSevJyHsvLqleCPdfUlL+
RrxQEp/A88qsTZ6jJL4D8enKkvIt6OnCktaHiRdK4h/gJ64tCZ9iXq638eAx
/zL7gv7dbPaBPPtWswfgnNtL/v1od5YUP1iPZ/oPfHuvzSfyyPtL/vORHixp
fRi80cMl5VvQ40dKyrcw7sdMPyHXf5eUX/H8o5LWexHPekraLwLe4emS+AlM
8zPW5nkndj3XG+x5rE8oKR/j/oGS8j2eb2D2xnphsw/o6Vsl8XPQn3dKwr9w
R/81e+D+5pKf3/ywJPxJN2/xA3L/2PwV6xNKwlNcbzD/D3/2uek/8tcvTf/J
J5T8339dUhI/B7y5tKR8H/j/u5L/e3PLTJ8RX5aXxB/we60l8XXo96qS/zyW
1dbmekNJfBz5BHs+3rve7AH+ZKPZJ9cbyrIH1j+XlZ/hz4Cy4gvw+2Zl/3lj
W5T9+6G2KgtPkk8oK15zf0XZv59zcFn2AfsaUpZ9cL2hLPsgXiirvgxqMqKs
+k/ihbLsg9+fK0v/MI9jy6qngB8ZXxZ/wPWGsvSZfIK1iResjfmcZm3WK9jz
GNfKsk+8dnZZ8QJ4Y25Z8Yr7Pcr+76HUlWUP3P9R9u8HbCoLr5FPKAt/8Xzv
svIx6On8svAv9KGzLPwEN+6UlU/APwfL4q/xvmhZ9sHzfMuyD+hxsiz+Afgm
XfbX32VN3zAOt6x6PIilUPZ/z61Yln2Rt7E2HrOgvMn3B8qKR/DTu9n7oWd7
mH7j715l7feA/uxdFn7C/fuavnO/Sln+AtN0QFn8A+4/0PQf83hwWfkL97OU
hZfwnsPNHuAPjigLH3O/rM0nnntUWf6P6w1l8XfwB8eV5S8xHyeU/fVHJ5XF
F6Afp5h+8Xwfsy/EhzPKikeYz7PKwi/wB+fY7zz/x9rId/5sz0NYvaAsPEd8
UPavf15s+s3zxMriK4gPzD/wfLGyP1+6vCx8BLu7sqz4ADkuLCt/w5+ry8r/
EK+vtflBvL6+rPiOeH1jWfGEfEJZ+Ip8gtkP/txaVrxhvX7Zf970neY/4Q/u
KvvPi7mnLPwBfbjPfodeP2C/4/0PWRv68Ii14U8es/sx7n/b+zlu02fgoB5r
M06VlU9B756x8SFeP2f6z+9XW5t8Qln4CfrwiskPedWr5o+4/9Dkjfl80+wJ
8eFtiy+I1++WhX/JJ9h8wj4/sN+5/mD+kH7M2ogPi0w/4GcXWxv5w+fWhj58
WRb+gJy/tjbM4puy8CHrE0wfGbasDS36wdow8+Vl//6NFdbm97ytTVht/h/2
vcb8C7/fafaB+VhvbdYnWHzGfFZV1Ob3X62NuDqwIn+F+RxkbZ7fYG3IecuK
6jUwn1vb7/weoLV5/nVF9k1+wdrcH2H94fdEKxoPYNiIisYPNRtZ8X9PYVRF
8sZ8jq3IP8O+xlU0n7CDCRXpF/jbiRXpI/zt5Ir0F/zA1Ir0neddVmQf5Bcq
sifM5+yK7JP7IyqyZ/CNNRXFI543UVF+DzNtqIjPIL9QUTxDPtZSUTzn9wut
DX/bXhHfgfjbab9z/cHa5BesDTsP2ft5Pm9F589gnDHrP/kFa0PuKRs/v+9b
kf/h+oPJE/OZN3mTX6jI3mEX5YrfPhfY/APH7WL6BH+/W0XxFvq0e0XxlvxC
RfEK8WLviuIZ9GGfyib7ISqKn3j/ARXhPejdgRXle9DHgyriDzD+QytavwKO
Otx+R/+PtPu5HlERPsb4j66IP2E9Y0XxH9NyvPUf/unEiuIveIKTK8KblIvZ
L+sZzd7wvrMr8nfo77kV8cc8/6uieMh6Rpt/6MuFpq/EDRXhM8j7kor4Mu7X
rwjv4f2XVYQH8f7LK8p/cP3CivgB1h9YG+O7xtr8foK1AXNvtOcRD9j7ML83
V7T+xfUF6y/06/aK1nvR3zvNXjDOuyuK15jfe81f8PvxFcVD7v+tKB6hnw+b
v4O8H62Iv2W94ibz+0RF60ewr+6K8Bzm/SnTN56PWlG+xf0NFf/3H5+vKN+C
X3ixovwIvXipIr4C8ffVivIpyP+1in+9982K/3sKb1XEN0Dv37H3Q+7/tf5x
PcHsA/d/aOPDYz628UOPPzF953qC6TvPRzL/gXn5oiL8gPd/VRGegR/4xvwX
3v9tRfwb5PKd+U+o/Q8V5VeIF8tNvzFtK0zfEG9WmX7yPLaK8n/4+zUV8W1Q
w7UV8QUA3OutzfWEivg2uLGqBbof+WG/BeLfgB8GLhD/gfsHLVB+Rty+QPbw
/81ebb8=
"]]}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0.},
ImageSize->Full,
Method->{},
PlotRange->{{0, 92.128}, {-4.2065, 2.306}},
PlotRangeClipping->True,
PlotRangePadding->{{1.84256, 1.84256}, {0.13025, 0.13025}}]], "Output",
CellChangeTimes->{3.566418098801072*^9, 3.566456520184943*^9,
3.566457039266361*^9, 3.566458944450555*^9, 3.566463367990636*^9,
3.566464607629697*^9, 3.5664657734981947`*^9}]
}, Open ]],
Cell[TextData[{
"Zun\[ADoubleDot]chst ermitteln wir ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "\[CapitalIota]\[CapitalIota]"}]],
TraditionalForm]]],
":"
}], "Text",
CellChangeTimes->{{3.566418529541356*^9, 3.5664185392688637`*^9}, {
3.566459093882183*^9, 3.566459093882268*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["peaks",
RowBox[{"unten", ",", "schweb", ",", "1"}]], "=",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"3.522", ",", "2.642"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.92", ",", "2.548"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20.52", ",", "2.396"}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.61", ",", "2.266"}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.62", ",", "2.125"}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.71", ",", "2.007"}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.9", ",", "1.878"}], "}"}], ",",
RowBox[{"{",
RowBox[{"61.88", ",", "1.725"}], "}"}], ",",
RowBox[{"{",
RowBox[{"70.89", ",", "1.596"}], "}"}], ",",
RowBox[{"{",
RowBox[{"78.98", ",", "1.502"}], "}"}], ",",
RowBox[{"{",
RowBox[{"87.99", ",", "1.361"}], "}"}]}], "}"}]}]], "Input",
CellChangeTimes->{{3.566418553726355*^9, 3.566418556862135*^9}, {
3.5664186021190243`*^9, 3.566418636734869*^9}, {3.566418686901483*^9,
3.5664186908324213`*^9}, {3.566457122998774*^9, 3.566457146418922*^9}, {
3.566457231337943*^9, 3.5664572325593243`*^9}, {3.566458980848291*^9,
3.566458983462447*^9}, 3.566459031474175*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"3.522`", ",", "2.642`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.92`", ",", "2.548`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20.52`", ",", "2.396`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"28.61`", ",", "2.266`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"37.62`", ",", "2.125`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"45.71`", ",", "2.007`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"53.9`", ",", "1.878`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"61.88`", ",", "1.725`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"70.89`", ",", "1.596`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"78.98`", ",", "1.502`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"87.99`", ",", "1.361`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.5664186487621803`*^9, 3.5664186916285067`*^9,
3.5664565202200203`*^9, 3.566457147742454*^9, 3.566457233677925*^9,
3.566459032483513*^9, 3.5664633682087708`*^9, 3.566464607711376*^9,
3.566465773534347*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["peaks",
RowBox[{"unten", ",", "schweb", ",", "2"}]], "=",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"7.925", ",",
RowBox[{"-", "2.756"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.42", ",", "2.268"}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.61", ",", "2.151"}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.8", ",", "2.022"}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.92", ",",
RowBox[{"-", "2.182"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"50.01", ",",
RowBox[{"-", "2.03"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.61", ",",
RowBox[{"-", "1.925"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"66.9", ",", "1.565"}], "}"}], ",",
RowBox[{"{",
RowBox[{"74.99", ",", "1.413"}], "}"}], ",",
RowBox[{"{",
RowBox[{"83.18", ",", "1.26"}], "}"}]}], "}"}]}]], "Input",
CellChangeTimes->{{3.566418697494882*^9, 3.566418698883885*^9},
3.566457196906156*^9, {3.56645722696686*^9, 3.566457236100732*^9}, {
3.5664589819712753`*^9, 3.566458985102449*^9}, 3.5664590670641737`*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"7.925`", ",",
RowBox[{"-", "2.756`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"16.42`", ",", "2.268`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"24.61`", ",", "2.151`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"32.8`", ",", "2.022`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"41.92`", ",",
RowBox[{"-", "2.182`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"50.01`", ",",
RowBox[{"-", "2.03`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"58.61`", ",",
RowBox[{"-", "1.925`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"66.9`", ",", "1.565`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"74.99`", ",", "1.413`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"83.18`", ",", "1.26`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.5664186993548203`*^9, 3.566456520268859*^9, {3.56645722845265*^9,
3.566457236465382*^9}, 3.566459068406142*^9, 3.566463368252969*^9,
3.566464607812611*^9, 3.566465773580702*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["periods",
RowBox[{"unten", ",", "II"}]], "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Flatten", "[",
RowBox[{"Differences", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Part", "[",
RowBox[{"#", ",", "All", ",", "1"}], "]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{
SubscriptBox["peaks",
RowBox[{"unten", ",", "schweb", ",", "1"}]], ",",
SubscriptBox["peaks",
RowBox[{"unten", ",", "schweb", ",", "2"}]]}], "}"}]}], ")"}]}],
"]"}], ",",
RowBox[{
RowBox[{"#", ">", "1"}], "&"}]}], "]"}], "//",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"#", ",", "\"\\""}], "]"}], "&"}]}]}]], "Input",
CellChangeTimes->{{3.566418704725378*^9, 3.566418723733201*^9}, {
3.566418774176773*^9, 3.5664187746959467`*^9}, {3.566457260346917*^9,
3.566457263098391*^9}, {3.5664590712458467`*^9, 3.56645907415783*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"8.398`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"8.6`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"8.09`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"9.009999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"8.090000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"8.189999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"7.980000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"9.009999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"8.090000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"9.009999999999991`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"8.495000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"8.189999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"8.189999999999998`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"9.120000000000005`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"8.089999999999996`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"8.600000000000001`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"8.290000000000006`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"8.08999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"8.190000000000012`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )]}], "}"}]], "Output",
CellChangeTimes->{3.566418725313447*^9, 3.566418775740443*^9,
3.5664565203407717`*^9, 3.566457263581451*^9, 3.566459074827911*^9,
3.5664633684434443`*^9, 3.566464608135573*^9, 3.566465773788618*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["T",
RowBox[{"unten", ",", "II"}]], "=",
RowBox[{"Mean", "[",
SubscriptBox["periods",
RowBox[{"unten", ",", "II"}]], "]"}]}], ";",
RowBox[{
SubscriptBox["\[CapitalDelta]T",
RowBox[{"unten", ",", "II"}]], "=",
RowBox[{"StandardDeviation", "[",
SubscriptBox["periods",
RowBox[{"unten", ",", "II"}]], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.5664135644395313`*^9, 3.5664135932825413`*^9}, {
3.566413840931016*^9, 3.566413846450987*^9}, {3.5664172409639*^9,
3.566417250652793*^9}, {3.566417447558818*^9, 3.5664174599257507`*^9}, {
3.5664187707838707`*^9, 3.566418783510667*^9}, {3.56645726680972*^9,
3.5664572707698402`*^9}, {3.566459076796897*^9, 3.566459080516595*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "II"}]], "=",
RowBox[{
FractionBox["\[Pi]",
SubscriptBox["T",
RowBox[{"unten", ",", "II"}]]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413595788748*^9, 3.566413604730227*^9}, {
3.5664138496182423`*^9, 3.566413852914188*^9}, {3.5664172604677753`*^9,
3.5664172659954042`*^9}, {3.566417462405601*^9, 3.566417465982563*^9}, {
3.5664187883821297`*^9, 3.566418790805861*^9}, {3.566457272752955*^9,
3.566457274496818*^9}, {3.566459083012961*^9, 3.566459084140212*^9},
3.566463000845932*^9}],
Cell[BoxData[
TemplateBox[{"0.3737111149815999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.566413602619113*^9, 3.5664136050051537`*^9},
3.566413853330969*^9, 3.566415031488805*^9, 3.5664150943028173`*^9,
3.5664152865403767`*^9, 3.566415352194001*^9, {3.566417267815569*^9,
3.56641728474636*^9}, 3.56641738194198*^9, 3.56641746640886*^9,
3.56641879136887*^9, 3.566456520432188*^9, 3.566457274967578*^9,
3.566459084560508*^9, 3.566463001375012*^9, 3.5664633686681232`*^9,
3.566464608249343*^9, 3.566465773881871*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "II"}]], "=",
RowBox[{
FractionBox[
RowBox[{"\[Pi]", " ",
SubscriptBox["\[CapitalDelta]T",
RowBox[{"unten", ",", "II"}]]}],
SuperscriptBox[
SubscriptBox["T",
RowBox[{"unten", ",", "II"}]], "2"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413681720048*^9, 3.566413748696438*^9}, {
3.566413855794153*^9, 3.566413863833433*^9}, {3.566417287240891*^9,
3.566417295474732*^9}, {3.566417441918975*^9, 3.566417475309024*^9}, {
3.566418794301804*^9, 3.566418797517473*^9}, {3.5664572778009377`*^9,
3.566457282080546*^9}, {3.566457426531823*^9, 3.566457426651546*^9}, {
3.566459086148288*^9, 3.566459088733078*^9}, 3.5664630039200077`*^9}],
Cell[BoxData[
TemplateBox[{"0.01679235273391264`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566413749146556*^9, 3.566413864296844*^9,
3.566415031562516*^9, 3.5664150958247833`*^9, 3.5664152921305733`*^9,
3.566415353714468*^9, 3.5664172959548683`*^9, 3.566417383528458*^9,
3.566417442368752*^9, 3.566417475991418*^9, 3.566418798230929*^9,
3.566456520560872*^9, 3.566457282620494*^9, 3.566457427429977*^9,
3.566459089550445*^9, 3.566463004508195*^9, 3.566463368819952*^9,
3.5664646083967133`*^9, 3.566465774061545*^9}]
}, Open ]],
Cell[TextData[{
"Nun bestimmen wir ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "\[CapitalIota]"}]], TraditionalForm]]],
". Dazu nutzen wir die ersten zwei Bl\[ODoubleDot]cke des ersten Pendels \
(0-5 s und 10-15 s) und den ersten Block des zweiten Pendels (5-10 s):"
}], "Text",
CellChangeTimes->{{3.566419016055272*^9, 3.566419035180059*^9}, {
3.566457287968896*^9, 3.566457304213272*^9}, {3.566459091679146*^9,
3.566459091679229*^9}, {3.566459123316524*^9, 3.566459158377838*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"unten", ",", "schweb", ",", "1", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "schweb", ",", "1"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "5"}], "&"}]}],
"]"}], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416344367093*^9, 3.566416404499189*^9}, {
3.5664164749772043`*^9, 3.5664164803566027`*^9}, 3.5664165186680202`*^9, {
3.5664165522816677`*^9, 3.566416554473386*^9}, {3.566416667930216*^9,
3.566416697488927*^9}, {3.566418872129775*^9, 3.566418886836277*^9}, {
3.56641892783801*^9, 3.566418932070135*^9}, 3.5664189647335033`*^9, {
3.566457305984005*^9, 3.566457307671797*^9}, {3.5664573382506857`*^9,
3.566457338343218*^9}, {3.566459161166768*^9, 3.566459174548232*^9}, {
3.5664592098898153`*^9, 3.566459219003229*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.55`", ",", "1.196`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.109`", ",", "2.195`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3.524`", ",", "2.662`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.566416365943509*^9, 3.566416383937974*^9},
3.566416480807665*^9, 3.566416519318247*^9, 3.5664165549251204`*^9, {
3.566416668287786*^9, 3.56641669808327*^9}, 3.5664168622938766`*^9,
3.566417345454031*^9, {3.566418938148533*^9, 3.566418990247615*^9},
3.566456520606966*^9, 3.566457308662702*^9, 3.5664573419150257`*^9, {
3.566459203935842*^9, 3.5664592197779713`*^9}, 3.566462385637446*^9,
3.56646336887521*^9, 3.56646460849697*^9, 3.566465774118761*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"unten", ",", "schweb", ",", "1", ",", "1"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "schweb", ",", "1"}]], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "5"}], "&"}]}],
"]"}], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416788206684*^9, 3.566416811680894*^9}, {
3.566418975598394*^9, 3.5664189928204*^9}, {3.566457311063684*^9,
3.566457313375404*^9}, {3.566457344011961*^9, 3.566457344169251*^9}, {
3.566459224776865*^9, 3.566459227320333*^9}, {3.566459261070306*^9,
3.566459261390094*^9}, 3.566462379111184*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1.304`", ",",
RowBox[{"-", "1.601`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"2.781`", ",",
RowBox[{"-", "2.4`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"4.25`", ",",
RowBox[{"-", "2.422`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.566416813683556*^9, 3.566416863962236*^9, 3.5664173476919193`*^9, {
3.566418983803308*^9, 3.566418993302281*^9}, 3.566456520707449*^9,
3.566457314356086*^9, 3.5664573446698923`*^9, 3.566459227841045*^9,
3.566459261911076*^9, 3.566462386989017*^9, 3.566463368920876*^9,
3.56646460864648*^9, 3.566465774164712*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"unten", ",", "schweb", ",", "1", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "schweb", ",", "1"}]], ",",
RowBox[{
RowBox[{"10", "\[LessEqual]",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "15"}],
"&"}]}], "]"}], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416344367093*^9, 3.566416404499189*^9}, {
3.5664164749772043`*^9, 3.5664164803566027`*^9}, 3.5664165186680202`*^9, {
3.5664165522816677`*^9, 3.566416554473386*^9}, {3.566416667930216*^9,
3.566416697488927*^9}, {3.566418872129775*^9, 3.566418886836277*^9}, {
3.56641892783801*^9, 3.566418932070135*^9}, 3.5664189647335033`*^9, {
3.566457305984005*^9, 3.566457307671797*^9}, {3.5664573382506857`*^9,
3.566457338343218*^9}, {3.566459161166768*^9, 3.566459174548232*^9}, {
3.5664592098898153`*^9, 3.5664592445214567`*^9}, {3.566462370029429*^9,
3.566462381501526*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"10.145`", ",", "2.04`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11.663`", ",", "2.506`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.145`", ",", "2.306`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"14.631`", ",", "1.418`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.566416365943509*^9, 3.566416383937974*^9},
3.566416480807665*^9, 3.566416519318247*^9, 3.5664165549251204`*^9, {
3.566416668287786*^9, 3.56641669808327*^9}, 3.5664168622938766`*^9,
3.566417345454031*^9, {3.566418938148533*^9, 3.566418990247615*^9},
3.566456520606966*^9, 3.566457308662702*^9, 3.5664573419150257`*^9, {
3.566459203935842*^9, 3.5664592454509363`*^9}, 3.566462388275415*^9,
3.566463368980012*^9, 3.5664646088130817`*^9, 3.566465774214304*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"unten", ",", "schweb", ",", "1", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "schweb", ",", "1"}]], ",",
RowBox[{
RowBox[{"10", "\[LessEqual]",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "15"}],
"&"}]}], "]"}], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416788206684*^9, 3.566416811680894*^9}, {
3.566418975598394*^9, 3.5664189928204*^9}, {3.566457311063684*^9,
3.566457313375404*^9}, {3.566457344011961*^9, 3.566457344169251*^9}, {
3.566459224776865*^9, 3.566459259133936*^9}, {3.5664623740784807`*^9,
3.5664623839252863`*^9}, {3.566462497258214*^9, 3.566462497994368*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"10.941`", ",",
RowBox[{"-", "2.178`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"12.397`", ",",
RowBox[{"-", "2.356`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"13.886`", ",",
RowBox[{"-", "1.801`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.566416813683556*^9, 3.566416863962236*^9, 3.5664173476919193`*^9, {
3.566418983803308*^9, 3.566418993302281*^9}, 3.566456520707449*^9,
3.566457314356086*^9, 3.5664573446698923`*^9, {3.566459227841045*^9,
3.5664592642321367`*^9}, 3.566462389493258*^9, 3.566462498398705*^9,
3.566463369070204*^9, 3.5664646089463997`*^9, 3.566465774265394*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["max",
RowBox[{"unten", ",", "schweb", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "schweb", ",", "2"}]], ",",
RowBox[{
RowBox[{
RowBox[{"5", "\[LessEqual]",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}]}], "&&",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "10"}]}],
"&"}]}], "]"}], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"maxQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ">", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416344367093*^9, 3.566416404499189*^9}, {
3.5664164749772043`*^9, 3.5664164803566027`*^9}, 3.5664165186680202`*^9, {
3.5664165522816677`*^9, 3.566416554473386*^9}, {3.566416667930216*^9,
3.566416697488927*^9}, {3.566418872129775*^9, 3.566418886836277*^9}, {
3.56641892783801*^9, 3.566418932070135*^9}, 3.5664189647335033`*^9, {
3.566418998515291*^9, 3.566419001113822*^9}, {3.5664573174659653`*^9,
3.566457354473534*^9}, {3.566462395347138*^9, 3.566462397468832*^9}, {
3.5664625041061363`*^9, 3.566462506257738*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"5.319`", ",", "1.455`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"6.823`", ",", "2.281`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"8.328`", ",", "2.306`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.828`", ",", "1.722`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.566416365943509*^9, 3.566416383937974*^9},
3.566416480807665*^9, 3.566416519318247*^9, 3.5664165549251204`*^9, {
3.566416668287786*^9, 3.56641669808327*^9}, 3.5664168622938766`*^9,
3.566417345454031*^9, {3.566418938148533*^9, 3.566419001800186*^9},
3.566456520807023*^9, 3.566457320030972*^9, 3.566457360729589*^9,
3.566462398057198*^9, 3.5664625070123158`*^9, 3.566463369278386*^9,
3.5664646092296267`*^9, 3.56646577435535*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["min",
RowBox[{"unten", ",", "schweb", ",", "2"}]], "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
SubscriptBox["gekoppelt",
RowBox[{"unten", ",", "schweb", ",", "2"}]], ",",
RowBox[{
RowBox[{
RowBox[{"5", "\[LessEqual]",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}]}], "&&",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[LessEqual]", "10"}]}],
"&"}]}], "]"}], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{
RowBox[{"minQ", "[", "#", "]"}], "&"}]}], "]"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.566416788206684*^9, 3.566416811680894*^9}, {
3.566418975598394*^9, 3.566419006493784*^9}, {3.56645732239965*^9,
3.566457323982918*^9}, 3.566457365355214*^9, 3.56646247523181*^9, {
3.566462510537808*^9, 3.566462512913508*^9}, 3.566462628973559*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"6.13`", ",",
RowBox[{"-", "2.238`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"7.591`", ",",
RowBox[{"-", "2.749`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"9.121`", ",",
RowBox[{"-", "2.433`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.566416813683556*^9, 3.566416863962236*^9, 3.5664173476919193`*^9, {
3.566418983803308*^9, 3.566419006927163*^9}, 3.56645652090679*^9,
3.566457324571477*^9, 3.5664573669054728`*^9, 3.566462513473392*^9,
3.566462629706002*^9, 3.566463369410482*^9, 3.566464609331341*^9,
3.566465774400498*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["periods",
RowBox[{"unten", ",", "I"}]], "=",
RowBox[{
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Flatten", "[",
RowBox[{"Differences", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Part", "[",
RowBox[{"#", ",", "All", ",", "1"}], "]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{
SubscriptBox["max",
RowBox[{"unten", ",", "schweb", ",", "1", ",", "1"}]], ",",
SubscriptBox["min",
RowBox[{"unten", ",", "schweb", ",", "1", ",", "1"}]], ",",
SubscriptBox["max",
RowBox[{"unten", ",", "schweb", ",", "1", ",", "2"}]], ",",
SubscriptBox["min",
RowBox[{"unten", ",", "schweb", ",", "1", ",", "2"}]], ",",
SubscriptBox["max",
RowBox[{"unten", ",", "schweb", ",", "2"}]], ",",
SubscriptBox["min",
RowBox[{"unten", ",", "schweb", ",", "2"}]]}], "}"}]}], ")"}]}],
"]"}], ",",
RowBox[{
RowBox[{"#", ">", "1"}], "&"}]}], "]"}], "//",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"#", ",", "\"\\""}], "]"}], "&"}]}]}]], "Input",
CellChangeTimes->{{3.566416950448785*^9, 3.566417094263796*^9}, {
3.566417128819862*^9, 3.566417220526993*^9}, {3.5664172740031776`*^9,
3.56641728085063*^9}, 3.566417453279512*^9, {3.566419061101471*^9,
3.566419071899342*^9}, {3.566457374395771*^9, 3.566457379475959*^9}, {
3.566462515476063*^9, 3.566462550104643*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"1.559`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.415`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.477`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4689999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5180000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4819999999999993`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4860000000000007`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4559999999999995`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.488999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5040000000000004`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.504999999999999`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.4610000000000003`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )], ",",
TemplateBox[{"1.5300000000000002`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox["\"s\"", "QuantityUnitTraditionalLabel"]}],
ShowStringCharacters -> False], "Unit: seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",", "\"Seconds\""}], "]"}]& )]}], "}"}]], "Output",
CellChangeTimes->{{3.566417037145218*^9, 3.5664170852269993`*^9}, {
3.566417129680561*^9, 3.566417140647348*^9}, {3.56641717581981*^9,
3.5664172224107037`*^9}, 3.566417281888981*^9, 3.5664173767611523`*^9,
3.566417453831401*^9, 3.5664190738211184`*^9, 3.566456521361012*^9,
3.56645738012992*^9, {3.566462539885952*^9, 3.5664625511840487`*^9},
3.566462632448353*^9, 3.5664633695735826`*^9, 3.566464609484585*^9,
3.566465774531042*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["T",
RowBox[{"unten", ",", "I"}]], "=",
RowBox[{"Mean", "[",
SubscriptBox["periods",
RowBox[{"unten", ",", "I"}]], "]"}]}], ";",
RowBox[{
SubscriptBox["\[CapitalDelta]T",
RowBox[{"unten", ",", "I"}]], "=",
RowBox[{"StandardDeviation", "[",
SubscriptBox["periods",
RowBox[{"unten", ",", "I"}]], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.5664135644395313`*^9, 3.5664135932825413`*^9}, {
3.566413840931016*^9, 3.566413846450987*^9}, {3.5664172409639*^9,
3.566417250652793*^9}, {3.566417447558818*^9, 3.5664174599257507`*^9}, {
3.566419079227153*^9, 3.5664190868506804`*^9}, {3.566457382730624*^9,
3.5664573864496613`*^9}, {3.5664625576017523`*^9, 3.566462564712398*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "I"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]"}],
SubscriptBox["T",
RowBox[{"unten", ",", "I"}]]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413595788748*^9, 3.566413604730227*^9}, {
3.5664138496182423`*^9, 3.566413852914188*^9}, {3.5664172604677753`*^9,
3.5664172659954042`*^9}, {3.566417462405601*^9, 3.566417465982563*^9}, {
3.566419089370288*^9, 3.566419093497917*^9}, {3.566457389265527*^9,
3.566457390458157*^9}, {3.566462653090857*^9, 3.566462654466206*^9}}],
Cell[BoxData[
TemplateBox[{"4.218723049278894`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.566413602619113*^9, 3.5664136050051537`*^9},
3.566413853330969*^9, 3.566415031488805*^9, 3.5664150943028173`*^9,
3.5664152865403767`*^9, 3.566415352194001*^9, {3.566417267815569*^9,
3.56641728474636*^9}, 3.56641738194198*^9, 3.56641746640886*^9,
3.566419094127233*^9, 3.566456521493745*^9, 3.56645739085604*^9,
3.566462654959517*^9, 3.566463369711025*^9, 3.5664646095757713`*^9,
3.566465774635298*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "I"}]], "=",
RowBox[{
FractionBox[
RowBox[{"2", "\[Pi]", " ",
SubscriptBox["\[CapitalDelta]T",
RowBox[{"unten", ",", "I"}]]}],
SuperscriptBox[
SubscriptBox["T",
RowBox[{"unten", ",", "I"}]], "2"]], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.566413681720048*^9, 3.566413748696438*^9}, {
3.566413855794153*^9, 3.566413863833433*^9}, {3.566417287240891*^9,
3.566417295474732*^9}, {3.566417441918975*^9, 3.566417475309024*^9}, {
3.566419096690737*^9, 3.566419099641781*^9}, {3.566457393362804*^9,
3.566457400005389*^9}, {3.5664626569945183`*^9, 3.566462659777844*^9}}],
Cell[BoxData[
TemplateBox[{"0.09929025954546229`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{
3.566413749146556*^9, 3.566413864296844*^9, 3.566415031562516*^9,
3.5664150958247833`*^9, 3.5664152921305733`*^9, 3.566415353714468*^9,
3.5664172959548683`*^9, 3.566417383528458*^9, 3.566417442368752*^9,
3.566417475991418*^9, 3.566419100354113*^9, 3.566456521691614*^9, {
3.5664573965132236`*^9, 3.566457401368137*^9}, 3.566462660249641*^9,
3.566463369838279*^9, 3.566464609765019*^9, 3.566465774761558*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Vergleich der Frequenzen", "Subsection",
CellChangeTimes->{{3.5664192234035397`*^9, 3.566419225883049*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "I", ",", "theor"}]], "=",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "1"}]], "+",
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "2"}]]}], ")"}]}]}]], "Input",
CellChangeTimes->{{3.566457600153709*^9, 3.566457616332611*^9}, {
3.5664582669581337`*^9, 3.5664582872466993`*^9}, {3.56645843821292*^9,
3.5664584480132627`*^9}, {3.5664626637139378`*^9, 3.566462665930049*^9}}],
Cell[BoxData[
TemplateBox[{"4.247842083741952`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{
3.5664576205921507`*^9, {3.56645826866374*^9, 3.566458288048279*^9},
3.56645844865298*^9, 3.566462666318759*^9, 3.566463369895171*^9,
3.566464609865206*^9, 3.566465774835812*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "I", ",", "theor"}]], "=",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "1"}]], "+",
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "2"}]]}], ")"}]}]}]], "Input",
CellChangeTimes->{{3.566457626926803*^9, 3.566457632702582*^9}, {
3.5664584511095667`*^9, 3.566458453821082*^9}, {3.56646266882546*^9,
3.566462670881177*^9}}],
Cell[BoxData[
TemplateBox[{"0.06323667559032897`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566457633296639*^9, 3.566458454456777*^9,
3.566462671227413*^9, 3.566463369993618*^9, 3.5664646099824133`*^9,
3.566465774891008*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "II", ",", "theor"}]], "=",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "2"}]], "-",
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "1"}]]}], ")"}]}]}]], "Input",
CellChangeTimes->{{3.566457640925796*^9, 3.566457645781568*^9}, {
3.5664584595566063`*^9, 3.566458462349407*^9}, {3.566462673090667*^9,
3.566462675713067*^9}}],
Cell[BoxData[
TemplateBox[{"0.3825819599253246`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566457646269865*^9, 3.5664584627753143`*^9,
3.566462676083946*^9, 3.5664633700509*^9, 3.566464610382773*^9,
3.566465774997485*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "II", ",", "theor"}]], "=",
RowBox[{
FractionBox["1", "2"],
RowBox[{"(",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "2"}]], "+",
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "1"}]]}], ")"}]}]}]], "Input",
CellChangeTimes->{{3.566457651229074*^9, 3.566457661692594*^9}, {
3.566458464684102*^9, 3.566458466796021*^9}, {3.566462678377069*^9,
3.566462680832649*^9}}],
Cell[BoxData[
TemplateBox[{"0.06323667559032897`"},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False],
"Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox["1", "\"Seconds\""]}], "]"}]& )]], "Output",
CellChangeTimes->{3.566457662260446*^9, 3.566458467175603*^9,
3.56646268130971*^9, 3.566463370112053*^9, 3.5664646104823637`*^9,
3.56646577504913*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"Null", ",",
RowBox[{"Text", "[", "\"\\"", "]"}], ",",
RowBox[{"Text", "[", "\"\\"", "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
"Text", "[",
"\"\<\!\(\*SubscriptBox[\(\[Omega]\), \(unten, \
\[CapitalIota]\)]\)\>\"", "]"}], ",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "I", ",", "theor"}]], ",", "3"}], "]"}],
"\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "I", ",", "theor"}]], ",", "1"}], "]"}]}],
",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "I"}]], ",", "2"}], "]"}], "\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "I"}]], ",", "1"}], "]"}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
"Text", "[",
"\"\<\!\(\*SubscriptBox[\(\[Omega]\), \(unten, \[CapitalIota]\
\[CapitalIota]\)]\)\>\"", "]"}], ",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "II", ",", "theor"}]], ",", "2"}], "]"}],
"\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "II", ",", "theor"}]], ",", "1"}], "]"}]}],
",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "II"}]], ",", "2"}], "]"}], "\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "II"}]], ",", "1"}], "]"}]}]}], "}"}]}],
"}"}], ",",
RowBox[{"Frame", "\[Rule]", "All"}]}], "]"}]], "Input",
CellChangeTimes->{{3.5664576787642727`*^9, 3.566457789085693*^9}, {
3.566457819457388*^9, 3.566458019263232*^9}, {3.5664581445370483`*^9,
3.566458154319097*^9}, {3.566458249632433*^9, 3.566458258711831*^9}, {
3.566458298157398*^9, 3.5664583803127813`*^9}, {3.566458469326837*^9,
3.566458481998563*^9}, {3.566462684378869*^9, 3.566462698274107*^9}, {
3.566463102388012*^9, 3.566463115787137*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{"",
InterpretationBox[Cell[BoxData[
FormBox["\<\"Theoretischer Wert\"\>", TextForm]], "InlineText"],
Text["Theoretischer Wert"]],
InterpretationBox[Cell[BoxData[
FormBox["\<\"Gemessener Wert\"\>", TextForm]], "InlineText"],
Text["Gemessener Wert"]]},
{
InterpretationBox[Cell[BoxData[
FormBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Omega]\\), \\(unten, \
\[CapitalIota]\\)]\\)\"\>", TextForm]], "InlineText"],
Text["\!\(\*SubscriptBox[\(\[Omega]\), \(unten, \[CapitalIota]\)]\)"]],
RowBox[{
TagBox[
TemplateBox[{
InterpretationBox["\"4.25\"", 4.247842083741952, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 3]& ], "\[PlusMinus]",
TagBox[
TemplateBox[{
InterpretationBox[
"\"0.06\"", 0.06323667559032897, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 1]& ]}],
RowBox[{
TagBox[
TemplateBox[{
InterpretationBox["\"4.2\"", 4.218723049278894, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 2]& ], "\[PlusMinus]",
TagBox[
TemplateBox[{
InterpretationBox["\"0.1\"", 0.09929025954546229, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 1]& ]}]},
{
InterpretationBox[Cell[BoxData[
FormBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Omega]\\), \\(unten, \
\[CapitalIota]\[CapitalIota]\\)]\\)\"\>", TextForm]], "InlineText"],
Text[
"\!\(\*SubscriptBox[\(\[Omega]\), \(unten, \[CapitalIota]\[CapitalIota]\
\)]\)"]],
RowBox[{
TagBox[
TemplateBox[{
InterpretationBox["\"0.38\"", 0.3825819599253246, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 2]& ], "\[PlusMinus]",
TagBox[
TemplateBox[{
InterpretationBox[
"\"0.06\"", 0.06323667559032897, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 1]& ]}],
RowBox[{
TagBox[
TemplateBox[{
InterpretationBox["\"0.37\"", 0.3737111149815999, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 2]& ], "\[PlusMinus]",
TagBox[
TemplateBox[{
InterpretationBox[
"\"0.02\"", 0.01679235273391264, AutoDelete -> True]},
"QuantityUnit",
DisplayFunction->(TooltipBox[
StyleBox[
RowBox[{#,
StyleBox[
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"second\""}],
"QuantityUnitTraditionalLabel"]}], ShowStringCharacters ->
False], "Unit: reciprocal seconds"]& ),
InterpretationFunction->(RowBox[{"Quantity", "[",
RowBox[{#, ",",
FractionBox[
InterpretationBox["\"1\"", 1, Editable -> False],
"\"Seconds\""]}], "]"}]& )],
NumberForm[#, 1]& ]}]}
},
AutoDelete->False,
GridBoxFrame->{"Columns" -> {{True}}, "Rows" -> {{True}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{
3.566458020441966*^9, 3.566458155267816*^9, 3.566458252040106*^9,
3.5664583495151653`*^9, 3.566458380859438*^9, 3.5664584826607237`*^9,
3.5664626993007097`*^9, 3.566463013039227*^9, {3.5664631031712847`*^9,
3.566463117939129*^9}, 3.566463370402409*^9, 3.566464610804874*^9,
3.566465775328898*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Kopplungsgrad", "Subsection",
CellChangeTimes->{{3.5664202435408382`*^9, 3.566420263483097*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[Kappa]", "unten"], "=",
FractionBox[
RowBox[{
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "2"}]], "2"], "-",
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "1"}]], "2"]}],
RowBox[{
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "2"}]], "2"], "+",
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "1"}]], "2"]}]]}]], "Input",
CellChangeTimes->{{3.566455520937298*^9, 3.5664555748032703`*^9}, {
3.5664585483842163`*^9, 3.5664585530386887`*^9}, {3.566463016162566*^9,
3.566463020834507*^9}, {3.566463417149795*^9, 3.5664634273955507`*^9}}],
Cell[BoxData["0.17868062464620377`"], "Output",
CellChangeTimes->{3.566455578139165*^9, 3.566456521832499*^9,
3.566458553705472*^9, 3.566463032485586*^9, 3.56646337054659*^9,
3.5664634384880953`*^9, 3.5664646110039043`*^9, 3.5664657754710817`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]\[Kappa]", "unten"], "=",
RowBox[{
FractionBox[
RowBox[{"4",
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "1"}]], " ",
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "2"}]]}],
SuperscriptBox[
RowBox[{"(",
RowBox[{
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "2"}]], "2"], "+",
SuperscriptBox[
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "1"}]], "2"]}], ")"}], "2"]],
SqrtBox[
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "1"}]],
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "2"}]]}], ")"}], "2"], "+",
SuperscriptBox[
RowBox[{"(",
RowBox[{
SubscriptBox["\[Omega]",
RowBox[{"unten", ",", "2"}]],
SubscriptBox["\[CapitalDelta]\[Omega]",
RowBox[{"unten", ",", "1"}]]}], ")"}], "2"]}]]}]}]], "Input",
CellChangeTimes->{{3.566455582521412*^9, 3.566455587051407*^9}, {
3.566456219233301*^9, 3.566456292189419*^9}, {3.566458560024431*^9,
3.566458568542531*^9}, {3.5664630218917313`*^9, 3.5664630298348007`*^9}, {
3.566463431612212*^9, 3.566463432724024*^9}}],
Cell[BoxData["0.02032835532484507`"], "Output",
CellChangeTimes->{
3.566456295268393*^9, 3.566456522259495*^9, 3.566458571235566*^9, {
3.566463031279409*^9, 3.566463034128532*^9}, 3.5664633711618357`*^9,
3.566463439875093*^9, 3.566464611535368*^9, 3.566465775920767*^9}]
}, Open ]],
Cell["", "PageBreak",
PageBreakBelow->True]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["\<\
Verh\[ADoubleDot]ltnisse der Kopplungsgrade\
\>", "Section",
CellChangeTimes->{{3.566463563250926*^9, 3.566463567008725*^9}}],
Cell["\<\
Die angegebene N\[ADoubleDot]herung f\[UDoubleDot]r die Kopplungsquadrate \
impliziert, da\[SZ] sich die Verh\[ADoubleDot]ltnisse der Kopplungsgrade wie \
die Verh\[ADoubleDot]ltnisse der L\[ADoubleDot]ngenquadrate verhalten.\
\>", "Text",
CellChangeTimes->{{3.566463593494975*^9, 3.566463593782933*^9}, {
3.566463677267709*^9, 3.566463685264872*^9}, {3.5664637743963957`*^9,
3.5664637873942738`*^9}}],
Cell[CellGroupData[{
Cell["Oben\[Dash]Mitte", "Subsection",
CellChangeTimes->{{3.566464484382897*^9, 3.566464486292289*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["V",
RowBox[{"oben", ",", "mitte"}]], "=",
FractionBox[
SubscriptBox["\[Kappa]", "oben"],
SubscriptBox["\[Kappa]", "mitte"]]}]], "Input",
CellChangeTimes->{{3.5664644883666058`*^9, 3.566464503641521*^9}}],
Cell[BoxData["0.37036236642619824`"], "Output",
CellChangeTimes->{3.566464505062645*^9, 3.5664646115797167`*^9,
3.566464650742207*^9, 3.566465776020049*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]V",
RowBox[{"oben", ",", "mitte"}]], "=",
SqrtBox[
RowBox[{
SuperscriptBox[
RowBox[{"(",
FractionBox[
SubscriptBox["\[CapitalDelta]\[Kappa]", "oben"],
SubscriptBox["\[Kappa]", "mitte"]], ")"}], "2"], "+",
SuperscriptBox[
RowBox[{"(",
FractionBox[
RowBox[{
SubscriptBox["\[Kappa]", "oben"],
SubscriptBox["\[CapitalDelta]\[Kappa]", "mitte"]}],
SuperscriptBox[
SubscriptBox["\[Kappa]", "mitte"], "2"]], ")"}], "2"]}]]}]], "Input",
CellChangeTimes->{{3.566464507731227*^9, 3.566464558658967*^9}}],
Cell[BoxData["0.37106686210708134`"], "Output",
CellChangeTimes->{3.5664645608561373`*^9, 3.566464611634623*^9,
3.566464652493403*^9, 3.566465776066866*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["V",
RowBox[{"oben", ",", "mitte", ",", "approx"}]], "=",
FractionBox[
SuperscriptBox[
SubscriptBox["l", "oben"], "2"],
SuperscriptBox[
SubscriptBox["l", "mitte"], "2"]]}]], "Input",
CellChangeTimes->{{3.566464671523261*^9, 3.566464687632367*^9}}],
Cell[BoxData["0.1259105098855359`"], "Output",
CellChangeTimes->{3.5664646888611298`*^9, 3.566465776254341*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]V",
RowBox[{"oben", ",", "mitte", ",", "approx"}]], "=",
SqrtBox[
RowBox[{
SuperscriptBox[
RowBox[{"(",
FractionBox[
RowBox[{"2",
SubscriptBox["l", "oben"],
SubscriptBox["\[CapitalDelta]l", "oben"]}],
SuperscriptBox[
SubscriptBox["l", "mitte"], "2"]], ")"}], "2"], "+",
SuperscriptBox[
RowBox[{"(",
FractionBox[
RowBox[{"2",
SuperscriptBox[
SubscriptBox["l", "oben"], "2"],
SubscriptBox["\[CapitalDelta]l", "mitte"]}],
SuperscriptBox[
SubscriptBox["l", "mitte"], "3"]], ")"}], "2"]}]]}]], "Input",
CellChangeTimes->{{3.566464699927703*^9, 3.566464757749236*^9}}],
Cell[BoxData["0.004858265281122052`"], "Output",
CellChangeTimes->{3.566464759566761*^9, 3.566465776721434*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Text", "[", "\"\\"", "]"}], ",",
RowBox[{"Text", "[", "\"\\"", "]"}], ",",
RowBox[{"Text", "[", "\"\\"", "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
"Text", "[",
"\"\<\!\(\*FractionBox[SubscriptBox[\(\[Kappa]\), \(oben\)], \
SubscriptBox[\(\[Kappa]\), \(mitte\)]]\)\>\"", "]"}], ",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["V",
RowBox[{"oben", ",", "mitte"}]], ",", "1"}], "]"}], "\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]V",
RowBox[{"oben", ",", "mitte"}]], ",", "1"}], "]"}]}], ",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["V",
RowBox[{"oben", ",", "mitte", ",", "approx"}]], ",", "3"}], "]"}],
"\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]V",
RowBox[{"oben", ",", "mitte", ",", "approx"}]], ",", "1"}],
"]"}]}]}], "}"}]}], "}"}], ",",
RowBox[{"Frame", "\[Rule]", "All"}]}], "]"}]], "Input",
CellChangeTimes->{{3.566464785836546*^9, 3.566464922427055*^9}, {
3.566465015797369*^9, 3.566465017957149*^9}, {3.566465128566176*^9,
3.5664651291977663`*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{
InterpretationBox[Cell[BoxData[
FormBox["\<\"Verh\[ADoubleDot]ltnis\"\>", TextForm]], "InlineText"],
Text["Verh\[ADoubleDot]ltnis"]],
InterpretationBox[Cell[BoxData[
FormBox["\<\"aus Frequenzmessung\"\>", TextForm]], "InlineText"],
Text["aus Frequenzmessung"]],
InterpretationBox[Cell[BoxData[
FormBox["\<\"aus L\[ADoubleDot]ngenmessung\"\>", TextForm]],
"InlineText"],
Text["aus L\[ADoubleDot]ngenmessung"]]},
{
InterpretationBox[Cell[BoxData[
FormBox["\<\"\\!\\(\\*FractionBox[SubscriptBox[\\(\[Kappa]\\), \\(oben\
\\)], SubscriptBox[\\(\[Kappa]\\), \\(mitte\\)]]\\)\"\>", TextForm]],
"InlineText"],
Text[
"\!\(\*FractionBox[SubscriptBox[\(\[Kappa]\), \(oben\)], \
SubscriptBox[\(\[Kappa]\), \(mitte\)]]\)"]],
RowBox[{
TagBox[
InterpretationBox["\<\"0.4\"\>",
0.37036236642619824`,
AutoDelete->True],
NumberForm[#, 1]& ], "\[PlusMinus]",
TagBox[
InterpretationBox["\<\"0.4\"\>",
0.37106686210708134`,
AutoDelete->True],
NumberForm[#, 1]& ]}],
RowBox[{
TagBox[
InterpretationBox["\<\"0.126\"\>",
0.1259105098855359,
AutoDelete->True],
NumberForm[#, 3]& ], "\[PlusMinus]",
TagBox[
InterpretationBox["\<\"0.005\"\>",
0.004858265281122052,
AutoDelete->True],
NumberForm[#, 1]& ]}]}
},
AutoDelete->False,
GridBoxFrame->{"Columns" -> {{True}}, "Rows" -> {{True}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{{3.56646489123409*^9, 3.56646492282133*^9}, {
3.566465016169903*^9, 3.566465018256419*^9}, 3.566465129831964*^9,
3.566465776769813*^9}]
}, Open ]],
Cell["\<\
Hier l\[ADoubleDot]\[SZ]t sich tats\[ADoubleDot]chlich nicht viel sagen, da \
der Fehler auf das Verh\[ADoubleDot]ltnis dank gro\[SZ]er \
Frequenzme\[SZ]fehler so gro\[SZ] ist wie das Verh\[ADoubleDot]ltnis selbst.\
\>", "Text",
CellChangeTimes->{{3.5664649269610033`*^9, 3.566464956093604*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell["Oben\[Dash]Unten", "Subsection",
CellChangeTimes->{{3.566464484382897*^9, 3.566464486292289*^9}, {
3.566464964200389*^9, 3.5664649645808067`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["V",
RowBox[{"oben", ",", "unten"}]], "=",
FractionBox[
SubscriptBox["\[Kappa]", "oben"],
SubscriptBox["\[Kappa]", "unten"]]}]], "Input",
CellChangeTimes->{{3.5664644883666058`*^9, 3.566464503641521*^9}, {
3.566464966374454*^9, 3.566464968905569*^9}}],
Cell[BoxData["0.15730886145757847`"], "Output",
CellChangeTimes->{3.566464505062645*^9, 3.5664646115797167`*^9,
3.566464650742207*^9, 3.566464993582347*^9, 3.566465776905204*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]V",
RowBox[{"oben", ",", "unten"}]], "=",
SqrtBox[
RowBox[{
SuperscriptBox[
RowBox[{"(",
FractionBox[
SubscriptBox["\[CapitalDelta]\[Kappa]", "oben"],
SubscriptBox["\[Kappa]", "unten"]], ")"}], "2"], "+",
SuperscriptBox[
RowBox[{"(",
FractionBox[
RowBox[{
SubscriptBox["\[Kappa]", "oben"],
SubscriptBox["\[CapitalDelta]\[Kappa]", "unten"]}],
SuperscriptBox[
SubscriptBox["\[Kappa]", "unten"], "2"]], ")"}], "2"]}]]}]], "Input",
CellChangeTimes->{{3.566464507731227*^9, 3.566464558658967*^9}, {
3.566464970410468*^9, 3.5664649736514063`*^9}}],
Cell[BoxData["0.14520747507512055`"], "Output",
CellChangeTimes->{3.5664645608561373`*^9, 3.566464611634623*^9,
3.566464652493403*^9, 3.566464994971019*^9, 3.566465776950935*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["V",
RowBox[{"oben", ",", "unten", ",", "approx"}]], "=",
FractionBox[
SuperscriptBox[
SubscriptBox["l", "oben"], "2"],
SuperscriptBox[
SubscriptBox["l", "unten"], "2"]]}]], "Input",
CellChangeTimes->{{3.566464671523261*^9, 3.566464687632367*^9}, {
3.566464974937446*^9, 3.5664649760012197`*^9}}],
Cell[BoxData["0.03251814028486966`"], "Output",
CellChangeTimes->{3.5664646888611298`*^9, 3.566464997635832*^9,
3.566465777122527*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]V",
RowBox[{"oben", ",", "unten", ",", "approx"}]], "=",
SqrtBox[
RowBox[{
SuperscriptBox[
RowBox[{"(",
FractionBox[
RowBox[{"2",
SubscriptBox["l", "oben"],
SubscriptBox["\[CapitalDelta]l", "oben"]}],
SuperscriptBox[
SubscriptBox["l", "unten"], "2"]], ")"}], "2"], "+",
SuperscriptBox[
RowBox[{"(",
FractionBox[
RowBox[{"2",
SuperscriptBox[
SubscriptBox["l", "oben"], "2"],
SubscriptBox["\[CapitalDelta]l", "unten"]}],
SuperscriptBox[
SubscriptBox["l", "unten"], "3"]], ")"}], "2"]}]]}]], "Input",
CellChangeTimes->{{3.566464699927703*^9, 3.566464757749236*^9}, {
3.5664649777869873`*^9, 3.5664649821219273`*^9}}],
Cell[BoxData["0.0012015500109026152`"], "Output",
CellChangeTimes->{3.566464759566761*^9, 3.56646500131118*^9,
3.5664657777574263`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Text", "[", "\"\\"", "]"}], ",",
RowBox[{"Text", "[", "\"\\"", "]"}], ",",
RowBox[{"Text", "[", "\"\\"", "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
"Text", "[",
"\"\<\!\(\*FractionBox[SubscriptBox[\(\[Kappa]\), \(oben\)], \
SubscriptBox[\(\[Kappa]\), \(unten\)]]\)\>\"", "]"}], ",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["V",
RowBox[{"oben", ",", "unten"}]], ",", "1"}], "]"}], "\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]V",
RowBox[{"oben", ",", "unten"}]], ",", "1"}], "]"}]}], ",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["V",
RowBox[{"oben", ",", "unten", ",", "approx"}]], ",", "2"}], "]"}],
"\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]V",
RowBox[{"oben", ",", "unten", ",", "approx"}]], ",", "1"}],
"]"}]}]}], "}"}]}], "}"}], ",",
RowBox[{"Frame", "\[Rule]", "All"}]}], "]"}]], "Input",
CellChangeTimes->{{3.566464785836546*^9, 3.566464922427055*^9}, {
3.5664649855871677`*^9, 3.566464990153905*^9}, {3.5664650220846643`*^9,
3.56646503146001*^9}, {3.566465112217237*^9, 3.5664651126547337`*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{
InterpretationBox[Cell[BoxData[
FormBox["\<\"Verh\[ADoubleDot]ltnis\"\>", TextForm]], "InlineText"],
Text["Verh\[ADoubleDot]ltnis"]],
InterpretationBox[Cell[BoxData[
FormBox["\<\"aus Frequenzmessung\"\>", TextForm]], "InlineText"],
Text["aus Frequenzmessung"]],
InterpretationBox[Cell[BoxData[
FormBox["\<\"aus L\[ADoubleDot]ngenmessung\"\>", TextForm]],
"InlineText"],
Text["aus L\[ADoubleDot]ngenmessung"]]},
{
InterpretationBox[Cell[BoxData[
FormBox["\<\"\\!\\(\\*FractionBox[SubscriptBox[\\(\[Kappa]\\), \\(oben\
\\)], SubscriptBox[\\(\[Kappa]\\), \\(unten\\)]]\\)\"\>", TextForm]],
"InlineText"],
Text[
"\!\(\*FractionBox[SubscriptBox[\(\[Kappa]\), \(oben\)], \
SubscriptBox[\(\[Kappa]\), \(unten\)]]\)"]],
RowBox[{
TagBox[
InterpretationBox["\<\"0.2\"\>",
0.15730886145757847`,
AutoDelete->True],
NumberForm[#, 1]& ], "\[PlusMinus]",
TagBox[
InterpretationBox["\<\"0.1\"\>",
0.14520747507512055`,
AutoDelete->True],
NumberForm[#, 1]& ]}],
RowBox[{
TagBox[
InterpretationBox["\<\"0.033\"\>",
0.03251814028486966,
AutoDelete->True],
NumberForm[#, 2]& ], "\[PlusMinus]",
TagBox[
InterpretationBox["\<\"0.001\"\>",
0.0012015500109026152`,
AutoDelete->True],
NumberForm[#, 1]& ]}]}
},
AutoDelete->False,
GridBoxFrame->{"Columns" -> {{True}}, "Rows" -> {{True}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{{3.56646489123409*^9, 3.56646492282133*^9}, {
3.5664650048524237`*^9, 3.566465031743923*^9}, 3.566465113072144*^9,
3.566465777804165*^9}]
}, Open ]],
Cell["\<\
Auch hier haben wir einen sehr gro\[SZ]en Fehler bei dem Wert, der sich aus \
der Frequenzmessung ergibt, und k\[ODoubleDot]nnen daher kaum etwas \
\[UDoubleDot]ber die Qualit\[ADoubleDot]t der Approximation aussagen.\
\>", "Text",
CellChangeTimes->{{3.5664649269610033`*^9, 3.566464956093604*^9}, {
3.566465007769988*^9, 3.5664650584388943`*^9}, {3.566465123623912*^9,
3.56646512453049*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell["Mitte\[Dash]Unten", "Subsection",
CellChangeTimes->{{3.566464484382897*^9, 3.566464486292289*^9}, {
3.566464964200389*^9, 3.5664649645808067`*^9}, {3.566465066287581*^9,
3.566465066750184*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["V",
RowBox[{"mitte", ",", "unten"}]], "=",
FractionBox[
SubscriptBox["\[Kappa]", "mitte"],
SubscriptBox["\[Kappa]", "unten"]]}]], "Input",
CellChangeTimes->{{3.5664644883666058`*^9, 3.566464503641521*^9}, {
3.566464966374454*^9, 3.566464968905569*^9}, {3.566465068143786*^9,
3.566465071410757*^9}}],
Cell[BoxData["0.42474310490972966`"], "Output",
CellChangeTimes->{3.566464505062645*^9, 3.5664646115797167`*^9,
3.566464650742207*^9, 3.566464993582347*^9, 3.566465072206768*^9,
3.5664657778529453`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]V",
RowBox[{"mitte", ",", "unten"}]], "=",
SqrtBox[
RowBox[{
SuperscriptBox[
RowBox[{"(",
FractionBox[
SubscriptBox["\[CapitalDelta]\[Kappa]", "mitte"],
SubscriptBox["\[Kappa]", "unten"]], ")"}], "2"], "+",
SuperscriptBox[
RowBox[{"(",
FractionBox[
RowBox[{
SubscriptBox["\[Kappa]", "mitte"],
SubscriptBox["\[CapitalDelta]\[Kappa]", "unten"]}],
SuperscriptBox[
SubscriptBox["\[Kappa]", "unten"], "2"]], ")"}], "2"]}]]}]], "Input",
CellChangeTimes->{{3.566464507731227*^9, 3.566464558658967*^9}, {
3.566464970410468*^9, 3.5664649736514063`*^9}, {3.566465074130807*^9,
3.566465076675565*^9}, {3.566465562522799*^9, 3.566465584327271*^9}}],
Cell[BoxData["0.17901403352751474`"], "Output",
CellChangeTimes->{
3.5664645608561373`*^9, 3.566464611634623*^9, 3.566464652493403*^9,
3.566464994971019*^9, 3.5664650773652782`*^9, {3.566465570424958*^9,
3.566465584714521*^9}, 3.5664657779070587`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["V",
RowBox[{"mitte", ",", "unten", ",", "approx"}]], "=",
FractionBox[
SuperscriptBox[
SubscriptBox["l", "mitte"], "2"],
SuperscriptBox[
SubscriptBox["l", "unten"], "2"]]}]], "Input",
CellChangeTimes->{{3.566464671523261*^9, 3.566464687632367*^9}, {
3.566464974937446*^9, 3.5664649760012197`*^9}, {3.566465080130744*^9,
3.566465081578369*^9}}],
Cell[BoxData["0.2582639075517334`"], "Output",
CellChangeTimes->{3.5664646888611298`*^9, 3.566464997635832*^9,
3.566465082164933*^9, 3.566465778090639*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalDelta]V",
RowBox[{"mitte", ",", "unten", ",", "approx"}]], "=",
SqrtBox[
RowBox[{
SuperscriptBox[
RowBox[{"(",
FractionBox[
RowBox[{"2",
SubscriptBox["l", "mitte"],
SubscriptBox["\[CapitalDelta]l", "mitte"]}],
SuperscriptBox[
SubscriptBox["l", "unten"], "2"]], ")"}], "2"], "+",
SuperscriptBox[
RowBox[{"(",
FractionBox[
RowBox[{"2",
SuperscriptBox[
SubscriptBox["l", "mitte"], "2"],
SubscriptBox["\[CapitalDelta]l", "unten"]}],
SuperscriptBox[
SubscriptBox["l", "unten"], "3"]], ")"}], "2"]}]]}]], "Input",
CellChangeTimes->{{3.566464699927703*^9, 3.566464757749236*^9}, {
3.5664649777869873`*^9, 3.5664649821219273`*^9}, {3.566465085299266*^9,
3.566465089362541*^9}}],
Cell[BoxData["0.003738073916186719`"], "Output",
CellChangeTimes->{3.566464759566761*^9, 3.56646500131118*^9,
3.566465090132235*^9, 3.566465778541394*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Text", "[", "\"\\"", "]"}], ",",
RowBox[{"Text", "[", "\"\\"", "]"}], ",",
RowBox[{"Text", "[", "\"\\"", "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
"Text", "[",
"\"\<\!\(\*FractionBox[SubscriptBox[\(\[Kappa]\), \(mitte\)], \
SubscriptBox[\(\[Kappa]\), \(unten\)]]\)\>\"", "]"}], ",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["V",
RowBox[{"mitte", ",", "unten"}]], ",", "1"}], "]"}],
"\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]V",
RowBox[{"mitte", ",", "unten"}]], ",", "1"}], "]"}]}], ",",
RowBox[{
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["V",
RowBox[{"mitte", ",", "unten", ",", "approx"}]], ",", "3"}], "]"}],
"\[PlusMinus]",
RowBox[{"NumberForm", "[",
RowBox[{
SubscriptBox["\[CapitalDelta]V",
RowBox[{"mitte", ",", "unten", ",", "approx"}]], ",", "1"}],
"]"}]}]}], "}"}]}], "}"}], ",",
RowBox[{"Frame", "\[Rule]", "All"}]}], "]"}]], "Input",
CellChangeTimes->{{3.566464785836546*^9, 3.566464922427055*^9}, {
3.5664649855871677`*^9, 3.566464990153905*^9}, {3.5664650220846643`*^9,
3.56646503146001*^9}, {3.566465092675561*^9, 3.566465108326977*^9},
3.5664651706267548`*^9}],
Cell[BoxData[
TagBox[GridBox[{
{
InterpretationBox[Cell[BoxData[
FormBox["\<\"Verh\[ADoubleDot]ltnis\"\>", TextForm]], "InlineText"],
Text["Verh\[ADoubleDot]ltnis"]],
InterpretationBox[Cell[BoxData[
FormBox["\<\"aus Frequenzmessung\"\>", TextForm]], "InlineText"],
Text["aus Frequenzmessung"]],
InterpretationBox[Cell[BoxData[
FormBox["\<\"aus L\[ADoubleDot]ngenmessung\"\>", TextForm]],
"InlineText"],
Text["aus L\[ADoubleDot]ngenmessung"]]},
{
InterpretationBox[Cell[BoxData[
FormBox["\<\"\\!\\(\\*FractionBox[SubscriptBox[\\(\[Kappa]\\), \
\\(mitte\\)], SubscriptBox[\\(\[Kappa]\\), \\(unten\\)]]\\)\"\>", TextForm]],
"InlineText"],
Text[
"\!\(\*FractionBox[SubscriptBox[\(\[Kappa]\), \(mitte\)], SubscriptBox[\
\(\[Kappa]\), \(unten\)]]\)"]],
RowBox[{
TagBox[
InterpretationBox["\<\"0.4\"\>",
0.42474310490972966`,
AutoDelete->True],
NumberForm[#, 1]& ], "\[PlusMinus]",
TagBox[
InterpretationBox["\<\"0.2\"\>",
0.17901403352751474`,
AutoDelete->True],
NumberForm[#, 1]& ]}],
RowBox[{
TagBox[
InterpretationBox["\<\"0.258\"\>",
0.2582639075517334,
AutoDelete->True],
NumberForm[#, 3]& ], "\[PlusMinus]",
TagBox[
InterpretationBox["\<\"0.004\"\>",
0.003738073916186719,
AutoDelete->True],
NumberForm[#, 1]& ]}]}
},
AutoDelete->False,
GridBoxFrame->{"Columns" -> {{True}}, "Rows" -> {{True}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{{3.56646489123409*^9, 3.56646492282133*^9}, {
3.5664650048524237`*^9, 3.566465031743923*^9}, {3.566465098984231*^9,
3.5664651089991913`*^9}, 3.566465171048339*^9, 3.566465778759926*^9}]
}, Open ]],
Cell[TextData[{
"Hier haben wir Werte, die zumindest im ",
Cell[BoxData[
FormBox[
RowBox[{"1", "\[Sigma]"}], TraditionalForm]],
FormatType->"TraditionalForm"],
"-Bereich zur Deckung kommen. Sehr aufschlu\[SZ]reich ist diese Aussage \
indes auch nicht."
}], "Text",
CellChangeTimes->{{3.5664649269610033`*^9, 3.566464956093604*^9}, {
3.566465007769988*^9, 3.5664650584388943`*^9}, {3.566465139352949*^9,
3.566465181822682*^9}}]
}, Open ]]
}, Open ]]
}, Open ]]
},
WindowSize->{760, 784},
WindowMargins->{{276, Automatic}, {Automatic, 0}},
FrontEndVersion->"9.0 for Microsoft Windows (64-bit) (November 20, 2012)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[557, 20, 69, 1, 31, "Input"],
Cell[CellGroupData[{
Cell[651, 25, 102, 1, 90, "Title"],
Cell[CellGroupData[{
Cell[778, 30, 108, 1, 79, "Section"],
Cell[889, 33, 189, 4, 30, "Text"],
Cell[1081, 39, 496, 13, 112, "Input"],
Cell[1580, 54, 602, 12, 31, "Input"],
Cell[2185, 68, 257, 7, 31, "Input"],
Cell[CellGroupData[{
Cell[2467, 79, 693, 13, 31, "Input"],
Cell[3163, 94, 18542, 309, 405, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[21742, 408, 427, 10, 31, "Input"],
Cell[22172, 420, 18256, 305, 404, "Output"]
}, Open ]],
Cell[40443, 728, 546, 16, 31, "Input"],
Cell[40992, 746, 525, 16, 31, "Input"],
Cell[41520, 764, 214, 4, 49, "Text"],
Cell[CellGroupData[{
Cell[41759, 772, 754, 24, 52, "Input"],
Cell[42516, 798, 2646, 74, 172, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[45199, 877, 754, 24, 52, "Input"],
Cell[45956, 903, 3326, 108, 192, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[49319, 1016, 666, 19, 72, "Input"],
Cell[49988, 1037, 24241, 599, 152, "Output"]
}, Open ]],
Cell[74244, 1639, 372, 10, 31, "Input"],
Cell[74619, 1651, 143, 3, 30, "Text"],
Cell[CellGroupData[{
Cell[74787, 1658, 240, 7, 48, "Input"],
Cell[75030, 1667, 677, 15, 31, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[75744, 1687, 333, 9, 49, "Input"],
Cell[76080, 1698, 647, 15, 31, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[76764, 1718, 803, 25, 52, "Input"],
Cell[77570, 1745, 2701, 74, 172, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[80308, 1824, 807, 25, 52, "Input"],
Cell[81118, 1851, 3437, 110, 192, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[84592, 1966, 922, 25, 92, "Input"],
Cell[85517, 1993, 23843, 590, 172, "Output"]
}, Open ]],
Cell[109375, 2586, 421, 11, 31, "Input"],
Cell[109799, 2599, 145, 3, 30, "Text"],
Cell[CellGroupData[{
Cell[109969, 2606, 291, 8, 48, "Input"],
Cell[110263, 2616, 748, 16, 31, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[111048, 2637, 382, 10, 49, "Input"],
Cell[111433, 2649, 720, 16, 31, "Output"]
}, Open ]],
Cell[112168, 2668, 44, 1, 1, "PageBreak",
PageBreakBelow->True]
}, Open ]],
Cell[CellGroupData[{
Cell[112249, 2674, 140, 3, 79, "Section"],
Cell[112392, 2679, 147, 3, 30, "Text"],
Cell[CellGroupData[{
Cell[112564, 2686, 221, 5, 31, "Input"],
Cell[112788, 2693, 493, 11, 31, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[113318, 2709, 236, 5, 31, "Input"],
Cell[113557, 2716, 493, 11, 31, "Output"]
}, Open ]],
Cell[114065, 2730, 149, 3, 30, "Text"],
Cell[114217, 2735, 417, 11, 112, "Input"],
Cell[114637, 2748, 742, 14, 33, "Input"],
Cell[115382, 2764, 396, 10, 33, "Input"],
Cell[115781, 2776, 413, 11, 112, "Input"],
Cell[116197, 2789, 774, 15, 33, "Input"],
Cell[116974, 2806, 418, 10, 33, "Input"],
Cell[117395, 2818, 459, 12, 112, "Input"],
Cell[117857, 2832, 776, 15, 33, "Input"],
Cell[118636, 2849, 822, 15, 33, "Input"],
Cell[CellGroupData[{
Cell[119483, 2868, 443, 11, 55, "Input"],
Cell[119929, 2881, 60699, 1002, 404, "Output"]
}, Open ]],
Cell[180643, 3886, 265, 5, 30, "Text"],
Cell[180911, 3893, 539, 15, 33, "Input"],
Cell[181453, 3910, 537, 15, 33, "Input"],
Cell[CellGroupData[{
Cell[182015, 3929, 624, 17, 55, "Input"],
Cell[182642, 3948, 11204, 191, 402, "Output"]
}, Open ]],
Cell[193861, 4142, 345, 9, 51, "Text"],
Cell[CellGroupData[{
Cell[194231, 4155, 1017, 28, 76, "Input"],
Cell[195251, 4185, 1240, 31, 72, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[196528, 4221, 840, 26, 76, "Input"],
Cell[197371, 4249, 1520, 47, 92, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[198928, 4301, 981, 29, 76, "Input"],
Cell[199912, 4332, 1166, 32, 72, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[201115, 4369, 840, 26, 76, "Input"],
Cell[201958, 4397, 1410, 44, 92, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[203405, 4446, 1225, 33, 134, "Input"],
Cell[204633, 4481, 16652, 412, 112, "Output"]
}, Open ]],
Cell[221300, 4896, 676, 17, 33, "Input"],
Cell[CellGroupData[{
Cell[222001, 4917, 492, 12, 50, "Input"],
Cell[222496, 4931, 869, 18, 31, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[223402, 4954, 614, 15, 51, "Input"],
Cell[224019, 4971, 836, 18, 31, "Output"]
}, Open ]],
Cell[224870, 4992, 193, 4, 30, "Text"],
Cell[CellGroupData[{
Cell[225088, 5000, 115, 1, 43, "Subsection"],
Cell[CellGroupData[{
Cell[225228, 5005, 443, 11, 55, "Input"],
Cell[225674, 5018, 37865, 627, 399, "Output"]
}, Open ]],
Cell[263554, 5648, 317, 6, 49, "Text"],
Cell[263874, 5656, 494, 15, 33, "Input"],
Cell[264371, 5673, 492, 15, 33, "Input"],
Cell[CellGroupData[{
Cell[264888, 5692, 677, 18, 55, "Input"],
Cell[265568, 5712, 3447, 63, 395, "Output"]
}, Open ]],
Cell[269030, 5778, 385, 10, 32, "Text"],
Cell[CellGroupData[{
Cell[269440, 5792, 971, 28, 76, "Input"],
Cell[270414, 5822, 589, 13, 31, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[271040, 5840, 791, 25, 76, "Input"],
Cell[271834, 5867, 509, 14, 31, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[272380, 5886, 932, 28, 76, "Input"],
Cell[273315, 5916, 446, 12, 31, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[273798, 5933, 791, 25, 76, "Input"],
Cell[274592, 5960, 481, 14, 31, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[275110, 5979, 1177, 32, 134, "Input"],
Cell[276290, 6013, 3193, 79, 31, "Output"]
}, Open ]],
Cell[279498, 6095, 626, 16, 33, "Input"],
Cell[CellGroupData[{
Cell[280149, 6115, 444, 11, 50, "Input"],
Cell[280596, 6128, 843, 18, 31, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[281476, 6151, 561, 14, 51, "Input"],
Cell[282040, 6167, 813, 17, 28, "Output"]
}, Open ]],
Cell[282868, 6187, 152, 3, 30, "Text"]
}, Open ]],
Cell[CellGroupData[{
Cell[283057, 6195, 99, 1, 44, "Subsection"],
Cell[CellGroupData[{
Cell[283181, 6200, 368, 8, 35, "Input"],
Cell[283552, 6210, 58739, 969, 401, "Output"]
}, Open ]],
Cell[342306, 7182, 91, 1, 28, "Input"],
Cell[CellGroupData[{
Cell[342422, 7187, 368, 8, 35, "Input"],
Cell[342793, 7197, 58415, 964, 401, "Output"]
}, Open ]],
Cell[401223, 8164, 1106, 22, 133, "Text"],
Cell[402332, 8188, 311, 10, 34, "Text"],
Cell[CellGroupData[{
Cell[402668, 8202, 659, 18, 49, "Input"],
Cell[403330, 8222, 583, 15, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[403950, 8242, 487, 14, 33, "Input"],
Cell[404440, 8258, 492, 13, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[404969, 8276, 930, 27, 118, "Input"],
Cell[405902, 8305, 2707, 68, 28, "Output"]
}, Open ]],
Cell[408624, 8376, 681, 17, 57, "Input"],
Cell[409308, 8395, 215, 4, 49, "Text"],
Cell[CellGroupData[{
Cell[409548, 8403, 502, 11, 50, "Input"],
Cell[410053, 8416, 890, 18, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[410980, 8439, 685, 16, 54, "Input"],
Cell[411668, 8457, 885, 18, 28, "Output"]
}, Open ]],
Cell[412568, 8478, 291, 9, 34, "Text"],
Cell[CellGroupData[{
Cell[412884, 8491, 1325, 35, 117, "Input"],
Cell[414212, 8528, 1262, 32, 63, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[415511, 8565, 1073, 32, 117, "Input"],
Cell[416587, 8599, 1456, 45, 63, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[418080, 8649, 1375, 36, 117, "Input"],
Cell[419458, 8687, 1336, 34, 63, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[420831, 8726, 1075, 32, 117, "Input"],
Cell[421909, 8760, 1464, 45, 80, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[423410, 8810, 1235, 33, 134, "Input"],
Cell[424648, 8845, 17053, 421, 97, "Output"]
}, Open ]],
Cell[441716, 9269, 677, 17, 35, "Input"],
Cell[CellGroupData[{
Cell[442418, 9290, 493, 12, 53, "Input"],
Cell[442914, 9304, 867, 18, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[443818, 9327, 635, 15, 55, "Input"],
Cell[444456, 9344, 864, 18, 28, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[445369, 9368, 114, 1, 44, "Subsection"],
Cell[445486, 9371, 796, 20, 76, "Text"],
Cell[446285, 9393, 1815, 60, 67, "Text"],
Cell[CellGroupData[{
Cell[448125, 9457, 451, 13, 48, "Input"],
Cell[448579, 9472, 632, 15, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[449248, 9492, 443, 12, 48, "Input"],
Cell[449694, 9506, 580, 14, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[450311, 9525, 399, 12, 48, "Input"],
Cell[450713, 9539, 581, 14, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[451331, 9558, 444, 12, 48, "Input"],
Cell[451778, 9572, 580, 14, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[452395, 9591, 2484, 66, 119, "Input"],
Cell[454882, 9659, 7013, 177, 85, "Output"]
}, Open ]],
Cell[461910, 9839, 458, 10, 53, "Text"]
}, Open ]],
Cell[CellGroupData[{
Cell[462405, 9854, 103, 1, 44, "Subsection"],
Cell[462511, 9857, 205, 4, 30, "Text"],
Cell[CellGroupData[{
Cell[462741, 9865, 619, 19, 57, "Input"],
Cell[463363, 9886, 231, 3, 28, "Output"]
}, Open ]],
Cell[463609, 9892, 159, 3, 30, "Text"],
Cell[CellGroupData[{
Cell[463793, 9899, 1263, 37, 57, "Input"],
Cell[465059, 9938, 232, 3, 28, "Output"]
}, Open ]],
Cell[465306, 9944, 377, 8, 50, "Text"],
Cell[465686, 9954, 44, 1, 1, "PageBreak",
PageBreakBelow->True]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[465779, 9961, 152, 3, 80, "Section"],
Cell[465934, 9966, 241, 4, 49, "Text"],
Cell[466178, 9972, 147, 3, 30, "Text"],
Cell[CellGroupData[{
Cell[466350, 9979, 272, 6, 28, "Input"],
Cell[466625, 9987, 523, 12, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[467185, 10004, 288, 6, 28, "Input"],
Cell[467476, 10012, 516, 12, 28, "Output"]
}, Open ]],
Cell[468007, 10027, 149, 3, 30, "Text"],
Cell[468159, 10032, 470, 12, 97, "Input"],
Cell[468632, 10046, 792, 15, 33, "Input"],
Cell[469427, 10063, 443, 10, 33, "Input"],
Cell[469873, 10075, 465, 12, 97, "Input"],
Cell[470341, 10089, 821, 15, 33, "Input"],
Cell[471165, 10106, 471, 11, 33, "Input"],
Cell[471639, 10119, 509, 13, 97, "Input"],
Cell[472151, 10134, 827, 15, 33, "Input"],
Cell[472981, 10151, 879, 16, 33, "Input"],
Cell[CellGroupData[{
Cell[473885, 10171, 493, 12, 57, "Input"],
Cell[474381, 10185, 44915, 744, 406, "Output"]
}, Open ]],
Cell[519311, 10932, 394, 6, 49, "Text"],
Cell[519708, 10940, 613, 16, 35, "Input"],
Cell[520324, 10958, 613, 16, 35, "Input"],
Cell[520940, 10976, 309, 10, 34, "Text"],
Cell[CellGroupData[{
Cell[521274, 10990, 1071, 29, 75, "Input"],
Cell[522348, 11021, 3778, 104, 216, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[526163, 11130, 891, 27, 75, "Input"],
Cell[527057, 11159, 3999, 129, 199, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[531093, 11293, 938, 27, 75, "Input"],
Cell[532034, 11322, 3218, 90, 182, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[535289, 11417, 893, 27, 75, "Input"],
Cell[536185, 11446, 4072, 131, 199, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[540294, 11582, 1276, 33, 134, "Input"],
Cell[541573, 11617, 52727, 1304, 284, "Output"]
}, Open ]],
Cell[594315, 12924, 733, 18, 57, "Input"],
Cell[CellGroupData[{
Cell[595073, 12946, 543, 13, 53, "Input"],
Cell[595619, 12961, 886, 18, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[596542, 12984, 668, 16, 55, "Input"],
Cell[597213, 13002, 860, 18, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[598110, 13025, 115, 1, 44, "Subsection"],
Cell[CellGroupData[{
Cell[598250, 13030, 493, 12, 57, "Input"],
Cell[598746, 13044, 44920, 744, 396, "Output"]
}, Open ]],
Cell[643681, 13791, 261, 5, 49, "Text"],
Cell[643945, 13798, 664, 17, 35, "Input"],
Cell[644612, 13817, 667, 17, 35, "Input"],
Cell[645282, 13836, 403, 10, 34, "Text"],
Cell[CellGroupData[{
Cell[645710, 13850, 1019, 28, 75, "Input"],
Cell[646732, 13880, 3639, 100, 199, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[650408, 13985, 842, 26, 75, "Input"],
Cell[651253, 14013, 4638, 150, 216, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[655928, 14168, 892, 27, 75, "Input"],
Cell[656823, 14197, 3662, 103, 216, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[660522, 14305, 844, 26, 75, "Input"],
Cell[661369, 14333, 4431, 143, 216, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[665837, 14481, 1307, 34, 134, "Input"],
Cell[667147, 14517, 57010, 1412, 301, "Output"]
}, Open ]],
Cell[724172, 15932, 679, 17, 57, "Input"],
Cell[CellGroupData[{
Cell[724876, 15953, 495, 12, 53, "Input"],
Cell[725374, 15967, 868, 18, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[726279, 15990, 615, 15, 55, "Input"],
Cell[726897, 16007, 842, 18, 28, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[727788, 16031, 99, 1, 44, "Subsection"],
Cell[CellGroupData[{
Cell[727912, 16036, 392, 8, 35, "Input"],
Cell[728307, 16046, 24822, 412, 401, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[753166, 16463, 397, 9, 35, "Input"],
Cell[753566, 16474, 24804, 413, 401, "Output"]
}, Open ]],
Cell[778385, 16890, 1218, 24, 133, "Text"],
Cell[779606, 16916, 333, 10, 34, "Text"],
Cell[CellGroupData[{
Cell[779964, 16930, 756, 19, 49, "Input"],
Cell[780723, 16951, 607, 15, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[781367, 16971, 628, 17, 49, "Input"],
Cell[781998, 16990, 587, 16, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[782622, 17011, 982, 28, 118, "Input"],
Cell[783607, 17041, 3108, 77, 28, "Output"]
}, Open ]],
Cell[786730, 17121, 735, 18, 57, "Input"],
Cell[CellGroupData[{
Cell[787490, 17143, 554, 12, 50, "Input"],
Cell[788047, 17157, 917, 19, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[789001, 17181, 738, 17, 54, "Input"],
Cell[789742, 17200, 912, 19, 28, "Output"]
}, Open ]],
Cell[790669, 17222, 292, 9, 34, "Text"],
Cell[CellGroupData[{
Cell[790986, 17235, 1429, 37, 117, "Input"],
Cell[792418, 17274, 1099, 26, 46, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[793554, 17305, 1170, 33, 117, "Input"],
Cell[794727, 17340, 1239, 37, 63, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[796003, 17382, 1592, 41, 117, "Input"],
Cell[797598, 17425, 1178, 28, 63, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[798813, 17458, 1312, 37, 117, "Input"],
Cell[800128, 17497, 1516, 46, 80, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[801681, 17548, 1286, 33, 134, "Input"],
Cell[802970, 17583, 13149, 323, 80, "Output"]
}, Open ]],
Cell[816134, 17909, 732, 18, 57, "Input"],
Cell[CellGroupData[{
Cell[816891, 17931, 544, 13, 53, "Input"],
Cell[817438, 17946, 887, 18, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[818362, 17969, 662, 16, 55, "Input"],
Cell[819027, 17987, 893, 19, 28, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[819969, 18012, 114, 1, 44, "Subsection"],
Cell[CellGroupData[{
Cell[820108, 18017, 504, 14, 48, "Input"],
Cell[820615, 18033, 654, 16, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[821306, 18054, 497, 13, 48, "Input"],
Cell[821806, 18069, 600, 14, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[822443, 18088, 453, 13, 48, "Input"],
Cell[822899, 18103, 602, 14, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[823538, 18122, 496, 13, 48, "Input"],
Cell[824037, 18137, 600, 14, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[824674, 18156, 2591, 67, 119, "Input"],
Cell[827268, 18225, 7073, 177, 85, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[834390, 18408, 103, 1, 44, "Subsection"],
Cell[CellGroupData[{
Cell[834518, 18413, 679, 20, 57, "Input"],
Cell[835200, 18435, 251, 3, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[835488, 18443, 1329, 38, 57, "Input"],
Cell[836820, 18483, 246, 3, 28, "Output"]
}, Open ]],
Cell[837081, 18489, 44, 1, 1, "PageBreak",
PageBreakBelow->True]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[837174, 18496, 188, 4, 80, "Section"],
Cell[837365, 18502, 147, 3, 30, "Text"],
Cell[CellGroupData[{
Cell[837537, 18509, 321, 7, 28, "Input"],
Cell[837861, 18518, 543, 12, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[838441, 18535, 311, 6, 28, "Input"],
Cell[838755, 18543, 542, 12, 28, "Output"]
}, Open ]],
Cell[839312, 18558, 149, 3, 30, "Text"],
Cell[839464, 18563, 493, 12, 97, "Input"],
Cell[839960, 18577, 821, 15, 33, "Input"],
Cell[840784, 18594, 473, 11, 33, "Input"],
Cell[841260, 18607, 488, 12, 97, "Input"],
Cell[841751, 18621, 847, 16, 33, "Input"],
Cell[842601, 18639, 495, 11, 33, "Input"],
Cell[843099, 18652, 533, 13, 97, "Input"],
Cell[843635, 18667, 855, 16, 33, "Input"],
Cell[844493, 18685, 901, 16, 33, "Input"],
Cell[CellGroupData[{
Cell[845419, 18705, 544, 13, 57, "Input"],
Cell[845966, 18720, 41396, 685, 402, "Output"]
}, Open ]],
Cell[887377, 19408, 412, 7, 49, "Text"],
Cell[887792, 19417, 798, 21, 35, "Input"],
Cell[888593, 19440, 800, 21, 35, "Input"],
Cell[889396, 19463, 357, 11, 34, "Text"],
Cell[CellGroupData[{
Cell[889778, 19478, 1121, 30, 75, "Input"],
Cell[890902, 19510, 2830, 76, 148, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[893769, 19591, 939, 27, 75, "Input"],
Cell[894711, 19620, 3389, 108, 165, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[898137, 19733, 987, 28, 75, "Input"],
Cell[899127, 19763, 2688, 75, 148, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[901852, 19843, 941, 27, 75, "Input"],
Cell[902796, 19872, 3371, 108, 165, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[906204, 19985, 1326, 34, 134, "Input"],
Cell[907533, 20021, 48491, 1197, 267, "Output"]
}, Open ]],
Cell[956039, 21221, 781, 18, 57, "Input"],
Cell[CellGroupData[{
Cell[956845, 21243, 589, 13, 53, "Input"],
Cell[957437, 21258, 914, 19, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[958388, 21282, 718, 16, 55, "Input"],
Cell[959109, 21300, 884, 18, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[960030, 21323, 115, 1, 44, "Subsection"],
Cell[CellGroupData[{
Cell[960170, 21328, 544, 13, 57, "Input"],
Cell[960717, 21343, 40673, 673, 401, "Output"]
}, Open ]],
Cell[1001405, 22019, 174, 4, 30, "Text"],
Cell[1001582, 22025, 718, 18, 35, "Input"],
Cell[1002303, 22045, 717, 18, 35, "Input"],
Cell[1003023, 22065, 457, 11, 34, "Text"],
Cell[CellGroupData[{
Cell[1003505, 22080, 1069, 29, 75, "Input"],
Cell[1004577, 22111, 4358, 120, 250, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1008972, 22236, 891, 27, 75, "Input"],
Cell[1009866, 22265, 5281, 171, 250, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1015184, 22441, 938, 27, 75, "Input"],
Cell[1016125, 22470, 4237, 119, 233, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1020399, 22594, 893, 27, 75, "Input"],
Cell[1021295, 22623, 5359, 174, 250, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1026691, 22802, 1353, 34, 134, "Input"],
Cell[1028047, 22838, 78941, 1953, 420, "Output"]
}, Open ]],
Cell[1107003, 24794, 727, 18, 57, "Input"],
Cell[CellGroupData[{
Cell[1107755, 24816, 543, 13, 53, "Input"],
Cell[1108301, 24831, 916, 19, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1109254, 24855, 664, 16, 55, "Input"],
Cell[1109921, 24873, 864, 18, 28, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1110834, 24897, 99, 1, 44, "Subsection"],
Cell[CellGroupData[{
Cell[1110958, 24902, 417, 9, 35, "Input"],
Cell[1111378, 24913, 23252, 387, 406, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1134667, 25305, 419, 9, 35, "Input"],
Cell[1135089, 25316, 23164, 386, 401, "Output"]
}, Open ]],
Cell[1158268, 25705, 329, 10, 34, "Text"],
Cell[CellGroupData[{
Cell[1158622, 25719, 1243, 32, 66, "Input"],
Cell[1159868, 25753, 1046, 28, 63, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1160951, 25786, 1132, 32, 66, "Input"],
Cell[1162086, 25820, 1033, 30, 46, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1163156, 25855, 1029, 28, 118, "Input"],
Cell[1164188, 25885, 7116, 176, 46, "Output"]
}, Open ]],
Cell[1171319, 26064, 781, 18, 57, "Input"],
Cell[CellGroupData[{
Cell[1172125, 26086, 604, 13, 50, "Input"],
Cell[1172732, 26101, 936, 19, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1173705, 26125, 786, 17, 54, "Input"],
Cell[1174494, 26144, 931, 19, 28, "Output"]
}, Open ]],
Cell[1175440, 26166, 530, 11, 53, "Text"],
Cell[CellGroupData[{
Cell[1175995, 26181, 1534, 38, 96, "Input"],
Cell[1177532, 26221, 756, 15, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1178325, 26241, 1301, 35, 96, "Input"],
Cell[1179629, 26278, 672, 17, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1180338, 26300, 1611, 39, 117, "Input"],
Cell[1181952, 26341, 833, 17, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1182822, 26363, 1350, 35, 117, "Input"],
Cell[1184175, 26400, 707, 17, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1184919, 26422, 1689, 42, 117, "Input"],
Cell[1186611, 26466, 803, 17, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1187451, 26488, 1404, 38, 117, "Input"],
Cell[1188858, 26528, 652, 17, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1189547, 26550, 1566, 38, 150, "Input"],
Cell[1191116, 26590, 5551, 135, 46, "Output"]
}, Open ]],
Cell[1196682, 26728, 780, 18, 57, "Input"],
Cell[CellGroupData[{
Cell[1197487, 26750, 590, 13, 53, "Input"],
Cell[1198080, 26765, 913, 19, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1199030, 26789, 710, 16, 55, "Input"],
Cell[1199743, 26807, 916, 19, 28, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1200708, 26832, 114, 1, 44, "Subsection"],
Cell[CellGroupData[{
Cell[1200847, 26837, 552, 14, 48, "Input"],
Cell[1201402, 26853, 674, 16, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1202113, 26874, 545, 14, 48, "Input"],
Cell[1202661, 26890, 627, 15, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1203325, 26910, 502, 14, 48, "Input"],
Cell[1203830, 26926, 624, 15, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1204491, 26946, 545, 14, 48, "Input"],
Cell[1205039, 26962, 625, 15, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1205701, 26982, 2638, 68, 119, "Input"],
Cell[1208342, 27052, 7071, 176, 85, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1215462, 27234, 103, 1, 44, "Subsection"],
Cell[CellGroupData[{
Cell[1215590, 27239, 725, 20, 57, "Input"],
Cell[1216318, 27261, 254, 3, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1216609, 27269, 1329, 38, 57, "Input"],
Cell[1217941, 27309, 280, 4, 28, "Output"]
}, Open ]],
Cell[1218236, 27316, 44, 1, 1, "PageBreak",
PageBreakBelow->True]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1218329, 27323, 136, 3, 80, "Section"],
Cell[1218468, 27328, 417, 7, 49, "Text"],
Cell[CellGroupData[{
Cell[1218910, 27339, 104, 1, 44, "Subsection"],
Cell[CellGroupData[{
Cell[1219039, 27344, 258, 7, 48, "Input"],
Cell[1219300, 27353, 160, 2, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1219497, 27360, 646, 19, 70, "Input"],
Cell[1220146, 27381, 160, 2, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1220343, 27388, 309, 9, 54, "Input"],
Cell[1220655, 27399, 112, 1, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1220804, 27405, 752, 23, 70, "Input"],
Cell[1221559, 27430, 112, 1, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1221708, 27436, 1546, 40, 150, "Input"],
Cell[1223257, 27478, 1825, 50, 71, "Output"]
}, Open ]],
Cell[1225097, 27531, 306, 5, 49, "Text"]
}, Open ]],
Cell[CellGroupData[{
Cell[1225440, 27541, 155, 2, 44, "Subsection"],
Cell[CellGroupData[{
Cell[1225620, 27547, 307, 8, 48, "Input"],
Cell[1225930, 27557, 182, 2, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1226149, 27564, 697, 20, 70, "Input"],
Cell[1226849, 27586, 182, 2, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1227068, 27593, 360, 10, 54, "Input"],
Cell[1227431, 27605, 138, 2, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1227606, 27612, 805, 24, 70, "Input"],
Cell[1228414, 27638, 139, 2, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1228590, 27645, 1595, 40, 150, "Input"],
Cell[1230188, 27687, 1830, 50, 71, "Output"]
}, Open ]],
Cell[1232033, 27740, 408, 7, 49, "Text"]
}, Open ]],
Cell[CellGroupData[{
Cell[1232478, 27752, 205, 3, 44, "Subsection"],
Cell[CellGroupData[{
Cell[1232708, 27759, 358, 9, 48, "Input"],
Cell[1233069, 27770, 209, 3, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1233315, 27778, 795, 21, 70, "Input"],
Cell[1234113, 27801, 262, 4, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1234412, 27810, 411, 11, 54, "Input"],
Cell[1234826, 27823, 159, 2, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1235022, 27830, 858, 25, 70, "Input"],
Cell[1235883, 27857, 158, 2, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1236078, 27864, 1637, 42, 150, "Input"],
Cell[1237718, 27908, 1877, 50, 71, "Output"]
}, Open ]],
Cell[1239610, 27961, 442, 11, 50, "Text"]
}, Open ]]
}, Open ]]
}, Open ]]
}
]
*)
(* End of internal cache information *)