<?xml version="1.0" encoding="UTF-8"?>
<Worksheet><Version major="6" minor="1"/><View-Properties><Hide name="Section Range"/><Hide name="Group Range"/><Zoom percentage="100"/></View-Properties><Styles><Layout alignment="centred" bullet="none" linespacing="0.0" name="Author" spaceabove="8.0" spacebelow="8.0"/><Layout alignment="left" bullet="none" firstindent="0.0" leftmargin="0.0" linebreak="space" linespacing="0.0" name="Heading 1" rightmargin="0.0" spaceabove="7.9992003" spacebelow="4.0032"/><Layout alignment="left" firstindent="0.0" leftmargin="0.0" linebreak="space" linespacing="0.0" name="Normal" rightmargin="0.0" spaceabove="0.0" spacebelow="0.0"/><Font background="[0,0,0]" bold="true" executable="true" family="Monospaced" foreground="[255,0,51]" italic="false" name="Maple Input" size="12" subscript="false" superscript="false" underline="false"/><Font background="[0,0,0]" family="Times New Roman" name="2D Comment" underline="false"/><Font background="[0,0,0]" bold="false" executable="false" family="Times New Roman" foreground="[0,0,0]" italic="false" name="Text" opaque="false" size="12" subscript="false" superscript="false" underline="false"/><Font background="[0,0,0]" bold="true" executable="false" family="Arial" foreground="[0,0,0]" italic="false" name="Heading 1" readonly="false" size="18" subscript="false" superscript="false" underline="false"/><Font background="[0,0,0]" family="Times New Roman" name="Author" opaque="false" size="12"/><Font background="[0,0,0]" bold="true" family="Arial" foreground="[0,0,0]" italic="false" name="Title" opaque="false" size="36" subscript="false" superscript="false" underline="false"/><Font background="[0,0,0]" bold="false" family="Times New Roman" foreground="[0,0,0]" italic="false" name="Normal" opaque="false" size="12" underline="false"/><Font background="[0,0,0]" family="Times New Roman" name="Page Number" underline="false"/></Styles><Page-Numbers enabled="false" first-number="1" first-numbered-page="1" horizontal-location="right" style="Page Number" vertical-location="bottom"/><Group><Input><Text-field alignment="centred"><Image height="78" width="800">TUZOV3RLVWI8b2I8Uj1NRExDZE5WWlpKOnROPkg6eFhWRXJwczo7Qk5TRE9FVGxNWGxnd2dpVzttRFtVVVVXVXNLaXRVZl1XZnZfaXZtaXhvWUtFVmNzSXl1eXZheXZVSXZfaW9peG9PV2tneHdpeXdPdmVDSHdnSXhpSXhteXFBWXNdSXdnWXRVaXVJWHBDSUZpU0lhQkFBc2E7R2JZeXZjaXhxeXhlWXdleXVZeXVXZE1XVHVVWXV5eXl5QTs6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6OjpaamlmRHFFdGtdYE5cXEBOZFxcUWdxeEhgandoU1dEUVZ5UHhQTEFJWFVgd3l5eVNVdW5gcltETlpdV21ValB1SlpdWV9sU0xxcVdpb1N4d3d0TEVRbEBVTkdpT0NAWHlRalhMWWJJdk48eHdhTG5BdD11T1pkUW5BdEU8U0lkUW5RSkxZUklkcTpgeEpZcnlxSkJoeU5Gdkw/Xl5Zb09BW3lZZWxvZmlHYnQ/d1t3W1BoZEs/Z1NPXkRHcExZZUpwXXQ/ZmpIb1xcSV86eW87SF1cXGBcXDpHb0RGXWBocUVodD13W0ZfYWxTPXdVVG9UdE9IUHdDYm9yWVt3Oj1FcFlkUllyWU1DaEtkRT9CRG1pZEtHPVFzQ19ZUm1IblFCTFlyP1FlRV9YX2tyaWdlOltpQlljZl9ERGFHZVNzXFxlVFBPYl93WXJ3c1hpcmRJdmlHYk53R107VFllVEttZ3l3dkpHQnN5Q3ldVmxtRmV5RVF3Y1g9amp5eDpgc1FNUF5cXFlQaG9fVGs+eE1zbXRzSVBNaEttWUx3TVh3SVdYcU14cVBJVWtFUVQ/bW9EaHRIRW9fbFlAbVFIUXBaRHlMVXJZSHBuPHlSdXRuSFV2PGxweEtZUFd3SVhSX3BgSWBwWGZXT3l5PmVNeV9KV3U9cWFSPnBwVnhPXmZ1bnI/R2BIdl5RaWFddnV1b2NKcHdVUWRUZ2RgX21leF1UdmZcXHhmcmhkYlh2cEllX0hzW0lpSD5uVW9udkBiS3BpWkh0WGBpYmhmS09gSkZkUFBrSXF2eV5xPD9tQHZ1dkFba2BmRGhia1lkTnF4al9jPl9mT2Z2X3dkeF5fRT91WVh5UUBvbEZxWUlmO19lXUl5UFZxbm9zZlB5SkFePWFzdXFbamBaUj9rRV55akh0SFFnT0h4U25cXHdZb0loYFRZXFxGZ2BSeGBJcVtWd3E6QF1UeXliUXh2QF1rPmtpdmRhWVxcdWlcXGRXaXJuW1BxclRncFBZYnhedHZGZmtXWmJpaGxZYT5eYktAd1R3c1Fodk95YkA/XWdxaHdvbW5nXz5vZz0+d3BHYXJBY11oaWJBeVhAZUxvZ1FuaGx5a0Q/czxfY1xcPmJAUXV2QV5reG1ecHBBWHZqVlpzRl5BRm9eX25WVmZsaXhyaWZoYXFpP2JISVxcSmZfXU9dc15gbHlzc0FzcF9iPUlaXWFrZFBtSm5pQXZeUG5hTkF3OkdpPlZxbWZ2Ukl1eUZfW05tcFFqYz9wSXFeUFdqaUZkVVlyYz5nbFBxaFBbQj9qTE5xS0F3eXhuVmhxXFxhallRXlpGVlF4az9lO19mQFViSVNzPz9UPGFCdz1mS11VeVl5W29SQU15Uj1Id2l3RVVIZm1SUFN0eV1Uc1N0YkFIeFN1WU1zXnlHS1V1PUlCPVF4ZW1VQT1ycndJO2FJWD1CSj9iXnNzW19UWEVZVENlRWt1R2dDTmdlRUtZOnl4RUtCTFdibXVCSGt2ak9ndmFjSV9XPV9kR2t0UmVnWXdyXVdGUT95VEtCQlV3SVtIVFlyQnlHanlGXFxXYndndnddU3hhd2FhV3M7eUF3VENBU155eGQ/WGQ9c0JneVJhRFc9RGpzVDo9aFxcS2dtTUdbYXZcXEtkXXNUSkVjdltkVjtmdmNoO3dTOl9Ea1l1XVF3T0NkTztzZz15b2V5dFNHYGtJbXNGeW9nXj94RU9CTENGVmlESWdJQEd5XW90XmlyUDtISz9oWk9zamdTXFxvSD9FVVN1REdNVUF1RkpJSGlfRktTV1V3UlRbaG89U3VjY147SXNfVlRVRT1JQ29TSXN3Q1dxUlpRRzxfaVVhY3JDZWhPY2FJUld1c3BxUmZZVEBjY2ZNdWhzeUNXclltSVBLSWJRaGRDZWhxeFxcc3Q/XURHXUVxTUlGWWZXXXJnVUNicXZJR1Nnb2ZMV2dgYUhKS2RsdUVxRWV1PWl4a3dRU3RyU1d0V2djZ3dKU0lHa3Veb3hnS1Z5UVdaRXReZ0JlS0daS3hjZWQ9SWRUT2hKRWZSW3hyTUJrS2debUdKXUhjW3RyT1Q6X1I/ZUZkX0ZWQ1haQ0Q/UUNxU1hdWWV0R0Y8RXVRZVVmY0NMTWhqR3ZWS3NfU1RrVXdeXUNFVUVsW2Y8P2hORXdkb0g/TVdmXUZiZXNQS1Vda2dIXWJTRVM7UVZWP2hIcWRUPWNlP2JwX2g9R0d1cUdEW3lAU1U9SUZLRXhFZVVXQWhOTVhed2RSWUZJTWV2S2VIWVdTc0NsW0hHYXVbQUVaaVJfaVRKVURTXVlja1hzb1Y+XUdCcWJAO1ZNPURsdVZIZ1Z1UWVEcXhMVUVdXVdTQVJfb0I/b3hMZ3I9PXZxa1I/TWNQQUVHXVdCS1ZQW0hWT0k+SXJFdUJrVWNxU2NrQ3dwc0ZvX1JjP2VCW2hoQ1hZU3JGQ2hWQVN0W1VVV1dzXWNlWUJoeUQ+YVVUTVdaO3ZEb1I8TWlnUUR1X1R0Q1V1UWVUcVhMT0k+UVZfQ2lJXXdfQ3J1RUhvc1J3b0ZmP0VjUWlKP2JoPHJUdVhbWG0+UU4/WXROZHBQUU1TeFVNPExxPXFASU5CQUtFVEpCaHhTdExzRXE6XFxWbVlNY0VKdkxNYFxcam9BV0tsdkxgb1RFeGJxUmBgdVJxSzs9UFg8TEF1c0NoTz9AbU5FamVhUF1JU1docEB5V2xcXFdjPXk8UWxQWEpRdVN3bFc9eHRZeXZKSE9UdEs7VFc+bE9JRE9EVEpaeU5vVVBSTHhIbHdQZWxLeFQ7dG9SRXZcXEFsY11rYnBwZmB5b2x5dlB2T01reERLPl11XFxFVkNdTkFhbkFZYz1GXktfdWRnZFtRXlZpXkRyPlt0Uj1IXFxhR18/R1RbcnRTcnVbWEJ1R0RzVUthZz9RVUVHRUtDaWdjR01lWW9HQjxVUkJJYltlYnZZRkFLYkd5R0s9Q01RQ1FdQ15bVWtVVEZjWFZFaD1dZzxbVkRvQkFJZ095WENnc1FzZGBDRmM9dWpRSEtdWWM7eE9PaUBZeGxPRlhFYnhPR2VDczxraGFJUlZJZ09tcz1lVE9JeVB5cmZ5QnRxdFZ1eVJFeTpvclBjZVxcSWdxa2JWTVVaQVg+c0hzVXVPa1lxQWdDPXN5b1lBc3ZgS0NoQVheV1JdX3h2Y0Zfa1JnQWNeSWNQW1NJX0RbVWY9TWVyb2ZjUUdvWUJmY2NhW1RpRVR2YWU7PUhHY3RhcXZ1V0hkO0liQWlKRVlkeXRHP2hCb3JkVVRYV0M7ZWJjaXNMW1V4WURDW2drUXJITWdIcWVibXJpa3ZqP0hyU2lQeXJja3hrQ3dRQURDb0llRXZiVWJHQWJvUWhYRWhbO2RcXEtISG1iX09GdFd1X3liX1VjUk90bndiUVVIakV1TD1VcF9SYj1VWUFnVU1FPmdDQWdDaXlTRW9zRVFVR3FkV01XcT1jP0VyS01XSUdGd09DZUd3Xz9jQFlCTT1zYFFlcz9VYEd2RElHdV1EaF9VXFxhRUNRQ2tpZ2BLWV5JZDxVckZTR2RpZENRZD93dmpzZ2pvY2Bhdj9BQlVjQ3FrRGJnVVFtWWRXVHlVSElFSV4/dk89eHJJWUBfSVhLeHlleTpXeV1ZUnJ1eERpR2lTdj91aUhHYlZRbDpES1tIbXJwUEhQcV5QbEVcXGtBTWt2bUxMeWxGQW9rbGpjZXY9bHFpPFlXdFJMZXdxSVFQXW51VGpTcXZvXXhndHI6YFREZW9zYHFzWG9VdHNePFFWQUtkPWxIRXdSUU9WWXFFeVRvYFk6YVlOUEtoXFxWPkFzTlF4O1R4cmRXXllKXnRqYVxcdkhkbmxVa1Jla29ZSnZYT1Zlc09xbFVNTkBtUG5VUG9YbVRAanRtVWRwS29IeGhtdUQ9UUhld2tcXG5CbE9odXFXWG93eXM8XFxWUGRrWkFKZ0VSb2BSQGV2W2V2cFRxYGFTeDxOVUF2eVVyYV1udnRSaUh1QlRRSVRzXFxxVlxceUxsXXJhWHRcXEBQQ0hTQHRyO1xcWG1EUztYbUZwVlJ5WHVIaklNS0JgbVppdlc9TkhUU0FcXHNycHRnTW1JQU5xZXVZQHFKTU9GaHJ4RUxpXXZvbXJQQGtnXVRFTVNORVhyZWxteXJveGtVXFxZeU1sbT1LYEF2dmFYV21LUXFtQTxRVElVXklRaG13XklZSFFxXlxcc1dsbEVdc2tscz1RWXdBUnRwVVBIVldpbj5US3llcWBETGtZUEQ9Vll4T1VpdTxRVG89dT1QVWNZWEx5a0VNbUJIWXd1T1Nkc211dV9kUm1dV2xwTElcXHhLbHF5QEteQU86SUpcXGFvO1lzZEh4UkhwT0B5REBMP0lwTHhyZFVwX0h2Y3B2Z111RVFWS1h3dmRucGBWTnFWVkB0W2xMX2lvO3FPSVVOd0xTZmlKOm10PnlWVHFOZ01Wb2FvUF1STmlWRFFPYEBWRGlzZEh5d3RZO0BWZnRMcVlsc3RyRTx2aG1yQmltVU1yPkVrSkF1R3h2WWlZSm1XeHhZcWRqR3hLbF1UQFFQVllPWWBMSmBtYGFqTlxcTUJNVlFteXNMTkRZc3E8b3BZeVNEbWBBdlBAcUJIbFBpT1xcQXg8cW9cXEBZZVhyU0hQUkBWZVlWR0FTcnhRWllQR3R0c1BrXWVMRWhXbzxQR0FQP1F4WkxYWDx1Y01TXFxsSnlkU1NNd0dAa1FMdmpBTVdUeVV0b3hVTGtVUFhUdTxQUVxcaHNhUGtkUEtOaHVIZGtBdHVDUVBaUU1LRFN2UVZQWXlwTFJUeHlNVFBWTVVVaHFzbW1EcG5jWWxYPU5xbHFreFJwZFBPZWtSeE1wQGtTbFVdSFc7eHQ/PVNfTG09QXRuYExxVVFFRVZCQVdCVW5uPXRCTFh4cHRGYE5TQVRkVU5HSFRFPFdOSU5QeFdOSVJHZXdKVE53SHU9TVlWQHVFQEs8TU1fZVNHRWtfRFBAYVZAbWxAPUxcXEV1Q1B2Y3l3U3BrYUB1W3RRaERwPGVTQEF2bUBVXFxNdj1BUVpEVztNTXdVa1E9bT1hVE1BWV1Mb3V1UzpNTlxceVBzXFxRWG1QVkl3dnFKb1BNVElwckFzXlFSdmxzU110TmRLQ0VsP3hUd21uW3Byal1XTXhLT0ROSUlMXkBzbjxZZkVrWEhRTmRRTXRXTGFQTVFMcVVUP015WnRXVGFSQ1Vsa0BYO0BtV2RLP21uVkRsRkB4dnRMVlFRc0ltXlRXczxvWD1LYUV1RWhZRUx0YF1RckB5VEhYUnR4Qlh1dkRyWmR0Xk1uVkhYSWFSeHFMS0xTR0FTTUh3XUBqZHlyTlRNPT1zZV1yYF1vRzxLXFw9VlBgWUtEalh1VHVJakVAd0NRU3hkTV5Ad1BQUz1Nc2I9az5MT1tcXG87dHNtXVVDSUxkRVZqPFM7UFRFaU5VTVZNbW9QdUpHTFRIVE5HcFhLUEtnRHBKbFVUSEtzdW88UGNKbl9jeHBARndhZ1pOWV9XcGVNYHFBV2ddaFxcZklzQWBiWl5hdGl0dXdgPkFpYXloW1ByRVFpZ3BiTU93eXZhSnZ4OkhnYllnO1htPE9yTW9nZFB3XFw+Xj8/a05GYVZYcUdQXmR5WndGcldHeEtuW2tmZ0w+YEdZblBZa2R3YktxYllYcHBoaE9Hcz55W1tGc3VWXUF2Okd1VktHWD9ydG1iVT1VQXlCWFFWSU93RHFFS0lFc29lOmFkXWtYSmF2UkdkZFtCd01jdUVZXFxlRURleF1bZHhPZV1BdVJJZEJLdlNbRD5DWGdBVkhdQndVVUdzQllpeEJ5ZlZ3dnJrU2FdQm1HV2djZnFfaWw7aGdpZzxBUnVhckh1aE5RZHFrSGtLV3FBZHBFY0dvR0NNSV5pd2FXY1d5RlNtU2xxc0lfV21nR2NxZVZpc21xYm9XaFlXR2RXU0ZHQ253dmtPSD9rRlBDc2pvaGFhRG95Z0I7Y2VzUlI9SFBBY0FbaXZhck5nckdReWY7Y2VbY1NhYj5vRjxlWEpdYkE/cmdJVUpLZXRtc2NxQ3FFVUxtVTxNZmVRd3J5dEtzWHRzdmd3ZlI9c3NlZV1lVnI9aVhnVHVzUkVLSXJhd1ZhZXNvRFtdeXFBZ1Q9VkU7WHdnVFg7Q3NpY21zaFpJeWhddGY7RD5hZ1lrU1o7Y0VlZU9VYnBnQktdQ15jY2g9WFtXY3c/VEtdRF9rd1pjcl5hSU1haXZdZ0M/dVJbaUFlR249Z1dJUkRZeGFBZ0x5aVVbY29zZlRNc2BXSEVDZVdpaFpTaVtTU0g/dkRdQ0NTeUpTZUxhd3A9ZEJfeE9PeEtxZ0BjeV4/YmJfd0pTQ2BVWVRbYk5FR2RdSFppSU9BYlZPckplRWNLSWo/Rm5hV2dBZWxTQ0FfV0tddFxcQVVBcVNNTURoU1ZSZ2VwP0JGTXVda1JEa3ZPS3dgXWl5XVNzQXhuVXQ+U2ZpO0lXdXV1R2V2PXJoV2RAcWdnWUZIdWNyPWZmb3ZMUUJfW2U+PWllQXdqQWRcXGloRFV0T1NIRmVXXndpQWVXbk1DY3NYc21oXW94Qz9nXz9mWWdybnNTdmd1dU1iW0lmP0NmYG1SUEV2WXVzbDtYUT1TcW1EUkFzdWN0UEd2c2d4SGdCS3VpXFw7RnZdR0xBRF5bQ29NRT4/U09XVWlnVEtVWVRZRFRjSVZDR3Q7YEZPXVVma1dWXkd3a2FXYHVma0tQWnQ/XFxEd15vT19cXF5pd0Bibl9tdk5eXT92S3FjYHZgdFZzPEB5Zk5fZWBcXER2c0ZnYGlZY0xIdHdfYkt3WmteaEtWbmhWZm1nXFxzSXdRUGZBR2BQbmh1aWtqd3c9YXRYUGJkd2VOQGpOV3VHYGFnaWJeVmlZZmVhUGlyP2c7X1s9T3I6eFxcdnFpPWlxWmlaVHZrQGFmWHZwZHFsU1dcXGlweWRhcllHXFxKRm09WV94Z2U/X1pCcWNESF9Od3JOWHhrUG49V1tsWW49YV89SFpbaW4/UG5BYXlUP3l4dmlpeGJoWHI7aWdkSGlvb1FdZURXZmJpRkBTeD1jdHZ3dVtRV0lpSV5zRV1XclBbRWJNdWdXUm5zQmRbeVJbZD9ZVT1NeWJjaGFkcVI9bG9NdndEU1dZUFd4UlxcPUxPZFdqPExJbXVMXXc8WE5BRVJPaHdLSEx4bUtmdFN4WVVmPEtFTXh4dExObFlLeHI+dVF0cFRWWVV0XFxtdWRUYVxcdF1lblpEUXBgWWtxU0lAb11xT3BgbG9dUEN4eHhBa3J4eF9Ec1RJbVFIU2F5VGhhUkVcXEpMdHB0cVJBdVF5WE9OZFV5VU47YXhbTVdzeHhOPXQ/PUpfeVU/UEs/UXg6SG5fWU5rPFNMSXlcXFVVRFlPaGh2Ok11Zm1Na0lPclVKcVhzbERyVUB3WXFRRWhMS0FrW1hua3F2X114Y1VLbD1UYUVuVUVOUG12SGlwVnBTSFl0Y1BRS3hUSVV3YFhYZUFxW2lYeWhxWGRXXXF1U2xrdVVOVFF3W2h5V2FsUkVTUWhLdWRNUHVSTkhRVlRwWjxWQUhuc0hsWXh2Xm1tVkhKdERZb1R3XWF0XFxYWF5ZeTxMakpga1ZAb110Uz1YSnFNUV1FcHFgc1ZJSl5wV3RQS2NMbWtkTklodVo9V1l5dmhUTnJwVFBpTXdUUWFxcVpFUm5YamU9bklgVXg9cFB1dHRdWF5Ad0dVS0x4als9cUpRblldVk1MVUZNcnFgd0lEc1hoUGNAUVxcQXlydFR1SE49SWtmZFVlcU9bbExxUXBIdHY9cUo+cU5ObVJVVUxeXXdSVExEQHFdYHNXaHhrVEs8aE5eZHJ4UW1rQVJGUXJWQXBKWFlybExXaFZLcXNgcHhSTFR3dVFqZHFmPHdSPWxPbXVfXU5cXGFYQ2lzZ21KdERYc2RVdFVMPFBrYFhwXjxVUlB1RVxcVHlAVUdES1hNS2xRTTpwdDxgbkh5dmc8a0V5bl5sVkZJUT5xUG51d0JleXJ1VG1IWW1YSl91ckRwS3FJUnBQTEx4UlZdSnRMU2t1anhtb2tFbHhNdXhBWE5ZV2NoUD1oUlh4VWpwdnFxbkdFbnY9WWpRclpUUF5lcFRxamFcXFBGRFludWNTUGRpZmxWZ1tqd1tId1xcal5fb3d1VlBkZmdfQ1ZnZFhuSGhoa1F3TVZzaGdaVHhvbFliaGBvakhxd19gZVhaXFw+d1hPbmVgbT9nb0xfd09uYEJ3YGFfdmZ5eVhHdUpHdWdmc29gbWdpdnRIbVheY1NwbVFhZlxcXl1ueWg9b1p4X3dQWG5PaXRyaWI6WHdZT2hwV3ldcWRsV3Z1YGNYPl1KZ3NtPnRkcXNzbl9GP2FuZnlOaFpLZ2dcXE5nRHlwO0FoOl9saEFzW3Z0REZcXE13aFxcZ3dCQWxbeWJNWF4/V2VdWWRFblp3aHk6UXc+YXV0QF9sT2w6PmhmZ2FveHVGUWJLbmJZSHBIUW9id15DX25XQHFEbnBjUXFFR2F3VlxcYEBybnBjbGhjaz5eWEdkTkBxZEF1W0ZmVUledV9cXDpgcWZ2cT9fc29HXFxVZ3VBQVxcQW5da1BsRk5kQkBzS1ZwZE50SF5nQWZvaXBkYUdkRUdsUHdiSlB0W09zUW5eVU5gbUZaWnZsbm9iPnlnTF53V1ltXFxWaGVWZU1HalBockpIZW5JYnBAeFxcd2VdWG9jYGBocGVgeHA6dnVYd2VNWWdbUHFUcG5pSGBvb1tKZ110P3NpQGBwdm9mSXRzblxcXklkYG92VmFnQXFsYUl4VkBdalZdZHZhUUZhbF9oYm93QU94RGBfYVlqSmhsb3FrV1lsSl5mQWZiaT5sTVBgUU5mW2dyWD5yQF9uSF9qX2FeVE52b3hpSlZyc15ldVBjb0BcXFFPW09fcEU+Z1lQbUBfbW9QXlVRX0JwZkVOY0hgak1uWmlZdG14YFZPZ3h2XFxmT3Fob2RAeW9XQW9ITmteV2JDWWRzT2hyeWdKbmRLdnFWWGJSQF1pPmpBSHlXXl1oP11meGdDSWNObl1Jb15sTndIRmY+QGdZQWtRVmNEQGlCP1xcVUdyVFZeaGZqRGlmZ155dEF5SXZcXFFgbXlWeGB2X0RRWlxcSHh0YF5RcV9zUW1AaGRDbnRUQGM9eGZnQGBVWW9cXFl4eGZwZ1lqSElgZGdnWW9fcWB0aEleV2BhPUdyQmhlVVZvUHdraHh5ZEdaU15ucD95Rl5tR2hodmhdVElePHFod3FeSEZcXHNRcFZHdG9vW0dhYklWXFxmQGZCeXdDP2pPd29HRlxcY0Z5cW5tbU5oZXduOndrZnhvYU9pcGhvOndfXnddR1hpQF54aVFlcUZpT25fZ0Feb1ZwVVluPE54RWdsP0lpZ2lgWlFobEd1V292QV94bmFcXFhOczp5Yl9QcHJYXkdpdjtGaHF4ZzxJdGVeZERGYWpIZlN2b1FZaT9XeFpQZGNJX05HbT1pWl5JdmA+ZFk/cD1xaG1QcD0+XU9gYklRd05nZWxRZD9WYllAaV9PYFxcSWJESWVaZnJtcGJsdmxaZlp5XnN2bnNuSWhtTmhbYXBqVmJtVmZVZlpbQXQ9YGZCZ3ZLZmdXeGtiP2Nmb2pkR3ZyaGlMZnZgWV9DX2RpcGdYd29DWHRzSGxcXG5dTlBabU9geVdcXGVeaFRfeERGbGhgW1BJXlpucFdwbURnWj1fY0dmY2NWdlpubkpZa1ZvZmdeaGxXdz5wYVxcYGxNcGZIUGpDUGo+R2ZuT2BUPmljdl1bZmpAdmt0UHJvbnltUFRnZGJQcD55TmRUbnBkb3JRbVRheTpEb0N4cmBpUD5RTGNoTkBEWERUcnlYeUldakc8dUVoTEBUdUE9bGV5T2ZcXFhyUHRacE9pbVlpcVFnUXJxWHZybFdxdXF0TFB2UXlwXXI/UVlOdXJgdU5XZVJgeHFeSGpGaXBnVVlYRHNBWXhOVHJtQE9KcVBJWW46ZW9GTVhZRXRjTFBScUxHSHdLbG5hVU1wSG9jTXdOPXlaVmZFXl5fSXFcXEZuQ19jVEhobldzVz9vTkBuYlBdXWhydkdicz9vcW5tQl9hW3h2bj5mY0BfRU9pPlhoTmZwdVZhQHhoTkljXm9ybUlxZmZvRl9tZkhjZ3lkZ05dX192OkhbcEBfUl5eS2BdZWFvTWlqUldcXFpPeWBoaEFwZVVwbUJoYEBAbVFgbltmaE1xYlRfb09maEVwaHRBbGA/bG5pZGJAdmh3YnFeeFZHY21vYG5odUphdmtOWkleYDxnZ2hIb0Q/YGhfbUlReUlIcUZWZ1txX1Rfbl1YYl5IXFxTZl5dbnRgd2ZXb19WbnZMSGZTbmJzWXl1aWBBUWdjcV1EPnNLQGZxZltDaGlTX1p2ZmZbSHRCUmxnRmA/c09TU3JxdmRBSUg/eHRtVV11V11HR0RhUmlTRj9NVHBLdm9raGJZRj5RaGhLVU4/RHk9VmZ3dj1FVkdXaXZvZUtfdUxhZ0RdclZDdE0/ZD89cz1HUlFvWWZJWTs9VXFvZXJNRHNnSUxvUz5FWDxtQ2tfR0ZBWVxcaUV2SURnZ0VBcWVocWdkV2hTYVNPVWRBVUJxZXlNTWNvO2dmXXdPX3Nsc0dFYUlsVXRvZWdnP0VhSVRrU3VgUXJ3b3Z4S3lea2VMXXJdR3ZqW1dKc2hPX2lnQURCd2ddYHZTbUxMSXNSSG9DZExsSE1GUHhmcGtMUHJgXWptUE9GUXh2SWtkTG4+eFZReXNEdHNFTXB0eHZLYU5gYHRobFJsYHFJYFhpaW1TZUo6XFxTaUxVPG1SXUhyYl14QW11ZFRrV2VQUWl1UTxsb3Vydl10TXRXVWFqaXlvOnBuVz1QRT1vTERRXnlMPmBvR2BqWHRMcGx4c2BtamB0W0hPRFBua0RPdGV0dEhxVkhLVT1UZ2xOYWRSXnhVS1lSO1huOzxZR2BQdFFZWFRPbFB0U0RRTkVsaU13XmRzdklwZnRQVWlrSGFsPkxWcXhrWHhSU2hVQ2BUaXB2YUFOO3Bzc1BPRVFwdGxMXm1ySz1NS3lUQ2B1Yz1tRWRwUmB1PUFxZXhqckBSa1VQcVhVR0FMbl1sPkh2Y1hLREB5Y0l2O1FXS3RTVW1VX1VSQmBrUmBNQkRsWFRuYkxucT1ZWFVuVlB0dXR5T2BReGBKZm1VYm1RR3hLbFFtVFFsTFVNaT1SWlhtRmVOYGxYVTx1UWF0eERZWHFRTGFWVVhyZHlVS015QWhrTVFxVERqdXFTVHhwSlRLQnF2XlF5bmxLXWRYbEBzWHBvZ3hSXnFPWGR2R3htWVlXSU1uZlxcT1l1dWVMTT9pUm5lUnd5d2NRUnJQbkZMUEc9VlJQT15pS108UnFwTVlscXVBeFdwWXdxS211ZnlmaXE/XmNAX0RObm5Zd0BvXWs+W15pdUJmaFFJeXJOdUBpbmxwW19XZnVeX1lwXUVBYWxfeV52ZV9gYlBeYWdnYT1BZVJ3YUhBalFvZURPeVZeZV1vcVVHYHk/Y2h3XT1OeHhPXFx3VndabmRrP2JWPnBQVmpQWWpEbmdAeGM9cXBRX2NPSFxcUT5cXF9mYEdmbV5vZG5RYD5YWmRXZVxcR21GRnZzUHVhcHA9YGxGVnRoaVtCeWE9TnFxRnhZWWNtcVxccGZzYUd4O0FcXERRbGRQd0JQcU1mXFxVb25zVnVoSGhYXmZjTm9Rb2NlT2toSXN0aV47cXRaR3RPbnhYP152cWRZUHBqb11oUGw8cWNAVmtUaGVHT3dFb2tuQFtOYWl5Xm1CUWpcXElyY09tT25rPG9rXXF0PXFyPVZvSVZfZF9qWHZ1cWlvd1h3W25jeEhfTFlddGdwdW5kUE5lR3Bpaz52W2l2UkZ0X0d1S25xRkl3XFxuW0RwaHRgdmdJa1phdl9RXU5xdmJBa21IcUFxZ1VPcV9IXlpYakU+Y0BPYklYanRub2ZHbz9xcV5nZWs+dXRAaXVgdHA/bFxcSXBPaHdDYXNcXGFvbmZpSXZtP1BkcVFnTU5oVlFqRmdlREFkU0ZmXFxWZURBZ2hxbFJHXFxVRnFNWWVwcF54dmxQUHZeR15lQGRGP15MQG1LSXVyUV5eeXhLRmlLbm1YR2o6SXZSeW12PmxnT2xyP3E8aHRKSV1sd1tecXVMQF9cXEdmdWdwPD94R3dbbF93P2llZ19pam5cXEReXFxlSW5Cd1s8Z1puSFxcb1FfRkFiVm5hRmFhUmBfPkdgckhuYV5za1BbQEZqaGloPmBiQnBiZ3Z2ckFhQnhwPUFxb3FiQHdfal5xO3FhXFxWdUZxW0B4W1ZAWz9BZ0peW2t4ZXJQZW5ocWZXYWZXeUBxZm1xdmN3WmtuZ1thd3FAb25hXkVHXUtncmJZXV9gXU54XmZHWnJPeGVBYFJGaDpAd0ZOamZoWl1OY2dpcT1ZZGRXXFxiXm1AQGVyRmNncVtMUW1SQXBlQVtxQXhBPnJUR3JCSG1KcHhveGF5cXFpYWdWT2BjSW5bPlteWHJASWhLPmI6WXdtXmtvTnhxZ1tYYGc8UXlDX2dNYFt4X2Z5PnRcXEBmYnhiO0FgaF5oZFFpS1h1ZkZuRkhdTGhxY2hqXmZ5T2VDW2Zjb3dZc3ZScUk7a1dbO3RlR1ZeP1RJVXdXW2V0R0RPbWhsVWZbdWJmY3lpXUlNb2dpd0heVWg6b3dBd2ZXYVJwbXRDQ3U9SUZkQWVeT2hzS3J1ZWVaRVNaVUJeY2luTUlmd0VfbWZza3hKc0VuP2ZPYWNAP0dKPXVYa0RJaUI6cVlPV0JVS1I/PXU/cWdOYXRoP3ZkR0ZQP3VgVXl3XWZDY2NVT3R2VUdZY2k/Q3U9Z1hwXXhJY0l5T3JBbXl4WXhJY1VOS0ZwUURZWVI7Q3dCPXNQcWlGP2VGP0M+VVRZZWY+PVJKTVRcXEVCQ0dVRGloaEtVUl12Z0FlblV2WmlDZWliV2tDY1VCb3Fkb29jd3lDQ19yQGlmO1NzcWtzd19EVm9CdXlZO3lyZHFmdVNjaEFZQVVncVN5U2tnWnVXbWtEPVFjdll3WVtia3NySnNFYUtXaVd1TT11X2djOkVnX1lmTVl0bnFIb2dSaXNFaT14cHNYcV1ncklocldGaUVDeVNVOm1SZV94Z0VCc1tDXFx5Um8/YzpzaWZDZ25bWEhlRFVnV0tvaWljRVBZSXFxSHhrV3dBZ1ljaHFnRGpnSTthRnBLRFdRdl9PQlpZdD5Xd2RBVVl1Ukw7Y295cU51VmhdVXFwdGRpaztwWGR5a3hUUUdsVFF0dlhgWVY9cTpAVm1AcmZUcklUbFR5all0eG9Aam5VU1NIU3NdcV91eXFdc0NlV05NdUhtSz5cXGpXPWx3ZE5aZG9CYFdzcG9QRExvSW1CVUphYVhYbVhQYUxTZW9uPVV1YW1RcW1wRVVXSHNMVHl2RVhUZU9paVl5aXF5PXFxXVhIQVJIYE1fSVFjPFlBZW5IeVFUSW55TWxSWUtLeGtmRVh5QW1ZeVFUPXB0aHlbZHV4QW1DQW1BeVl3VW9zZHlBYFBrUWtVdE95eHJgSVJedG1NTHZlUEw7RFlaZW5yeXZ1PFlHdU5yYHhrUHFQeE1ybW1DPVNAXFx2YXlKa014bnV0Y2F2PkBqVkR2YGxxZG1MO2l3ZlRrQmVMcWxVV1FQZlVYUVh5WnVMZ21zT3lRPUhWQHVOeGVRdXVtckBRT015a0RNY0xtcz1PSEBzUUlVPUhRbV1yeHVqbHV5R3FweFl1TnFVRF1ZeGFyO2F2Q2BtSFxcVTt0UDtsV2t1UXNJSm14TUdNTHZNTmFZUFNgbXJZT2hxWUpAU3JlUXhdVGJIT3JIbGNJbT9FeXBJam5obGtFd2dZbkZ0WG9oSlNVc2xMcnc8a3FgWGNYdUhtUzpJUFBNV15cXG5lTE5yRVlURUxraHlXRFc6cHZAUFJOQVNBcW9xYFlMeFV5dFhaTXZyYFRqbG1rVXE9aFFQUVJ2ZHRTRVhUWVV1VUxxQFl4QVQ/eVNMbVVWZE5vUU5WXFxvS1F3b1VYPW15SkB2XnlyZklzSmRPUj1YPj1XWEBVUkhqeUlWSXVYSUxMU2Bua1xcTHNkTEp4VlhwbWpQcnB5SjpZcWdNU1V1ckZYcWVhV0R4cFdgWTo9UnBQTExhbz9UUU1ETmxgUGRZcDxtWD55WFhFTEVgd1FtVD5dUWV0eVpFVUV4a3I9Uj95cmFJWFRJWWp1dWZpbnJpS1xcQHlTcUtFeFheXXhdYHJYPVI6TFZocFBCbFBlWVlcXGRMYlVOVEBQWGVTXmF3Wml3QXVralhXPDxtZWRqd1BgcXdlWE5ya29oX1lvPWhia1ddd2B3RUBlTldibHdraFhcXGheck5vYk1Rcnl3aUtZa1l5YHlXdF1pZmh5bHReaHlBeFxceFxceUhrVFlrQnhza195akFoPWh2W19eeWZ1YV9kXFw/a3R4YXI+am93Yll5WmxRYVBWbWpeaXdQcT9gW0FIXl5RYHBBeWB3ZFpgY01weXZpXjtGcm14cXl3dFBwd1dOYHFxYVtRZGxYeEpfaHdnWkxfckh4a2lHYVpXcVxceHFNSHdgeHZOQWhJX3Bqd3NMQHBNV3J4Xm9ocWlaP29oeXdeeHg8T3RRV1tjcWxyRmNab2FcXE5dU1diS3dxP2h5a3dqPXldYF9mZU5zZl9aW0BpXnh2eFhgaXZed15mWFdkUXZgdD9icVl2ZlZecXBoa2dubV9oT0lsZm5cXGZ5bm1weFA/eWZ2cHVpZXBuaHlmcnV5aT8+cVlvXnJ4dXhBdTtoeGVpYV93eVlmW0l2XWBIaXE/bkhXeER5XklQWnlobT9RYVZvaldhcFBnbW5JX3hgbl95aW1AYGp5cj9PeXlXXFxgeHFBQHVYTmFIV1xcP3BkQXlrdXZlSUBjO0FxbUl5Q3dcXGVBZj9Pb1dhcFBHeElIcHh5alJmanlha05gZ1VGeGFPY1N2eVlBbD9xZWZudTtmdklgeHRvd0hIcnBXaF5pY1lPaXRxeTxwZHlPbVM+eWluYFxceWE9aG50dm9bZ3RtcHlZVmpreWlPP2J0RmZ1YXhlX2V0eWhsWFp5eVo/eHBBeHlcXD5rWUZ2O1BbdG9gYkl2bEBuX2lmTUlhXVBgSXl5YFBjd154anlxRW5rc19iOm9qZElpPGZ4cFZ5cVF0S1lyeXlhYkhzS3ZcXEU/bFlndmpvdXU+ZHdeZXRIeWpYYHM/eVRxWlVZdVJeXlhgWj95a3hvaXQ/cW4/c0xgXztobGo/XV54ZHNoZ3N5cW1Bb053W3deeXlOW0J2XzxBZ09mdGloYFNJYT1oX2ZwYnhAdUlBZEl2bEhWXmY/YmRZZkBod1NfXzp2aF5Jd19Jb3lQb1ZZYkl2XFw9Vl9KPnA7Rm1oWWVKPnhhbl1iWW94b2l0Q1ZbYkJLZXFxcm9lR0JDST1NSGxReWNJd1tRdjs/Y0FheEo9UnhheV9FZlhLWXJ5eTpveHZjZHI9VFZZQ0N1Q3c/WDpJWDtDSXJJaUFvRWhTRXRpV2txRXQ9dz90S3dcXHg8dmpYbml1XnlBdl1BWWNOaWVkUGdqRDo7al5QTmFMTlFFTmpENUI=</Image></Text-field><Text-field alignment="centred" layout="Normal" style="Normal"><Font style="Title">The Kinematics of Agricultural Machines</Font></Text-field><Text-field layout="Normal" style="Normal"/><Text-field firstindent="0.0" layout="Author" leftmargin="0.0" linebreak="space" rightmargin="0.0" style="Author"><Font bold="false" executable="false" foreground="[0,0,0]" italic="false" underline="false">Stanislav Barton
Mendel University of Agriculture and Forestry in Brno
Zemedelska 1, 613 00 Brno, Czech Rep.
barton@mendelu.cz
&amp;
Karel Englis Unversity in Brno
Sujanovo nam. 1, 602 00  Brno, Czech Rep.</Font></Text-field><Text-field layout="Normal" style="Normal"/></Input></Group><Section collapsed="true"><Title><Text-field layout="Heading 1" style="Heading 1">Introduction</Text-field></Title><Group><Input><Text-field layout="Normal" style="Text">This worksheet demonstrates the use of Maple to study the kinetics of an agricultural machine. Maple is used to model the trajectory, velocity and acceleration of machine components, which are plotted and animated.</Text-field></Input></Group></Section><Section collapsed="true"><Title><Text-field layout="Heading 1" style="Heading 1">Initialization</Text-field></Title><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input"><Font opaque="false">restart:
interface(warnlevel=0):
with(plots):</Font></Text-field></Input></Group></Section><Section collapsed="true"><Title><Text-field layout="Heading 1" style="Heading 1">I. The Problem</Text-field></Title><Group><Input><Text-field layout="Normal" style="Normal">Dung is falling down through a stall grate where it is cleared away by the machine in Figure 1. In this article we shall demonstrate how to use Maple to study the kinematics of such a complicated machine. The propelled end of the supporting bar is connected to the chain running around two teeth wheels and moves ahead with constant velocity. The lead end follows the guiding bars. Scrapers are fixed to the supporting bar. We have to study the trajectory, velocity and acceleration of the business ends of scrapers. Results will be plotted and animated.</Text-field><Text-field layout="Normal" style="Normal"/><Text-field alignment="centred"><Font style="Text">Figure 1.</Font></Text-field><Text-field/><Text-field alignment="centred"><Image height="268" width="626">TUZOV3RLVWI8b2I8Uj1NRExDZE5OWmxrOmxKPkg6WFFSaHQ/S1I8T2BMb1xcanl5eXlLRlxcS0I8TEpcXGt5eXl5Szo6Ojo6UnljZHBFYUpGbkNfYjtfZHJPdWdpbUNwbF1BX0ZmYmc+eHl5aWtXWldQeExAaTtxZk0+XWpZdFNIbVhYdE9AZGZ2bGFGWz1uXlQ+ZmpQbGA+dD8+YFp2Wj1OaGo+XUpYajtGYVJeW0JJcjpgXUZuYEZWZmVnXFxwdml5SXJcXE9eSlhfQV9dd3F5RVZqXWdfP191Om9aXXZaXlFjTHZ4X29bXklac1BmcEZgQXZ5RF52RFFgQU52OmBdRm50bU5oPkZsPU5oX1hkQ15eST5iaGBjTEFqTmdcXEJpXFxmdmlXX11beHF5T2tFYV08dmVIVmdnSXc9Zl9JXnFgQGJIRnZWPmxtWG1OX21GaWd5QV9BX21WXlxcWkdnP0ZxeG5aRUdadG5gS0FuVkFyb19mQFdaUlB5T29zYkd1Q0Bhdl9kSEZ3PVddQz9tZFliYmFuPHhlZ29eaXl3XT9Pc3RKS1hqO0VKV2I7Q0lSWVlSVUJsPWhMXXJjPUZBU2JdZUJ5eUdKQ0lGT0hmaXM8UUZqYUljaUJcXHN4VGNkPUlGPj1nVltSaGlmXFxzVEtLWFlPU0NfWW9HcnN3dGRdZ2RnVTt5RWJxQkJlVWFRRlF1Q2xVWF9PeDt1UkBTdVBJZmw9VHR3SERfVW87c2dNR09lR249VT1hVzxldm5ddVFPcEhIcmlQUndFTT5tb1BkbHVsT0pgVGNgWFpsb11AVUhRcF50cklkTUx4Slpubj5PYjpfckRHW0RBc3JuZktxc2FRd3NYYm5eaFt5XnZfa0FmaHJfYUx3bERJZ0tYXlZJaz5wYz9nc1I+XFxPX15kT2Y9b2NUQHc7V3FPd2tcXG93T1dgdk9aYFlcXE1XcD5mdGx5Y1JfYkhOdlBGWzxBZ3FXXmxfX2R2YFlxdEt2cj94dGxRZ19WY2A+a19xXUtHYW15cGFWakhBcl9mXldOdWVZbFQ+c29BXmxHbkJpbVlvX01gaF9Ba0JGa0xAdlhXeTpvZ0ZuXmhPcXhQbHJeXmhgY3BRW09Yb2Z4c0xRZnNYY0NYW3ZPWmg+dXk+bWF4eUpYcWw+ZUROaHBHa3VQZVlYcHdpcUJ2XTxRcER3cGVgeFthckI+cUVYaEZGW0JJY09eYj5wdjtublpYaXdwaVZGbml5aUZWZkZBZUdGbW9XaWdoa3J2W1RueD1mcF5fbztgXFxPRmpIeXZRQF5dSGtKR3FiaWJMWGBrb3VtcGVmZ2VPQGtMeHFmWWZnTmpVUVptYWNyUGZZcGFWQGtNRmA7Rm1KSXQ9eGxtX289YGVgXnllR1xcXnFjQ1hianJuaWI9ZWM8RWZNSWk6V3Q7d2lKS1RRS3RbRVRCaWVfa2tLUGxUPG5FUE9OVFNwRVlLWFZbbHdcXFlXSVhSYVxcWEN5b3dAbHJATV5hVmRYVHdxdEJdS29IUlF0d1xcRHZWVXhbdFhcXGxTYVxcdEJReV95dlpYcWlMU1pVdGp0UmFNa0FFa1VteEx0TUZVd1pYc0NdUFVpVGBEV0pBV1ZYWG9RcD5peWxFc2hhcmhhVT1xTWs8UHc8bGptTFxcWG5UUUpLWFNuXW91RWxNXFxMd3FLSGhzPVRTR0FSbU15YlVZZm1TUGFLP0BKc0RsVE1XXll5TGB1XVVMYHFVb01vdWVMZnRWWTx2VmV1d0lNUmlSdURsVUhrRVBUc3hLYVBURHVyamRsPnBzQW1tdk1rQVRYSFVLbV1vYUx2eHRZTWRyVnlyXVRvVUh4eGl3b3VPXnFVd2BNXFx0dUFwdWZMWFtNT3FtTmhMdU5BTl9pbm48bUl5UWBJTHFRbWRBVVtUWHZQT3FFUlZdakZpWXhgT3F1d2ttdW1ZUWd5WFlMS2RkTV1gUENdcU5BdEtZbjs8c2dJa1VhS2Y9UG11dXRheVpYdVBFWGtVb1VYbF5FbVtYeF5sc3dJUHNkSnFAeGd4cFdlUGxcXExjUG5JRVl3YWxIdVdFXW5nYHVHcU9ndHZ0ZE1ZTE5kTW5IVWpzbHFuSXZkPWxwYXNzcHdIXFx1eVVZP3B3dXlwZVhTd1lUc2hTS0V1TnBrTTxsP2lveGhtc1h1cFlzYlxcdmJBeEhxS11ka2dkdW5ReXBIUExdU3FcXHZFVHBLRFFUSGtVYUxfXWtadHlRZWpyeVlUeU1JRHZmPFRkSFFnSVBcXGl1aWRQc2h3dElsQUx2R3hXb2xPYnFTWXF1X0xMbUBzZ0hLZWRydVxcU3hZWHNsd0ptS0NYakFhT0hQWGZwcFxcdHRocW1qVVBOTFVbeFFicXZZXFxnUWFtaXBxXndoaUhaeD54SnBkWVB3YGZkWHZnV0ldbFdebUdrYEdoRUhuWXFkZUFqU1Zlc2d4YmZ1WkdjbD9ua0dibUBhPGd2aE5jVlBpVmFeVkFzdU9hSkdgRW52c2BiSGduRWhkXVhQeUJcXHFVZlNYSG9mQV1mSXNEa0d2Vk9SXltVUXVoYElEQUViXT95TkFyd0lXRF9jbUl3UnVnXW9yd3dIPT9YR21oS3dnPnlpTktGZ1FiPlVmZ3NYSD1UbFdyTklEQW9odmtGWHF3eElHdktYanl3c0tWPj9Jc0tlc1lZSmtIZlV4SldFSWVza191ZUtUcF1paU1nYHVpZVN2V29nT0l1ZkVyU01WXnF1c2dZU0tXd211SXVkXFxzaEJ3VEpZQnlVVUVVQls/dEFFeW87U1ZLVlJfVmdjR09HaWNVRUBRQldDVWx5dD15Zk1JZkVdU1Nlc1dDWGlhdU1Ndlhvcl1TWUNfRV5xeVZZR1dxVF47SWBXdHFFR2I9WGxZUkpBaUFpVEh3UmBxWGhpdFtjWFZNU3FJQ0ZBY2hpUm9RdnV3dD5JVmVhRU1tcmRRVkhHV0h5c0R1UlE9cndheERHVGNxeFM9Z1FHRk9lQ3BRYjxXaT5hUldXdWJTcnFrZm1FVlpXYl5hdmFfWFBXc3RXUkx5YlNNdjpddT1xY09HR2dleTt1dkFvWVpJVWVVU2V3VmFPRWRBVUtrcj9dYnRJRTxpQ0BtTkRRbFhtcUh1Ujp1eGVxTW1QUFE8b2w9TmhMT0t5TnBNa011dT9EbldJdExUc09tTj1xSnNYeU91dmVQbWNsbWhRWVFAc19JcU9xbU11dnBJc2VoUVVhUEtRU2F5TUJJUEldT15db2ZQTkFxU2pJVGNxa1V0dFBFakRcXHVlYFh0WFI+YWpybFRZTHZYbVhETHJpaHBzbXV0ZG9SaEw6ZXVobFJKYU5uRUxKaW9ZcHJcXEFjUG5wc0dzdVdvSXF3al5iWl9oY193SFloVEl1bmZcXGVHdVdYY1lpcz5vdXVWbWBQZFB4Y014bGVndWZ3YkxQc2pxaFJZaT5vX01Qc19Ad1ZpbG1OcU5PcV1JXFw+QV1fWHhCeWRLbnJ3TlxcRWlhYlllUT53XlBhQ2B1UUlfTE9za3hkbEl5Wj5rXT9bbmliSFBic1l0UHlncFFhQllwQkltX0ZqUkFha2BfUUdtQj5cXFFncERpZktJYXNgeXVYY1Fnd0E/XFxtXm1FSXRabms9d2tsTl5RSGpzSHleXnlobm51aV1iVmBBaGJIbmhicXZIZ1prZ3hkYGVwSHNecHB1aHRBWGRwUW1PR3c8dlxcQT9od0ZjW192Tm9fPz95PHdiQV51SFhbZl9vSklnQl9dQV9tWXhkX0F5U1hlVW9oVE9gc1BpPE9zRGZdQlhzaFBoQ2llZlB4R05sd2dtSFFpPkZsZWFaXFxmXnBuXlVxX1tZckRYeD1uc3Y+XjpAXVdHW1xcVmI6eW1laGZVP3dQaXNaXmFEd25tYWBgdlxcRE5wY3h4Rz9rdWdrTWhoUXFpbVhzXlF4Qk52dm9fQVh2QmBiP1l2dGF4ckZbR1lqVldba053RGZtbUFbXFxWWm5ncHBpZF1HXFxgQHFxT2tEb2RZUWpncWl0TnFdYGBTTmFXeGhweW4+dl9JdmtNP2RtdmJxV2hkeGM+eXhrZnVXSXl4YXBScG9gaWBwcGo+cG9zaG5aWWFicXZXXmN1aG5zWHZzYF14WFxcQkBwQklxUl5qVllyZUd3cXh0W2BpT3B3cHdwX2FoU3dmZl5oOnlbZHZoQHB3YnlkSV5sRGFeX1hqXklwPl5vXVdhRz5ocGBjc3BbY0dzX15zSGBqSF5yX3dzUld1bU5eXW9nYmZ5X3BoeXdadmliQl5od2l4Tz5sXU9saU9uc0dzPlFxYj94cVFlQGhgb1h0O3dseUdnanFyX3lkPWZdZVlqc1lqcXlnWGFfU0BlWE9xc2h4d1BhdW94REB3aVh3bkl2OmZtX0djeG9xRUF1dkFuPVFsQ1laXFx2ZFlOaFFmX0JWZ1JheWo/dWBOaG1xcW9PXVxcP25NTmFnUWhbP2VBSHc9cWNNYW5PX3Z4X3hHeWQ+aGF3V3llWXc+b290ZmxdR1xcc0h5Q3dwWlhqbWd1WG5rWkBbX1h0O0laWl5fV2d2VEdxRWBoXFxnZ3lHakhhXmxXd3NZckN5cnhXXU1eaGJAYGlZc05ZeVFGcUBPdEFGXFxzSGtdd3BtP2lxb3lqbnZPQWZ0Tl9lQWpfTl5RSGlTYGp3YHhpXmhFX15Bd2ZZVndXeGtAcHVJX3k8YHdbbm5DWGZpaFt1cWlhZ2pIYW1MeWR0ZlpHZmx2WFpLTl9Rd2BVb21Fb15EcGtySF1NPmtLP3Z4Pl9CYF1NUV5DWVpDXmpCb3VIWGlyWHNeZ1xcclhkVU9wVmdmPFZvUmd2cmFoO1FoZ3h3c0FbXFxGZVxcVmR4WGZpQFxcc25gXlFreXZmX095d1dtR19teVg6Z2Zrc3RSQ3VkS2JSb2djZWRFUUdsVXJjUVVDS0NPcUd3ZXhjZXlIRWRFZ0VWP3hpX0RIb3Zyc3JobVVWa3VYO1Jud0hgY3ljO3VVO2NFX1ddXWNEaVZsZWdzZ1JoQXZYRXNDR1Rhd2I7UUVORWlsT0lRc0lybXJWQUdXYXhtVVhRcWRtT3RDP1JfV2JCaVRYU3NrVWNWeVd1a3ZrVXdWYWZuXWhYYXh0ZWdTSXhEdUJLV3ZQRWlWS0hBYWg/X1Z1b0I8XVhpX1hASXVSZ2lMSVdxW1hHS0RhTVNFXVJeU0lmYXNra2NMeWZiU2hWc1ZXb3VkWVd3T2g9RUddU1JZeVJhcVdtYUNXW0hoU2NdZUduT0lRc3hVXXNZV1NXd2VVeXVaZXhpZXlbaVlVbVloaXRhb0c/cVhlV3VxXXJuP0RBY1RMU3NrUWNWcXc7S3dPaWk+XXh1P3lxcWVzQ2g8dXZRRXNsQ2lPeVhdW2NbX1RuZVNbTVddV3lBZ2hhdWdAU0hYX3JlQUlIcWR2T2lUU0Rsb1NhW1g7X3dvVWl3R0lvP2ZiT0RMW0hcXGtVX2FYeGdYbmtkbD9XeFNzb3VZc1FlbHVVa21JUTt3V2dpSHlIYmtoTHNzR0lEaUVVV1dTal1nZl1zQ19TSW1yYz14clVCW2FDV3dSVW11cU1CS213dUljZV1WTE1Wc2tGYEFVQXFWWT1Fc2F1akNJO3Vmd11ZdXdyYGtzV3FzW2FZSklEVV1HcVViVU9Ja3lybFVjV01UdEFybE11Q112XUV0cT1JYDt3dk11XFxRVHRneUlVWDx1UnNRSFBVSVZNd0VLdmNpc3dlUm1rVEBvU19pRU9HV0dtV21NVW9dVFs7dGN1YkJJaVpXaGdxaUVpQldDSEtXWXZXQmxxSHBnVE15Qkxzd2BrU0dpZ0xVRFFZZVtDY1ZVZHVpZmRvRl5dVXhDdWVDQ1lvaXRvc1h1Z3BZdE9hV253VV5DZExFR2Fhd0ZdaXllZWh5R15VVHg7dGRhQlppSGVveWdzVVNtR3BbSE47SVljdlpdaFFlRWZleHhNWHk9WERvd2Y9Y21JWTtFdW51Q2NNVD1veEhndD49R3FNYm1BWGc/cmBfZmRHSEVpU2R5V1BXWWBvQj1veGhvV0BzeFRXRmM9eHVVRlhNWUBDSFhdRjxlRmxzVHBJYnJpRHJTUlFrSXN5Q2VhWFFpSHZLUnF1dVBrWGJBc2p3dkdreVdnZFJxZGs9VltcXGptZXN2XU5JUE5xQFNiRFA7dVZVPGplWVI/cHdwWVhZZVY8XVc8dVJjcXFzZE9dZWtebU9uTG5NRFFobXV3PFRERVh3QHljVXNkYFhIXFx3eXhzWGVZVFFyeG1PQWhUYlFSWFVQVVBPQFROTU14V2xYS1VtdVluSW1VU0VRO3VWW2l0eE1NRllZbEFYPXVwZEFRT2RKSHhVX1FsQExzbUlPXnhtYlxcUVNwcmNJd2BAUElsaj9tcXNFd0hFTnJgVGhcXG9dUGxhbVBhcXZfZHddeU9taE11YUxGSXBMeHJ1XFxxUHBwPlxcUENIUElAVkVNVUV1cW9ta3F1cVZwTWhhUUdAVkx4bzxkUXNkVUNAb0lkTFhRdGxoeUtwaW5vdmNocVNId294XXN4ZkhwcUJvWz5vZlRBaT9vY3dhZkdfZ2hpbHVQbGRRdkpJYGhYc092aW9wdltJdz1JZmxhclF3dmt5cnZGa1V3XFw9WV5HQW5CSGpzR21oRlpVQHJpUGBOX2l2ZmY7X2xnP2REUGtWYHZZeWdaYWVoaWlebm5lX2NdYV9kX2JAYVtXPmVsd2RUP2xqb19xcWpWV19Ld3JtcXlKcWdcXEFtYlZuX3ZkXVFlaElnZD5vX1FzU1ltVEFhdkFzZU50QVFpbEduVGliSHlrXXBscFdveU5iVkllV2lbbz5jVm9yR05aW0hfS3d0aXBfW0d3YUlwPUdrRWlgd1dwdj51dD9kY3FtS0ZheGloc3BpP29fRldxZHlqaF5tcm5uXWlkQWB0W1hbdT9ndHFwX3FlWVZ3XnBdaGdiZWZebE9uYT53XFw+a11Pd2FxXWlOdnVvZV5ReUlfXlhpa1ZHcEJvY3lYXXRucEVJXVpOaHNWeWRQZWJxXW5hWlxcSHhsWWNgWG9Ld3FiWF1fWGZleXZ4YWRoUGxCb2tFTmFLaWVhZmBJYGVnV2dsZ3FkZl1daXRoP1xcc1BvT3BfSVFfa1luV2B0dE5oXFxwdVNhdW1veHRxZl5xeF1GX2VmXFxzQGdiUW9zeFxcS0hwXFxWZm1ZbEB4eF5wZVBJYHh3dT9fbXdPXnFYXUNHb2RubHNAaGJRYGt2eE5ZWndxaUpYdUhgZmRpaHVPcWg+d1pQaE9ZYmFQbVR4XUl5Yzp4XmBPdlJpc15JdkJPeERma2tZcU9wZ2ZBb2d2bUtgZ18+dlBJbWhQWkRZXFxESXhQX2ZmUWc8Zl5wZ2NDP2ZZWW9uV3Y6Vm9OR3d0YWtecWpxaXFlRnFgSGBIVmVWbnFxb2xKR2FKdmxkYGg7ZnRDWXlKdWh5RFpzdDxNRkt5dE5xclp3SVdLSVNpdWU9U29dVGJRWV5fWWx3VVpPWEdTR1d5ZE5VRFxcX0VuO1NtYWZMQUJzT0dsWXJNW1g8eXdnT3dLR2VAb1h0TUlXd3NJS0Jzd1g/YVhcXHl3RG1iPT9zT2tlZj1SaG9CS1dJO3VyTGVFO3FGRj9SaHdXX1dEa1tzT01jUTtkZUdVXnFpSml4PndESldXO0V3PnFXTFtISHdESldnVV12ZnVCUlVJVmVGcEVGYWNEOl9zSXd0UGVpPnVFVG1EQV91QXNocT1EUUdVXlFJbm1jal1nZztnUT1WanNmWUVjVk9kPVtSaF9pdEVXS2lIa1VyP2l5YVlTaU1kUztWUWFXWmNoXFxdVHNjVWdlYllzd01FZmtDdVJZVkk7RUY7c29XZWhPcjpfRUY7cztddjpfRUZrajtddjpgVWlsSlxcQWpWXFxLQklyWj1SSD5zd3ZmYHd5YW5tQ1Zac2B1cGBndj5lWGllRk52OmBlW252UE92QlZaRF52RFBhUz9cXEFedkRGc1ZRclQ+S19VY2t2OlFFSldHZnlTS2dIOkNpPElEVjtlPUtYajtVeT9zR0ViVltWSDtzT2dGSFtzO0NpTGFyO0dJWnNobV9jaWFGWldyeUlUbWdHc3VjR2dCOld3YUFzeVlVaHlHQlFXPmNVQmN4X3lHVUFTVmF1X1t5QHVYX1tDWW9yWkVVY09ZQVF1T3dGPFdVd2VZQFFDPUtYajtFSldKbGV5XnRvVXlRR0hyZF1QSlhzZ1V1PXhMQEBLST1SOmBVU2x2UEx2QFxcUW9VSmw9UFp0dD9Idz1gc1tVTXY8bGVcXHdURVJWPGxlVG1uUE54VUpsZWpDWFJIQUpeQVY6bW9pRWw9UXRCPGxlZFNWYXNWcXhkXUxSaW9baXBrRXM+aXNjVXc+aU10YW5MZGxlaXg+QXJ4QXY/RFR5XXJfRU1zXFxtd1dxcGBfYWdham94O252QnZdVF5hdUFaS1hnU2lwbHltb0FzWVZzYz5bV1dzPmlgU3BhOmd2VG5bYFFdR0FlWz9gWnZaPU5oaj4+QVY6bUNAOkBGVHdURFF2QFNWbEpPWGo7REFKZlhNXVxcTUtEajtldlo9UkhuWl5BRldiO0FiVltnRFV5SU94VFdSV1djQFtCRjxKOkZjP29jPm9vPD9mPDM8</Image></Text-field><Text-field layout="Normal" style="Normal"/></Input></Group></Section><Section collapsed="true"><Title><Text-field layout="Heading 1" style="Heading 1">II. Trajectory of the propelled end</Text-field></Title><Group><Input><Text-field layout="Normal"/><Text-field layout="Normal" style="Normal">To describe its trajectory we shall use a parametric description, <Font executable="false">[x(t), y(t)]</Font>. The trajectory consists from the four separate segments - two line segments and two semicircles. In this case it is best to use piecewise functions. The whole problem can be solved analytically, but Maple's outputs will be quite long, so we shall assign numerical values to the variables. The SI units will be used. The origin of the coordinate system is in the center of the first teeth wheel.  </Text-field><Text-field layout="Normal" style="Normal"> <Font executable="false">o</Font> = turns of the first wheel in one second and <Font executable="false">pi</Font> = numerical value of <Equation input-equation="Pi;" style="2D Comment">NiMlI1BpRw==</Equation>.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">Su:=[Cx=0.64,Cy=0, r=0.1925,o=2.98,Xo=2.01,Yo=-.2,X1=1.0,Y1=-.18,phi=35*pi/180,S=1.3, Ph[1]=0.1, Ph[2]=0.3, Ph[3]=1.085, Lh=0.4, R=0.1, pi=evalf(Pi)]:</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">assign(Su); </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">omega = angular velocity of the first teeth wheel and v = peripheral velocity of the first wheel = sliding velocity of the chain</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">omega:=2*pi*o; v:=omega*r;</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">At first we shall prepare partial functions describing trajectory of the propeller end as a parametric function of time</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text"> L = length of of the individual trajectory segments and later cumulative length of the trajectory segments </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">L:=[Cx,r*pi,Cx,r*pi]; L:=[seq(sum(L[i],i=1..j),j=1..4)];</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">T = times of the transition from one segment to the other</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">Tau:=map(u-&gt;u/v,L);</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Tf = duration of one period</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">Tf:=evalf(subs(Su,Tau[4])); </Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text"> motion to right</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">Fx[1]:=v*t; Fy[1]:=r;</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">right semicircle</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">Fx[2]:=Cx+r*cos(pi/2-omega*(t-Tau[1])); Fy[2]:=r*sin(pi/2-omega*(t-Tau[1]));</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">motion to left</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">Fx[3]:=Cx-v*(t-Tau[2]); Fy[3]:=-r;</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">left semicircle</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">Fx[4]:=r*cos(3/2*pi-omega*(t-Tau[3])); Fy[4]:=r*sin(3/2*pi-omega*(t-Tau[3]));</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">Now we can build piecewise functions <Font executable="false">Xi(t)</Font> and <Font executable="false">H(t)</Font> describing trajectory. Later we shall handle with them very simply - as with symbols.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">Xi:=piecewise(seq([t&lt;=Tau[j],Fx[j]][],j=1..4));</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">Eta:=piecewise(seq([t&lt;=Tau[j],Fy[j]][],j=1..4));</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">This plot command we can use as a graphical test of the correctness.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">plot([Xi,Eta,t=0..Tf],scaling=constrained);</Font> </Text-field></Input></Group></Section><Section collapsed="true"><Title><Text-field layout="Heading 1" style="Heading 1">III. Trajectory of the lead end.</Text-field></Title><Group><Input><Text-field layout="Normal" style="Normal">The lead end moves along two lines. The first one is described by two points. The first point is the point of intersection of both lines - here the lead end changes direction of its movement. The second point describes end's position of the first leading line. At first we have to know the equation describing this line,</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">line - general equation</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">p:=y=k*x+q;</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text"> p1 = parameters k and q describing the first line</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">p1:=solve({subs(x=Xo,y=Yo,p),subs(x=X1,y=Y1,p)},{k,q});</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">The second line goes through the point of intersection and forms an angle <Equation input-equation="phi;" style="2D Comment">NiMlJHBoaUc=</Equation> with the first line. We have to determine its parameters.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">k=subs(tan(alpha)=k,p1,expand(tan(phi-alpha)));</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">q=solve(subs(%,x=Xo,y=Yo,p));</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">p2 = parameters k and q describing the first line </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">p2:={%,%%};</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">We shall use again a piecewise function to describe the position of the lead end as a parametric function of time. At first we have to determine when the lead end crosses the vertex, because at this time functions will be changed. The simplest method is a numerical solution, based on graphical output. </Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal" style="Normal">The length <Font executable="false">S</Font> of the supporting bar is always constant. As the propelled end moves along its trajectory <Font executable="false">[Xi(t), H(t)] </Font>sometimes the distance of the vertex and propelled end has to be equal to the bars' length. So we can compare the distance of the propelled end from the vertex with the bar's length and to plot this as a function of time.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text"> e = function comparing distance with bar's length</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">e:=(Xi-Xo)^2+(Eta-Yo)^2-S^2:</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">zero points of this graph are times of crossing thru vertex</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">plot(e,t=0..Tf);</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">numerical solution. At time interval Float(2129733337, -10) &lt;= tau &lt;= Float(3254225287, -10) the lead end moves along second line.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">tau:=[fsolve(e,t=0.2..0.3),fsolve(e,t=0.3..0.4)];</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">Now we have to find analytical functions describing the lead end's position. Generally this end moves along the line described by the parameters <Font executable="false">k</Font> and <Font executable="false">q</Font>, which will be substituted by the parameters from the variable <Font executable="false">p1</Font> or <Font executable="false">p2</Font>. The propelled end has position <Font executable="false">[X,Y],</Font> which will be later substituted by <Font executable="false">Xi(t)</Font> and <Font executable="false">H(t)</Font> and the distance of both ends = length of the bar has to be <Font executable="false">s</Font>, later substituted by <Font executable="false">S</Font>.  If the lead end has unknown coordinates <Font executable="false">[x, y],</Font> these coordinates has to satisfy the following equation</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">condition of the constant length, the second condition is the equation p - lead end moves along line. We have two equations in two variables. </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">eK:=(X-x)^2+(Y-y)^2=s^2;</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">we obtain two solutions, we have to select the correct one</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">sol:=[allvalues(solve({eK,p},{x,y}))];</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">At time Float(2129733337, -10) &lt;= tau &lt;= Float(3254225287, -10) the lead end moves along the second line. We shall substitute t by the midpoint of this interval</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">solf:=eval(subs(X=Xi,Y=Eta,s=S,p2,t=(Tau[1]+Tau[2])*0.5,sol));</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">and the correct solution will be that one satisfying x &gt; Xo</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">solf:=map(u-&gt;evalb(subs(u,x-Xo)&gt;0),solf);</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">This is the correct solution</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">sol:=zip((u,v)-&gt;`if`(u,v,NULL),solf,sol)[];</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Now we can build piecewise functions describing the position of the lead end as a function of time.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">xi:=subs(X=X(t),Y=Y(t),s=S,piecewise(t&lt;tau[1],subs(sol,p1,x),t&lt;tau[2],subs(sol,p2,x),subs(sol,p1,x)));</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">eta:=subs(X=X(t),Y=Y(t),s=S,piecewise(t&lt;tau[1],subs(sol,p1,y),t&lt;tau[2],subs(sol,p2,y),subs(sol,p1,y)));</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Graphical correctness of result.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">plot(subs(X(t)=Xi,Y(t)=Eta,[xi,eta,t=0..Tf]));</Font> </Text-field></Input></Group></Section><Section collapsed="true"><Title><Text-field layout="Heading 1" style="Heading 1">IV. Computing and plotting of trajectory, velocity and acceleration of scrapers</Text-field></Title><Group><Input><Text-field layout="Normal" style="Normal">If we know the position of the propelled and lead end of the supporting bar we can use only a few simple relations from linear algebra to derive functions describing their positions as a functions of time. If these functions are known computation of the elements of vectors of velocity and acceleration or their absolute values, it is a simple problem. Because the functions <Font executable="false">X(t)</Font> and <Font executable="false">H(t)</Font> and <Font executable="false">x(t)</Font> and <Font executable="false">y(t)</Font> are quite long and their derivatives will be even more complicated, we shall use the following substitutions to simplify the next computation. But Maple outputs will be still too long, so we shall not print them out.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Time derivatives </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">Xi1:=diff(Xi,t): Xi2:=diff(Xi,t,t): Eta1:=diff(Eta,t): Eta2:=diff(Xi,t,t):</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">DSu:=[X(t)='Xi',diff(X(t),t)='Xi1',diff(X(t),t,t)='Xi2',Y(t)='Eta',diff(Y(t),t)='Eta1',diff(Y(t),t,t)='Eta2'];</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">These substitutions will shorten outputs of the velocity and acceleration</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">xi1:=subs(DSu,diff(xi,t)): xi2:=subs(DSu,diff(xi,t,t)): 
eta1:=subs(DSu,diff(eta,t)): eta2:=subs(DSu,diff(eta,t,t)): </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">dsu:=[x(t)='xi',diff(x(t),t)='xi1',diff(x(t),t,t)='xi2',y(t)='eta',diff(y(t),t)='eta1',diff(y(t),t,t)='eta2'];</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">We have three scrapers, so we use indexed variables. Significance of the variables corresponds to their names. The first index indicates the first scraper seen from the left.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">Ex:=(x(t)-X(t))/S;
Ey:=(y(t)-Y(t))/S;
for j from 1 to 3 do;
  Fx[j]:=X(t)+Ex*Ph[j]+Ey*Lh;
  Fy[j]:=Y(t)+Ey*Ph[j]-Ex*Lh;
  Vx[j]:=diff(Fx[j],t);
  Vy[j]:=diff(Fy[j],t);
  Ax[j]:=diff(Vx[j],t);
  Ay[j]:=diff(Vy[j],t);
  V[j]:=sqrt(Vx[j]^2+Vy[j]^2);
  A[j]:=sqrt(Ax[j]^2+Ay[j]^2);
  At[j]:=diff(V[j],t);
  An[j]:=sqrt(A[j]^2-At[j]^2);
