(* Content-type: application/mathematica *)

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

(* CreatedBy='Mathematica 7.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       145,          7]
NotebookDataLength[     58535,       1137]
NotebookOptionsPosition[     57059,       1086]
NotebookOutlinePosition[     57458,       1103]
CellTagsIndexPosition[     57415,       1100]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["Interference of Waves & Beat frequencies", "Title",
 CellChangeTimes->{{3.473170329086286*^9, 3.473170367129527*^9}, {
  3.5032658611969347`*^9, 3.503265865689735*^9}}],

Cell["You do not have to turn this in; keep it for your notes.", "Subsubtitle",
 CellChangeTimes->{{3.473170348524406*^9, 3.473170356854623*^9}}],

Cell[CellGroupData[{

Cell["Example", "Subsection",
 CellChangeTimes->{{3.473170377012311*^9, 3.473170378121389*^9}}],

Cell[TextData[{
 StyleBox["Let's see what happens when we add two waves that are in phase.  \
We will use ",
  FontSize->14],
 StyleBox["Mathematica",
  FontSize->14,
  FontSlant->"Italic"],
 StyleBox["'s plot function to graph the waves, and then we'll tell it to \
show both waves on a single graph.  We'll plot the waves from t = 0 to t = 6.",
  FontSize->14]
}], "Text",
 CellChangeTimes->{{3.47317038634743*^9, 3.473170440604409*^9}, {
  3.473170677363858*^9, 3.4731706885462112`*^9}, {3.535051261337726*^9, 
  3.5350512627417355`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"wave1", "[", "t_", "]"}], " ", "=", " ", 
   RowBox[{"2", "*", " ", 
    RowBox[{"Cos", "[", 
     RowBox[{"4", "*", "t"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"wave2", "[", "t_", "]"}], " ", "=", " ", 
   RowBox[{"3", " ", "*", 
    RowBox[{"Cos", "[", 
     RowBox[{"4", "*", "t"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plot1", " ", "=", " ", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"wave1", "[", "t", "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "6"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plot2", " ", "=", " ", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"wave2", "[", "t", "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "6"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"Show", "[", 
  RowBox[{"plot1", ",", "plot2", ",", 
   RowBox[{"PlotRange", "\[Rule]", " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"-", "6"}], ",", "6"}], "}"}]}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.473170449042839*^9, 3.473170527434319*^9}, {
   3.473170570467105*^9, 3.473170593668686*^9}, 3.473170650205258*^9, {
   3.4731710598306847`*^9, 3.473171109306284*^9}, {3.473171147730987*^9, 
   3.473171168172574*^9}, {3.473171262361631*^9, 3.473171264358017*^9}, {
   3.473171415929885*^9, 3.473171418841536*^9}, {3.5347910619951425`*^9, 
   3.534791105735516*^9}, {3.534792312771208*^9, 3.5347923323231626`*^9}, {
   3.534853822324362*^9, 3.5348538545553617`*^9}, {3.534853885105362*^9, 
   3.5348539045033617`*^9}, {3.5350513888061433`*^9, 3.535051423001562*^9}, {
   3.535051532951067*^9, 3.5350515343862762`*^9}}],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwVmndcTf8fx1vadevWvQ0haRFJWWm8P4okMyOEkCQqMkrKaNDe65u0SJEZ
LZE+pKk0kEJ77z3uPr/zu/90X4/POe/P6z3Oued5Hi23v3zgnAAfHx8hyMf3
/7+MXZdS9l/2Ma1iE///QICDlna9ph2kNq/UrST19/Hei+Gal8BQZ/8nFVK/
oP1L/5PsAUi74Q0fj4DJXPMwF8070OWUJHaNQ4Dyyt8fiWY/+NGl33CNRYCJ
Z8i66uQAKKnLERdkEHC60vRpzJkQoD0o+aI6R4AffUblhGYEWBY9IGqnCPjx
7mB1zFwUuMVQG0TGCXD4u+beQnMM2FiGocYhAub4ReHEhzgYieScWtlH+l3Z
zfycnAC6XiOmMp0EKFgX52ncTYRrhtcm7v8l4JlnwuWQM0mg2gX3Q34RUFNp
1XdQMxXmZ9YWokoCXt+g7j8hlA4ltn5+05iAG6F3X0XMpUMG0yPa4D0BornH
nGaaH0NJ1N+hs08JaKioKNeozgCPMtalg6kEPPhrsOLohydw/OfSNz/iCFgl
IN1enJwFXQrMQR8fAqZp3kYT4U+hK7hpVY47AR9XDiYuv/sM0vbxv798kYDd
1qUHA848B6bg48PpBwi4nO5RvU/zNVzYLW5Xu4SAzXk9mn4Kb2DmcMAbPwoB
fA7aZrZCOaAepVr4jY+A6hvxaWFzOWBBMf8o080D27TLtlPN72DyYdprrzQe
mK7UDA7Znws7bd5+KgvngVpua+GK6lw4PhC577E3D0YqdtJsPuSBxtUynqIN
D26Nr2j4kFwA6a2nZtmLeHDa8y/vIK0QFh9N8Rya5MI2geg1Y+GFQGxPeeny
jwtSdF7IsrvvIa4rzGbDGy6kmrRsv3fmA2y36XJssebCl7Cwj3s0S4DnWtn9
xp8DJcN/aiWyS2BU5M7q6nMcKLbUaq/WwaBsXT/jvIMDxwXO8GUofga1egnG
PjEOHC5hqy1b+gX0NxXqpAeywWrjOieFlV9hWfgpxb+XWGDZ1+zmcfErDBMP
Kr/tZMGOuDs3m158hcOcqS971FmwbbomJFa3DKpeh0pItTDB9LXjK8r6clin
7nDHbwsTDDSTp0WgEob3Ks7+HVkA/SYztqNPJUS8GPE2+bwAeveGBCu+VIKP
cXyfcdwC6HZvpN3bVgXRg6GmNKMF0E5t3MRnVQ1vrRR90b15UKGL3GYcqoE9
t831Vy2ag0XCV0WGLtbDBl9H8Y6KKRjceZcy87QeOA+yvnFjp+BbeJgCt7ce
5DZMxbeenoLKkJ+xQWsbwHXnq41tzEkIpY5nJGc3wJM779YR2pMgr7airCyl
EVqyqir+MkZBc2u4EC3gJxgnit99xeqDnXfP3M+3aYbhgxfDmU9qQT/yi8Wj
682wAnOp0tXfQCVtuWh4TDNkv/06WjZaBZMlXSEOdc0gdz76iYFBOSTwzkTJ
WbSAy0OVdf/d/Ai9t+0fXtnwB0w5+dZmHv7Y59bZt2vk/wGryVrFj1KPL4Z9
vaqk/w/+KdXmmLo34EPJK9Yv2v8PznrsLvezb8RaxT0FraH/YGD68x5r45+4
jn22OFSwFeqjvA68Gv2NVbwdKoemW+FcbbBelEk7Lrx5ri2zsR0eJqvebd/W
j7NMnZuVp9thDVfD6XxJP04QvNIYSe2AEz/qimI2DWCP8FvlNw92QLjj0roq
7UG88VHsqz1NHXBtkhN7S3gYH+/tLPFy6YS8C/t/27waw38lKJFqbl2w91xi
7eieaXxgXFbypE8XcHNbqhf5T+NvDfLB/0V1wcbPXQ9+FE7jD/HK/pJvu+Du
+6t776nO4KRlmjfmp7qg0etZnN74DLY1MDn17Vo3jHS6rpm7OYf/2DqvvXqj
B7REnnl+3MPAId07XP4L6IEVri0FjOsMvOWienZxfA8csZjc3f6QgZNvtqmJ
5PVAbZTrofRBBj6duI+ePNkDx4QOdUzeZuKBJgNu+YVeuHBm0Hf/fyyceFJm
y4hnLyhKbsr69Z6FLftGPWSCeiH68woh5h8Wfj6bOWmb1QuXl0vGqi5m40ty
ir0T3b0ge8v2UHsiG8/t53xTOtEHeoe703N9OTirpUUEnPvgt3HJa+EUDrY5
nb/NwasP4pK+684UcvD7y5dKXif2QfBRptB/oxx8K6LzrXlTH5SGP/lN7Ofi
NfRP4069fVDvtclQ/gIXt6c80ImY6QMk80Qf+3AxenUgs0W2HzpL1ic2v+Zi
wdqyRNe9/bDYOmCbmDAP5x181BRzsh9WuI9cqFbmYYd/t6nvXfqBJWaSvWQt
D1cMbwwTCO2H60kFB31teDhELPvuf5X94Nzoj9ek87BR9P3i4t/9kKCFZAPf
8vCooj2zq68fepofn75aysN7tRdfWy00AOyHNiK8bh6W3RHu+AUNwBGbWYOe
pQTell0MOtYDwFnrXji8hsCeEqOK8WcGwOiaAOeSMYE7661qnPwGwK+X1zR6
hMDy+l5PfsQMQL9U/kKfA4Et47JvG2cMQMkdkRnbKwTOOSqqJ1M2AMJfJrIK
gwjc+2GTmNevAXh3V5ebGktgxSXnu3t6B8CYd8KJP5XAu+8mfNwzNwA542XF
7U8J7NNVHle4aBBkjTsbNr4lcJ75nOty+iBoFB27LfaBwIOZ6jtCNQdBtEIq
xaaUwPsv+jPtdgzComsxL081Evhe7bsfVUcG4WO/4snFLQR+r9v9Qt9pEDof
WghYtxN4NEr2frLnIKzRYPjy9RJYdQbZCQcPQssX07KVQwQ+dNhtk9uDQThY
ejq3dozAQYVpMn+zBwH3/DEamiJwsVL9kPkH0t/j47vvzhF40ptX+urbIEz4
fG+KYBBYvX1NssK/QTDetadGgU3go+iku+/IIOzduVZNmUvgsMdhe0fYg9Dm
ymuM5xH4s1Cx1mHJIUi+eetXCEHgWccRPqwyBHdpjzWYpNauVv6rvWYI8npS
v3aS+oSOVW6MyRBsDfzzeiupo8JvhnH2DIHN44mhxWS8soln5xzthmBPTf7N
yxwCM6xbTBsuDcF+z03njFkEXp0norjl7hDkdhXk+y0Q+DR901RG5BDw/r70
MJslcJyn4zep9CFIe1yV7z1J4Kq/8Rk3cobA+tmEn+4ogTnG5be6Pg/BOiuT
SdsBAuulzR7e1TgEQUECVP5uAjvwq6/N7xqC7TnlPNVWAieePSi6bHoIVnO2
1n9oInBtuV9XkMAwfFp9PrWujsB82u8+TFOH4Tv9WPCJSgKvD+mKPbFiGLq1
L79xwAR2GpVxrTAYhm0DBvoDBQRuyLm8LOnQMFyImGg//oTAQnJpDMFzwxBT
OWezN4nAm93rGl3dh8FoUVXlx0gCpxuuubc1YRjexgpait4k8K+HJ06+yBoG
/iJ2wYALgUV5oRtphcOQyPzXZnaawG6lw4ODzcMwYXVulet2Aj9RVy49MDgM
nCjBL8abCNwSsPNhMWMYLvtenQrSJjDa9WxPlNIIyJTfUEoUI7DMr3PvNh0f
gZSS1B+J5TyMxrYOH3IegU8bDfuf5/Kwm/BStaveI7CMu+4CesTDjZt/R798
OALnaPTheS8ejkmxuLK8dQT0fOPuJmnzcGmBWrbp6AgMqOk/a6Dy8Ew9r/M4
h9zvZm1tGIeLDwkU7k9QGYUfzUbuiXVcTDuvpSdxchQ+GYaniLhysYWPoJO2
6yhEFwjO3DjIxR4POtK23x4FYVrd7iuGXPy75j+KT8oo2D5Ny+cT4uJEPdGJ
2bZRkNH/a5cay8HKrMFX7XZjYH9zYaNRChtbyZX3sS+NAXHu+ekrt9jYa/Wj
JUp3xyC4vHTR5uNs/M/uWPjBtDHwj1Ho8FRg4+Sv1S5VHWOgtVOQ3RzCwkvD
n+u8Oz0OVx9e7A05ycQrVF2y79tPgMSNNVZyhfM4rH35o/ArE8CR3DYbHTaP
55ObE+N9SC01I/jlzDyuUjIPykydgGJKzVt9iXnsIqd8vvzvBGh4Vci5287h
44IOMX4rJ8HLob+aGJ7BmfOy+0sfTYKSQOvBnJZJvLnNtWZrzBRkpW08KLi4
F39h+ez+9XAGwkze2ORrtMAvpavzlzNm4FWbrmma/B/o33w2XeLFDLiGqV/U
FfwLkje2z5p9mIHy2dfyazv+gc2MWPLblhmwfiORdTymA4ZHYkYiaLMgYWSm
aXSlB+TbnoTsjJwF77A9XbbBw6DJiV/flzALnY9oMLkwDIaLA9t9UmdhhVCr
pLrjCNgdu6D//tUsXFlQxKe3jkJ205q/mrWz8Gxw2lhwZgxM6wpWConNgdtz
k+Ka9ElwwlVVJX5zUOdt4fvr8wwwDWXU1ofMwYw9ZXfGxAyE5B3xzo6eA/Xw
hYrVS2fhRXb/mrj0ObDpG7Jw9ZqF8Vih2AslczAnfJoZs3YOrjuhk/KsOVCe
vZM3GDoPi3oCC4L550GjgF2rWDAPCSfrKYToPExQgyaYHfNQeMCudEhhHr6P
eUl9118AlvEtLbxhHrLGzwg9/bUAPrLvpy5cmYdRj38oR5QJsmGEVYfnPJyq
DlZ/s4YJj4V3PDnkMw9PBy7dsTnAhK/sJhuInIeSigOJyUlMEO6f+Sj/ah76
48Q+MzRZEPZhbQAeJPddGC4J1GXDkg03OtZPzoNy25GZX3vY8PpNyebnC/Ow
4cCKLV9d2FD/ZM9InPACnNJmW/tms4Ea6bz/ovoCBDkFGnou5cCDs0+VaacX
YLZ44i1zjgMuuxRLVzstwPsDNh07ZLlgahB8YZsb+Zy7YCy/bDUXugWc31/z
WYDoVcIdjqe5sPqxrs2P9AWgia5z3f+VC7zgNO7QswVIPMg2+feXCw1XZDL5
3y6A2GuTtpEpLrhvnZ7R+7IAr376U1KW8qCkMz86smsB1M3jnDdc5UFUlabh
06EFOFLK/NZ7nwf2Of91lkwtQP1MrbHCAx6I+NxcO87PgM03ri0TKuHB3/PD
vxeJM+DZgjrzUz0PXu47fmcJlQFjUwKFzE4e7F9m8n23GgO+qmtWzvEToCby
+rrDKgaMR12MyZcleXJ8qcotfQa8F241mFclIKmEz/mFGQMC9yTxM00I6DlZ
Jip+lgHV5kruvCsEFGzfkLPcmQF1ezWiSm4TELQm64jhNQbIVutVcoMIWM0N
zHLyZ8CnpvU/GSkE8HoZe3xCGZCgt/dAHsmPjbUX5v6LZYDISPbW8RwCPJJ3
bavMYEB8mm5r6xcCLO8Vj7S/YIDWdXGz6GqSp13WxM7nMqDVMzL8awMBowdT
t0gXMwAd2vnoWjMB2IjSrVHGgN2ZLWcetREQs8In2KSWAdeuzeTv7iH5WWJK
7/AvBqgmnAtwHyRg48yZFpdWBryTky1ZPEby7b8fd+/1MqD/xvhOIPn7b6m5
VvIoAz4vl1LqnCXg5fO8utxZBvwOilXhLRBwJ0bDo4bDAHUvvOMByffWXglL
eoSYsHl3f+Rbkv/V7UXKWZJM6BV3H7XgETC/09OFSmPC/qRJm2MEAVXrhuRW
LWGCf+Pct0FSJynZftyqwYSjYYYWc6R24a+xP0ZeF515QVV3SA1DRuJXNpCc
tq3q4H0yHrXx5dsgEybkbJkbEeUS0Pt+ybH07Ux4Gan+nxib7E96BN/7PUwI
VvQ/Gcgg+xNEPK0/zASz84d3+s0RYOvmtm/gJBPOpy84ssh81xztmuedY4Kf
ZVvZBFmPZCrwQl2ZMOnV7Zs3RID49+RFSu5MQCm7AkT6CLgZyJLMusUElSWl
3YMdBAxuPSpvcI8Jy5zvZR/9S8ARTv7iz6FM+F50btzmFwEVBXIr9sSS8Qq+
V/R8J+CJTv2684+Z0CyZH5mNCZDrX204m02u2w286y4kwC89BPm+ZYJPyqL6
528IOEWz2PfwMxMiZ4qdBsl5qqvPsNGuYoKmTJqGXRwBxiH8dvn1TOjZyjt2
NoScF6LYpb6dCR67hIpU3AkILlK+fqKfCVoqt9Y2XiCAcc3Te2iMCYF9svk0
OwKaBg1CBLlMEKGdSdi3nYCoH8+fblrMgprVslmh0gQQYaJvytRYoPVF+m45
wYNLOxwLrFexgJ4l3RU1yYNdxcvLnQ1ZYHL6uHJbAw+EsxK7046wQECh5Y11
GA/cT88PrT7FgkjxOrmlXjzoVT40VeTIgndnJdtun+fBl0gK3y93Fpjq2D9n
IB7cuhmwRDSOBffTchq7x7kwYtCrHv+QBS59ofPWf7hgO751tVoGC9I3vPlk
Q95vNp3lbjF+xwL12QeuaglcmN59/ahbAwtaJ/nNajZy4YzIj1PcZhZUNRWd
mFxC3o++rD0f0sECXtb1/FdCXHi1ccT9yTgLtGuuhkw3cMBJ1T62RZINnAz7
udcOHGif2VeHdrLh2rZYyZ032RCxuHmFmzUb+os0pG4fYYOpud3NtGNsmPlc
FmO6gQ1pMS7qvAts2DcZ4uIywYLT64K9PoawgU/pw21/Oxb0XCrV3FjLhnPG
erqa2kwYHFp/V2cfB3S+Gg79cJ2HRNniX7ZHOBATkiY5aToPlobmq0JOceBV
uYlEDmUesoOsmwYvc2C8m/ducc4cXNS6pJMVxYHLHPfXhaOzMObwtFn1Bwf+
bszRKTw8A9MdSnr0w1wIeDkqFfBnAlTPLqxfdpILqdtz80svTMC+/l+G2ufI
ullkJ/kwx+HlaKT5FncuhE7R9AMVxsGRueiIXTwXtkQdTpnaMwp/qdO3s5q4
IKBV/6IxcxC+bP9Ws9GGBws6ek+rpLsg6oXX+SNHCHj4eVebp1oGHOffXttE
zlme7D/0wPI/0DxCWXfIkYAAGZml7f/5QLHAE9Z+ck4PPmylBb2Kx4PHvodb
xRLw6dXplQ2OeRhEVfNM6gn4auGR461ZjW+8s+eLWcGHAukZ7Dy7f/hEW6W+
tRYfUsz6qltu2YrNRNeck9HhQwu7scpV/TYsabdQHaHPhw66qtnGC3Xgx2Jh
saFb+ZDrzj98v6y7cN3pfM37p/iQz2UfQ5W+XqxJEd3j+ZAPRaZb2Kc0juCX
k75ZQWl8qKzL9ISvxSjW/8EmEjP4kNc6h8TJD6MY4ifeFb3gQw61m2wuPB7D
Rxc3K7I/8qFKoa7vkc4TOEQrq/d2Kx/6uHm/RejVKTwO2275L+FHvozd9kfy
ZvH15SVNscv50arGsPOf+2YxS2Dz2ica/Mg+QFXjJ30Oi1TodJet4Ufml7ek
T9+Yw6q75SyFTfnR+WPWFYIb5/GBo91ywXb86NHF68rl6Qu4wM3nRUQaPzpz
39SvQoeFQz5O5h3L4Ed4ZOqT/14WPiV8pkT9KT+y9F5v2+3GwqLJWxs/vOZH
+VMmlb55LGxbKbDQ/4kfxdR4mBlvYmPekvtm0MqPeLSPb7as4uAfTnO7xDv5
UTF+yfxtwcFPc88dburhR1r3VkVIneXg/TstnJxH+JHYlz0Clkkc/Pi6SMR/
LH409uLy0QFBLt5eE/xnQlEA8W/vDL/zlYuV6azuDyoCqF2fsTj2DxePn744
el9VAP08IbDbeIKLE+atiMXaAmhpwLfju5R4eHC5pIblJgHUmbBS/pATDxe7
3NKVMxJAH4ytfBd583B04eimdlMBdN756a6d4Ty8Zc93q+sWAui+3J/pgBwe
DvOMcEs/LICMQ6U//Zzi4dNfeTedjwmg72HbjWT5CbxB+rL/xpMCKP1+zPoO
CoHbM/Yl1DoIIAMPokxnNYHfjeO0/5wE0Lz94flsQwIHGupl27sIoOVpus2F
FiQP1ssUM64JIDy2Zsz3FMlnyr7lX28IoKncldUmzgT+4zBVF+EtgL5cOfw4
yIPAfqzGLnV/AZTkdPzFt1AC22w3G5kIEEA7luGIL/EE1ol6N/shhKzPP8ff
Fmkkv2nEiljHCKBHjaoSnBwC79RS3OyaIICWZBS9ayoicIl2ilNwkgCKetF+
cmUpyZOr1B5kpgogxVPnhuarCZyt87T6y2MBdOjRsfWmjQReumY1qy1LAKXu
5y0jmkn+1X27ivVcADVXfo80bCewmN7G4/Q3AqjJxuvCWA+B76z7GKqfK4D8
347HKQ8ReEYfFe8tFEDRh/dyPo+RvLq+fPTiRwFU3T8X2jlF1m+D1ZJALIAI
X2/9m3MEPripfk/GVwH0QPhNZwiD5OvNh+7gSgGUb5MUTGMT2HTLn9f/agTQ
SLivmhKXwLlGdh0L9WR9dHse//99gbZJD0X+lwBq2e4pFEryf4qpE9JrEUBz
99eb//99ARWNue1uFUDxRyxO/v99QdDWq4+cOgXQsS76QURqrtlC471eAaQl
bKWlRMa7uu2WwKNBASRoW9J+kUPgwe38Bp9GBdBdqXCfDSwCn9wRcPbPpAAq
qRej31wg8A9Libi5WQEk/7T0+YZZAu+wiiqTZQqgDZ/v7naeJHDxLtrcGq4A
WrTeXEJ5lMD6e5I0rPgFEeOrJXPrAIGf7l1m47hIECmFL9Lp6SKwyv4nAX5i
gij5rVYh9x+BY6xXFqZKCSIaM74guonAtw4ZKDbTBNFwtfgdzUoCTx1+bzmj
JIikjOf9tDCBHY+Y3KQsFUThj+avPy4gsLXtjr87NAXRyVNH3wk/IXDF8Vpx
h1WCKGXT/t2TDwhsfNLayEdXEOkVBrkdiiSw5unjye83CiLNaxpS4Z4Efnim
s/bXFkGUJ/qp74wLyfNnz3EnTQXRyzMs0XfkPLPPXbZbuUMQmU8NiJRvI3CD
s79q0hFBZGe2Z0+xKIG3u4paFxwXRHvLPBqvMHj4w6Vw3x+nBNGfJYPBTwZ4
OPPKf93iToKosTs136+Mh71uvHji7SmIeN9jzVZ58vCEp17Tf7cE0bka6SeN
Z3nYwSt/UZ6PIOpf6/OKsZeH993GjqNBgiigJVK5cgUPq/v/1D75QBCFbDng
f7mSi4++E1znmCKIWjI35Ea94eKwLgPDy48EUd/9s+KG/3HxHMTt9M0m6/t6
qFj1HBdXcA5dzCwSRHOzCb5H2Bx8weP3i7E/guiH0DqDr7IcnJopnDffJoiO
GTVeDp5m4x+/NhYTXaTmnB5o+8HGWwz+q5UdFkSmt+vCDGLYWHLyyNgGliBq
GC4zSpdg49cX/ujeURZCRfjtbuYQE3cnim0KXCqEsh5FBPV8ZWKFKkOIUhNC
6ZGBXQ4pTOyjmbTv8Soh9MJh56m1+5jYusfWrWKLEArT+kSbe8XAsyda30of
F0KP925Tajq6gA33d6xPeyiEth5MWVfhNIuLBxeN2acJIZWNy7pMtsxiU9/V
mZoZQihuMrXfVWIWb3t3k/b6uRD67wc7lPlyBu+Vl58vLhJC00WXHjWOTmP7
FsvCv81CqGw2R3nx6SkcevqdIV1+EbJvlqvrMxjFbW73TcPDFqGp4w1pDTKt
+J3hManyaGF0WWPozEXoBvXpkOS4eGFUZcKT08nrhvjnxToOD4SRhMuL9qfa
PeC5WNVK8JEwKiBWrqiX6QVTbn/A1hxh5JNW6ZjV1gc1n6/zldQJo4HXKUck
nIagd0fUTIGECAq5diJpu/Ik2PCV+gVQRNCJgJOMlr2TUPl+RtZGTgQtS0pd
vs5/Ep6vPKI3pyyCJvPi21ePTIKbxFJXg1Ui6KfGrcsm76eAW/ei/42lCDJn
SGxfbjEDdJvKP8/uk+vTvLeKq+fBwvgJOhcsgtY5Fn2UODIPN9R8ny4PF0H5
qnONOb7z0DK+xT0pTgQlm9U1Sv+eh4eBr2XCMkRQWvVNFXHvBVAtit9x+YsI
enbo03nffAbsT7v6WqdcBJ16PNJu/Y8Bvvf30QarRJB8QXBSDR8Tuq3Fek43
iKC6r5ua3lsxIXP41p0DHWS8KztsXP4yYZWKQ/4GrgjiY+x1rxlkga3AVpVp
PlE0c18iYk6UDaGDS/xfC5H64xXrL9psGM1r3q8lKYp2Hfq0xPg8G97s2TWq
uFgU9ZwMZr/rYEOngfbBpqWiaIVMU2Q7hw0yyos+RKuJIv3cAu9nShy42l8S
KL5KFLnsK62mHeDA+rv6KzibRdGtT98SdpVw4Nw5Ssh7Y1EENns2nmrhQMKu
0cnrSBQVxt1aKz3NgQWFrJKxHaIoR7662lidCx9ylGw7bETR2GCt1k9/LkA3
X3TpdVFk9e2mc8paHsjcnV7a4CmK4jXe7u/bxoPuxb0v226JoqTVdwdzjvHg
3uHKKsY9UURZadna6MuDb1XhfGvjRdGN5JfsdbU8SD53N8L4gSgyUa2JiGjj
gavAFRWrFFEkvy/hjMs4Gd/40OZzmaLot4du7nOSZ2zeKLs9zBdFe9pTZ1bt
JEB7tyTvWZEoWn5T82yIDQHMQW5owSdR5JAZsPzCWZIH1bqeNpaLoobEm0UZ
3gS44h8bOqpF0bOFsLVEAAGmJ8q+jn4XRUNvvNf8iSagK/5ph8hvUXTgGpYR
zSLgnf4DV9pfUTS8Uz/jBMlz9+pD2Grtokjv3CeFte8JOOxyK1ivWxT93Kpp
dfczAZpilxRM+0VRr8VOxT1VJK9lnsrcNSyKCGtl+0TyObjazNrg2Di5viVT
7Mxvkp87zL44Tosin73SM1mtJD/fWr/v+rwosv4SI3Sxm/SnpNnmyxJFq5WC
NZ8PEEApUHCO5Iki14gz5udHCeg8IMZMFhBD/g5ZOx5Nkn4nWAHPhcXQH0PO
8qMk//uHjcq/FxdDCvvUvoaS/H9oZfvjcmkx1FA+vcSY5H/Ninq9n1Qx5Pnb
XusCyf8L9l9KOuliqITr95tK8noV8W73uLIY2rr8rrrh/3k/+clf9lIx9N+L
VMlWUjsbJjiJrRBD79K2hbFJbfw7cJ6uJYaSMiYe/0dq6Ws376nrkP4EthzI
IeN1UJyp+mvF0PqsPynbSf7PeXkiHQzEUJ1IeugRkv/9du7V3bNJDPUqeK3o
J/n/UD8U2xqJoeklbpenSP7X8F9n5QRiSDsy0/vmNAHzy1a0uJuLoZjWozZ3
xkm/xfKO/jvE0IPNPRS+YdLvMeHZqF1iqOvg+w+8XtLv/IJv6j4xdE/W0dmL
5H/j2CHKy4NiKEs/bvO1P6RfvX8pRUfEkAtT0GjoB1nf2lqdyuNi6PjXyPDW
GgLeXigp+nVKDIk9XLVnTxnpL+NR08R5MeS15kf001zSH4o9y3UWQ52LjI9H
Pyf9td6bEncTQyHSl5SZ6QQ8oDtJaXqKocmN/5TMwwh4r7J/17i3GLKi4u8D
vgS0qG0OLrgrhvZ+kP+1+AYBimtFF+0IFEPONsrX9U8TsHnDpBklVAy9Mf5w
inaIgCNGLT7NEWJo4vXzrUE7CEjY8YxzPkEMRb1JTFm6hoCCPVFb9JLEUNwV
CQ+zZQT8PujpyUgRQ9JNhfwLMgTQTlvOBmWKoUiZSj65GR7EeQ6OZOeJIY8L
pQkq73iQd6dh5dX3YoihumShJp0HP++9P7+lWAwFbZitk4rkATU6qOfbVzE0
Eujau/MiD6Kztf+N/BBDl+30F54v5kHEX6dva6bEkID8jY37L3Lhded+0flZ
MfRBkn+J5QEufO/fbFHCEEPdyw5rNRtyQXJGtHQvnzg6XXJVuFiE5FiJ7KLL
FHFUXZrx53kqB4KMh569XSOODvak97kVseGZWWP/zXXiyKVFb5XIQzZUWhap
m20QR9r3L+ZvucUG4cPB6T+MxVGX+vdj3iZsuO+6MnFmF3l+mbfx5Y8s8Eu9
ELjhojg6FWvRH5TJBLPjjqN7L4mj830bspTuMEFQ8ay101VxRLdR3Ac2TLgX
fWLxQy9xtGphKXvXIiYE3Nv3hi9UHM06o5u37RgQfHFDc80LcVS2yzyklTsP
URv5tezHxJFkQ9zB4rkZ2D/DDfWeEkdVNN2avaUzIJvDmoybE0eRt15tjYiY
gZiVsx8queLIad/BGAXNGYhVGdi7RloCfQ1Jb3O2noYEge8eDF0JdP9UybrO
B5OQUpdYEeEmgWq3f8grmRwClSIkGH9dAv3prznW4DUEyRmD8NBTAh07O/3L
S2iI/L656KmPBLquEVXziD4ID9RaXnyOkkDG55LuuWzsh3gPhejpHAnkf9Hr
QPq5bghfmnDcZkoC6fy8U2Ks2gS3L8VOLrkqiT5HtF19P1yOrUrXtbW7S6Ky
h8c8zasrsSK9oTrtpiTS41+W7/W0Gud9ksxY7iuJVjiO+/+0/46HJQMOa0RJ
ovB9CRZGF3/goy88P6x+LYkGT5av6q37g9cPnrxnNCyJjEcNjtRr9mIBY44b
Z0wSLT5ho/gqsRc3RCad/DQliRzsFPaYifdh503NG4EpiT4Kaf4IG+3DjwP2
D5mJSqGnIknVHq8GsIyG+V4rTSlEX/dN3GLZCB45o614zF4KdZfc6tdqncS2
Lv90nB2l0APbr6qn5aZwlUcE3L4ohVIe/kq1tprCmaGzjo+uSiHLvUp/ThRO
4VP5n/OH/KRQoPzaF+zwafxT9NhBrwwpZOOzfOzB6llsJid5PuypFDo412DD
s5vFOUuwV+oLKbT8ceZJ6ehZHK6v8bg0VwoF+ScK687O4h0npibFy0itFXjp
cMEc/vgmOOJhrxSKZ/VHJaxcwKs+GD9+NSiF+C0uvLOxWcCJZRP5eFQKpXP8
tQr8FrD7n8NtPbNS6Mry37r7/y7gtYJqq1cvkkaHApXZrfcYOMPmQ3WxhjS6
c2KD1pcKJqaecW2rWymNAq2+dawYI59XnVWnOtdIIwPzo/qL5Vj4pE+A4qKN
0mjIR0S//CQLKzw/cH6PBXm8dNHvuTEWDuUOC7U7SqPNwXHOO5lsbHklrur5
RWmkqHW2PZnOwUJ9JmE3Lkmj3aaLx0IMOPhObZScrIc0stXlM93gwsFuDzeq
bbsvjTyMbZMLWzh4DaWzTyZYGlXtMfz5a5qDh/2Cs9vCpNFKf/nQYEkuPnux
Ve9GnDS6lkuRfG/KxTaGfvA8Qxr15ZwKWZbKxXKvdARvPJVG3juWzo/ncXGD
alOF+QvSb9I6zYM1XLxTVHtv2ztppHE0LLplnouNm7+fkCmVRkYV+UvqLXmY
aXVDta1cGm05snaV8QkeLihR7c2ulkZXLeTTjC7z8Nqsa87mjdLk78HJt5Ox
PKzmruTl0SmN4p7GHVvdwsMdg6Um5r1kfrVbfTQGeTj5hAu/zKA0Ytbto79Z
4GHaNhyUPSGNblK/vb1KI/mz0Gm3x4w0Ussp3/VyBYEjdKgy5gvSiO+C2R33
dQQWlTv3XytPGulydwzk7yJweYD08WwBCrosLY1XH/3/+4bCpR7CFNTNabii
70DyXJd4FkWaguisfcVDXgR+fzjvQqssBSV4Sgo8vE/g69Un12TTKKjoX+Wd
vyQvjufk5JktoaDjJ9tDBDMI/ELd1pOynII6n1CaRl+Q/J8oaNyqTkGlKmM1
Z/MIrC75inimTUHOGYP7nYoJ3HXX5qv7ago6u152B+srgVNniAAzPfL4/XKx
SjUEtj2fbUVZT0F/zhgurmgk8K+9nMZnRhQUU6jvW9FG4OjSzHh3oKDZ27kG
yj0E3rtx3zEzcwqaa8mtYZF8Lf6coULZQUEaBYmbnEj+rlzyuPOfFQVd+ux4
3p7k83vRu54820vm86B099AMgdGiufPuByioUnrqL2eewFzPVB0zGwpaub1Z
OIVJ4A+jOyakbSloXw+roppN4I0RySFVJymI18+6680l8Lu1Uxp+Zyho27AW
KuERWLdx+xejcxRUd0BNMIYgcPbVpBNzThTECpaomCe1uvzEwmsXCqoSDggc
JXV6vnmskxtZ7wP5O66RWuVIoq7adQrKEjUVDSXjJTJGq//doCCXhu21BuR+
8klbz8V7U1DGgWuJrqSfKKMEvn13KUh75fjVzaRfybbhh6L+5Hq13dk4Mp/A
O7CpNICsz8Xxq75kvgKqcT+8QyjoWp/FS2KCwHe+DLpuiKCgrvCYxRSyXix7
E7GJaAraJXGr7g1ZTw+hmCfP4ikoWkv3V1c3gacz+8H+AQXVJx00yST7cWmH
0b/FKRQU1khXYTUTeHgw0qMpnYLyXi2/10n271xIr2zkEwpyNEsJOUr2t1PH
8JXlMwq6H7LOwr6MwCe+h1sKvKQgdeVF9VxyPg7JbLrrnktBR+29c4ZfErjh
bajy2kIyvw1dyPgJgXcf7Mwf/EBBd0olpFUfEnhbQvDo8VIKkrwQ154aSGAD
ldZjZo2kv4M/Vt0+TuDXn/Tm2L8oKBD2XXDYR+BVp+5H5bdQUO6HLvEOMwKr
Pdat1O6koORbtzQjtQlM1fZdT5mgoHfJ6q0d4zwcUd1UXzVNQan0/7af7+Bh
cedVzn7zFHTkaVKCfz0P87/++WiOS0FNgmbfvV/zMEMpVuSSsAxqC/KecDtP
3g8umjRZicqgU7y3Y5mHePj6x4HHWuIyyH+2Lu/KVh6ePGFs2iUlg/Z/S8+u
U+LhgbS+64doMojteLAhs5yLf2ts7t6iLoMOragrExfn4t5GF3OkKYNUnUYM
n4xz8PTtR0+2a8ugBwfL/Cp/cDDlt/j5/atlkPtzfPTVAw62DGgbObdeBmF5
M56AGgd/6Pebi9omg9rD1f3Ml7BxVUyhTYKFDDpoHfggl8XCv01HCx9ayqBo
nSd38ptZeCbhsFfWbhnkmusz4RbFwqt3aBMfD5H+Q5y8f3OYOO3pd9EBBxl0
0fPH4e4vDPz6oMDFUUcZtO3HR/GCRAYuJjbWTDnJIB/XNkuNywzcciQ9nOMi
gxrrPcX+KDMwVfQaleoug37WuUY/c13A95wUVUzuyyC3HXZe9/jnsdPKs2tj
M2WQ320zpbMD03ipeOyg+1MZxLKTnIkuIH8/h0sfHc2WQS0XLpjfuT+NTV+q
yS99JYPGXpcLxKhNY7m13YxneTJoqk5uV9GxKVyy/kxpyVey3gdS3lrenMDy
6NTh4S4Z9Hy05YFg3iD+YnPce+tSWaR85ok99cYvXBFDq9qtKov+8VIz0q7/
xLV19fJH1WRRTLb6g39XfuAWi22vL2nKot39skFuzg14cuOaroe6smjnQpKI
eGEVXqpAWMybyiK5fwI7UW0O9mp+TH1xShZ9CiyPn9xWBQZHh7PlH8mihS3l
KRrMPuisStvLfSyLkspNAouc+yHM8PBM3xNZZFr08zO7rR/6lT8bFz6TRYcZ
9k/ufRmApLb4+mM5skhipdSU170hEDi7dS4Vy6K4aw5zsYxRaHBNRCvbZdGT
gHhPq8opuN2+p0+2UxYFIXfjGeYUrNonGMLqkkVm/OW+tqun4Z7epZ81fWT8
MsXcM1HTsGnG3PHSmCxK+PXkt+nhGUj1nAjN5ciiWdwTltg4Cy7+Fs0mi6no
uEXwyIqoBWCENA6oLKGiT1etOHfeL8D9mBMM9lIq8uI8YQd0LkDqo6tKH9So
yNY8LOHhWgY04NTjG1dRUayio15VNQMMOPMduoZUFCPT5/RhjAmfBf0mpYyo
6KPTiy2ZMizYLSHFP2ZMRSYr7MrXG7DAQXmF2gtERX3eL9XQDRYkbN7noGVJ
RSnKoRQ2iwWs608Hlx2hIqOSB96pk2wIuKXP5B2losm07uFUKQ7I3fsk1m5L
Rbk5uSomqziwOvbnqmQ7Ktr3xWmztT0H7N4SLoqOVFQ5uv/N9+8cGH4fcnvh
PBUdWPc66O0AB258pkX8vkBF4TCgrcfPhah6nTdxrlS0wm+dLUefC1/GjkzJ
uFNR14ySfGU0F/bOdfNPelDRjW1pr28848Jfjiu13pP0KzXq8rmEC9MS9wzC
b1HRnli1pUrDXFBfleMudo+KnLrnV3QY8SBnnVHA4H0qerf4c4blPh6YGFYk
VAZS0XbnFcQOex7YWLYW3g+lop5QGSQSyIMgR1EWfywV7ZV/TPjU8OBc9ZJU
sXgquvVPoGWolQdmqw3MZP+jonVicQE/x3jAnjoZovqQihSF/rPWliZ58tA1
Xe0UKqLt/DEYs4SAvMKgH2vTqIgQ/bnr9moCLt3OVYYMKlLecta3wZKAXZ1V
JRaZVFRXZ9Kx2YYAbfN2+71PqchR2GOZ6lkCukXFXpx8QUWWm5yvX/QmADsv
3XfuFRVJSclpfA8gILnOYMblDRWJ/JuYeBVNwOE4O6NbuVR0UVxxxVAmAfoL
1zr886noQYXIZvM3JG/bBvuHFpL9DPT4rPyegJHiVK3YIipqnp/77/JnkueX
5dUkfaSi/o36yVurCMj0q778+BMVnb8+/TKqngC/vna555iKFC4ovTzxm4BT
lrOFb79QkWFL5u3MVpLvX4idKPpKRfP8uSLO3QQoSS/j+1JORXLSN/VfDZB8
7rb+SVUlFQ267hl0HiXgx8+dlg3VVJS1IYP2dJKANxtPjTbXUNGQi0S23SwB
YQ+uR3V8p6IAmw2xMQsEOHGC1w/Uk8e/Ga8wYxGw/VRay3gjFa3pX2F4mUOA
WmnerfmfVHTYorNTgUcAof5NlddERf8t21toTBDQGthRtqiFipo6CwrbSF00
POsk9ZecVx3/DhapE/aIS9FaqSijY4tuHKmv5Sx7q9JO+l98PzObjLdfbsNh
9U4qstugvdOIS8BqDyumTjcVdb8WW7aTTYDYn1MpBr1UVKqou/Yng4B+I/et
Rv1U1Dnz3v/PHAGlqSF9ZoNk/wNHtU9ME5DGnx5sNUxFJS9Xrjk+TsAth/w1
B0ZJ//9NpP8eIuBY5bfGY+NUlB3+L6Gul4CNqzrdz0xSESX12QrzDgLkwueU
LkyT82W51m79HwImJ8RL3GapaErt3KnHPwj4fkDV3nOeikJdT5iF1xDwPH+D
sA+DimSfmavPfSXgrPfpvZEcKmKYazoY5xKA2t2nE3hUdOWqiIjKcwJUtoYm
pPLJoXWUDP2b6QT8Fi5ofyUkhy46Tpe9DCUg90KNX76wHDqiddTX34eAqNpO
zU+icmifwL8rLdcJsIqRuFwrKYcs+x++5R4n4NOSM8SwvBwqi3C6YqRO7pd/
hV1Pl0ORGsGTMnQCynb7LeQpyiGhVartHiIE1HpnTNxRkUMH+LqaZwd50Pqn
r4OqLodsek3O4iwenL4y/29BQw5lDj9zWhrPg15RkZZWLTnkcODwC4o/D0Y3
aTdk6cghs8ubxrJP8oATf/HzFgM51PVg598yKR74rPEuXrZBDnmmLt74icEF
ofLQ90Kb5FCq7SU+qx4uSM6+zKnbQsZvF6arFXJB5cBEur2ZHHpgKkdpOsYF
I+nrviHWcujSgXtO0aEcKMm8d/vyQTnkrO8pxLjMATOT+JuHDssh+YNxUYyD
HLByKbiy9Jgc2mH9WLJamQO23xhn3p2WQ823lo+8y2CDV8Bts7+X5RDuk48V
y2ABb0mEKb4ih55ZOZza6ssCv/zULU+uyaEnx85KKJ9iQUgv1r90Qw4tC5Yb
f6PEgiQzgRUCd+VQWnjqA+8QJhTxAgRXRcihbE50ltBxBkRMLY/dFCWHmPRH
0+v1GGDfW6y2PUYORc9F7CaEGCD+bXrr6QQ5NJqiKXTu1QKciLfzSUiVQ17b
6pqCmPPA09nIFXgjh0rmKkf/3J2Dbcf65v/VyyGxaO/pdVbToLjbJ2CoUQ4N
ToudXiE/DaOmi+kLP+XQKbbPw6q2KYhXt95AbZFDrmuwrL7bFPRPFF+z7JRD
cuJrjyRFT0JwQNxk3qQcWu02TSyJHIO6XPPhcFl5ZLNY8dMlqX7wM8nri5aT
RwUnebkr4/pgY6V6VzxNHr0+sJs/XLkPUv8uaklRkkfbG7KOHtLsBVf+qvJX
y+WRfYTvEZUt3SC5b/ej7+vkUaqLJDX6WStYDR86KnVAHn1JkJIg/KuhXNWx
IixGHgk1juykn/uJVTsalS7FyaM/Lkcbmg78wl4pJq77EuSRyImrd/agJqyn
TJOnJskjefuO9UeVm3GyXNmZ/x6Rej7+9t1vf/F1YTXuoxx5NJh3JGKpZBdW
H20zKKyTR0pJr7b4rBzEd5/vDExskEe5F9ZcKU0cxH+d8v/e/CGPFFK35b0S
GcJRfWG+xr/l0eQl4a03e4cwp92o/kubPKo5JN1Z9GAE/2p8cLF2VB7pNCr9
jZoax/cKDz/qEqch5v5fumuzprFe466gEUkachTK/C3xbxr/G956eU6ahuR3
7FNNosxg/aW6JmJyNHRcBetV3ZjBHfeE/+gtpqFfHz7lHtg2i7ccKJTx0aEh
IwNFxQvf53C/86uF4DU0FNwdb8/hzOHo+xntsWtpaP7q4M71q+fx4PvIl08N
aGjplbCOiOB5HL/MybLeiIYOO3yT/gsLeHJU0Wfpbhracie4QT2JgZOFKee1
99LQ6I6TFtlfGXiH6qK9+vtpyH69dX3FKAOnHpxabHGIhvK3YbdvJky860N1
oesJGnLrufei6y8TZwV6TRS70JDVT8GbX/nY+MAjt98Vl2io90tBZdgKNuZ+
cPzU4EZDMs9Fd/VtZ+ND4wdCe6/T0KMe+4KtwWzMf1hHS/I2Db3nuS0kinPw
CbVWu+PhNGT5n4vI3gUOfu32PcUskobOLL2+niPDxfy4pHVlNA29W6tO37qK
i7OOP7JlxJHrO5pCwo9z8WSco018Mg192doep1XExWY9R+JvpdKQ3Hqt9771
XBy/buevs+k0lKQ32na5j4u31Okc0H9CQ9neL2eFZXj4nsjUnvoXNCRJOUco
nObh34e7wwpe0dD9+K2tYtd4eOWTnzUpb2jIzsDAOfw+D9ehgp0uuTT0lP4o
zjKbhxW9vLeLfaShWuMgtaARHr5Y5XJvspiGlnUKx/CxefgT3e5rcwkNFYTL
VoqKE9g+F23NKqUhXUp0dqUmgV+OLjIx/0ZDKqb9mGlLYN6WBe9VteTxx459
HnYksHXw4AfZOhoSt3AmLlwl8LxGzebORhq6JeAWRw0isOX14huVP2nox66x
h0YxBH5Y+qrgdRMNhVxftn2a5E90Kmr97T805MvymRJ5TeCYV77XHP7RkPfS
NbmOBQTuY199t6uNrE9yUOyBEgJvtnKY0u8g5+FUl3tNOYFDEg/rKXfRkGC3
BjTWEri13+Iyfw8NXY7pazr7k8BrN2x+PdhLQzfXWKv5/yGwn//Ksfp+GpKi
GUmv7SDI60V5deEgDcWnK9w/30tgTVVJ59RhGjp3nntt9RCBb17iZt8fJef9
fmb17TEC1xaPD7qM01BDi7PH8SkCL5Xo1Do0SfbDeJ9L+SyB3Y41OhpN05BG
0VTqxwUCf31amqk2S0PP3iUKmrIITJ/P7RWbJ/tPWRO9m0Ngp22ZK6YWaOji
ESM0wCXwh5gE+xYmDb38MSMuTRBYqivwEWbTUEfSqrHPpD699mZnFpeG1rw8
0kuQ+t3ti8siCBqijCdMfCO1UO1xO3d+Ogrb+IyiRmob5T0pJwTpyHPHhMUi
HoGfOZm2mi+ioz/l1x5cJ/dnF6xdrCNCR0inS9KN9KebPF8uKkZH9rPd6xcx
yP18P7n1i9PRw3eyMjpzZH8c7y0uk6QjJ6fjz7rI/Mt27ap4JE1HYtfXia0c
J/uvR71yV4aOMs8HAf8wgbXpfxafpNKRXmvzsYt9BLZlp1VskacjCig7OXQS
OKzT8YoinY6uJ9V6T/wlcEn5GpV5BTq6c3T8qUQTgSefz1b8VKIjeX5+/qI6
Ah9y91OJXEJHlfJBsZWfCRxgu7PSZRkdNQUGcrWLCPweZK5aLaejvbvD5xa/
JbCKeGrlIg06uspnxV+YRuC9Ew5XezTpqJYdaX0qgcA+v3SWfNGmI1o489mD
MAL3phZdvbWajrpW1M6X3SD7dc9nia0uHWVJfNxQ4ELO84UdVZv06Oi0dYvk
ljPk9WHQtGTGgI7MNkhosCwJ3K6YXNWwgY5elYV/2GhMYBme/bXXm8jzLylE
C68l8PWqyaoLRnR06pP9h9Ny//9/EsnrnWZ0NEIcPi3UzMOXzH4uLdlGR8y3
ujadFTycrpVU/dCCjpYVR2tYF/Cw0LTWsiNWdJTuIGw4HcvDtQHm375b01Hw
+JHWzVY8zHMWd39xkI6eZC2YlG7kYT3rxmXBh+lIaFPXpW41Ho5bfMp92zE6
SjlddmiQycUncrxUP56mo6jPbYupGVwcEb+1JtGejnT1frUcC+Piz16iHh4O
dDSTcbxgizsXq29PqFnnREebWT706u1cPPrnrcezy3Rke6Moank3B98SHKqN
v0NHc3UGSyiiHMwz3yKR7ENHn/ZcK0oYZGPfe6E7H/uR9Vq3bf5FFRsHLNKt
eB1AR8co6Xa+gWwcKXINV0bQkXSY0It+goUfS3DfMlPpSPh1Gk2hlYnVd++d
JNLpaOnHJYyifCZ+GpamK5xBRy/i/92eiWDil1JmL6hP6ai+7uzkasTEBZTA
Jzpv6KhNXMG4JoWBq+Vk/zuJ6ejk9+9Ldlos4N2H7JvOfiH7EWm+84nSAq6L
y5W7+JWONL3bq9NH5/EPmk2URyUdqbYMvPKJnsetCg+DI+vpSOlXfNjk7zk8
uVjj1pcOOlJ5a1tmaD2L6eqGZzT4FNBppfArgmJTGD24vyAqoIBoadSzRU2T
+IL0j/BRQQVUXcHZavB4EhczLn7IFVFA099Nn7lvmcT235PlzCgKaOdRZk1M
wzh+7cFXYbdUAW1+ZeyccW0EW1RXrko0VkD9v6Y6zl/rxTcu2cyK31RA6zdn
qE5WVWCVjQ5Vmt5k/JIllyhvyvBn7pVks9tkvN7A0h9xpVg8PHybl68Cevu3
+XtTSTFOfVEWNxSsgPYpzTcmVz7FFYP6G6qSFNC2id3dN5vzQf4sxeN+sQKC
jy5r5zf9hqJVS6welSggoWYWLX5rM9hNr1r66bMC+tKwI7bWqgWe+VpUzJYp
oIqmj/3Tx/+CUfptusN38nzL3kvJnu1g3zZSYNaugLj2PUq5u3pAJJMZYtdJ
5v9gat2G2h546SJyyqtbAS1ue7b11O5emGeribzrV0Dnq6XsH+/qgxBl2yPL
JxSQy2n/gqztA7C2+7yOyZQCWrnEOHrV1wH4le1OHJ1RQJc23CndhgZhqWH0
06gFBTS1xO6mgeEQfOVL837JVEACavIvBfOHwKnq5b4qtgIyWvFf5Bm9YZCM
+rCil6uAmuttCKsXw/D2SNUCQZD5Pqtq+aQxAv8D6d6Ltw==
      "]]}}, {{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwVmnk8lN8Xx5ntQbIMM0qSJGtKlCK5JyqiqISSNkXKkrIkUUgSQsS3kFai
ooWQZC7ZKVtS9j1b9n39PT//jM/r3jnn3HPOfea+78xaq0uHrSlcXFxLVC6u
/79OGzo+PnjJW/vX/BL5R4D/OTn5CtmTKP3ME6taUn8f7Lx4T9YR2UnN3zMl
9RtWw9M/sW5IRbLxlvciAcOpusH2sjdQ0g81PbMFAsQVfn1ZqvNFJxVkG3/N
EbDTPXBzSaw/Eoih6VNmCThdpP0q/Ewgqhw1uv97igBf9piEpWwImjRI5Ryb
IKD6o0lJ+EQY+vlveePtUQLO1Sv7TdWFI1C/MGw5RMAENw+yzHqAhu0WiJZ+
Ml6F9hkcG4Wex6hs4u8hQOxQdtr6mw8R2y7KubODgET3qEuBZ6LR756hjvMt
BJQVGXSZyMah6cmzd51qCUi5yjxoSXuKBPLb2iYqCLgadDM5ZOIp0tyxMlm2
lACe1GO2Y3XPUcjA2aHArwRUFhYWrC95gY6KaEXkpBPwqF5t3dGsl8hP0pwa
944ARYpAc3ZsAuqtyko5/ZSAUdb1HUP3XqELclJSux8S8EWh5+Ham4koY46r
tCaUgP2H8kz8z7xGc74aMO1FwKWnbiXGsinI+POdvcfMCNie1iHrK/YOueGX
1OeGBHCdk9exoL1Hq+yP8j4EAkquRj4JnniPXAyvBAcrEGDx5JLFSN1HNJ42
RYmdYoC2guzdwIOpKINrT4hJHwOkUxsz1pWkIr9/b758bmRAf+E+lllWGoo1
FeGEYwZ4Dq6rzIpNR+5delOefgw47V6/aMLKQKIUN/F3LgzYTbmv/O9eBro5
7upz/xwDlrMXA9fczESbknq5bHUZELfz9x6/M1kojUvhgNUCHXKDg78ckM1B
N8JZfd+s6JDT96d8WVIOGrl9ss1sPx2y9eWaS5Q46Kdnw2TYVjocp5zherEC
I4sGntk5Bh1Mc+ak10jmIpsLJVKZ8TQwUN9sK6bwDdUl6YWvq6GCfledk9vF
b2j4ZirraAYV9B7cuFb75hsCL9dDmjFU2D1aFhixMR+xvyUW81pRQTvFJllw
SwFav6qsua2fAmqysaMEKkIqO5jbOoe5QbVWZ87Guwi9xsMSGyu5QcWvl1qY
W4RO/9v0VvkdN2xsV2f57S5GDoM9g8b23CAfV7WNy6AE0bdXn1bp4AIJNuE1
faQMje+wNuTcWUJ0xhWi92IFqsx9FGr0ehb17LspOPaqAs12z7ybPzGLSu8F
iy10VqDYit5WA+FZVBRYExGwqRLJDFKry9xmUBBz8EVsUiWa/BpUemPnNBKV
Xpef/7gKSXuxWS+zJpDsrns0ln8NUh7VW0PxHEb7bp65/cmsDg3nCCp+uV6L
VENz9z5zqUMWxtohpeyfSOLJWp574XUIFYR/iPhQTc5rCzz3ow7Fite7fS+v
QFGLZ8JE9v5G911qz22OyUedXlYxl7f+QSdmwzzObr7H8fY8+0FZtAF5nt4Z
+cywjnMx+NuVlaoNqFhWlbf53W/Okdh1W+gHG9CDD6Ny+SL1HLnsjvTGoAZk
Yf9s/Fp9I+fH3NnsIGojihloWPDZ3MaRuH6uqHe0Ee0/dl5mQ0o3J+OadVN8
VTNycT3akpA6zEnQtqsTH21G7V4SId8FRjhR1MtVocwWVLD6+LKUCyMct3ue
BddMWlBfeVR0lOQoR/1ZRPKB2hZklrbg2OQ3xjne2ZrjYd+K9Iyzpbh1Jjn1
ywRDpZ3a0MR/naodLnOcw4PC/Ce829D88oKUgPw5Tmml6N3/wtrQoafV3V9E
5jlZkeK3+D+0oRzRt66F7+c50Wtkr06OtCHNzPlm/a4FjoXazlOlzu3ovS2z
/eoqLvzHwm7Tlasd6AT9RvR+TQoObNez/8+/A9Ufkr6bZU7BmhdlkrIjO1Du
lrTP3S4UHHutSZpI60CPNhxG7ikUfPqhMTt2uAPpUm++cpGk4r+1agsFFzqR
4D7HM54jVPzwhJBmv3snYu5L8nzCR8P6XQNuQgGdyKFS/JvHOhp+PR4/bJHQ
iURW7nM8eoSGHUVWdA61d6LlTbqchI80PHFwvnSlZRfq5CRl7j1Dxwm/fxPI
rgs9TRagFrjSsdnpT7vPeXShITXxs5N36TjzkmNOysMudJ7yRffyBzr2DGn9
oFvbhQ5fnGvlzNOxMvvroG1nF1oV26tYIcDAzY8fKYWMdSEV/jnrUCkGhuTD
8b+Fu5F8qNzHtboMTC3Pf+hg1I1+Zp8b8/dj4DSTZ7XhJ7pR/X9OgmIPGPhc
gxcz074beRb90zZ7wcCFferBlKBuVDdWvNiKGTiQN+nmf0XdSKjpubH0NAPv
uH87O/tXN3q/enj/ejqBB1ZYzbR1daO+tR7FtcIENpJf5byB9hfNj3vf1lYk
sLDePZtc+ItyYcpG0ZzAu5OykdKhv2ih4z9eJysCuy8bWBF55i+y/8W908SB
wK0VBmW2vn+RldLNpyM+BBZV9XhZHU6OlxZdextEYP0HSV5aL/4igSd71GmR
BH5/lEdFKP8vyq9U+3o3gcCdWdt4PX7+RYUt7TszUgi8YvX59o7Ovyg5Z4+A
TzqB99+M+nJg4i+ipUYs//uVwN5tBQ8y6D1ouXKiRG8+gdN0JxzWsntQowFV
8k4ZgXviZfSCZHuQ/5HSCVxF4IMXb82c1OtBu3855BJNBPYr/1hdbN6D+JOr
b4u2EzhzY/sbVdse1DOelpvdTeYnTPh2rHsPal/lcYarn8BSY3CScbcHWQlv
MmkZJPARU6dtTo96UM79AP9jowQOyHgiVJ/Ugyoudgw4ThA4e2VFr25WD7r3
efe1NdMEHr6+mJdc2oNSpSyk7GYJLNOsHCvW0IMcpq/9PjRP4KNwwtWnvwfN
ur14VLNA4ODnwUb9cz3IpvrGieFFAmNatpwpfy/aevzEmsQlAo/b9HNxJHrR
mjCNxllSy5eI18sr96IixYzwHlJbKhmkhu/sRZfXr9O9TOqwe9eC5w/0IvzZ
eegBaS9/KNHa5mQv8jiqH2NC+ps+9Fu70rEXaUX3GibPEXhDGrFC82Yv2quw
j+f5DIFPs7eNvAjtRdovuf9sniLwA3eb0uVPe9HUNbNiy3ECF9dHvrj6vhft
zFFrlx4h8LxWgWcb7kXxU8pb/P4RWOXJuKlhVS+y6fb57t1L4HPcMps+tfWi
LbtFOSu6CPzwrAnPmtFetNbr8qr9rQQuL/BtC6D0oZAz3yfFGwjMJf8xa5TZ
h8SrKOdv1xJ4S2BbhOW6PvT6ZMStoAoC2w4IORSq9SHnfwnWyiUErnx/aU30
kT5U8Vrt7+4vBKaJPJmmWvehFNPtuVmpBN7u+qPKwbUPDVB/1Za/IfBTDWW/
XVF9qCCFol4YTeCfMZYn3iT0odxSrZLk+wTmWQxSZ2X0IdW5c7KqAQR2yuvr
6anrQ2rTZS3CLgR+KSOed7inD319mxfmcIHAv/33xWRP9yGRNtYnm5MEBsPE
A2Er+1F5zUoRVT0CC/20/rjteD+aFJh6rCpKjv/b1XfErh8J9L7egBmkfYak
9JXr/ajOq8tomNy/Vdt/3X8b04/4w8I2aTQycPjjvZfXNvajztPvWpzjGDgv
XTpJe6AfKUevvyERwsBjFYutx+dJfxaPHl3wYuAjlIyDURIDqLltwHzUgoFZ
5+VUlp0YQEb9CukFwgy815tqK+8wgP4V60w+WqRjt0ctT/Z4DaD80OgZ0X46
/lX2n6D34wHk93VbANc3On6owjM03jSAguPXFaU70rH4bE9y88l/iC9G48LA
Jxo2ECnomnP8h26W3+QxfUzDHhuerV558x+SEz1Mu+hHww0nj90zefIPtScf
ehV9iIZjv5XYF7f8Q01uOvNre6hY8t5rpY+nB1HUuLGSPIOK10nZJ922GkL6
K59fNeLlxsHNa5/duzyEvvKqXXXo5cKTsXUPI72HkJfBZN7BEi5cvFI3ID5u
CH03PEq3CeDC9iLi5wvqh1Bsw88fdVQufJx6LtxXYRhlRP1Judm6wImfFD6Y
92wYyVJLvXj2zHC2NzmU7QofQdeGqub95Ac5ubPe+3/GjCEFRyq3vkQ7+rny
yuSlF2NIR/aF49WKdtS9/ezTZW/G0OELMRVWvh2I/+qecZ2sMfRg2y3js387
kdkYb+yH32PI61tAdn7yX9TXH94fwhpHYUfPfv6t8A+JNr0M3Bc6jiwVZuVp
f8eQ7Hzklq6ocWSrcXDTuMY40lh1p9k7bhyJU+N5Y4LH0cljF1Qzk8dR5OfD
oTybJ1BSrXK9bPk4urEx3UHHbRJp/0hXoPFOoMSbltGbR6aRLae4OMd3An36
3Jur/WwBzWgISW8JnED2omKjLn8XUGCa+fWk+xMo3cRZUVd5Eb1J6lZ+8HQC
cf8+2fciYxENRtAiLuRMICc+ITfLoiXkYgsnRGcnkOi2U3cGe7iA3nEn/S73
JIotzn4UzsMNUScqBJd4JpGaQILznBw3ZBw+mdcrNoksVCVKV9pww6yWpxxn
6ySav7JP16uFG7yFM0cuXJ5Emx+9VPErpIBw8JJBi/skIszPH9dtp8Bzht7L
I96T6KtyTTNeoMC3uVozFDqJBFjaVybUqMDoHvsimjyJ3m4iwjQfUyE4a5M/
p2cSlWioVHRZ0WD11qstW4Yn0c8un/RTHjRIeZez/fXUJEr0irYLv0+DipcH
+h8wppDeSc8FKQ4NmKF2By/KTCGbkPVK9Ww6PDr7Spx1egplfHfecz2TDvaG
K/I22E4hvhzvvxPldNBWu3tht9MUOvlZ2VisjQ7tFLtMZ+8p9O/JbrkDPAzY
8HyjWfXTKSRU2HnI8zADFu8+WehNnEIfb3g6ypB8UHlZKJ77wxS6ozPY5eTK
ANddo2MquVMor/l52UQUA3JaP90PbZtCx1XfCSXWMiCsWFbjVe8Uyj2046Fd
JwOs3v/XmjMyhRrSHzlUjTKA8L62aZB7Gl18FCV2S4CA+vN9v+h80yjnc4PH
j1UEvDU+fmM1cxpd2aqz74s8AQfX7Py+X3oahcdYmrrvIkCaSHE5pziNPg5U
KOsfIHlyUFLCU3Ua8dG7EjKPEhCdw2X3Rmcarc9Sy/VwJKDjRD4P39lpVDda
XXcjkoD0PVvfr7WbRuJzqwaM4ggIUE4w13CeRt+jzpnmJBCwYeFOgu2taWT0
9HycB8mHi53TB7yDppHTy6ydRSQ/VpVfmPgvYhrtcUIfPuYT4BZruLvoxTR6
PyUdb11FgL5fdn/zm2m0uu7OyIY6kqftlSMmU6dRfLTS6/BGAgZM4jQFsqeR
ytJkZlQbAZwdgu3r86fRzHUrXo1uAsLXed/dWT6NoqLcAq71kfy8bETF9Oc0
eqhSLnN0kAD1sTO/7RunUeGP4B8/R0i+bai+6dc5jQb+XLk6NE7mM09XLnZg
Gh38U8JMJPn87eu0H6nj0+hpgmPk4gwBN8LXu5XNT6OYmIqJUZLvD3lEre6g
zSDFzwNKt0n+l7EiCmb5Z5BSsfnmT4sETO5zt2eyZlC28xbuW0sEFG/uFVFc
PYOkT2x/OEjq6JUWX3atn0E6Cm/Gp0htz11mdUx5BiXesWE/ITXq3cF3eesM
klX7tdhB2mNWvf0QsHMG0Qam3heS/jozVx97umcG5dod36w3T9bnaQhX5oEZ
dP6wtL/1LFmfgKVXFaYz6Mpyroy10yQfOzkZ/z0xgw5kany/PkGA8tG2yUXr
GWQ1GV/jPEpALBMtBjnMoC2NF87oDRHA9z2WvtJ1Bg1/ynxZ0E/AtTuz/Ame
M6g2Uvj14F8CenYdFVXzm0HmB9fdzOsgwHz+0yocNIMsDMtVd7UQUJgusu5A
BGlvn3jtxXoCXipVbD7/fAY9KylS4lQQINK9QWM8iRy/o8zoKyHA92kg+HyY
QVLqu1fhbwScYu01jsEz6E36PSNHsp9+VLwwky+eQRL7t8XufUeAViD3yU8V
M+jihxu3Sl+R/bKUbV/RPIMebv8WWPsfAXc/i7tYds+g1azHHZahBEw7u1/v
/TeD1tt/1wvzJ6C2Ry2QujCDCiqK3885ExBW/frVtlWz6GFbcHaPAQFLwTzv
8qVnUZOQ4ZqfiABHPZv0Q4qzKGy+NNF+CwGG2WsL7DRm0caA/Jp4CQIYCQ/b
n5jPIh3hdt2dveR+Pz3Zu+HULOq/Ux8S1cCATvEjI59tZlGhQYl13HcG5IYK
cv10nUWOT0tuZr1ngOc1/9U8D2bRy6u7Vys6M6BfrVMmMmYWCQ/0uC9YMcBi
cNcG6RezaLutroAP+bzZdnZBU+vjLFp1Va36kQoDRve7HHWqnEXxLj6XV/TS
4QxRfWqhbhaZnQ7a4/KLDpW5m84HtswibS8xfd9vdEhW73d9OTiLTq749fdT
LB1spawifvPPoYVZ3u23DOnQPGb8A/bNITNnx5LJaBqErKpb53RoDtkbNpY8
9qGBtu7Ja0+OzaH0MJHBwfM0eBJuL7N4YQ7t2GJ76L4aDU5vvuvxJXAO4XDD
uPZCKnQ45smql8+h/covn0s0U6Cnd8tNJeN5dPpw/8aT1VzwUDj7p4X5PBp8
dZV3yzsu0NfQVQw8NY90jjjy5AdxQVLAodqeS/NIVREViu7mgotyjkoJYfMo
Yfb9bZGzS+jfuVd1UtXzSO9wQG441wIabVmpwjZdQOd8LgfKdEwhqbNTW9ac
WEDqLnt5DodOIePunxry1qSeWHSW2jGF3g6E6mq6LiB51zDr+PuTyGaGbn4y
cgFt2MCl7qo5geqZo14JtQtI50QDnPAcRbl7SsvUzRbR6K7i2Q1RvSjsjcd5
c/Ml1PN0xPBT6lt0nHtPee3JJaR34OXwFbdnSNZccPMRmyVUsmKF8veOAJRN
eTl70HUJ3XCxFpLVecrpOfb9nkHEEoqlCWtvj87hIB6ptJ0VS4j56Wh+Y2M1
5+pHK67wdVzQdTArm7jTybFsKlI9JMcF4dnMjgj1Lo4Oj7K1kBIXfL4WGlnb
1cXhPzlVEqLKBYtVj6hOun85z3mDI4J2cYHM4B7unNlezo/Tn2Rvn+ICeAVm
r82HOLKCPAfcY7jAbjqNV71pnPN22Cch4AkXmChsordtmeCoVs8tPXzBBRLr
Da9sCZ7goMihj5/fcIHhnySuCo1JztFVdSvmvnBB5Dfb+jdhU5xAuYROr0Yu
WGHq3lupNMsZRLs9b63mhjwXZ5FbAkscl7U5tRFruYGjYRLz9OgSZ5ayfdPL
9dwQUfI+Q+v5EocoVGrPV+aGKzVK0xMrubDUfhF9hjY3LKd+/embyIUPH20X
uXuSG2aM62oiMrlxupP3m5An3MDbmdL28ykVB34ZTjv2ghsqnFx/tGdR8SnG
mRyZV9zgZvnqW9JPKuaJ3VWVlcIN+q6OpmcIGrYookx1f+WGlBV/NjtcoOHF
1bd1UCM33DhYTn27ho6rbScM+Vq54Xvorh1rt9Lxq1Rr09oObljd8UTRwICO
D+7ba2vXzw1FB7O4053p+LkLEfLfLDeMYhPff3l0vKfs7p+hFRTIVbPtizvM
wOLs2fYsCQrIys4e2XiWgQdPXxy4LUWBuAJuDQdnBo6aNFhaJU+BqM46v+lw
Bu5Zy79efxsF5DevEUQ/GDjb3nOjyA4KBCdPSe0m+eF+xsC2Zm0K3Av7Oj3Z
y8CaB74buOylwMsf0urWNJI/3UOcnppSwKGn9PvJrST/fVu8ZneMAtEKLgPl
QOCtApduqZ+gwPZOh/N/DQnc/MI4qvwcBRIecmqkzhD44yDnyX+25Dgfdkd2
BL6joZJkZU+BY1NWbbyuJA9WCGVPO1PA+Er75Wd3SD4T9yn4dpUCE3tbzBzD
CPzn3MiPkOsUOMTC17ofEth3tqpN5hYFXEL8uH4nEthsj07/kD8FXM0FlQ69
J7BS2MfxrEAKdMt8l3LNIPltfQRxKJwCGo+P8nzNJ/A+uRXbHaIoYKa5bO/p
MgLnyD+2vRtNgbdc5xlPqkieVJR+FB9HgcME/6ZrdQROUnpVkvucAkvbdV8N
NhJYUnnDbFMCBdyyF82X2kj+3fhBcfY1BdpM65XedBOYV0X9OPsdBaRyVwmO
9hH4xuYvQaqpFJCmpw7VDBJ4TBWyjTIooIw1vx4cJXl1S8HAxS8UEHOYtrWd
IPO31WD1HQ4Fbj5r7BKfJrDJtooDL75RYGz3LXnbWZKvtx+5wSmiAE+umtzB
eQJra/5JaSijgJNi259qkt9Td5xsmaqgwLiVoub/7wvkd3YIiv6kgNUWC93/
3xc81rYFld8UcD93fvT/9wVM+Oe0v5EC73PH9/z/viBg15Vntq0UoCoc0nYi
9YLOVJVfJwUe+11tCiftXdntSXnWQwHfbwJyB0l/PXu41b4OUGBN6QWpxDkC
n9DzP/tnmAI/jt+pjJ4hcLX+sgcT42R9F4RBforAegZh+cIzZD9Wnrp2cJzA
2YasCWXyHE87fyVAZITAqgei1xtwU2E2fNLj8j8CvzJaY2ZDp0KNwu7TF3sJ
LHHwpb8vLxW2FpzYt9hJ4PBDChlxy6lQ6TGsr9xKYM8jaivqWFRwEgtotqwl
8Ihppv7YSirwJW9/fqKCwDbmO68JSlJBcSazbqaYwIcs9Or1ZKngr5dHp38h
cOHxcr5zilRIV9DScEklsNaJQzu8N1Lh3F2bIzffEFj29PHYTHUqWLIbSy5E
EzjmTGv5T00q3Ck8YL/vPsnzZ60XhrWpsKvki38B2c9z1pdOKuhRYXT8X0GE
M4Er7W5JRZtToXBkRuPeXgLvceA5lH6cCpoiK0+YahI4y/GeT/UpKpxlO57/
okzg+Mv/tfPZUmG14jYeKxECe1x98/K6OxVu1A9+WFPPwEPuKrX/eZKcs2LZ
jqZSBj7n8Yme5k2FgXVSvppfGNjYi2MzEEDG395vUhvNwDK3auRPPKJCzxuv
5xGmDHz0I3WzDclJVlq2/m91GTi4TU3j0jMq2L8sLbq4mYEn0IN9PklUCNN5
d+/3MgYunD9yMf4zFTK3bX7mk03HF9x+vfn3hwpx387ZHF5Ox3HxjLTJJirc
GmgU+TtBw9U/1bOX2qig+zXAQbaZhjXV/isX7qPCYFN0UkIyDfMPm//bOksF
ifc1GzL1aTjlwp+NN8RpUGZ8e8bjEhW3P+TddkeSBlozFxP6DlOxWLEGCpOm
Qeab9UnL1KnYWzba+LkiDbyXXb1zdo6CD3VYOBVq0iCp6UDlVV8KHrds/CBw
nAazmmPVT3y5scbBli1PYmjQPm9noPB4kZPdQ/9n9YQGilUpVZbmixxtnw3x
si9o0Gw7+EdGeJGz++M1Vsprcv6XmUNutxY4RqKik9mfadDPlr2ieXaeY/Vb
P6O+jgayl3gT5YVmOUGnP2qwRekQ2BZiMSA7wWlyuq19L5gOE7sbr8byd3E+
ahxbXnCfAbKZTeFrTvUjmdHA2AeRDHhrufAYBAZQ5OtspXOPGCAkzf1jLnsA
ua+SMqA+Y8D9pZw09ZWDSHuh238Xee57msH6rmUzjMqwC1fODwYo66b78AiM
oU69sLH0ZQQYJweet5WbRmZceb7+ggQE7gt22eM2jYoyx4TNRAjY+NfhYwnJ
Qa8VzFUmxAmwDW098O30DHJaJumgpkhA9nZNOUvyXLnw4033O32Si8bv/93c
O4/YZkV/Em8TIKl+8zbzGRfs1XoJ1ncJiOcvK9fP5YKr0j6v1t4jOeL31ce7
27jg96Cma/QDkhs/WKwOkuKGmDspQsEvCNhmfjxSL5YbpD5H6l3KJTlp6fvy
tQEUOPjkSopSAQFFn1XOe72kgM9tY1ZPMQGh+n9TH2IKtB/i7ThdSXJXde8T
vmkKxPd53jhMcsO2yE9QdZbc1xLnPm0lOYdLc+6/hxtpYEHZJTHKxQNuLwMU
M/fSIKhn9a0UGg9M7mcthJ2kwUBa3UE5fh7YvnSA7XCPBu8OGA6sWMUDFxmv
tAr/0qBVTd6kVpIHxMtb+hMWaCAkTs+6L80DNowSS20ROlzpzrnDp8gD978c
Mg/bSYctN1XXzW/ngdUCKz5khtDB2lowMFOLB95xZdnqPadDlOHAsAvwwN1L
j18EfqLDlFhCzj89HvCrMPtPuYEOWe9XWrSY8cDHlD8nmqUZgNq57ue58ECm
eYxQ+guyL26OSla684BKo9/8m1QGtK/qfNvkyQMuZ06l7P7GAD/TouJpPx4o
k1S3PtHGgNLie1ybInngmGuu5/qVJK9Z3wzResQDG4+u6FeUJcCBclnC4DEP
GH9R2VelSoCQ1pHt1vE8IPXHisFlSIDZO3GnmE88kCWbod7qRoD8fv7FxM88
8KfesvSvNwEzPQtB6V95YNm8zJ+QQNK+dNurqgIeiFVdVZYVS9rnVG9tKeGB
nM9JZ1E8AdqW+d8GvvPA0DeJdqtkAtoiX7UQv3jgRlQov382AR9VHzmw6nnA
KcPa4zbJc34VgXPSzTzQuezHoXWlBJjae95VaeeBkx9ir54i+0CW11FMu5sH
lCbUqzV+kbwWfyresI8Hbn6N2PexgYASnUNqxwbJ8YEdRcWtJD+36OTajPJA
a5aBulcXyc+eW4xdJnlgQcjxVkUvGd9K2SafWR5oq+6O5fwjQDBdzC50kQeq
Fe9eOUDyf+th3plYCi9YlWVPuJP8/3Fo1v81gxfOKnmt1CH5/1bwgGgmHy8c
+nKsOpHk/yMKzc8LBHjBUtSNnUzyv2xhhUoNkxfqpQKbjMg+nbLKzWll84KR
drtUCMnrxUsf9w+K88LI0VMNF//P+7Ev6+ckeeED11XeLlLbaUTZ8q7jhcKr
aknzpNb6dWeSLccLaVlqWR9ILeB8zU9GiRfafd7spJG6RdCOqbqJF15pnVUf
J/29f2v5FKmR/umZiT4k//vuM9p4YBsv9N+PiX5L8v+RbpRtsYMX3NgPRFxJ
/l9/a7OBLeKFk0rZEg0k/0+uWffbVZcXHOPzcDPJ/8XZoja39HjB+WLfMm+S
/6OPMcbDDHmhV5uPn0Pyv93klE+cMS+suxdcGUPyv1ZEr+BbE16YX3/pIpvk
fwGVhsefzXlBeE5nYGMzmd/ycqWi47zgV610ses3AR8u5Hz+eYoX9MZbZjRq
yPhePKsdOs8LEs9PJH8tJOODiLMLdrxgS3Og/eOQ8TX6jfA58UJPYHVNViYB
j9i2y2XdeWHLhXMmqkkEZEocNBy8zguZB4zrHZ4R8Ft6+930m7yQFSTYcuQR
ASs28dD17vBCJRapWx9AwPatwzqCQbxwK7mMELpJgPmO3951IbygRoXNCa4E
ROklzp+P4oW3t1Qnf50hIP1AmKZKNC9sigz4fdmcgF8m7u7Tj3mhtGXfrs/7
CWCd1h8PiOcFu/2RYKROwAP3nv6kNF5YUSF8OZJOQNqNSoUrmWQ8v01nHk4z
oMYv87xmNi/Iym87btDPAOb9gI7Sb7wwvP6wXUYF+bmQJN/QX80LNYXWGvgB
A0LqbUuVR3iBYvxHPluQASmtB3kmx3khuASz0hfo8L17+96caV7oq7t54kw/
HfjHePKMuPigWOAX7XsBHYKWJX2+JMgHYtWa67iu0iFAqzfxgzIf3Hi9/a1o
GQ0Sdaq6r23mg0PPX57ak0aDIv3PMjpb+aC5Q5Bnw2MaMEzvPq3W4oOkhmO3
JBxpcNtB4eGYIR9o11g6RPDTwDfuwp2tF/ngzmDaW1ktKugctxkwcuSD5faJ
WhHkuYy64uwh2yt8EAaHr7/jooLffctVMR58cFrDfH6aPAf7+xm/4wrig6mD
w+LNJKfcvbi1ruwNH9S4fzxvTXJemDq3nNU/PmBuP+UVPbyADo4tBF0f4YO3
UgUqbi8WkPD72eEHE3zwS9PPqpbk/HCF8ayiBT6QmPI8vu7zPIqQ+GukLLAM
ZCqdytd6zKEoyne36Y3LQD/0sUFl9zR6/ONhYYjTMjiWFkSEuowhic9AjXRZ
Buv+HdWVkBhDsS96UIz7MrhV+mmN5bdR8v/tn195LwMxibdHZ4RG0SPp329w
2DL4V+Z8tipxGEW6id0ffb8M8p9kXHd62I/uSUYdNxtZBlgrZ/Xx9y3IyzFi
ePUVfhBSkjXjc6rkGORtbmp25YeaLbrRo7+qOCvYlSVPrvFDJ9QRsTtrOGlf
+V+s9eGH6PLR55J8vzh9/P6m68P44cjVtt6jTxo4R9+4Z21I4QdHhqiU0vEO
zpaeE347+vjBov07ZZvmIIeiNe80/48f5AN9XlK7BjmVodEnvo7wQ9TyF85n
Q4c4dtvq1NEMPwTfin184fIw57n/wV4dnuXw9baa2Mq8EY7Qel0jA9nlUPlS
LMDFfJzTf0Z+xTGr5WAi+eXPDoMZjoV9g5KdzXLoJtZvFno8wyl2C0FeF5eD
fa+2o8fQDCc+aNzm2RVST8TvWRYxyzn1CX/q9V0OpXGF3jM/5zg1PMdMPF4s
Bx/42NGts8jREeE/H/xqOcxf0vD1ClnkvF/N8Yh7sxxUnd2DI/8scu6prn+e
l7oc9hd08u5xXOLoWY4M8+Uvh4QTXUysz4W/vLsbEtO5HIZ3JA+onOLGilla
z5N7SPvjP+i53tz4Yf7QJ87AcnBfeP6Y5zk3dv1j2tQxvhxYj6TWZXdw401U
6Q0b6AJws8skO/4sBb8wyyrJXi8AJ+m2TUKmVMw849D0Q0EAujLq/tZfJs+r
dlIjrcoCYKOaZ30khIpPePuvoKsLwLunt7tMCsnz7evD5w/sJeeX8p1xV6Xh
oIU+WrONAPTZvBOamqVh/csPil9fFIDDJ0oTJoTomNa1M/iqowB8dvy5OVGW
jm+Uh4kIuwlAvrT3oNwhOnaKUZfefVsAjibrfrr7nI6VBVu7hO4KgNnsxbg1
6XTc53s3qSlYAE5ZGcufL6HjsxcbVa4+EICowmW8fEN0bKbhi16/EIC3+UWv
/lNnYJFkJerVVwIQ+ylqe6oeA1dK1RbqviHjVYu3vHGUgffxyBs1fRQACR0F
B+lrDKxV991SKI98/xF9s5h0Bp4xuCrVVCAA9j4v1igXMHB6jlRnUokA/Npi
nGFfw8CbEpztdKsEQPg64/b4IANLu670cGsl8+O1SXetNIFbevJ26nYKwO5j
m6UkNhI41tKeW6hHAHY0fDn4TYPArN2cgKQhAWi4Z05nHyT5M8N2v9uYAIjv
/rk914LAIUpMId0pAcA/PkiusCYwj4j1f42LAtC+4OpQ7E7gAn+B40kUQagJ
NAhd6/v/+4YMSTeGILz+alm7PojkuTa+BEEBQQib23FgUyyBM03TLjQKC4KT
xd1dW14S2KXkhHISSxDKOlktHSQvDr5/n6azWhBohbKJOlkEfiNj4S64VhAS
v5Q9GcEk/z+kajXKCEJ47chvgyICy/AnLyXKk/Y9UrSMvhO47abZN9cNgmDw
d/+nuWoCx40t+euokPM9jTaa/CawxfkkA8EtgnCW1+7BkSYC/zSar0rcIQgp
vN2tR7oJfD8vPtIVCcLVuMIEkz4CG6kbH9PRFYTM9sIV8yRf872elhDUE4TY
gI8KRiR/F61+3tpgIAiHhe5930fyud99w5eJRoJgOHZ/ZnCSwECfOO96WBBY
ZVte7iT5fsE9TknHTBBanNcWbCX5P2tAb0jAQhCuK2qZ1s0TWD0kNrD4hCBo
K88/kVgk8MdNI+t9zwhC6tDq9wJLBN5YtSd3h7UgiOcc800mddKVaMsJW0Hw
fBUgOkNqGdGhqRR7QWDffmk9Quqnn3QjbJ0EYXihyDWK1BLmDzdKu5Dz/Tfu
7SHtP5weKGm4KgiHLLf86V4gsGj0LuvI64Iw62WmGk7GE7Yjisv4piA0x6ma
9c0SmL+pL4bnliBoit0xGJom8J0baFuevyBsr1RlPyPXS5F6UH09kPS/YWvu
0hiBb+T2OGwNEYQLfclHlpH5mrXayTt0XxDceZrqv5H5dKOFv0yMFITkx9Kn
FMh8j8Z3I6tHgrAqbfHfDrIejno7GlY9FgSF1cKRc20E7usJdat9Kgh6OivP
2pL1sw7sFA59KQjlIxPnfcn6tippJOsnCkKnXHzavhoCW36/p095KwgxNbrH
c8j+OCK07aZrqiDk3bWkvc8lcOWHIPFNGeT6/iaqKH8h8H6T1k89WaSuCuA7
mkbg3VF3B47nCUKJ0ZBsRjyB1SQaj+lUCUJDzurWx34ETvmqMjH3UxDiL80Z
BV0nsOKp22GffgsCY7+CvtwVAks/31gk3yoIrieaLO1OEpgp77NFcEgQ/F1X
dcmpkfurpLaieFQQJg9udrknR/aXnaKd76Qg+CyMvX++isDcKTXPJhYEodV3
5E8jhcDTKyMIR4YQJCTEpj74Tj4PLu6sNeARgqIbe654chjY5cvf53J8QmC1
LUaP9YGBhy21tNuWC0H2f9uXLCIY+O+TLpcjLCHQuqdtqXWEgX+t396uKSME
N6OjRQKK6Lizyl4XZIVgRYiT0txHOh71evZyj7wQpGqLPGfF0bHgL77zBzcI
wW9OKEXHmY71/Zv6rbcIQWjoB23flXSc1e07EbZbCGwuxjwbNaXh4vAMs6i9
QrDouT6VoUXDv7QHMmL0hSBZak6yeC0Nj0WZeiTsF4Jw/6epRwaoeIOe/NKX
I0LQfj6k8akXFT959Z3n7zkhOFh/Al+4T8EpJpSLAzZkPE38AQFXKDh7Sb1s
xFYIpJgJk8dNKPi3+dN78/ZC0BQjXiQtSsFMHmcm01UIJI8zHbTDubGf7QqJ
nbeF4MGnwuPrfLiwrcLZTRHxQqCb3REvenyeI8kX0eP6SgiuhoQP1AvPc2r6
8p4dTRKCfElJ653Fcxztt9KikslCcM5fntagNscR2dQ+nZgmBBfTHw9HMmY5
OVvO5OV8I/O9sPX2ZPQURxROmfa1CYH3B6tUyp1RTq7Z8eu7JIXh1f3JiJiP
zZzCcFbxfilh0L/h6Dq0sYlT/qNC9Ki0MBxfTLcued3A+b13d4qjrDBc+SNe
Lv/sN2dYXbktZqMwXNVIu613t5ojKba0d1JbGGL1/RxOq37meNQ9Z745JQw/
1h9xSlOrRmpH+5JEnwmDxoCJeqPHMGotfmK08FwYthxxXF9WOYyCNUzHul4K
w2BpXKWn7AjqFsdaGYnCAJoG19dVjaDopsiKY++Fobi5ZIvlujFEObtrIo4j
DO/Mlk07Zk2gSoeHoNAsDJP7WtOGXs8ir+YDXcKtwlDe+q5+YHIWKRpTA2fb
hKHD51XeHZ055KfiWFPWJQzesvHB4b/n0LYxXRvHf8LQpj21q3lpHsW5DwWl
zpPxPDGtOae5hOxv7a3buYoJ+eMJw+JvuWE6sOqvxGomCPzatvNUKTfcDrec
npNkguXXL1rWPdwQ9+zKyixpJvip9r5PW0eBSk7ccXVFJjiG75cx+48CavOT
LRs1SF3+5ofhFSpgqu/w8h1MCA7hGrgeTIX9y5Zz/9Mix6MZD84nUOGc+Drp
N8CEAUtucac/VIjabnxOTp8JkyaJhlpaNJh1edWzxpwJb41SG93GaeDvqTqz
eJQJ41MKKtv46CDi95W32YIJ/vn+tclr6LAhokYx9iQT5sKM+rL30UkuX7Jf
YcOEyA+euhbRdOjLDPSaOs+ExZe+sgXJdLiKWSG/LjDh9aVkyU5Mh7AKpXcP
HJgQvTZed2c3HXL/mY8IuTKh103E2FSZAUYT7dzDbkw45jyVd0ybAfXzDswK
dyao8304JGTMgNFlfmr3PJngMfjoV/glBsgovnfl9WPCD4UZi79vGfB+8w7/
nttMKBSt9HD7woCdGoVRRXeY4BJmsfSphAFm+o0Zt4OY0GfL77SniwEBNjyz
3BFM0Az9zHm6ggDrktVxvJFMeCxDsXq3ngCdDWo6wv8xoYsx9PKkKgFzIycC
pWKYwNTdvDPOgOTJI84b5R8zoTL98caNZiTPZQRUb3rCBM7e5ukTJB86eqWK
oxdMeGDHdybWjQDD1uKcvfFMED/u+Oq1NwHyus1WRq+YUO73UOxoIAHtPLxv
TrxhgtuFg3WhsQRw7CSNrZOZULrvR8PKeAJif6iN2b9jwp7OMWedZAJMH5zc
4ZlK+icO1ztmE6A65dxy6xMTxn7SL175RvK2xd1bQRlkPbuOComWEtCfHScX
8ZkJa69NfzCpJHl+TVpZ9BcmbEhav3XzLwLifUsuPf/KhAN1n3zeNhDg29Us
8prDhCoBEZ+CVgJO6Y9nfMhlgpKVlqRnF8n3b3gtP39jgvuuwj2VvQSsFFjD
lVvAhJDS+q7cfySfO215WVxE9iNTc/DgCAHVNfv0K0uYoGWredBrnIB36qcG
6sqY8O5+8eLeKQKCH7mEtXxnQieX7WDyDAG283e3/K1gQjZVjfVxjoA9p578
HqxiwvOB+osmCwRI56V5TtYwAW9J7Lm/SMCSTKnUYi0TPvzncddhiYDGOy35
9N9MeCpfsq+b1J/7xm2X1zOh9vRzuf/fp0Qd4FvOamRCltxb6Xekdn6/5oNE
MxOMfq7TWiLtHRTZairTygSGfLPbAOlvg5vBjFI7ExR19erc5gng/XPqsVon
E8LDrc7GzRLQvcN1145uJvSkl0qfnSYgLy6wS6eHCUesP0gWTBDwhPvpXYM+
Mj+7Ws7kjxLgee6T8uEBJvl8TZ0+PUTAsaLSqmODTECvZUai+wlQV2x1PTPM
hCC3HIsrfwkQuTex8sIo2V9uL/b+bSdgeIgvx2mcCVvrg4pmmgj4fljKyn2S
CfKHC0aSfhPw+tNWhvc0E5bnqDZMVRNw9vppo9B5Jsx+lDB0KCQAml1HoxbJ
fETuoUdyCJDYFRQVxyUC1oazXRaZBPxipDcn00SgsvxTRG4iAakXynw/MUTA
ZzXlmdVTAsLKW2W/8ojAl13nTJ//R4BB+LJL5fwikD6wZc+iHwFfV59Z6hMV
ARE7gcgNx0l/ny7PVbBFQKnRJi34IAH5+32n0laIwK01D2Uf7SGg/PqLoRsS
IqCNe55lbCTr96erhSkjAmDnGCi4wIDTlycbptaLwPy7Gz9+DTGgk4f43Sgn
AmULN7FhOwMGtslXJiiJwJWI3suokAHzkRexppoIXFDLeGESyABv5evZa7aK
QH36g557HgygFQRl0raJwOS3w95XLzKAf/zt+x+apH3Z22HH9jFA4vDQUysd
ERhzNCo7RWXADgEXn8BDIlC986xAsi0dcuL9vC6ZkPlZb0GdNaGDzs7Ia0dM
RcBY+5L9rDYdDOzTL0seE4GJ7Gsl//+ewKJ0+szH0yLwbPUxlcIsGnj4e+nU
XyLnvzXeqDdLhcXVIdqcyyKwuC2IGGmlgu+nOM2XziKw41ZggEkRFQI7OaqO
V0WgLiFkVDeCCtE6lHWUmyKwrU89tVGOCp8X/amKISJw0+ufp+5uCoSMrI3Y
Fka+v2r6k5wMBaw6s6X3hIuA8na7axwqBfhKR3edjhKBy5MS35blcYNl5Env
qDgRsEy1eCq7gxsWldQXKO9EwGg68nLHGi6Sw7omGypEIOTY536DS3NoxX5v
/94qcv6AgNBWyTk0oL2KPVUjAgLXdvW+LZ9FkTKHtjJ/i4BMfpy4ofws6h7K
dtZvFQGJ0ELf8/XT6K7/g+G0YRFY+3PippnSJPqRqtt3T1gUvEWrl4sEDiPf
nWld90VEQb9wce+aTcNIvUimLZIlCnTPUZ+aV0Morp7++/FKUbDdPut3Q2MQ
OXAXFySvFYUIU51biub9iN94/7Pvm0XB7dDd7/Y3upBB35Gjyw+LgvBmA/0l
6RpUIGVTGBwuCv6f2xyfiTVxpFqqVjo+EIW9L/wywbOZ4/F4p4NxlCjwBb7Z
6dLawlERZ4kyo0Uh9O4ruTyTNk6sSP6Z/56R2l0lrkWsk+PCkF549l4ULENv
1SqH93JkBprUMn6Q8ahRNkitGeXcfL3vzsNK0r5g+8/7V0Y59baf6q9Vi8J9
NzW9vIJRTlhXsI/WL1HYUpM/bGE3xplv3lGR2yQKDzl8toap45yfVY8ulg+I
QqtlxIsNW6c4fhmmz9r4WOB2Tbtw78wcR6XKMKCfnwWP/Kdy7+vPcxr6dl2a
EGBBXJ+byvn/5jmqkht38oqwIOC15L63agucFj/GH5VVLNB+GLvc02aRo3k4
Q8hbiQX2ssxqAQsu3G2XPHVXmQV/Lwzv++rFhe/fftEcsYkF280ct8k948I9
maFvX6mx4NeRJDmlv1w4co2tfsUOFkCZWFDHJW48PLDCW3I/C95Kno+Ncabg
WIbgeXkjFoxMFIznhFOwnhTdSPUgi+Rdz1WRHyg4zmRk1d4jZHzOoT/NBynY
MKskw8GSBQ9evwCFc1SccMdjKNueBe7NedHhQMOHnzn9KnRkgZ1wSWSSBQ0v
ZNl8rXRiQfDNvdN2LjR8ZPBwUKcLCz4rluqPJNAwt6mSHL8XC/g4Dz6PEnRs
Kd148vg9Mn+X79/2+EzHKU7fH+uEsqCEbS73tZyOuTk5jQr3WVC4LqbyfQsd
Jxx/ZjH9gAV3J9bIv6aRfPLAxiwylgWHPiS8azJgYJ0O80jPOBYInF9t8Ow4
A0du3vfz7FMWuMhc7haxZ2DNH0qHVV+ygGPps40ezMB+xMiBijcs2FcWtCRc
TPKMaXtwejILZFQ2W+v9YmCFlzVlj9+xwN/GRkixk4F/QPo++1QWLFS6X5pc
ZOAVHtf38H4h663cvTJBhcAXi+39hrNZICZ/2wG0CPyVffJbXQ4L9BUPRPrr
EdgqFXYl5LHAqmwDh3WCwG8H6Dt1S1kQmTJgvIPkwUXNqeuK5eR8qq6Qyj0C
H7rbkyX8g6yHS9jNikgCT64v295axYIm7iNDyxMIrO+SfbWohgXN0yNpb5MJ
HJOXnJ5SywLb/+pSJ0j+hFNhW7z+sKDti9TE7TwChyf7OJ9rYEHjrzOM78UE
7pq78tGwicyPa8Lg1x8E3m5wbkS1hQWBxIWHR38SOPChqYp4Gwt8L1gOxf4h
cGP33kvcHSyoUbZvDWwm8Kat21N6Olmwqj37mHQHgX1vKfyr6GZBqfFbg7N/
CfyzSnxDRg8LnDKrXhzoJ7CsFL9dXB/ZH8sXzdoGCXzNcSHp9gALBtZpmUuO
Erg8e7DHfpAFse2VD2kTBJZc1ip3ZJgF5xx2CD+YIrDTsSqbHaNk/AZbM8pn
CPztVV689DgLFm9/9E2ZIzB7MrWTd5IFRmVt9hoLBLbdHb9uZIoFYT4bnBwW
CZwVHmX1e4YF3M3qAQZLBF7educZZ44FcuMtHypJfXrTtdaEBRZI5+7qXyL1
R6+La0KWWBCk+kHtN6lp5cdPunKzoVc+J+gYqc3EDzy2pLIh2lVt4hZpP9FW
u1GXzoazP9nO5qT/ufRNq5QINji1JvL+JOPbGDtZwMPLBoNtr/9SZ0l/Pl+d
uvnYML5n+f5Wcn3hNn6r8vnZYBSyW/sCuf58Q8PCZwJsIMS6CuPI/EyqMC/f
FGJD9oGEIe8hAsuz/6w6wWSDTNeZb4IDBLaYe1KoKcoGw3ciRoY9BA5utbm8
gs2GOuc/sWqdBM4pUJaYFGPDybzRr8UtBB5+PV5Ys5INFRhjvgYCH3H1lQhd
zYZIwYSUyEoC+1vsK7Jfw4bW+PU5zaUEzkRCVwzWskFzRmH6Zz6BJfjiiujr
2WDmPQUlGQQ2Gjp3pUOWDX/mlbyK3hPY+6fS6lx5NlQqfNF2TiJwZ9znK54b
yPyJr/xc84isl5/3aouN5Hr09ycG3Cf7+YJe8TYVNvDsfH63P4DcH2q1q8fU
2DB6vjjmixuBm1fEFlduZYOvSd8yBQcCCy1aOadsY8N8eNXA7rMEdikeLr6w
g8yXQGlQgNH/f0/C79Kqw4bhm6Cvu5bAjjo1kjm72XCd/gLkWQR+KhddErOX
DWIHlBuzecj6jsqtMTdgg3tZ/uuJQQYu99ct/X6IDX9Hd8W/zmDgRTs+1zcm
bJjLvpYinMTAKoeq1tw1ZYNur3yNQjQDP1h1ynX3MTa46Ucgx+sMbPneQ+rL
aTbYH+x+cECTgUMid5U9tGKDtMwTK10FBsYePG5u59gwmZXPMyDGwDJ7oso2
27Lh9ZfWSrNxOh7488Et8RIb/FYGbXiURMee1N7yyBts2N7QbbqMQceLuprL
Yr3JfvFgL7s8SMM+fkH7nvuS+ZJJnfb+RcP+9I2FKf5suLVsmvEsnoZDCWdO
UQgb+C7ocv1DNPx82cKHmTjSft62g8LWVCyz32h46SlZz/1sD0N9Kn4V/GQj
4wUb4P25OHUlKn67XOcN8xUbVjUYpK0dpuB0wTsvld6xQVZf2OGoGwWXiAj/
d4LDBoaFxa90F268/4hV7dlcNtx5M6q+w4Qb/3iQKnLxGxssG23+c9/MjatZ
ZmFuRWxY0e7gK/WPCzeKxdwNrWCDyCmnC1vOcOHhVes9c1vIfPAGJPy6tshh
y2icWc8lBkIJJoq3781w4NHtKR6KGDwdjBGNghnOBYHqewNUMdioONe+f2ya
kz19MSuVEIP+LSc935tPc6y+x4roCIrBNsrcCkeJKU6KG1fhSUkx6PNxCMuK
GufsLSlSfKglBsc4fRWrkgc5Vx3NxvmuiYHcRY8VaewqjoT6uWLZ66T9uA3r
/2NUcPDC5VgdLzFw/FW2TquljMN3795uDx8xoHeesZAKLeDEvcl/0HtXDObC
3R9/qv3AKexR3VocLQbOqZ8vxJzBSPSsoNvtbDG4FHz/xXRSK/qsSH5u5YiB
7lrPyk2X29DJUUXJr1gM7je6Oq7c3o4SffYWjueLwZFWfuXJ/A6046kX+9x3
MdikrmTiWt+NrJr603WaxcBTtDYheGQAEfEzgSdbyfXb9JUaf/yH3toTpzza
xSDR0Ks95MogmpyTJj52i4F4imiE88gQChS3MF87JAaHAtp5drqMoE3t55V2
johBC+vfwKnqEfQzyXXp6JgYMBOb76upjCJJjfuvwqbEwDWKEdPdN4q+cT25
/nZGDHxXCubm6Y0h2+K3xsVzYmBv8UFp38sxxB+Wta5zQQzaVvkgd65x9MG8
eGppSQyoN6KsjCzH0f8ARP6kug==
      "]]}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  ImageSize->{286., Automatic},
  PlotRange->{-6, 6},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{{3.47317115426061*^9, 3.473171168995118*^9}, 
   3.473171265289701*^9, 3.473171420792573*^9, 3.4731724713930063`*^9, {
   3.534791050327976*^9, 3.5347911058405266`*^9}, {3.5347923177047005`*^9, 
   3.5347923327062006`*^9}, {3.534853827815362*^9, 3.534853854879362*^9}, {
   3.534853885732362*^9, 3.534853904666362*^9}, {3.5350513831901073`*^9, 
   3.535051423453965*^9}, 3.535051539471909*^9}]
}, Open  ]],

Cell[TextData[{
 StyleBox["On top of the plot above, sketch your prediction for what happens \
when one plots the ",
  FontSize->14],
 StyleBox["sum of the waves. ",
  FontSize->14,
  FontWeight->"Bold"],
 StyleBox[" Then test your prediction with the command below.",
  FontSize->14]
}], "Text",
 CellChangeTimes->{{3.473171198761385*^9, 3.473171206919526*^9}, {
  3.473173377189575*^9, 3.473173380333939*^9}, {3.5350513651875916`*^9, 
  3.5350513718020344`*^9}, {3.535051426339984*^9, 3.535051448975729*^9}}],

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"wave1", "[", "t", "]"}], "+", 
    RowBox[{"wave2", "[", "t", "]"}]}], ",", 
   RowBox[{"{", 
    RowBox[{"t", ",", "0", ",", "6"}], "}"}], ",", 
   RowBox[{"PlotRange", "\[Rule]", " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"-", "6"}], ",", "6"}], "}"}]}]}], "]"}]], "Input",
 CellChangeTimes->{{3.473170541285585*^9, 3.473170541978842*^9}, {
   3.4731706307024393`*^9, 3.473170642812059*^9}, {3.4731712464054337`*^9, 
   3.4731712713173323`*^9}, {3.473172460141217*^9, 3.473172466955193*^9}, {
   3.534791071148058*^9, 3.5347911393908815`*^9}, {3.534791188809823*^9, 
   3.5347912533802795`*^9}, {3.534791844261361*^9, 3.5347918663745728`*^9}, {
   3.53479196205914*^9, 3.5347919804199758`*^9}, {3.534792210173949*^9, 
   3.53479223448738*^9}, {3.534792295553486*^9, 3.534792300064937*^9}, 
   3.534792337610691*^9, {3.5350512234918833`*^9, 3.535051250417656*^9}, {
   3.535051525135417*^9, 3.5350515379742994`*^9}}],

Cell[TextData[{
 StyleBox["....what kind of interference is this?\n\nNow you'll do one.\n",
  FontSize->14],
 StyleBox["\nProblem 1.", "Subsection"],
 StyleBox["\nUse the show command (as in the above example) to plot 2* \
Cos[4*t] and -3* Cos[4*t] on the same graph (note that the second wave has \
been flipped over with a negative sign).  Make a sketch showing your \
prediction of what will happen when you add the waves.  \n\n\n\n\n\n\n\n\n\n\n\
\nTest your prediction using by plotting the sum of the waves.  What kind of \
interference is this?",
  FontSize->14]
}], "Text",
 CellChangeTimes->{{3.473171289687579*^9, 3.4731714503123207`*^9}, {
  3.4731715543362637`*^9, 3.473171559645234*^9}, {3.473173043582844*^9, 
  3.473173066197283*^9}, {3.503265834037335*^9, 3.503265838592535*^9}, {
  3.5350512902447114`*^9, 3.535051343987056*^9}, {3.5350514835767508`*^9, 
  3.535051505432491*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[StyleBox["Adding Waves with Different Frequencies.",
 FontSize->14]], "Section",
 CellChangeTimes->{3.473172871982329*^9}],

Cell[TextData[{
 StyleBox["Problem 2. ", "Subsection"],
 " ",
 StyleBox["\nUse the show command to plot 2* Cos[4*t] and ",
  FontSize->14],
 StyleBox["3* Cos[7*t]",
  FontSize->14,
  FontVariations->{"Underline"->True}],
 StyleBox[" on the same graph.  Make a sketch showing your prediction of what \
will happen when you add the waves.  \n\n\n\n\n\n\n\n\n\n\n\n\n\nTest your \
prediction using by plotting the sum of the waves.  What happened?",
  FontSize->14]
}], "Text",
 CellChangeTimes->{{3.473171498572566*^9, 3.473171511843142*^9}, 
   3.47317157203743*^9, {3.473172798574448*^9, 3.473172828798938*^9}, 
   3.47317286726171*^9, {3.473173073582712*^9, 3.473173074997813*^9}, {
   3.5347731554251175`*^9, 3.534773156049117*^9}}],

Cell[BoxData["\[IndentingNewLine]"], "Input",
 CellChangeTimes->{{3.473173084077876*^9, 3.4731730849630013`*^9}, 
   3.534773156548317*^9}],

Cell[TextData[{
 StyleBox["Problem 3.  ", "Subsection"],
 StyleBox["\nUse the show command to plot 2* Cos[4*t] and ",
  FontSize->14],
 StyleBox["3* Cos[4.3*t]",
  FontSize->14,
  FontVariations->{"Underline"->True}],
 StyleBox[" on the same graph.  ",
  FontSize->14],
 StyleBox["Adjust the time range so that you are plotting\n t = 0 to 30 \
instead of t = 0 to 6. ",
  FontSize->14,
  FontVariations->{"Underline"->True}],
 StyleBox["  Make a sketch showing your prediction of what will happen when \
you add the waves.  ",
  FontSize->14],
 "\n\n\n\n"
}], "Text",
 CellChangeTimes->{{3.473172525380563*^9, 3.4731725440785933`*^9}, {
   3.47317262301285*^9, 3.473172628958387*^9}, {3.4731727106738377`*^9, 
   3.473172787412929*^9}, {3.473173098208362*^9, 3.473173102040834*^9}, {
   3.4731733413708963`*^9, 3.4731733625657883`*^9}, {3.503264627163441*^9, 
   3.503264630252261*^9}, {3.5032651055593348`*^9, 3.503265111908535*^9}, {
   3.5032652252409353`*^9, 3.5032652275965347`*^9}, {3.503265258905735*^9, 
   3.503265298373735*^9}, 3.5347731524455175`*^9}],

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\n"}]], "Input",
 CellChangeTimes->{{3.473173095834996*^9, 3.473173096409093*^9}, {
  3.5032642829913516`*^9, 3.5032642869850283`*^9}, {3.503265285956135*^9, 
  3.5032652972037354`*^9}}],

Cell[TextData[{
 StyleBox["Based on your results, what is the difference between adding two \
waves with very different frequencies, and adding two waves with only ",
  FontSize->16],
 StyleBox["slightly",
  FontSize->16,
  FontSlant->"Italic"],
 StyleBox[" different frequencies?",
  FontSize->16]
}], "Text",
 CellChangeTimes->{3.503265294551735*^9}],

Cell[BoxData["\[IndentingNewLine]"], "Input",
 CellChangeTimes->{3.5032653042081347`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[StyleBox["Problem 4. ", "Subsection"]], "Subsubtitle",
 CellChangeTimes->{{3.503265310775735*^9, 3.5032653129129353`*^9}, 
   3.503265401723735*^9}],

Cell[TextData[StyleBox["With your headphones on, try the following:",
 FontSize->16]], "Text",
 CellChangeTimes->{{3.5032654065597353`*^9, 3.503265415638935*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"wave1", "[", "t_", "]"}], " ", "=", "  ", 
   RowBox[{"Cos", "[", 
    RowBox[{"2", " ", "Pi", " ", "440", "*", "t"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"wave2", "[", "t_", "]"}], " ", "=", " ", 
   RowBox[{"Cos", "[", 
    RowBox[{"2", " ", "Pi", " ", "493", "*", "t"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"Play", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"wave1", "[", "t", "]"}], "+", 
    RowBox[{"wave2", "[", "t", "]"}]}], ",", 
   RowBox[{"{", 
    RowBox[{"t", ",", "0", ",", "3"}], "}"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.503265368948135*^9, 3.503265395577335*^9}, 
   3.503265826954935*^9, {3.503266775067611*^9, 3.5032667922900114`*^9}, {
   3.503266847598611*^9, 3.5032668485034113`*^9}}],

Cell[TextData[{
 StyleBox["In the command above, what do the numbers 440 and 493 represent?\n\
\nIf you're not sure, it may help to recall that we represent waves in the \
form a*cos(",
  FontSize->16],
 StyleBox["w ",
  FontFamily->"Symbol",
  FontSize->16],
 StyleBox["t), where ",
  FontSize->16],
 StyleBox["w",
  FontFamily->"Symbol",
  FontSize->16],
 StyleBox[" (angular frequency) is 2 Pi times f (the \"linear\" frequency).  \
\nRecall that the formula for the beat frequency is  f  = |f",
  FontSize->16],
 Cell[BoxData[
  FormBox[
   SubscriptBox["", "1"], TraditionalForm]]],
 StyleBox[" - f",
  FontSize->16],
 Cell[BoxData[
  FormBox[
   SubscriptBox["", "2"], TraditionalForm]]],
 StyleBox["|.  Calculate the beat frequency that you would predict for this \
beat pattern. (You can use the ",
  FontSize->16],
 StyleBox["Mathematica",
  FontSize->16,
  FontSlant->"Italic"],
 StyleBox[" command Abs[ ] to do this if desired.)  \n\n\n\nBased on your \
calculation of the frequency, how many beats would you expect to see in .5 \
seconds?",
  FontSize->16]
}], "Text",
 CellChangeTimes->{{3.503264302460526*^9, 3.5032643570459757`*^9}, {
   3.503264390134212*^9, 3.503264598162855*^9}, {3.5032646479271746`*^9, 
   3.503264649549585*^9}, {3.5032654329237347`*^9, 3.503265492702935*^9}, 
   3.503265526866935*^9, {3.503265569851335*^9, 3.503265569944935*^9}, {
   3.5032660442409353`*^9, 3.503266060168535*^9}, {3.503266090245335*^9, 
   3.503266140914135*^9}, 3.5032663397308207`*^9, {3.5347731408547173`*^9, 
   3.5347731429295173`*^9}, {3.5350515754145393`*^9, 3.535051761336531*^9}}],

Cell[TextData[{
 StyleBox["\n\n\n\nTest your predictions using by plotting the sum of the \
waves:\n",
  FontSize->16],
 StyleBox["Plot[wave1[t] + wave2[t], {t, 0, .5}]\n\n", "Input",
  FontSize->16],
 StyleBox[" Did you see as many beats as you predicted?",
  FontSize->16],
 StyleBox["\n",
  FontSize->14]
}], "Text",
 CellChangeTimes->{{3.473172907108345*^9, 3.473172931100354*^9}, {
   3.503264059937604*^9, 3.503264063182404*^9}, {3.5032646331850796`*^9, 
   3.5032646746657457`*^9}, 3.503265283506935*^9, {3.503265581239335*^9, 
   3.503265593688135*^9}, 3.503265822072135*^9, {3.534773135394717*^9, 
   3.534773138265117*^9}}],

Cell[CellGroupData[{

Cell[TextData[StyleBox["Problem 5", "Subsubtitle"]], "Subsubsection",
 CellChangeTimes->{{3.5032641173300037`*^9, 3.503264119841604*^9}, 
   3.503265317826935*^9}],

Cell[TextData[{
 StyleBox["(a) Experiment to determine how far apart the frequencies of the \
waves can be and still produce ",
  FontSize->16],
 StyleBox["visible",
  FontSize->16,
  FontWeight->"Bold"],
 StyleBox[" beats.  (There's no \"right\" answer to this question; you'll \
have to make a judgment call.)\n\n\n\n(b) Experiment to determine how far \
apart the angular frequencies of the waves can be and still produce ",
  FontSize->16],
 StyleBox["audible",
  FontSize->16,
  FontWeight->"Bold"],
 StyleBox[" beats.  (ditto).\n\n(c) Suppose a piano player plays two notes \
simultaneously--middle A (440 Hz) and middle C (262 Hz).  How many beats \
would this produce in one second?  \n\nWould you expect these notes to \
produce audible beats?  Why or why not?\n\n",
  FontSize->16]
}], "Text",
 CellChangeTimes->{{3.503263983653604*^9, 3.503264042808804*^9}, {
  3.503264135457204*^9, 3.503264136206004*^9}, {3.5032650917845316`*^9, 
  3.503265092595735*^9}, {3.503265654231735*^9, 3.503265694292535*^9}, {
  3.503265814724535*^9, 3.503265814958535*^9}, {3.5350517850018826`*^9, 
  3.5350517855166864`*^9}, {3.5350518393370314`*^9, 3.5350519310695486`*^9}}],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.503265785942535*^9, 3.5032657905445347`*^9}}],

Cell[TextData[StyleBox["Have the instructor check off your work when you are \
done.",
 FontSize->18,
 FontSlant->"Italic"]], "Text",
 CellChangeTimes->{{3.5032657955677347`*^9, 3.503265802026135*^9}}]
}, Open  ]]
}, Open  ]]
}, Open  ]]
},
WindowSize->{846, 682},
WindowMargins->{{46, Automatic}, {Automatic, 79}},
PrintingCopies->1,
PrintingPageRange->{1, Automatic},
FrontEndVersion->"7.0 for Microsoft Windows (32-bit) (November 10, 2008)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[567, 22, 174, 2, 83, "Title"],
Cell[744, 26, 145, 1, 28, "Subsubtitle"],
Cell[CellGroupData[{
Cell[914, 31, 95, 1, 36, "Subsection"],
Cell[1012, 34, 541, 13, 49, "Text"],
Cell[CellGroupData[{
Cell[1578, 51, 1734, 43, 112, "Input"],
Cell[3315, 96, 43377, 718, 191, "Output"]
}, Open  ]],
Cell[46707, 817, 510, 12, 50, "Text"],
Cell[47220, 831, 999, 20, 31, "Input"],
Cell[48222, 853, 897, 16, 391, "Text"]
}, Open  ]],
Cell[CellGroupData[{
Cell[49156, 874, 136, 2, 63, "Section"],
Cell[49295, 878, 734, 16, 334, "Text"],
Cell[50032, 896, 139, 2, 52, "Input"],
Cell[50174, 900, 1062, 24, 140, "Text"],
Cell[51239, 926, 256, 4, 92, "Input"],
Cell[51498, 932, 352, 10, 55, "Text"],
Cell[51853, 944, 89, 1, 52, "Input"]
}, Open  ]],
Cell[CellGroupData[{
Cell[51979, 950, 162, 2, 26, "Subsubtitle"],
Cell[52144, 954, 162, 2, 33, "Text"],
Cell[52309, 958, 814, 22, 72, "Input"],
Cell[53126, 982, 1598, 41, 232, "Text"],
Cell[54727, 1025, 633, 15, 204, "Text"],
Cell[CellGroupData[{
Cell[55385, 1044, 163, 2, 31, "Subsubsection"],
Cell[55551, 1048, 1167, 24, 319, "Text"],
Cell[56721, 1074, 94, 1, 31, "Input"],
Cell[56818, 1077, 201, 4, 34, "Text"]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}
]
*)

(* End of internal cache information *)