od: </Text-field></Input></Group></Section><Section collapsed="true"><Title><Text-field layout="Heading 1" style="Heading 1">V. Plotting of the results.</Text-field></Title><Group><Input><Text-field layout="Normal" style="Normal">We shall present only a few graphical outputs for the sake of brevity. If we shall create plots in the phase space, we shall use blue color for the <Font executable="false">x </Font>- axis and black color for the <Font executable="false">y</Font> - axis. The most thick line will indicate the first scraper.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Phase space plot: [x(t), Vx(t)] and [y(t), Vy(t)].</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">plot(subs(dsu,DSu,[seq([Fx[j],Vx[j],t=0..Tf],j=1..3),seq([Fy[j],Vy[j],t=0..Tf],j=1..3)]),color=[black,black,black,blue,blue,blue],thickness=[3,2,1,3,2,1]);</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Phase space plot: [x(t), Ax(t)] and [y(t), Ay(t)].</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">plot(subs(dsu,DSu,[seq([Fx[j],Ax[j],t=0..Tf],j=1..3),seq([Fy[j],Ay[j],t=0..Tf],j=1..3)]),color=[black,black,black,blue,blue,blue],thickness=[3,2,1,3,2,1]);</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Phase space plot: [Vx(t), Ax(t)] and [Vy(t), Ay(t)].</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">plot(subs(dsu,DSu,[seq([Vx[j],Ax[j],t=0..Tf],j=1..3),seq([Vy[j],Ay[j],t=0..Tf],j=1..3)]),color=[black,black,black,blue,blue,blue],thickness=[3,2,1,3,2,1]);</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text"> x(t) and  y(t) - one period</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">plot(subs(dsu,DSu,[seq(Fx[j],j=1..3),seq(Fy[j],j=1..3)]),t=0..Tf,color=[black,black,black,blue,blue,blue],thickness=[3,2,1,3,2,1]);</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Vx(t), Vy(t) and |V(t)|.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">plot(subs(dsu,DSu,[seq(Vx[j],j=1..3),seq(Vy[j],j=1..3),seq(V[j],j=1..3)]),t=0..Tf,color=[black,black,black,blue,blue,blue,red,red,red],thickness=[3,2,1,3,2,1,3,2,1]);</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Ax(t), Ay(t) and  |A(t)|.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">plot(subs(dsu,DSu,[seq(Ax[j],j=1..3),seq(Ay[j],j=1..3),seq(A[j],j=1..3)]),t=0..Tf,color=[black,black,black,blue,blue,blue,red,red,red],thickness=[3,2,1,3,2,1,3,2,1]);</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">At(t) = tangent acceleration, An(t) = normal acceleration, |A(t)|.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">plot(subs(dsu,DSu,[seq(At[j],j=1..3),seq(An[j],j=1..3),seq(A[j],j=1..3)]),t=0..Tf,color=[black,black,black,blue,blue,blue,red,red,red],thickness=[3,2,1,3,2,1,3,2,1]);</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">If values of the y - axis will be multiplied by the mass of the scraped dung,  we can determine requested power for each scraper or total power. </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">plot(subs(dsu,DSu,[seq(Ax[j]*Vx[j]+Ay[j]*Vy[j],j=1..3),sum(Ax[i]*Vx[i]+Ay[i]*Vy[i],i=1..3)]),t=0..Tf,thickness=[3,2,1,3],color=[black,black,black,blue]);</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">We can see an animation of the working machine. The whole animation is combined from three partial plots.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Supporting bar and srapers </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">A1:=display([seq(plot(subs(dsu,DSu,t=tt,{[[Xi,Eta],[xi,eta]],
             seq([[Fx[j],Fy[j]],[Fx[j]-Ey*Lh,Fy[j]+Ex*Lh]],j=1..3)}),
             color=brown),tt=[seq(Tf*i/200,i=0..200)])],
             insequence=true,thickness=3,scaling=constrained):</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Trajectory of the scrapers</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">A2:=display([seq(plot(subs(dsu,DSu,[seq([Fx[j],Fy[j],t=0..Tf*i/200],j=1..3)]),
             color=[black,blue,red]),i=1..200)],insequence=true,thickness=3,
             scaling=constrained):</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Trajectory of the properelled and lead end</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">A3:=display([seq(plot(subs(dsu,DSu,{[Xi,Eta,t=0..Tf],[xi,eta,t=0..Tf]}),
    scaling=constrained,color=grey,thickness=3),i=0..200)],
    insequence=true):</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">AT:=display({A1,A2,A3}):</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">AT;</Text-field></Input></Group></Section><Section collapsed="true"><Title><Text-field layout="Heading 1" style="Heading 1">VI. Conclusion</Text-field></Title><Group><Input><Text-field layout="Normal" style="Normal">The presented access can be used if the intersection of the circle = <Font executable="false">e1</Font> - describing all possible positions of the lead end at the leading = <Font executable="false">e2</Font> can be computed analytically. If not we can use following approach.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">restart;</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text"> X(t) and Y(t) are functions decribing position of the properelled end, x(t), and y(t) of the lead end.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">e1:=(X(t)-x)^2+(Y(t)-y)^2=Lambda^2;</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Implicit equation describing leading</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">e2:=F(x,y)=0;</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">#position:=fsolve({subs(t=1.2,e1),e2},{x,y},{x=x1..x2,y=y1..y2});</Font> If  <Font executable="false">t</Font> has numeric value, <Font executable="false">(t =1.2)</Font>,  this commad returns real values of <Font executable="false">x(t)</Font> and <Font executable="false">y(t), </Font>for example</Text-field><Text-field><Font background="[0,0,0]" bold="false" family="Times New Roman" size="12" underline="false">position:={x=-.123456789, y=.987654321}</Font></Text-field><Text-field layout="Normal" style="Normal">these values later can be substituted into velocity or acceleration.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">x and y are time depending, to compute velocity or acceleration of the lead end we have to convert them into time dependent functions</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">xyt:=[x=x(t),y=y(t)];</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Time derivation of the equation e1</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">e1d:=diff(subs(xyt,e1),t);</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Time derivation of the equation e2</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">e2d:=diff(subs(xyt,e2),t);</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Determination of the vector of velocity of lead end. </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">velocity:=solve({e1d,e2d},{diff(x(t),t),diff(y(t),t)});</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">Su0:=[Delta[X]=X-x,Delta[Y]=Y-y];</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">These substutions will shorten preceeding result.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">Su1:=[diff(X(t),t)=X[t],diff(Y(t),t)=Y[t],
      diff(x(t),t)=x[t],diff(y(t),t)=y[t],
      D[1](F)(x(t),y(t))=F[x],D[2](F)(x(t),y(t))=F[y],
      X(t)=Delta[X]+x(t),Y(t)=Delta[Y]+y(t)];</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">Velocity:=subs(Su1,velocity);</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Final velocity of the lead end</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">Velocity:=subs(Su0,collect(Velocity,[F[x],F[y],X[t],Y[t]]));</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">e1dd:=diff(subs(xyt,e1),t,t);</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">e2dd:=diff(subs(xyt,e2),t,t);</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Acceleration of the lead end, using following substitutions can be shorten.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">acceleration:=normal(subs(Su1,solve({e1dd,e2dd},{diff(x(t),t,t),diff(y(t),t,t)})));</Font> </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">Su2:=[D[1,1](F)(x(t),y(t))=F[xx],D[2,2](F)(x(t),y(t))=F[yy],
      D[1,2](F)(x(t),y(t))=F[xy],
      diff(X[t],t)=X[tt],diff(Y[t],t)=Y[tt],
      diff(x[t],t)=x[tt],diff(y[t],t)=y[tt]];</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">Acceleration:=subs(Su2,acceleration);</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">Acceleration:=collect(Acceleration,[F[x],F[y]]);</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">Acceleration:=subs(X[t]^2=(X[t]-x[t])^2+2*X[t]*x[t]-x[t]^2,Y[t]^2=(Y[t]-y[t])^2+2*Y[t]*y[t]-y[t]^2,Acceleration);</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">Acceleration:=collect(Acceleration,[F[x],F[y],Delta[X],Delta[Y]]);</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">The final simplifed result.</Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Normal"><Font style="Maple Input">Acceleration:=subs(Su0,Acceleration);</Font> </Text-field></Input></Group></Section><Section collapsed="true"><Title><Text-field layout="Heading 1" style="Heading 1">References:</Text-field></Title><Group><Input><Text-field layout="Normal" style="Normal">Young H. D., Freedman R. A.: University Physics., Addison Wesley 1996, ISBN 0-201-84769-8</Text-field><Text-field layout="Normal" style="Normal"/><Text-field layout="Normal" style="Normal">Barton S.: Study of kinematics of agricultural machine., PTEE2002 proceedings, Leuven (B), 5-7 June, 2002
Lauriks W., Van Deynse N.: editors, K.U.Leuven. ISBN: 90-5682-359-0 Published on CD-ROM only.</Text-field></Input></Group></Section><Group><Input><Text-field layout="Normal" style="Text"/><Text-field layout="Normal" style="Text"><Font italic="true">Legal Notice: The copyright for this application is owned by the author(s). Neither Maplesoft nor the author are responsible for any errors contained within and are not liable for any damages resulting from the use of this material.. This application is intended for non-commercial, non-profit use only. Contact the author for permission if you wish to use this application in for-profit activities.</Font></Text-field></Input></Group><Group><Input><Text-field alignment="centred"><Image height="33" width="800">TUZOV3RLVWI8b2I8Uj1NRExDZE5WWlpKOkBMPkg6VEtHeE1rSjo8T2BMb1xcbFF4bFFXZE1XcHNIcVNobVdoWW9lWE9QbVRQbVZgbXZxeXhxPVhqPXhYcXVYYXhuYVhjRVdjPVVSPVV3ZVl3RUxLRExxdFBxPFI6PXJeYXZedVJBdXJaQG5adFZhdVZiPVdiTVl0TXl2YXl2WXl1WVl4bVl4cXl4cVl5dVl5RVlzRVlwbVhweXl5eXlwcXhwPUo6Pjo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6Ojo6OjpkeTxUeXBDPnFVTENUSmNEWG9YdXNUPGF1cGtjZldNWEBKQ2VVYGROdVRtV3h5eXlwcHVQQ0RTU3VMQ2x1Pjx4VHBRbWxzYl1NaWhVT2BxVGVYU1FPO0BKeFZdd09sOkBzeUZ2PHdcXHRAdHNOblFuXFxWP3c8d1xcP0ZxSmlqWHluWlZ2bnlIRXJtaUJfX3RXaXRbTXl4WVJJSVh2V2d0U1M9O2dRTXdBSUNdSVlyR1hSb2djW0VwcVl0c3huPUJWU1VHdUVBW1d4S3JXYVNIc3NvWUJQa3luS2N0cWdteVVLQVlRWVV3X3JzPXdib1lUV1hJP0lRS3lvW1hAd3lkcXl0WVJHQXlgaXhzW1NseVhhU3lxdXk6bWVsPWRYcXlkSWZ2Z1JJZVNVa1VtVUJHd3VaaXRTO2VRP1M+QWRNYXNua3lTR2JEU3VpbWJTYWJqeXROQXlNdVhsYVRXYUNwO3k/YXQ7X3R4YVR3YXRoP2NqPUdiZ1lWR0NBW2VBa2heaWh5YUlHb1ZkR3h5V2VRYXRhbVZIWXg6U0VJZXd5YWNtY1NCQXZnT3l5c3NFeUJWV0N3UUZ0WVd4WWRNZ2NZX3leVXk/Z2NlW1dYUUNEY3dHdXdITXc/cXd4W2dhY3NjR3J3T3R1S0ZYS3NjW0ZaSUJPcUlySUlda3VJQ2ZSb3NNX3lUU0VXV2NLUXNfcUdIZUlpYVdCc3ZhQVhXb0ZzWVR5dUlZU2RXQ2V0W2ZacE9ZdHZbXFxYU012Tj1YaGx1eGVsXXlsdlVuO1BZc3F2a21tQ3hTRVFQc01PZVVwUUVLTmB5VkFxY3FSUXBZeEhyW3hVXFxBdGdQVmV4bUhIUVlEWHB0TDtleV9cXFhIeHlUcExRPXFKaEprbHFBPXdQeHFPdHBQbXdRPWtXZFNTWWp4aFF0PWxpPFg9UHJcXEhveE1LeHBwZFVQR3hsYDxSYWRXc0VNVWhuTWluYXF2eVxcdF1wSndcXFB0dHQ6bHdfaHk7UHh1RWxXcGZ5cGlReWc8SWJnSHFRP3dSd3ZGZ2NRbm10SV1sWFpvYXV2d1xcXVZpXFw/eXVJakdxeUFfXWpeY2lhXFxedmFZZm1YWXZWX2ZveWRfd1phP3lJUGZOWHBPaW1iSW53aWllUXlaQFtqZltwX2BzP1xcTkBxYXdbPGFfPXFwZEl1XT5nbkhwVWlcXF5hW0FHY1NfeV1wbkhnX29JaT1Ya01gYkteeVVXakZoaENwaWY/bGxoZWxoa0txaz1xZ0NxcUlva0phZFpAXUlPc3BIamdRZ1V2Xk1wXltha1hOb2t4Y0ZheE1YPkVmeD1HSnlZXT11S1dYdWVmY1lDVl9ETztYXW9lRHdJXVVyaElYaEtkdFlndj1zWU14eU1oRUFiZEtkRkVEO01CaW1VWWd2TnNmQnVEZ3F3XnNSWm9pZXlpWUVmRUFzWU9jVTt1Zl9DXjtnPkVJVW1XeV14WltIP1VUaXdoYXliPEVXVUFobWdoVWVlXU9ETHlma1lkT1FETk1zbGVnXW1IR2t5blVyclVoamdidnN0cklDc09pVT91cFVodE1FX2NWVWV5d1dyU2VTdkl3SHFzRVV2d2FTYG12X2tDRWdERUVWT295ZlNGWUdYaFt4ZTt3ZnN5YT9IYmN1X1NpSFVmclN0cXNnSUNVS21SO0lFR0dpRVV4U1Nld2tCUmNpYz9mW0dIc11XQkNlRlNYTWVjQHF3UVlpT0NGaTtiZF9lcGdoQ2NyU0liclVGZktYcE9FPkNkR1VWSF9zcz1HYUVGXFxNaF91REpjWGVXR1NrSUE9VGBbdWhPaUtPeTtJZG9fc0JRZ1BHYmlNeFpJeFs9Uk5RSENVd2xJaFZBcz5NeHY9dDtJZWtlY1tpVG9lQl1ZU1ZzSV1VR2tNZ0M9eE1fY3ZdckNrR2xPeUU9d1ZzeW1vUlBFUkdVV29Lcz4/ZE5HY3FPdkw9RGNnVVVpZD1TZEJZdGFjQmN5VDtzQz8/c1hzQkZFSVBLZHdVaWJVVXVvd3RDeExFUnhHVVBPYz1lZVdXREpfdEJJRmpbUk1XWG9hSW5pRkRZeXZJZkZZSDtFaWZhV0FBZGtRZ1N1SW9ZSFM/c1xcYVlua1ljQ1JYQXk7PXVyU3NVRUdYb3Zta2RVP2JJa3V2SWhmO2hIS1Jtc0lxa0drQ0lFR1NRaVV5P3JbY2h5XURXP1VKd2VvX0hJO0lbaVJQdVlDY2VdeUlRR1NSPVNGY1lASUhOYWJFeWhUO0hcXGdDW2lpRXViWElZWz9GaGtmQWFSeWNjUTtEPE1CTGtzVUd2TV1GT1NXWmFGbm1VVk9CXU1oYGd1XWV3OkNTWFtWVVtkXmlXQ0lUTWtpbmdWbWNZO0V1SWtGWmdldGFTbGtlRF9TbFVkP1NVW1doYF9JSGt1TmFJQkVZQEtoUVtJYlNmbF9DcGdWXUlCZ2NmOkNyT1dXbGlWUFNETXVFa3dCWVFiZ0t4R2lXZmNkZ19jQ29YRHlGb0FGPENZZF9mWlNVS09YbVVFcm12cFdnYVFJZVdHeU1pdU9maGVGWVtVV2dkR3dlWztYQFloPG93c2tUd1VnallkdkVoblRQYExKYXRVbXlvXXhsa1VwZ1BTSG1TT2lTWHRNP0hzSGhXZ2xudT15cE1vc21QV1F0WG1sTERSXmVyYXBwQVBxQFR3dVxcbWY8eXRNb190TlFEbXd1VUJhbFtUS01dVVpcXFZzVVBnXFxPaFhVXWl3PmxUPlR0b2xZVWVNXFxgcTppTkZRa01ldUI8WV55cVtUcXdMeHlZa15tUERoVVRFTFtteGRZVHJVd0hZcHBgUl10c3lobTxcXHJkaE5cXF1WR2VqRXlUQkxsWGhVaWRTa2xWY0lta3VKQVxcT0ZBSnhYVEpcXG9ScFVyXFxxbkVVZjxQT2FvY2lvWHhZVVRSeGhtS0hub1V1QmF2dnh0XUBvcmR5cUlsYHR5Y0V5Zz1TdDxWO0xZYERvREVsQ2hXWWRrcElrU01vcGhuaHFrZU1XPFFYXmRvZ0VtTTxreEFZTT1tcFBLbVRUTW1YZVFMbnVLP0hNZUlVYGBUcU1TZGVOcW14SGVMSz1PVXB4XkBraVlwYHhYVmRvVUBMPVBwckFQSXVSW1FwQFlsdlBXd1FUb01wR2BqT1h5Rmh4QUVUaWVSQURLZ2lvVlBPeVhVbFhUOkl3YzxOZ2VNTnVwXFxYV3JkUUZQUXZsUD1Ub3Nlbz5xWGJpV09cXHlFPVBVaVBBQVNnTHR4WExHPVNUQVNBeGo9QFdpeHdYYFhPQXRIbG9JZW9IaUx2eXVvdU10THRUeUpzQXhCWHJAVHFXWE9zRUtvcHVBRVU8dXlPXFxMVHlQQVhtPXRPVVFuZWFORF1LT1l5THlYYnR4dWhtY1lyWE1raFxceWxMb19lcWB0U2VBT0hdbHFVd2lQbmtQd2xIUGdIcmVoWV5wS2hQd0dQSjs8TzxgcVU9dE14VVVFUFdAUmRJVGZZamphb3dUcU1RalhISlNcXE08RXZhcHBUQG1XTUpAaU9WaHlMUUtxXVQ9RXljPVVocU5hXVBKXFxYXFxMdVtEc1FAT1tYUnc8UmJgUGB0U3VlamNlWVhAVU49ckZleHVIbURta11YUkxhWUVsUm1JUF1QZWNoYHJ4bWE/YXJhYUN4dldRW1xcYVpgeWlGQWo/Z3ZWVmReQG1HeVtoaGp4UXZqSXdNVndQR3lYV19FcGpETm5zeV5FaHZFX2Q6UG5rT2FEQV5DbnhFQW9DaF9ld2M7cGJbSVtad2NVP2twR3d4dmNWVlxcT1dhWUdaV3FiR0dealZrQVFdbVhja2Z3VFZmb3ZaVm5aTHdmb0llUz5lQEh0Y3ZzZ1BuPFlxRE94Y3FiZE5tUHh0cXdoc2ZhZz5teU9lZGhxQ0ZrTldxc3B5XUBfVlFySUl1XW5jTEliPl94ZFFeW3l3XmBeWXFiU3hleWdhPk9rVkBmcFZmZU5obXhlU3duXj9fR09rbGZgUXFnS195Sz95akBweHZ3Ykh0SWB5WWFpP0h2Sl53dlF2WW5nQVZvPVhod2NSZUJJTWZsS1RVX2JgcXJGUUM8VUdSV1k9a1ZXQWl2XVg8Q1N5TXljeXdlb0U+P3R0a3NWZ0JUbXRHSVh2S0RUO0RgYXRwYUdRRVZBPWVmb0hAXVRnc3dzQ2ZXR0ViQ0NMSVl0U3dHO3RSYUM/XWhpW1Rmd1NQVWNTUVlaQ3Vsb0VbS1RuT1NUdURQcWZwUVVfWXhbP1VaPWJgeUN1RVRVZWN0Y3JzYVdJR2hQVVZkQ1hvW0RuO0dUb2Y9QVZCY1lSR2dhYVlic3Z0PVVCdVZJT2VaS2dHbWhIUXJdXXVtc2lmeVRQV3RuZXlaS3lkbUhqb1dSQXNTUUhld0RTPUhqXUM+cWRIW1hISWdrd1RHdXZJX3NnWURnYWJTc2lMWXJiXUljW3VaVXVDZUdOXUlueXlqaVZuTXVKaWJxXUU+PXNIW3RoUURYZ1RcXHFoTndUVm1HZG9TaUtzRF1ERF1VT2tzTz1mWDtYdklkYlV3Umlpc0NFdj90RUFTP2VIW0VIaU95W21jRT9oWTtld0tDclt4O0VDcFVFYUl0Uk1VZU1JQHdGPUd1cUlkcmlYbUFpSG91Ql1VRWt2Ym9EYF1iRGV1XlVIT3N4d0tTb2dWRV9HTlFiQkFkdU1ZUTtZX11YYnFCZVtGRllHRj10WGd4cnlZcEFGRG9pZElSSGdVZj91WEdnXVdndUdpZ11VUlFycDt1PU1IWUlYeGNJYW1zcUVsPHVSPFBNd3R3Tk1xTllNQj9cXGFJaXF2Ym94aGtud0RPdl1ecjphXFxbV2hFeHNuX2NkUW9ATmddb3JMUG5DcHRFP3dKcWk6YWRgP2dqWFxcQm9sOkBkSmlzW3ZlbF5wSz5dVHBjSUhob1Nab1hKT2h3W1dnc2VzdUJmRWddPXV1VVk9cVhaV1ZZTVNaRUNIV0hxZVg8U3VeRXV2WVg7QUZRUUNdXUZsXVNOcUlPPUlMUXdoSXdab2VxRW9PcVZZQFRUcHJXQU5xWXN1eE5BQFdqbHB1YVh5dG1YTVJrZHBJXUtcXExUQD1QZFxcU3hISlNYTmh1bEZZUW10d0poV0k8UXN1UlVwd21cXHJRREx5dU1nTXY+QHBTQHBmdFJpVW5pVFY6dVJSaWw8bFJZPHdsdFNWaUxoSEtEQHZWaVNgRE9mYVR2QXN5TXVLbVFVaHZxbFF1TFdAcWxyYFJkZFJLSW1eUVlBYVh4ZFBcXFR1VmxrdE1ZbXlQQWB4Uml2UlVvTHhLbUFOYWxMYHFWYGVURElPO01ZXFxIb1FpWW5Na0hMTnFoeWxVSlxcdFNedUtKSU1LQVlbcXVmTXJ4QVhmeEp5WHhlYFJQcXhPaW9ybEpXXVhFSFh3XFxsSnFyPVh3TjxUPmBuRlBrbEh2XkxUZF1rdml1Oll3bGhXa1R5RHBMU1VWVXFRQ0F1VFRsaVBvcHVvVEhOU1F5UnRzPklxS1lLaFROUU1zZUFqb2FsclF2YklzbE1wPVxcb2pMVU1EdURReW1hb2lRdWxtUE1FTHdocHVwbG5JdnlwUGBYbENETT5MWUBgcmRxdG95bkBNTEZUVVVQb1xcVVdSXFxXTWV0T0FvRWV3TElVY3RSd0B0XUVSR0BYdHFLdUhRV3FqV0xxWmBMVFVPVHVzbUhQY1lrP0ROPXVUXFxhWFNlTE51S3J0dGZAa0l1blVUWENNdFl5UlVRcGxYd2BYdj1pWHBwdUxtUlVxd1RNbVtdcXhoTEVsdD5sTmlAcVE9UV9sUkw8TmdlcmhoWHdBcnlBTD1pd11JeFlUVXloajtwb3FYUG1VZ0hHXFxnYW5mV2ZGPmhyQXd0d3lbWXM8VnVHWGhTR3hlUGpNXmV4blxcdmFiSE5qVGZmRll3RE5yZUBxb2hlSFdtb1dgXVBcXGdmcV1Ja3h4XFw/dmtubmNcXGdpdXBvdkloTWFaT0lraklkVnF0dj9lZm5oZWBpPU9peFZ1ZVZvcHhqSk91TllgW1dcXGpYXFxTTmtlcXJRX3BVZ2hqTmlOUXRwR1xcQ0llX0lhYllzQHd3QndcXExgeE8/cmBxWmk/Y0BXc1dgXkBmam9nZXBwamtJcG5Ya0tQbmRHYWRHaWRvY0U+bT9GamZfYllmXFxcXD9wXUhpZU5xV2dnZUl1Q0FuaGlad2FlcFlua2dlRnlqdk9odV9bR1FrcGlvU05hP25kaXByVUZqY1ZcXHBRbmd3XVI/XVdGZVd4YD5pX0hAdEF3ZGJueTx4X19PYEZ5Z2dxdWpBdEpoYWlBblNBcz14d3RwXmFZbmxvbG4/ZVlRdEFebUp2d0Q/a1xcUWxdeHFNUGNgX3NqVl1ndnJlT3NJT2twUF5WeV5bVndgT1tnd21McWldTm1aQGhCQXJpUF1PPltASGRtWVp5aXJbTm48WXBlTmZvbnNvXl1kbmZJWXVYd2tFQWNVeW5eQWBdVmV5WXVsUG9nQW47P1xcSz9tdF5ncF5qWEd4Zj55c2Zac2d1PWBzZWJfYUlFU1NKY1dld3RtQ3JFQ2ZnRVJhcUVOQ2hCO2ZeSXZ4WUw9UFNdPXlLWG1HZU1ZTG1yVFNCcExfYFVBbG1YbVhsVVRYRW5eRXNTbW1meVJFWHNERXdlbHZRcWxRYVhAQHRqPHBrVFlrRFNOcXhQUWpsdXNpVEpFTFhRXFxSd2BzUGFTVVlKd1BqZGVzX1FzS2BqQElqX0R1Rm1KbVBMbWxsaDxTU1BLVjxXW2VPYWFUTkB3TGx0dj1xZEBPT0hyYzxLPmh1aFBQPUFwU1VSUF1tYklWU3VybERMcXBLdWFWbGlWPklvT3hKeEx5R1hPaHF0PVFQQlFWSXRSamRWP11QRlBQQ3l2c11ZQl1SWEFzUEx5c1FUXk11TFVPRE11ZURQPVVQcEhzRlV4OlhKYGhObEVZS3lrcVFMUUhTRXVyXmFYX1hKSF1VeXh0Z01SQ1h0anVvP0VRV01MW2FSU2lraWRvZUxzVWR1V0VNdGhZWnlRW3F3eEhUW3RPdTxWR3hxYmBxcDxPUUFXT2VZSUl3XlR2YEhyTnlQO0VLaERMaVRxY1hMcTxOWGVqc0VLc2VUO01ZQTxvc211ZkBVQHR4VU1KWWFNRnV2VmFqVWVsdl14WGBuY3VUaFR4Qlxcd3h0dkNpdUBIc1FVUTptc0p5VVZYTE9lVUFMbWRhWV1UTW91cUVFeFdgeEs9UVFMeUdBeWlIUFxceE9mXXRHPmNKd2BneHdeZl1tSWRKd2dYaXliWF1fXlxcXXhdd1hvb3ZmSmB2Z1FrbFdyaHFgc3hxVGhkX0F1WEhvdGF1eHF2VlBzPmZYUUVHX1lHeXVqR1dxYUNPeUU+V1hbd3VFd3lzTUhzQUNhd1lmc0lpcXZXaVdwV0dvR1ltcXdBZWg7X1hxR1N5W1lRVVc8a0ZhVUdtdWhxZVlFO3hkd2JEVURkV1Y8T1lqbXdjXXJMP1RwdXdGX3NuV3VtaWlhQUlueUJbYVVieXhcXHl5YGNTTG1IeHNJbndZTHdmPW9iX2t0eGdVSldUQl1UdEl2S2tERE1JQ01WWkNIPFdXRjt2WGV1T0dlXlFlTHdpa11Ia0NmclVYdV9EZ29DW09JeXVoX0l5YltlRWhxcnlRP013VGV4SXVOYnVtdjxzT2l3eV11Tz5pZT9vTlhwbkZiXWl5a3l2QHBuTT9eYlFiY09wXUBwTV93T0laXFxpXXRWcEdJdT1QZGJIZk14Y3hYYXQ/YVdQWnN3dz54YUR2djx3cVF2eWtecGlBcl9AZmRZeWZveHNhY3RXX3V2Z0JQbXF2bUtfWk1BclpXWnlBdkNQbXVZZFxcQWJacF1aTmdYd3J5WGF4dmE+d2ZZcGNaZ2VtPnV4aXVbR2lZbnV3UXU8YWlKbnM/XFxVTnBxSGdqZndocVtiYWhiQHhDR2JIVmtrX25UUGVpb2JmeWNVZmBYbmF4aWRsd2lUSGptaGVGP3N3PnFXWHhUV3lnUWJ1cFp0WXBncXBrd3dmV3ZjSFpjQXdbaXVNaXliXm1FZnloX3l5WHNJSW9zWGRKZnh2cV0+eWFSX1pWeHlcXGJTP0ViQXdzXXddd3ZjT0ZvTWh3U1VSYWd5Q1lkaVR3QUJ1QUVHV0Z1U0lHb0VrS1lJR0ZZVVlddXdgdXdYb0d1QUZWV2tHd3F5ZmJAcXJyaWZqP3NZcHU9QF9db249Z1tRQGx0UWJRTlpEZlxcRldlXFx5cXV3WzxwdV4+bHZReFxcWXc8d1xcPFZ4UlBuPXl4aU5bQ05nQl5pck9wd0duRWZ5eVdudHF3Omd3RWZaU3BpX0dcXDw/YFFueFY/d3lnbTxOWl5xeWFHcHh4aU1wa19PaHFZcld4XFx0QHQ/QHZBQVxcZXFfclFxdj51eUB0eWFgV3l5Onh2bXlzWHd5WWZbTVd4b1dtSWd2b0U6O0I6TVRLV0RLV2dKO2VaMTo=</Image></Text-field></Input></Group><Text-field/><Text-field/><Text-field/></Worksheet>