<?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="75"/></View-Properties><Styles><Layout alignment="left" firstindent="0.0" leftmargin="0.0" linebreak="space" linespacing="0.5" name="Maple Output12" rightmargin="0.0" spaceabove="0.0" spacebelow="0.0"/><Layout alignment="centred" firstindent="0.0" leftmargin="0.0" linebreak="space" linespacing="0.0" name="Author" rightmargin="0.0" spaceabove="8.0" spacebelow="8.0"/><Layout alignment="left" firstindent="0.0" leftmargin="0.0" linebreak="space" linespacing="0.0" name="Heading 1" rightmargin="0.0" spaceabove="8.0" spacebelow="4.0"/><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"/><Layout alignment="centred" firstindent="0.0" leftmargin="0.0" linebreak="space" linespacing="0.0" name="Maple Plot" rightmargin="0.0" spaceabove="0.0" spacebelow="0.0"/><Layout alignment="centred" firstindent="0.0" leftmargin="0.0" linebreak="space" linespacing="0.0" name="Title" rightmargin="0.0" spaceabove="12.0" spacebelow="12.0"/><Layout alignment="centred" firstindent="0.0" leftmargin="0.0" linebreak="space" linespacing="0.5" name="Maple Output" rightmargin="0.0" spaceabove="0.0" spacebelow="0.0"/><Font background="[0,0,0]" bold="true" executable="true" family="Monospaced" foreground="[255,0,0]" italic="false" name="Maple Input" readonly="false" size="12" underline="false"/><Font background="[0,0,0]" bold="true" executable="false" family="Times New Roman" foreground="[0,0,0]" italic="false" name="Help Notes" readonly="false" size="12" underline="false"/><Font background="[0,0,0]" foreground="[0,128,128]" hyperlink="true" italic="false" name="Hyperlink" underline="true"/><Font background="[0,0,0]" bold="false" executable="false" family="Times New Roman" foreground="[0,0,0]" italic="false" name="Text" readonly="false" size="12" underline="false"/><Font background="[0,0,0]" bold="true" executable="false" family="Times New Roman" foreground="[0,0,0]" italic="false" name="Heading 1" readonly="false" size="18" underline="false"/><Font background="[0,0,0]" bold="false" executable="false" family="Times New Roman" foreground="[0,0,0]" italic="false" name="Author" readonly="false" size="12" underline="false"/><Font background="[0,0,0]" bold="false" executable="false" family="Times New Roman" foreground="[0,0,0]" italic="false" name="Maple Plot" readonly="false" size="12" underline="false"/><Font background="[0,0,0]" bold="true" executable="false" family="Times New Roman" foreground="[0,0,0]" italic="false" name="Title" readonly="false" size="18" underline="true"/><Font background="[0,0,0]" family="Times New Roman" foreground="[0,0,255]" name="2D Output" underline="false"/><Font background="[0,0,0]" bold="false" executable="false" family="Times New Roman" foreground="[0,0,0]" italic="false" name="Normal" readonly="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 layout="Title" style="Title"><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="Text"/></Input></Group><Group><Input><Text-field layout="Title" style="Title"><Font family="Arial" size="24">The elastic prismatic beams on the Winkler foundation</Font></Text-field></Input></Group><Group><Input><Text-field layout="Author" style="Author">Prof. Marcin Kaminski, D.Sc., Ph.D.</Text-field><Text-field layout="Author" style="Author">Chair of Mechanics of Materials, <Font encoding="ISO8859-1">
Technical University of L\363dz, 
Al. Politechniki 6, 93-590 A\363dz, POLAND, </Font>
email: <Hyperlink bold="false" executable="false" family="Times New Roman" linktarget="mailto:Marcin.Kaminski@p.lodz.pl" size="12" style="Hyperlink">Marcin.Kaminski@p.lodz.pl</Hyperlink> </Text-field><Text-field layout="Author" style="Author"><Font encoding="ISO8859-1">L\363dz, December 2007</Font></Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Abstract: This script is entirely devoted to the static problem of a deflection of the linear elastic istotropic prismatic beams resting on the homogeneous linear elastic and isotropic foundation. It is demonstrated below how one can symbolically solve the problems of such beams consisting of one, two and three different intervals with spatially varying distributed load applied along the beam, different concentrated forces and moments. It is also possible to define some variability of the bending stiffness as well as the elastic foundation parameter as piecewise constant functions along the beam. This program is able to solve symbolically fourth order differential equations of the beam equilibrium, then - to determine the integration constants from the additional boundary and continuity conditions for the beam intervals. Finally, it computes maxima and minima of deflections, bending moments and shear forces and prepares the diagrams of all those functions. This script may be easily modified to extend the beam analysis towards the structural sensitivity studies and/or reliability analysis for the beams resting on the elastic subsoils. </Text-field><Text-field layout="Normal" style="Text"/><Text-field layout="Normal" style="Text">Keywords: elastic beams, elastic foundation, ordinary differential equations, beam diagrams </Text-field></Input></Group><Section><Title><Text-field layout="Heading 1" style="Heading 1"> Homogeneous beam on homogeneous foundation under uniforlmy distributed loading </Text-field></Title><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">restart: with(plots): with(Optimization): </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">A deflection of the elastic prismatic beam on the elastic Winkler soil is analyzed here. The differential equation governing this problem has the following form: </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">Diff(y(x),x$4)-4*beta^4*y(x)-q/EJ=0;</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiMvLCgtJSVEaWZmRzYkLSUieUc2IyUieEctJSIkRzYkRisiIiUiIiIqKEYvRjApJSViZXRhR0YvRjBGKEYwISIiKiYlInFHRjAlI0VKR0Y0RjQiIiE=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">where  </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">beta=sqrt(sqrt(k/4/EJ));</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiMvJSViZXRhRywkKigiIiMhIiJGJyMiIiJGJyomJSJrR0YqJSNFSkdGKCNGKiIiJUYq</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">The entire length of this beam is partitioned into three different subsets, which reflects the changes in boundary conditions, various elastic constants of the subsoil as well as the beam stiffness variations. The boundary conditions bc1,bc2 reflect the situation at the left edge and bc3, bc4 - at the right end. The remaining boundary conditions are not neccessary here. </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">de:=diff(y(x),x$4)-4*beta^4*y(x)-q/EJ=0;</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSNkZUcvLCgtJSVkaWZmRzYkLSUieUc2IyUieEctJSIkRzYkRi0iIiUiIiIqKEYxRjIpJSViZXRhR0YxRjJGKkYyISIiKiYlInFHRjIlI0VKR0Y2RjYiIiE=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">Now we determine the general solutions for those ordinary differential equations using ' dsolve' command as  </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">dsolve(de,y(x)); assign(%);</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiMvLSUieUc2IyUieEcsLCoqIiIlISIiJSViZXRhRyEiJSUjRUpHRislInFHIiIiRisqJiUkX0MxR0YwLSUkZXhwRzYjKigiIiMjRjBGN0YsRjBGJ0YwRjBGMComJSRfQzJHRjAtJSRzaW5HRjVGMEYwKiYlJF9DM0dGMC0lJGNvc0dGNUYwRjAqJiUkX0M0R0YwLUY0NiMsJEY2RitGMEYw</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">Let us introduce the boundary conditions for the left edge of the beam typical for free-end </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc1:=simplify(subs(x=0,y(x))=0);</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRiYzFHLywkKiYjIiIiIiIlRikqKCwsJSJxRyEiIioqRipGKSUkX0MxR0YpKSUlYmV0YUdGKkYpJSNFSkdGKUYpKixGKkYpJSRfQzJHRiktJSRzaW5HNiMiIiFGKUYxRilGM0YpRikqLEYqRiklJF9DM0dGKS0lJGNvc0dGOEYpRjFGKUYzRilGKSoqRipGKSUkX0M0R0YpRjFGKUYzRilGKUYpRjIhIiVGM0YuRilGKUY5</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc2:=simplify(subs(x=L,y(x))=0);</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRiYzJHLywkKiYjIiIiIiIlRikqKCwsJSJxRyEiIiosRipGKSUkX0MxR0YpLSUkZXhwRzYjKigiIiMjRilGNSUlYmV0YUdGKSUiTEdGKUYpKUY3RipGKSUjRUpHRilGKSosRipGKSUkX0MyR0YpLSUkc2luR0YzRilGOUYpRjpGKUYpKixGKkYpJSRfQzNHRiktJSRjb3NHRjNGKUY5RilGOkYpRikqLEYqRiklJF9DNEdGKS1GMjYjLCRGNEYuRilGOUYpRjpGKUYpRilGNyEiJUY6Ri5GKUYpIiIh</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">and, further, the boundary conditions for the right edge of the beam - the same as before </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc3:=simplify(subs(x=0,diff(y(x),x$2))=0);</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRiYzNHLywkKigiIiMiIiIpJSViZXRhR0YoRiksKiUkX0MxRyEiIiomJSRfQzJHRiktJSRzaW5HNiMiIiFGKUYpKiYlJF9DM0dGKS0lJGNvc0dGM0YpRiklJF9DNEdGLkYpRi5GNA==</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc4:=simplify(subs(x=L,diff(y(x),x$2))=0);</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRiYzRHLywkKigiIiMiIiIpJSViZXRhR0YoRiksKiomJSRfQzFHRiktJSRleHBHNiMqKEYoI0YpRihGK0YpJSJMR0YpRikhIiIqJiUkX0MyR0YpLSUkc2luR0YxRilGKSomJSRfQzNHRiktJSRjb3NHRjFGKUYpKiYlJF9DNEdGKS1GMDYjLCRGMkY1RilGNUYpRjUiIiE=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">Let us determine all integration constants for our problem as a solution for the boundary conditions applied  </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">solve({bc1,bc2,bc3,bc4},{_C1,_C2,_C3,_C4}): assign(%):</Text-field><Text-field layout="Normal" style="Normal">The deflection functions have the following forms (after MAPLE simplifications): </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">simplify(y(x)): </Text-field><Text-field layout="Normal" style="Normal">We need to introduce the specific values of the beam parameters like k, m, EJ, L before the graphs can be made. Before most of the graphs, the maximum and minimum of each functions (together with their locations along the beam) are found numerically thanks the 'Optimization' library</Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">k:=1: q:=1: EJ:=1: L:=1: beta:=sqrt(sqrt(k/4/EJ)):  </Text-field><Text-field layout="Normal" style="Normal">The graph of the beam deflections </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">y:=y(x): fmax:=Maximize(y,x=0..L): evalf(fmax); fmin:=Minimize(y,x=0..L): evalf(fmin); p1:=plot(y,x=0..L, title=`Deflection of the beam`,axes=boxed): p2:=plot(0,x=0..L,axes=boxed,colour=black): display({p1,p2});</Text-field><Text-field layout="Normal" style="Normal">The graph of the slope along the beam </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">s:=diff(y,x): plot(s,x=0..L, title=`Slope of the beam`,axes=boxed);</Text-field><Text-field layout="Normal" style="Normal">The graph of the bending moment  </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">m:=-EJ*diff(y,x$2): Mmax:=Maximize(m,x=0..L): evalf(Mmax); Mmin:=Minimize(m,x=0..L): evalf(Mmin); plot(m,x=0..L, title=`Bending moment`,axes=boxed);</Text-field><Text-field layout="Normal" style="Normal">The graph of the shear force </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">t:=-EJ*diff(y,x$3): Tmax:=Maximize(t,x=0..L): evalf(Tmax); Tmin:=Minimize(t,x=0..L): evalf(Tmin); p1:=plot(t,x=0..L, title=`Shear force in the beam`,axes=boxed): p2:=plot(0,x=0..L,axes=boxed,colour=black): display({p1,p2});</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQiK2wwazo4ISM2NyMvJSJ4RyQiKysrKytdISM1</Equation></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQiKy1uJHksJiEjPjcjLyUieEckIisnKkc0Iz4iISM8</Equation></Text-field><Text-field layout="Maple Plot" style="Maple Plot"><Plot height="488" plot-scale="1.0" plot-xtrans="0.0" plot-ytrans="0.0" type="two-dimensional" width="488">LSUlUExPVEc2LS0lJ0NVUlZFU0c2JDdTNyQkIiIhRiskIjNzI3lESjc6NmImISNNNyQkIjNlbW1tO2FyekAhIz4kIjMzeVlKSFlSbSIqISNANyQkIjNbTEwkZTl1aTIlRjIkIjMrWSlRTnVOLXIiISM/NyQkIjNubW1tInpfIjRpRjIkIjNXX1dbJiozNSVmI0Y7NyQkIjNbbW1tVCZwaE4pRjIkIjM3OzI7WF9McU1GOzckJCIzQ0xMZSo9KUhcNSEjPSQiMyxeYjVPYHVDVkY7NyQkIjNnbW0iei8zdUMiRkkkIjNJUFMhMzdndzQmRjs3JCQiMyUpKioqXDdMUkRYIkZJJCIzLU1lR3psOnZlRjs3JCQiM11tbSJ6UidvaztGSSQiMyE+JVEuOGFbXm1GOzckJCIzdyoqKlxpNWBoKD1GSSQiMyMzUzxPYXFSUihGOzckJCIzV0xMTDNFbiQ0I0ZJJCIzZTdXP2BHekAiKUY7NyQkIjNxbW07L1JFJkcjRkkkIjMmcFtNaSdbQEkoKUY7NyQkIjMiKSoqKioqXEtdNF0jRkkkIjMnNGJqSSh5J2ZQKkY7NyQkIjMkKioqKioqXFBBdnIjRkkkIjM1M15HKikzMCEpKipGOzckJCIzKSoqKioqKlxuSGkjSEZJJCIzJT10Rj8oeXleNUYyNyQkIjNqbW0ieipldjpKRkkkIjNzVnZSJT4pbyc0IkYyNyQkIjM/TExMMzQ3VExGSSQiM1dPOjxEVStYNkYyNyQkIjMsTExMTFkuS05GSSQiMzEleUpTJXBaIj0iRjI3JCQiM3cqKipcN283VHYkRkkkIjMoXElmTSdbZz03RjI3JCQiMydHTExMUSpvXVJGSSQiMydwMUIsPSttQyJGMjckJCIzQSsrRCI9bGo7JUZJJCIzeV0yXSVcWD5GIkYyNyQkIjMxKyt2ViZSPFAlRkkkIjMrKDRYYyJIeCFIIkYyNyQkIjNXTEwkZTlFZ2UlRkkkIjM+Kj1VdFhGW0kiRjI3JCQiM0dMTGVSIjNHeSVGSSQiM2xyNTUpb2hFSiJGMjckJCIzY21tOy9UMSYqXEZJJCIzXj9tdUQhUmNKIkYyNyQkIjMmZW07elJRYkAmRkkkIjMhKSpldXMmb3E3OEYyNyQkIjNcKioqXCg9PlkyYUZJJCIzaE5eeiRma15JIkYyNyQkIjM5bW07elh1OWNGSSQiMyMpUiQzMHBHPUgiRjI3JCQiM2wqKioqKipceSkpR2VGSSQiMzlTIkhaVFJDRiJGMjckJCIzJyopKioqXGlfUVFnRkkkIjNZN0FWLSstWzdGMjckJCIzQCoqKlw3eSUzVGlGSSQiM2JZLihldVYkPjdGMjckJCIzNSoqKipcUCFbaFknRkkkIjNdSi5bKDMvPT0iRjI3JCQiM2tLTEwkUXgkb21GSSQiM2tdcyVIcyIzVjZGMjckJCIzISkqKioqKlxQK1Ypb0ZJJCIzaUFRJlJWdm00IkYyNyQkIjM/bW0ienBlKnpxRkkkIjMnSERLaXJkLTAiRjI3JCQiMyUpKioqKipcI1wnUUgoRkkkIjNVMnBAaF5WXCoqRjs3JCQiM0dLTGU5UzgmXChGSSQiMylceFtYdCJIKFEqRjs3JCQiM1IqKipcaT89YnEoRkkkIjNlTj4tVCJ6J2UoKUY7NyQkIjMiSExMJDNzPzZ6RkkkIjNkQD50enEpZTUpRjs3JCQiM2EqKipcN2BXbDcpRkkkIjNTSScqPVohNFpRKEY7NyQkIjMjcG1tbScqUlJMKUZJJCIzKyxhRyYpR1RjbUY7NyQkIjNRbW07YTwuWSYpRkkkIjMlb3AsaW0kWyEpZUY7NyQkIjM9TExlOXRPYygpRkkkIjM1KlwyVlNCSjMmRjs3JCQiM3UqKioqKipcUWtcKilGSSQiM1E6XUJSXSMqR1ZGOzckJCIzQ0xMJDNkZzY8KkZJJCIzKkh5LScqM0RIVyRGOzckJCIzSW1tbW14R3AkKkZJJCIzJm9zSE1oNldqI0Y7NyQkIjNBKytEIm9LMGUqRkkkIjNja08oZl13JmY8Rjs3JCQiM0ErK3Y9NXMjeSpGSSQiM2VIbXk6V0tQIipGNTckJCIiIkYrJCEzTyIqR2NodmJ2RkYuLSUmQ09MT1JHNiYlJFJHQkckIiM1ISIiJEYrRmNbbEZkW2wtRiY2JDdTNyRGKkYqNyRGMEYqNyRGN0YqNyRGPUYqNyRGQkYqNyRGR0YqNyRGTUYqNyRGUkYqNyRGV0YqNyRGZm5GKjckRltvRio3JEZgb0YqNyRGZW9GKjckRmpvRio3JEZfcEYqNyRGZHBGKjckRmlwRio3JEZecUYqNyRGY3FGKjckRmhxRio3JEZdckYqNyRGYnJGKjckRmdyRio3JEZcc0YqNyRGYXNGKjckRmZzRio3JEZbdEYqNyRGYHRGKjckRmV0Rio3JEZqdEYqNyRGX3VGKjckRmR1Rio3JEZpdUYqNyRGXnZGKjckRmN2Rio3JEZodkYqNyRGXXdGKjckRmJ3Rio3JEZnd0YqNyRGXHhGKjckRmF4Rio3JEZmeEYqNyRGW3lGKjckRmB5Rio3JEZleUYqNyRGanlGKjckRl96Rio3JEZkekYqNyRGaXpGKi1GXltsNiZGYFtsRmRbbEZkW2xGZFtsLSUmVElUTEVHNiNRN0RlZmxlY3Rpb25+b2Z+dGhlfmJlYW02Ii0lKkFYRVNTVFlMRUc2IyUkQk9YRy0lK0FYRVNMQUJFTFNHNidRInhGX19sUSFGX19sLSUlRk9OVEc2JCUqSEVMVkVUSUNBR0ZiW2wlK0hPUklaT05UQUxHRl1gbC1GXltsNiMlJU5PTkVHLSUlVklFV0c2JDtGZFtsRmFbbDskIS9OXF4heTdqIyEjPCQiMWA6RTE9Jj5NIkZoYGwtJSpHUklEU1RZTEVHNiMlLFJFQ1RBTkdVTEFSRy0lLE9SSUVOVEFUSU9ORzYkJCIjWEYrRmJhbC0lKkxJTkVTVFlMRUc2I0YrLSUrUFJPSkVDVElPTkc2I0ZhW2w=</Plot></Text-field><Text-field layout="Maple Plot" style="Maple Plot"><Plot height="488" plot-scale="1.0" plot-xtrans="0.0" plot-ytrans="0.0" type="two-dimensional" width="488">LSUlUExPVEc2LC0lJ0NVUlZFU0c2JDdTNyQkIiIhRiskIjM7UyEqPUhtRTRVISM+NyQkIjNlbW1tO2FyekBGLiQiMy14aHRsOFkoPiVGLjckJCIzW0xMJGU5dWkyJUYuJCIzJXolZlAhPjEmb1RGLjckJCIzbm1tbSJ6XyI0aUYuJCIzN11ATT1OMTtURi43JCQiM1ttbW1UJnBoTilGLiQiMyIqPWFdUWcnSC8lRi43JCQiM0NMTGUqPSlIXDUhIz0kIjNhYUVwXidvNCZSRi43JCQiM2dtbSJ6LzN1QyJGRiQiM18yO1pQb1BcUUYuNyQkIjMlKSoqKlw3TFJEWCJGRiQiMyNRamhkPTgmR1BGLjckJCIzXW1tInpSJ29rO0ZGJCIzKWVKMnNRZHdlJEYuNyQkIjN3KioqXGk1YGgoPUZGJCIzZSJSL3ZMXUBWJEYuNyQkIjNXTExMM0VuJDQjRkYkIjM1J2V3aS5rdUQkRi43JCQiM3FtbTsvUkUmRyNGRiQiM290Ui1tYy8jNCRGLjckJCIzIikqKioqKlxLXTRdI0ZGJCIzZU5GPHZueiQqR0YuNyQkIjMkKioqKioqXFBBdnIjRkYkIjMpR1pyUycqKSpHbyNGLjckJCIzKSoqKioqKlxuSGkjSEZGJCIzdSswMVNpUnBDRi43JCQiM2ptbSJ6KmV2OkpGRiQiM3FRLm4sIXB2RSNGLjckJCIzP0xMTDM0N1RMRkYkIjNmJFJ3Xidccj0/Ri43JCQiMyxMTExMWS5LTkZGJCIzciU0RiZcPz0sPUYuNyQkIjN3KioqXDdvN1R2JEZGJCIzeEQjZTdVcThhIkYuNyQkIjMnR0xMTFEqb11SRkYkIjNgJSo+IltEbGhJIkYuNyQkIjNBKytEIj1sajslRkYkIjMzalJGRjlUVjVGLjckJCIzMSsrdlYmUjxQJUZGJCIzOyJbNU4kUlQmKnkhIz83JCQiM1dMTCRlOUVnZSVGRiQiM3I/VFtmTjE9X0ZjcjckJCIzR0xMZVIiM0d5JUZGJCIzXVgzXC4iPUF1I0ZjcjckJCIzY21tOy9UMSYqXEZGJCIzeCZmLXlWJyllQichI0E3JCQiMyZlbTt6UlFiQCZGRiQhMyFwVkAoenlPQEZGY3I3JCQiM1wqKipcKD0+WTJhRkYkITNgalIlZSYpXGo4JkZjcjckJCIzOW1tO3pYdTljRkYkITNXVkAqM1ItdHMoRmNyNyQkIjNsKioqKioqXHkpKUdlRkYkITM+aTNjeC5lUDVGLjckJCIzJyopKioqXGlfUVFnRkYkITNrJylbJlxVbEhIIkYuNyQkIjNAKioqXDd5JTNUaUZGJCEzPC95aFAiemNgIkYuNyQkIjM1KioqKlxQIVtoWSdGRiQhMyUpb2JseFQzKnoiRi43JCQiM2tLTEwkUXgkb21GRiQhM3Y1I1JPYiRRSD9GLjckJCIzISkqKioqKlxQK1Ypb0ZGJCEzQTchXHooKkh3RSNGLjckJCIzP21tInpwZSp6cUZGJCEzXz0xPiEpRydlWiNGLjckJCIzJSkqKioqKlwjXCdRSChGRiQhM1UzZ3ddbkUlcCNGLjckJCIzR0tMZTlTOCZcKEZGJCEzO2gmWyEqKmUzISpHRi43JCQiM1IqKipcaT89YnEoRkYkITMtRzFIZnIjUTMkRi43JCQiMyJITEwkM3M/NnpGRiQhMyFRJSlSUktSOkUkRi43JCQiM2EqKipcN2BXbDcpRkYkITNuUlNPIzNEVVYkRi43JCQiMyNwbW1tJypSUkwpRkYkITNPYkB2dFtwJ2UkRi43JCQiM1FtbTthPC5ZJilGRiQhMzE9LV9cdGhGUEYuNyQkIjM9TExlOXRPYygpRkYkITNZQCVcOFZhOSZRRi43JCQiM3UqKioqKipcUWtcKilGRiQhM1lSXE5DcVldUkYuNyQkIjNDTEwkM2RnNjwqRkYkITMlPiVSREVdZFhTRi43JCQiM0ltbW1teEdwJCpGRiQhM2VgSGohPmtKNiVGLjckJCIzQSsrRCJvSzBlKkZGJCEzR2xFVzEoUWg7JUYuNyQkIjNBKyt2PTVzI3kqRkYkITMrRVovPmRgKD4lRi43JCQiIiJGKyQhMyRILyo9SG1FNFVGLi0lJkNPTE9SRzYmJSRSR0JHJCIjNSEiIiRGK0ZiW2xGY1tsLSUmVElUTEVHNiNRMlNsb3Blfm9mfnRoZX5iZWFtNiItJSpBWEVTU1RZTEVHNiMlJEJPWEctJStBWEVTTEFCRUxTRzYkUSJ4RmhbbFEhRmhbbC1GXVtsNiMlJU5PTkVHLSUlVklFV0c2JDtGY1tsRmBbbDskITEwbU4lSFB3UCUhIzwkIjEtbU4lSFB3UCVGXF1sLSUqR1JJRFNUWUxFRzYjJSxSRUNUQU5HVUxBUkctJSxPUklFTlRBVElPTkc2JCQiI1hGK0ZmXWwtJSpMSU5FU1RZTEVHNiNGKy0lK1BST0pFQ1RJT05HNiNGYFts</Plot></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQiKzxfUGo3ISM1NyMvJSJ4RyQiKzAsKytdRiY=</Equation></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQiK24kXDEsJyEjPTcjLyUieEckIisnKkc0Iz4iISM8</Equation></Text-field><Text-field layout="Maple Plot" style="Maple Plot"><Plot height="488" plot-scale="1.0" plot-xtrans="0.0" plot-ytrans="0.0" type="two-dimensional" width="488">LSUlUExPVEc2LC0lJ0NVUlZFU0c2JDdTNyQkIiIhRiskITNzI3lESjc6NmImISNNNyQkIjNlbW1tO2FyekAhIz4kIjNvPiF5ZSczRnY1RjI3JCQiM1tMTCRlOXVpMiVGMiQiMyMpSEBKVipwQCg+RjI3JCQiM25tbW0iel8iNGlGMiQiM2ZYKDNAUSF5UEhGMjckJCIzW21tbVQmcGhOKUYyJCIzS2NiX2Fzc2pRRjI3JCQiM0NMTGUqPSlIXDUhIz0kIjMocGguaCdlTVJaRjI3JCQiM2dtbSJ6LzN1QyJGRyQiMyc0STFxJzQ+NWJGMjckJCIzJSkqKipcN0xSRFgiRkckIjNrJXA8ZGcneW1pRjI3JCQiM11tbSJ6UidvaztGRyQiMz0jZk9pUE9aKyhGMjckJCIzdyoqKlxpNWBoKD1GRyQiM3N1WDlnO0ImcChGMjckJCIzV0xMTDNFbiQ0I0ZHJCIzK3hNS1AkKltlJClGMjckJCIzcW1tOy9SRSZHI0ZHJCIzRCQzM04lKnlKISopRjI3JCQiMyIpKioqKipcS100XSNGRyQiM2dWI2YxKlExcyUqRjI3JCQiMyQqKioqKipcUEF2ciNGRyQiMzNjOCgqWyVRZyoqKkYyNyQkIjMpKioqKioqXG5IaSNIRkckIjMrcjdQOWpoWDVGRzckJCIzam1tInoqZXY6SkZHJCIzS1xNVlNtZSQzIkZHNyQkIjM/TExMMzQ3VExGRyQiM0xmYzBgMCxDNkZHNyQkIjMsTExMTFkuS05GRyQiM2lIRzpgZUJhNkZHNyQkIjN3KioqXDdvN1R2JEZHJCIzI0dXL18qXHYlPSJGRzckJCIzJ0dMTExRKm9dUkZHJCIzJVJoWmprL3c/IkZHNyQkIjNBKytEIj1sajslRkckIjNFRmJhYEs8RzdGRzckJCIzMSsrdlYmUjxQJUZHJCIzcycpUiZwIzNRVjdGRzckJCIzV0xMJGU5RWdlJUZHJCIzP2Q5PT9ScGE3Rkc3JCQiM0dMTGVSIjNHeSVGRyQiMycpeVhQI2UmKTRFIkZHNyQkIjNjbW07L1QxJipcRkckIjN1dUNmIylSUGo3Rkc3JCQiMyZlbTt6UlFiQCZGRyQiM1MoR2R5Iz0taDdGRzckJCIzXCoqKlwoPT5ZMmFGRyQiMylmLyRIJylbJ1xEIkZHNyQkIjM5bW07elh1OWNGRyQiM3F0WVpEPUJXN0ZHNyQkIjNsKioqKioqXHkpKUdlRkckIjNfWyJIXClIZEc3Rkc3JCQiMycqKSoqKlxpX1FRZ0ZHJCIzWyYzdjIkKWYoMzdGRzckJCIzQCoqKlw3eSUzVGlGRyQiMy0tOG5aKWZgPSJGRzckJCIzNSoqKipcUCFbaFknRkckIjNfPGpfYGVdYTZGRzckJCIza0tMTCRReCRvbUZHJCIzWiZSRD1eNUM3IkZHNyQkIjMhKSoqKioqXFArVilvRkckIjM3QWlSMGZkJDMiRkc3JCQiMz9tbSJ6cGUqenFGRyQiM1VgQDc2YEpXNUZHNyQkIjMlKSoqKioqXCNcJ1FIKEZHJCIzZzt0UHV3bXAqKkYyNyQkIjNHS0xlOVM4JlwoRkckIjMjUXA6eHhkPlsqRjI3JCQiM1IqKipcaT89YnEoRkckIjMpPVQ8dndeJUcqKUYyNyQkIjMiSExMJDNzPzZ6RkckIjM4LT8qNHhLVE0pRjI3JCQiM2EqKipcN2BXbDcpRkckIjNvPng1ZG5xJ28oRjI3JCQiMyNwbW1tJypSUkwpRkckIjNtW1ZfYXBPNHFGMjckJCIzUW1tO2E8LlkmKUZHJCIzdTY+cksmMz5GJ0YyNyQkIjM9TExlOXRPYygpRkckIjN1MEhGYSdwZVwmRjI3JCQiM3UqKioqKipcUWtcKilGRyQiMzo9enAtcmNWWkYyNyQkIjNDTEwkM2RnNjwqRkckIjMoKVxSXW9YP05RRjI3JCQiM0ltbW1teEdwJCpGRyQiM2UkNCIzdSVRNSlIRjI3JCQiM0ErK0Qib0swZSpGRyQiMy4vTUYoR25wLSNGMjckJCIzQSsrdj01cyN5KkZHJCIzIVwnXCdlcEg+MiJGMjckJCIiIkYrJCEzTyIqR2NodmJ2RkYuLSUmQ09MT1JHNiYlJFJHQkckIiM1ISIiJEYrRmFbbEZiW2wtJSZUSVRMRUc2I1EvQmVuZGluZ35tb21lbnQ2Ii0lKkFYRVNTVFlMRUc2IyUkQk9YRy0lK0FYRVNMQUJFTFNHNiRRInhGZ1tsUSFGZ1tsLUZcW2w2IyUlTk9ORUctJSVWSUVXRzYkO0ZiW2xGX1tsOyQhMmsrJj1senVFREYyJCIxQ1ZDaTlrKUciISM7LSUqR1JJRFNUWUxFRzYjJSxSRUNUQU5HVUxBUkctJSxPUklFTlRBVElPTkc2JCQiI1hGK0ZlXWwtJSpMSU5FU1RZTEVHNiNGKy0lK1BST0pFQ1RJT05HNiNGX1ts</Plot></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQiKzsiKTRVXSEjNTcjLyUieEckIisnKkc0Iz4iISM8</Equation></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQhK08jKTRVXSEjNTcjLyUieEckIiIiIiIh</Equation></Text-field><Text-field layout="Maple Plot" style="Maple Plot"><Plot height="488" plot-scale="1.0" plot-xtrans="0.0" plot-ytrans="0.0" type="two-dimensional" width="488">LSUlUExPVEc2LS0lJ0NVUlZFU0c2JDdTNyQkIiIhRiskIjNRLCE+YkIpNFVdISM9NyQkIjNlbW1tO2FyekAhIz4kIjNMWlxRWW4tQ1tGLjckJCIzW0xMJGU5dWkyJUYyJCIzKVJVKFsmb0BUaiVGLjckJCIzbm1tbSJ6XyI0aUYyJCIzcFcnWzFmdS5VJUYuNyQkIjNbbW1tVCZwaE4pRjIkIjN1MigqWzc7LTBVRi43JCQiM0NMTGUqPSlIXDVGLiQiM0M0IVJkPjIwKlJGLjckJCIzZ21tInovM3VDIkYuJCIzRTsiKlFwT1kieiRGLjckJCIzJSkqKipcN0xSRFgiRi4kIjNDTUM/R2w/JmUkRi43JCQiM11tbSJ6UidvaztGLiQiMyVcbjkhKT1JPFAkRi43JCQiM3cqKipcaTVgaCg9Ri4kIjMpSCpRJnAjeXhlSkYuNyQkIjNXTExMM0VuJDQjRi4kIjNnKVtvYTlxJlJIRi43JCQiM3FtbTsvUkUmRyNGLiQiM202bmYlKlJPWUZGLjckJCIzIikqKioqKlxLXTRdI0YuJCIzTGF3RXdUc0dERi43JCQiMyQqKioqKipcUEF2ciNGLiQiM2U3J1xiSmIrSiNGLjckJCIzKSoqKioqKlxuSGkjSEYuJCIzZUglSG4/MyMqNCNGLjckJCIzam1tInoqZXY6SkYuJCIzY3EmcG9UWHchPkYuNyQkIjM/TExMMzQ3VExGLiQiMydRIT0kek5gKHo7Ri43JCQiMyxMTExMWS5LTkYuJCIzWzBYQyc9PW1bIkYuNyQkIjN3KioqXDdvN1R2JEYuJCIzYTQ+L1ZTKD1FIkYuNyQkIjMnR0xMTFEqb11SRi4kIjNNKFxBVGR0RzEiRi43JCQiM0ErK0QiPWxqOyVGLiQiM1Eib3koMyIzW1cpRjI3JCQiMzErK3ZWJlI8UCVGLiQiMzUoZU5xc1JaTydGMjckJCIzV0xMJGU5RWdlJUYuJCIzWUNRSVRMMCU+JUYyNyQkIjNHTExlUiIzR3klRi4kIjNYSXJQeDtaK0FGMjckJCIzY21tOy9UMSYqXEYuJCIzPyUpKUdlWE0zKyYhI0A3JCQiMyZlbTt6UlFiQCZGLiQhM11bLyZcKz9QPSNGMjckJCIzXCoqKlwoPT5ZMmFGLiQhM0xUWSc9PSUzR1RGMjckJCIzOW1tO3pYdTljRi4kITMlMycpXHRrTnlBJ0YyNyQkIjNsKioqKioqXHkpKUdlRi4kITNNJ2UnUTpYdCdSKUYyNyQkIjMnKikqKipcaV9RUWdGLiQhM3kvJnpuJT4iPTAiRi43JCQiM0AqKipcN3klM1RpRi4kITMjRyhHJFEnSCxkN0YuNyQkIjM1KioqKlxQIVtoWSdGLiQhM1tBJnpGUXpaWyJGLjckJCIza0tMTCRReCRvbUYuJCEzS1pyQDkuTypvIkYuNyQkIjMhKSoqKioqXFArVilvRi4kITMxIjNAcEkteCE+Ri43JCQiMz9tbSJ6cGUqenFGLiQhMyNRbnczaWhhNSNGLjckJCIzJSkqKioqKlwjXCdRSChGLiQhM0wtMj4oM2M6SyNGLjckJCIzR0tMZTlTOCZcKEYuJCEzWnoocDB5clpfI0YuNyQkIjNSKioqXGk/PWJxKEYuJCEzJylRIzMnKlxscXQjRi43JCQiMyJITEwkM3M/NnpGLiQhM2lVWj5jJipbV0hGLjckJCIzYSoqKlw3YFdsNylGLiQhMyNcRzojKVImXGhKRi43JCQiMyNwbW1tJypSUkwpRi4kITMhb2soXDd1TXFMRi43JCQiM1FtbTthPC5ZJilGLiQhM29kZ3I5I3BQZSRGLjckJCIzPUxMZTl0T2MoKUYuJCEzKVx2bCpcI2VfeiRGLjckJCIzdSoqKioqKlxRa1wqKUYuJCEzQ1E+cWRZVyopUkYuNyQkIjNDTEwkM2RnNjwqRi4kITMnPjIoKltjQT1AJUYuNyQkIjNJbW1tbXhHcCQqRi4kITN5JDM1Wi1fMFQlRi43JCQiM0ErK0Qib0swZSpGLiQhM0ZZMzxTN0VBWUYuNyQkIjNBKyt2PTVzI3kqRi4kITN4Iz1CMSUqPlojW0YuNyQkIiIiRiskITNRLCE+YkIpNFVdRi4tJSZDT0xPUkc2JiUkUkdCRyQiIzUhIiIkRitGYVtsRmJbbC1GJjYkN1M3JEYqRio3JEYwRio3JEY2Rio3JEY7Rio3JEZARio3JEZFRio3JEZKRio3JEZPRio3JEZURio3JEZZRio3JEZobkYqNyRGXW9GKjckRmJvRio3JEZnb0YqNyRGXHBGKjckRmFwRio3JEZmcEYqNyRGW3FGKjckRmBxRio3JEZlcUYqNyRGanFGKjckRl9yRio3JEZkckYqNyRGaXJGKjckRl5zRio3JEZkc0YqNyRGaXNGKjckRl50Rio3JEZjdEYqNyRGaHRGKjckRl11Rio3JEZidUYqNyRGZ3VGKjckRlx2Rio3JEZhdkYqNyRGZnZGKjckRlt3Rio3JEZgd0YqNyRGZXdGKjckRmp3Rio3JEZfeEYqNyRGZHhGKjckRml4Rio3JEZeeUYqNyRGY3lGKjckRmh5Rio3JEZdekYqNyRGYnpGKjckRmd6RiotRlxbbDYmRl5bbEZiW2xGYltsRmJbbC0lJlRJVExFRzYjUThTaGVhcn5mb3JjZX5pbn50aGV+YmVhbTYiLSUqQVhFU1NUWUxFRzYjJSRCT1hHLSUrQVhFU0xBQkVMU0c2J1EieEZdX2xRIUZdX2wtJSVGT05URzYkJSpIRUxWRVRJQ0FHRmBbbCUrSE9SSVpPTlRBTEdGW2BsLUZcW2w2IyUlTk9ORUctJSVWSUVXRzYkO0ZiW2xGX1tsOyQhMWkoUlw7I3lWXyEjOyQiMlt3Ulw7I3lWXyEjPC0lKkdSSURTVFlMRUc2IyUsUkVDVEFOR1VMQVJHLSUsT1JJRU5UQVRJT05HNiQkIiNYRitGYWFsLSUqTElORVNUWUxFRzYjRistJStQUk9KRUNUSU9ORzYjRl9bbA==</Plot></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Text">As it is clear from those graphs, the deflection function and the bending moment variability are symmetric with respect to the axis x=L/2, whereas the slope as well as the shear force - must be and are antysymmetric. Since slope equals 0 for this particular value, the deflection is maximized at this point (the bending moment behaves analogously). </Text-field></Input></Group></Section><Section><Title><Text-field layout="Heading 1" style="Heading 1"> A homogeneous beam loaded with the concentrated force, concentrated moment and two different distributed loads </Text-field></Title><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">restart: with(plots): with(Optimization): </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">The entire length of the beam is partitioned into two intervals (with different differential equations), which reflects the changes in boundary conditions, various elastic constants of the subsoil as well as the beam stiffness variations. The essential change with respect to the previous analysis is application of the spatially varying load q=q(x) for both intervals - q1(x) and q2(x) separately. The differential equations valid for those partitions are de1 and de2 and they return the constants _C1,..., _C8 (4 constants for each interval). The boundary conditions bc1,bc2 reflect the situation at the left edge and bc3, bc4 - at the right end, whi;e bc5, bc6, bc7, bc8 are the remaining boundary conditions equivalent to the continuity of this structure for x=L1. </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">de1:=diff(y[1](x),x$4)-4*beta1^4*y[1](x)-q1(x)/EJ1=0;</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRkZTFHLywoLSUlZGlmZkc2JC0mJSJ5RzYjIiIiNiMlInhHLSUiJEc2JEYwIiIlRi4qKEY0Ri4pJSZiZXRhMUdGNEYuRipGLiEiIiomLSUjcTFHRi9GLiUkRUoxR0Y4RjgiIiE=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">de2:=diff(y[2](x),x$4)-4*beta2^4*y[2](x)-q2(x)/EJ2=0;</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRkZTJHLywoLSUlZGlmZkc2JC0mJSJ5RzYjIiIjNiMlInhHLSUiJEc2JEYwIiIlIiIiKihGNEY1KSUmYmV0YTJHRjRGNUYqRjUhIiIqJi0lI3EyR0YvRjUlJEVKMkdGOUY5IiIh</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Text">We need to define first the loadings q1(x) and q2(x) according to the static scheme of this beam. We have </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">q0:=5: q1(x):=q0*(1+2*x/L1): q2(x):=q0: </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">Now we determine the general solutions for those ordinary differential equations using ' dsolve' command as  </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">dsolve(de1,y[1](x)); assign(%);</Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">dsolve(de2,y[2](x)); assign(%);</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiMvLSYlInlHNiMiIiI2IyUieEcsLCouIiImRigiIiUhIiIsJiUjTDFHRigqJiIiI0YoRipGKEYoRiglJmJldGExRyEiJUYxRi8lJEVKMUdGL0YvKiYlJF9DMUdGKC0lJHNpbkc2IyooRjMjRihGM0Y0RihGKkYoRihGKComJSRfQzJHRigtJSRleHBHRjtGKEYoKiYlJF9DM0dGKC0lJGNvc0dGO0YoRigqJiUkX0M0R0YoLUZBNiMsJEY8Ri9GKEYo</Equation></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiMvLSYlInlHNiMiIiM2IyUieEcsLCoqIiImIiIiIiIlISIiJSZiZXRhMkchIiUlJEVKMkdGMEYwKiYlJF9DMUdGLi0lJHNpbkc2IyooRigjRi5GKEYxRi5GKkYuRi5GLiomJSRfQzJHRi4tJSRleHBHRjhGLkYuKiYlJF9DM0dGLi0lJGNvc0dGOEYuRi4qJiUkX0M0R0YuLUY+NiMsJEY5RjBGLkYu</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">We introduce the constants  _C5 .. _C8 instead of  _C1 .. _C4 to define y2(x)  </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">y[2](x):=subs(_C1=_C5,_C2=_C6,_C3=_C7,_C4=_C8,y[2](x)); </Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+LSYlInlHNiMiIiM2IyUieEcsLCoqIiImIiIiIiIlISIiJSZiZXRhMkchIiUlJEVKMkdGMEYwKiYlJF9DNUdGLi0lJHNpbkc2IyooRigjRi5GKEYxRi5GKkYuRi5GLiomJSRfQzZHRi4tJSRleHBHRjhGLkYuKiYlJF9DN0dGLi0lJGNvc0dGOEYuRi4qJiUkX0M4R0YuLUY+NiMsJEY5RjBGLkYu</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">Let us introduce the boundary conditions for the left edge of the beam typical for free-end </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc1:=simplify(subs(x=0,diff(y[1](x),x$2))=0);</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRiYzFHLywkKigiIiMiIiIpJSZiZXRhMUdGKEYpLCoqJiUkX0MxR0YpLSUkc2luRzYjIiIhRikhIiIlJF9DMkdGKSomJSRfQzNHRiktJSRjb3NHRjFGKUYzJSRfQzRHRilGKUYpRjI=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc2:=simplify(subs(x=0,diff(y[1](x),x$3))=0);</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRiYzJHLywkKioiIiMiIiJGKCNGKUYoKSUmYmV0YTFHIiIkRiksKCUkX0MxRyEiIiUkX0MyR0YpJSRfQzRHRjBGKUYpIiIh</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">and, further, the boundary conditions for the right edge of the beam - the same as before </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc3:=simplify(subs(x=L1+L2,diff(y[2](x),x$2))=0);</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRiYzNHLywkKigiIiMiIiIpJSZiZXRhMkdGKEYpLCoqJiUkX0M1R0YpLSUkc2luRzYjKihGKCNGKUYoRitGKSwmJSNMMUdGKSUjTDJHRilGKUYpISIiKiYlJF9DNkdGKS0lJGV4cEdGMUYpRikqJiUkX0M3R0YpLSUkY29zR0YxRilGNyomJSRfQzhHRiktRjs2IywkRjJGN0YpRilGKUYpIiIh</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc4:=simplify(subs(x=L1+L2,diff(y[2](x),x$3))=0);</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRiYzRHLywkKioiIiMiIiJGKCNGKUYoKSUmYmV0YTJHIiIkRiksKiomJSRfQzVHRiktJSRjb3NHNiMqKEYoRipGLEYpLCYlI0wxR0YpJSNMMkdGKUYpRikhIiIqJiUkX0M2R0YpLSUkZXhwR0YzRilGKSomJSRfQzdHRiktJSRzaW5HRjNGKUYpKiYlJF9DOEdGKS1GPDYjLCRGNEY4RilGOEYpRikiIiE=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">Let us introduce all the continuity conditions connecting the deflection functions y1 and y2 for x=L as well as y2 and y3 for x=2L </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc5:=simplify(subs(x=L1,y[1](x))=subs(x=L1,y[2](x)));</Text-field></Input><Output><Text-field layout="Maple Output12" style="2D Output"><Equation style="2D Output">NiM+JSRiYzVHLywkKiYjIiIiIiIlRikqKCwsIiM6ISIiKixGKkYpJSRfQzFHRiktJSRzaW5HNiMqKCIiIyNGKUY1JSZiZXRhMUdGKSUjTDFHRilGKSlGN0YqRiklJEVKMUdGKUYpKixGKkYpJSRfQzJHRiktJSRleHBHRjNGKUY5RilGOkYpRikqLEYqRiklJF9DM0dGKS0lJGNvc0dGM0YpRjlGKUY6RilGKSosRipGKSUkX0M0R0YpLUY+NiMsJEY0Ri5GKUY5RilGOkYpRilGKUY3ISIlRjpGLkYpRiksJComRihGKSooLCwiIiZGLiosRipGKSUkX0M1R0YpLUYyNiMqKEY1RjYlJmJldGEyR0YpRjhGKUYpKUZTRipGKSUkRUoyR0YpRikqLEYqRiklJF9DNkdGKS1GPkZRRilGVEYpRlVGKUYpKixGKkYpJSRfQzdHRiktRkJGUUYpRlRGKUZVRilGKSosRipGKSUkX0M4R0YpLUY+NiMsJEZSRi5GKUZURilGVUYpRilGKUZTRkhGVUYuRilGKQ==</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc6:=simplify(subs(x=L1,diff(y[1](x),x))=subs(x=L1,diff(y[2](x),x)));</Text-field></Input><Output><Text-field layout="Maple Output12" style="2D Output"><Equation style="2D Output">NiM+JSRiYzZHLywkKiYjIiIiIiIjRikqKiwsIiImISIiKjBGKkYpJSRfQzFHRiktJSRjb3NHNiMqKEYqRiglJmJldGExR0YpJSNMMUdGKUYpRipGKClGNUYtRilGNkYpJSRFSjFHRilGKSowRipGKSUkX0MyR0YpRipGKEY3RiktJSRleHBHRjNGKUY2RilGOEYpRikqMEYqRiklJF9DM0dGKS0lJHNpbkdGM0YpRipGKEY3RilGNkYpRjhGKUYuKjBGKkYpJSRfQzRHRilGKkYoRjdGKS1GPDYjLCRGNEYuRilGNkYpRjhGKUYuRilGNSEiJUY2Ri5GOEYuRilGKSooRipGKCUmYmV0YTJHRiksKiomJSRfQzVHRiktRjI2IyooRipGKEZIRilGNkYpRilGKSomJSRfQzZHRiktRjxGTUYpRikqJiUkX0M3R0YpLUZARk1GKUYuKiYlJF9DOEdGKS1GPDYjLCRGTkYuRilGLkYp</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc7:=EJ1*simplify(subs(x=L1,diff(y[1](x),x$2))=M+EJ2*subs(x=L1,diff(y[2](x),x$2)));</Text-field></Input><Output><Text-field layout="Maple Output12" style="2D Output"><Equation style="2D Output">NiM+JSRiYzdHLywkKioiIiMiIiIlJEVKMUdGKSklJmJldGExR0YoRiksKiomJSRfQzFHRiktJSRzaW5HNiMqKEYoI0YpRihGLEYpJSNMMUdGKUYpISIiKiYlJF9DMkdGKS0lJGV4cEdGMkYpRikqJiUkX0MzR0YpLSUkY29zR0YyRilGNiomJSRfQzRHRiktRjo2IywkRjNGNkYpRilGKUYpKiZGKkYpLCwlIk1HRikqLEYoRiklJEVKMkdGKSUkX0M1R0YpLUYxNiMqKEYoRjQlJmJldGEyR0YpRjVGKUYpKUZNRihGKUY2KixGKEYpRkhGKSUkX0M2R0YpRk5GKS1GOkZLRilGKSosRihGKUZIRiklJF9DN0dGKS1GPkZLRilGTkYpRjYqLEYoRilGSEYpJSRfQzhHRilGTkYpLUY6NiMsJEZMRjZGKUYpRik=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc8:=EJ1*simplify(subs(x=L1,diff(y[1](x),x$3))=P+EJ2*subs(x=L1,diff(y[2](x),x$3)));</Text-field></Input><Output><Text-field layout="Maple Output12" style="2D Output"><Equation style="2D Output">NiM+JSRiYzhHLywkKiwiIiMiIiIlJEVKMUdGKUYoI0YpRigpJSZiZXRhMUciIiRGKSwqKiYlJF9DMUdGKS0lJGNvc0c2IyooRihGK0YtRiklI0wxR0YpRikhIiIqJiUkX0MyR0YpLSUkZXhwR0Y0RilGKSomJSRfQzNHRiktJSRzaW5HRjRGKUYpKiYlJF9DNEdGKS1GOzYjLCRGNUY3RilGN0YpRikqJkYqRiksLCUiUEdGKSouRihGKSUkRUoyR0YpJSRfQzVHRiktRjM2IyooRihGKyUmYmV0YTJHRilGNkYpRilGKEYrKUZORi5GKUY3Ki5GKEYpRklGKSUkX0M2R0YpRk9GKUYoRistRjtGTEYpRikqLkYoRilGSUYpJSRfQzdHRiktRj9GTEYpRihGK0ZPRilGKSouRihGKUZJRiklJF9DOEdGKUZPRilGKEYrLUY7NiMsJEZNRjdGKUY3Rik=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">Let us determine all integration constants for our problem as a solution for the boundary conditions applied  </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">solve({bc1,bc2,bc3,bc4,bc5,bc6,bc7,bc8},{_C1,_C2,_C3,_C4,_C5,_C6,_C7,_C8}): assign(%):</Text-field><Text-field layout="Normal" style="Normal">The deflection functions have the following forms (after MAPLE simplifications): </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">simplify(y[1](x)): simplify(y[2](x)): </Text-field><Text-field layout="Normal" style="Normal">We need to introduce the specific values of the beam parameters like k, m, EJ, L before the graphs can be made. </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">k1:=1: q1:=1: EJ1:=1: L1:=1: k2:=1: q2:=1: EJ2:=1: L2:=1: beta1:=sqrt(sqrt(k1/4/EJ1)): beta2:=sqrt(sqrt(k2/4/EJ2)): P:=1: M:=1: L:=L1+L2: </Text-field><Text-field layout="Normal" style="Normal">The graph of the beam deflections </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">y1:=y[1](x): y2:=y[2](x): deflection:=piecewise(x&lt;L1,y1,x&lt;L,y2): fmax:=Maximize(deflection,x=0..L): evalf(fmax); fmin:=Minimize(deflection,x=0..L): evalf(fmin); plot(deflection,x=0..L, title=`Deflection of the beam`,axes=boxed);</Text-field><Text-field layout="Normal" style="Normal">The graph of the slope along the beam </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">y1:=diff(y[1](x),x): y2:=diff(y[2](x),x): Slope:=piecewise(x&lt;L1,y1,x&lt;L,y2): </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">plot(Slope,x=0..L, title=`Slope of the beam`,axes=boxed);</Text-field><Text-field layout="Normal" style="Normal">The graph of the bending moment must show a jump for x=L1 equal to concentrated moment with the magnitude M </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">y1:=-EJ1*diff(y[1](x),x$2): y2:=-EJ2*diff(y[2](x),x$2): moment:=piecewise(x&lt;L1,y1,x&lt;L,y2): Mmax:=Maximize(moment,x=0..L): evalf(Mmax); Mmin:=Minimize(moment,x=0..L): evalf(Mmin); p1:=plot(moment,x=0..L, title=`Bending moment`,axes=boxed): p2:=plot(0,x=0..L,axes=boxed,colour=black): display({p1,p2}); </Text-field><Text-field layout="Normal" style="Normal">The graph of the shear force shows analogous tendency - look at the coordinate x=L1, where the concentrated force P has been applied </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">y1:=-EJ1*diff(y[1](x),x$3): y2:=-EJ2*diff(y[2](x),x$3): shear:=piecewise(x&lt;L1,y1,x&lt;L,y2): Tmax:=Maximize(shear,x=0..L): evalf(Tmax); Tmin:=Minimize(shear,x=0..L): evalf(Tmin);  </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">p1:=plot(shear,x=0..L, title=`Shear force in the beam`,axes=boxed): p2:=plot(0,x=0..L,axes=boxed,colour=black): display({p1,p2}); </Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQhIiEiIiE3Iy8lInhHJCIiI0Ym</Equation></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQhK0U8cVwhKSEiKjcjLyUieEckIisnKkc0Iz4iISM8</Equation></Text-field><Text-field layout="Maple Plot" style="Maple Plot"><Plot height="488" plot-scale="1.0" plot-xtrans="0.0" plot-ytrans="0.0" type="two-dimensional" width="488">LSUlUExPVEc2LC0lJ0NVUlZFU0c2JDdnbjckJCIiIUYrJCEzISpcJUgmUjxxXCEpISM8NyQkIjM5TExMTDNWZlYhIz4kITNTXkZXPS8xLCEpRi43JCQiMydwbW07SFtEOilGMiQhMy0pKUh3OEJ1ZXpGLjckJCIzTExMTGUwJD1DIiEjPSQhMyhcTEFmJXo7NnpGLjckJCIzSUxMTDNSQnI7Rj0kITN5YTRDUmFKanlGLjckJCIzWW1tO3pqZik0I0Y9JCEzV0RKJWZ6X2QieUYuNyQkIjM9TEwkZTQ7W1wjRj0kITNlQmRmcnN0cnhGLjckJCIzcCoqKipcaSd5XSFIRj0kITNkZG0lKVs6RkV4Ri43JCQiMyxMTCRlenMkSExGPSQhM2thMW1mJilSendGLjckJCIzXyoqKipcN2lJX1BGPSQhM1Y1XnJFZyZHaihGLjckJCIzI3BtbW1AWHQ9JUY9JCEzISpwLi0jSCo+JmUoRi43JCQiM1FMTEwzeV9xWEY9JCEzSGpVT3R6VVZ2Ri43JCQiM2kqKioqKipcMSE+KyZGPSQhMydSRzMiUUNsJ1woRi43JCQiMygpKioqKioqXFovTmFGPSQhM2FAekFBVycqXHVGLjckJCIzJyoqKioqKipcJGZDJmVGPSQhM1ktW1EielVfUyhGLjckJCIzRUxMJGV6NjpCJ0Y9JCEzLVpRcSl5ZVtPKEYuNyQkIjNTbW1tOz1DI28nRj0kITNQLWZZaWA1PHRGLjckJCIzLW1tbW0jcFMxKEY9JCEzU0wqKlJVbCZvRihGLjckJCIzXSoqKipcaWBBM3ZGPSQhM0s0QSVRVUstQihGLjckJCIzc2xtbW0oeTghekY9JCEzKyhbbE9AKTMqPShGLjckJCIzVisrXWkudEskKUY9JCEzTWVNJTRaNlM5KEYuNyQkIjM5KytdKDN6TXUpRj0kITNAclchcFVtNTUoRi43JCQiMyNwbW07SF8/PCpGPSQhMzVuMjJ6YjdjcUYuNyQkIjNlbW07emlobCYqRj0kITNvJkglZVNEaTlxRi43JCQiMzlMTEwzI0csKioqRj0kITNLMyIzNjVnJXBwRi43JCQiMzxMTGV6dzVWNUYuJCEzKmVBcUA0ckcjcEYuNyQkIjMhKioqKlxQUSNcIjMiRi4kITNlSzRzZnVHJClvRi43JCQiM0JMTCRlIipbSDciRi4kITMrcCEqPWcnZTklb0YuNyQkIjMjKioqKioqKnB2eGw2Ri4kITMnKlt3Q0NjOip6J0YuNyQkIjN6KioqKlxfcW4yN0YuJCEzayhwZ1UvdSZlbkYuNyQkIjMlKSoqKlxpJnBAWzdGLiQhM2RmX0VbYykqPm5GLjckJCIzIykqKioqXDInSEtIIkYuJCEzP28pKlJHNyR5bidGLjckJCIzX21tbXdhbkw4Ri4kITM8ZyRIJilSLDBrJ0YuNyQkIjMnKioqKioqXDJnb1AiRi4kITMmWyJcamBTOSxtRi43JCQiM0NMTGVSPCpmVCJGLiQhMylcKkhhPChwZWMnRi43JCQiMycqKioqKipcKUh4ZTlGLiQhMypHc2BtIzNuRmxGLjckJCIzWW1tIkghby0qXCJGLiQhMy0iKlFXS3MtI1wnRi43JCQiMykpKioqXDdrLjZhIkYuJCEzPShcYi1fSV1YJ0YuNyQkIjNlbW1tVDlDI2UiRi4kITMtXHQoKj5aMj5rRi43JCQiMyIqKioqXGkhKjNgaSJGLiQhM21MWUtHJz07USdGLjckJCIzUUxMTCQqenltO0YuJCEzLWZVakMkKW9YakYuNyQkIjNHTEwkM04xIzQ8Ri4kITMrQSkqbyNlZSE0akYuNyQkIjNrbW0iSFl0N3YiRi4kITM1TFojeVM9R0YnRi43JCQiMyUqKioqKioqcChHKip5IkYuJCEzJ0grKWUhenMmUmlGLjckJCIzbG1tOzlAQk09Ri4kITNVKjN5WFc5Oj8nRi43JCQiM0VMTExgdiZRKD1GLiQhM2dLeGlzMV1uaEYuNyQkIjMwKytET2w1Oz5GLiQhM1pgbygqUitESmhGLjckJCIzLysrK3FgS08+Ri4kITN5akA/OFohUjYnRi43JCQiMy8rK3YuVWFjPkYuJCEzM0JJKltIZ2w0J0YuNyQkIjMvK0QiRzozdSc+Ri4kITNZUCpvPy1UczMnRi43JCQiMy0rXSg9NXMjeT5GLiQhM2N2QVw8PSN6MidGLjckJCIzOV1pU3dTcSQpPkYuJCEzTVgpWyZHQUV0Z0YuNyQkIjMtK3YkNDBPIiopPkYuJCEzazQ7JlFrLSdvZ0YuNyQkIjMlWzcuI1E/Jj0qPkYuJCEzIW9JTUImR0ZtZ0YuNyQkIjMhKlwob2Etb1gqPkYuJCEzWyp5IjNoSSVSMSdGLjckJCIzVWk6NT5nI2YqPkYuJCEzQS11XWwieUYxJ0YuNyQkIjMlXFBNRiwlRygqPkYuJCEzJ1thXCpwS2hoZ0YuNyQkIjNbKD1uaitVJykqPkYuJCEzIykpPipSdSRbLzEnRi43JCQiIiNGK0YqLSUmQ09MT1JHNiYlJFJHQkckIiM1ISIiJEYrRmFebEZiXmwtJSZUSVRMRUc2I1E3RGVmbGVjdGlvbn5vZn50aGV+YmVhbTYiLSUqQVhFU1NUWUxFRzYjJSRCT1hHLSUrQVhFU0xBQkVMU0c2JFEieEZnXmxRIUZnXmwtRlxebDYjJSVOT05FRy0lJVZJRVdHNiQ7RmJebCQiIz9GYV5sOyQhMVErS3VkcDUjKSEjOiQiMicqKWUhek1TKjQ7Ri4tJSpHUklEU1RZTEVHNiMlLFJFQ1RBTkdVTEFSRy0lLE9SSUVOVEFUSU9ORzYkJCIjWEYrRmdgbC0lKkxJTkVTVFlMRUc2I0YrLSUrUFJPSkVDVElPTkc2I0ZfXmw=</Plot></Text-field><Text-field layout="Maple Plot" style="Maple Plot"><Plot height="488" plot-scale="1.0" plot-xtrans="0.0" plot-ytrans="0.0" type="two-dimensional" width="488">LSUlUExPVEc2LC0lJ0NVUlZFU0c2JDdpbjckJCIiIUYrJCIzWld4bXpDeTo2ISM8NyQkIjM5TExMTDNWZlYhIz4kIjNaZikpW1Q/dTo2Ri43JCQiMydwbW07SFtEOilGMiQiM0k1R01Edl86NkYuNyQkIjNMTExMZTAkPUMiISM9JCIzUU0yd0IjPlw2IkYuNyQkIjNJTExMM1JCcjtGPSQiMyFlQlVCQXJQNiJGLjckJCIzWW1tO3pqZik0I0Y9JCIzMyIzQmEuJCk+NiJGLjckJCIzPUxMJGU0O1tcI0Y9JCIzIlxdVncxJW80NkYuNyQkIjNwKioqKlxpJ3ldIUhGPSQiM3pYdEJcJT5tNSJGLjckJCIzLExMJGV6cyRITEY9JCIzXV5wRT1bci02Ri43JCQiM18qKioqXDdpSV9QRj0kIjNLRVhWRSw2KTQiRi43JCQiMyNwbW1tQFh0PSVGPSQiM3NRKD4jcEBxIzQiRi43JCQiM1FMTEwzeV9xWEY9JCIzM1RjJUhOaXUzIkYuNyQkIjNpKioqKioqXDEhPismRj0kIjNDNytldUE7IjMiRi43JCQiMygpKioqKioqXFovTmFGPSQiM0EjKSo+QEEnZXU1Ri43JCQiMycqKioqKioqXCRmQyZlRj0kIjN1allkKHk+I281Ri43JCQiM0VMTCRlejY6QidGPSQiM28nb0hDcDZFMSJGLjckJCIzU21tbTs9QyNvJ0Y9JCIzcS0pem52VWswIkYuNyQkIjMtbW1tbSNwUzEoRj0kIjNbJ3A8R3owPjAiRi43JCQiM10qKioqXGlgQTN2Rj0kIjNJUmAtI1EheVo1Ri43JCQiM3NsbW1tKHk4IXpGPSQiM29DQiJSTypcWDVGLjckJCIzVisrXWkudEskKUY9JCIzQU4kZSZSMCpbLyJGLjckJCIzOSsrXSgzek11KUY9JCIzI1I0dU1zd2wvIkYuNyQkIjMjcG1tO0hfPzwqRj0kIjNJZCd6PkAiPV41Ri43JCQiM2VtbTt6aWhsJipGPSQiM2NUUkBcZVVlNUYuNyQkIjMnKSoqKlxQQ3N5eCpGPSQiMzMzQnBwSHBqNUYuNyQkIjM5TExMMyNHLCoqKkY9JCIzVUUvZ1JtK3E1Ri43JCQiM0NMJDMtRGc1LSJGLiQiMyVlczdZSGNrMCJGLjckJCIzPExMZXp3NVY1Ri4kIjNdTCJcUV1GRS8iRi43JCQiMyEqKioqXFBRI1wiMyJGLiQiMy1lTURtKXosLSJGLjckJCIzQkxMJGUiKltINyJGLiQiM0tDITM4UkU6KSoqRj03JCQiMyMqKioqKioqcHZ4bDZGLiQiM1E/OSJcdW1ueCpGPTckJCIzeioqKipcX3FuMjdGLiQiM0UzI3pjNDt2ZipGPTckJCIzJSkqKipcaSZwQFs3Ri4kIjNrWTxqI3pzRVcqRj03JCQiMyMpKioqKlwyJ0hLSCJGLiQiM21iRW0kNFgySCpGPTckJCIzX21tbXdhbkw4Ri4kIjMpPW5CZXRbNDwqRj03JCQiMycqKioqKipcMmdvUCJGLiQiMzNwXHclM0IjZiEqRj03JCQiM0NMTGVSPCpmVCJGLiQiM0dlXjJtek1yKilGPTckJCIzJyoqKioqKlwpSHhlOUYuJCIzd0BTQTErbSkpKSlGPTckJCIzWW1tIkghby0qXCJGLiQiM3FXZyZ5P3BEIykpRj03JCQiMykpKioqXDdrLjZhIkYuJCIzKSoqKSpwdD9MWHcpRj03JCQiM2VtbW1UOUMjZSJGLiQiM1BBeUZzPW48KClGPTckJCIzIioqKipcaSEqM2BpIkYuJCIzRXAlUSU0PCl6bilGPTckJCIzUUxMTCQqenltO0YuJCIzKUghKikqMzAoeVonKUY9NyQkIjNHTEwkM04xIzQ8Ri4kIjNLVWA7PUAuQycpRj03JCQiM2ttbSJIWXQ3diJGLiQiMyZSUEwhb3ZmMScpRj03JCQiMyUqKioqKioqcChHKip5IkYuJCIzXXE4JCl6aDcmZilGPTckJCIzbG1tOzlAQk09Ri4kIjMjZXNEJ2VfUCdlKUY9NyQkIjNFTExMYHYmUSg9Ri4kIjNbd2E9KFwocCJlKUY9NyQkIjMwKytET2w1Oz5GLiQiM0Nac1ZLTjd6JilGPTckJCIzLysrK3FgS08+Ri4kIjNDPE00aV1feSYpRj03JCQiMy8rK3YuVWFjPkYuJCIzTVJCXmEmNCN5JilGPTckJCIzLytEIkc6M3UnPkYuJCIzYVZHSURcN3kmKUY9NyQkIjMtK10oPTVzI3k+Ri4kIjMtOyhlM2YiM3kmKUY9NyQkIjM5XWlTd1NxJCk+Ri4kIjMnUXVqbTFyIXkmKUY9NyQkIjMtK3YkNDBPIiopPkYuJCIzLTRbM3FjMXkmKUY9NyQkIjMlWzcuI1E/Jj0qPkYuJCIzO1tSJ3pOayF5JilGPTckJCIzISpcKG9hLW9YKj5GLiQiM1VWZGwlb2oheSYpRj03JCQiM1VpOjU+ZyNmKj5GLiQiMythTCYzX2oheSYpRj03JCQiMyVcUE1GLCVHKCo+Ri4kIjMnbyQpb25WaiF5JilGPTckJCIzWyg9bmorVScpKj5GLiQiM1MzNyFlU2oheSYpRj03JCQiIiNGK0YqLSUmQ09MT1JHNiYlJFJHQkckIiM1ISIiJEYrRltfbEZcX2wtJSZUSVRMRUc2I1EyU2xvcGV+b2Z+dGhlfmJlYW02Ii0lKkFYRVNTVFlMRUc2IyUkQk9YRy0lK0FYRVNMQUJFTFNHNiRRInhGYV9sUSFGYV9sLUZmXmw2IyUlTk9ORUctJSVWSUVXRzYkO0ZcX2wkIiM/RltfbDskITEqW04kZlxjSkFGLiQiMiUqNGgjSCIpNFE2ISM7LSUqR1JJRFNUWUxFRzYjJSxSRUNUQU5HVUxBUkctJSxPUklFTlRBVElPTkc2JCQiI1hGK0ZhYWwtJSpMSU5FU1RZTEVHNiNGKy0lK1BST0pFQ1RJT05HNiNGaV5s</Plot></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQiKzk+XlVuISM1NyMvJSJ4RyQiKzMrKys1ISIq</Equation></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQhKyx6W2RLISM1NyMvJSJ4RyQiK3MqKioqKioqKkYm</Equation></Text-field><Text-field layout="Maple Plot" style="Maple Plot"><Plot height="488" plot-scale="1.0" plot-xtrans="0.0" plot-ytrans="0.0" type="two-dimensional" width="488">LSUlUExPVEc2LS0lJ0NVUlZFU0c2JDdpbjckJCIiIUYrJCEzO0UxXSk0IyozVyUhI0w3JCQiMzlMTExMM1ZmViEjPiQiMyVRKHlzaVdWV0YhIz83JCQiMydwbW07SFtEOilGMiQiMyh5ZiM+QWsjNDgqRjU3JCQiM0xMTExlMCQ9QyIhIz0kIjNjPWc8QWh1Jyo+RjI3JCQiM0lMTEwzUkJyO0Y+JCIzUT5WPWE9PSVSJEYyNyQkIjNZbW07empmKTQjRj4kIjMoXEw1JVtfTi5dRjI3JCQiMz1MTCRlNDtbXCNGPiQiM2lUXVd0I2ZUaCdGMjckJCIzcCoqKipcaSd5XSFIRj4kIjNJVGExKjMycUspRjI3JCQiMyxMTCRlenMkSExGPiQiM0BQKlIiZmhlMTVGPjckJCIzXyoqKipcN2lJX1BGPiQiMyEpcHVjI0d5I282Rj43JCQiMyNwbW1tQFh0PSVGPiQiM0AqZVdIV0JPSiJGPjckJCIzUUxMTDN5X3FYRj4kIjMhNE0nKSk0JkdvVCJGPjckJCIzaSoqKioqKlwxIT4rJkY+JCIzOS9hciJmJzMoXCJGPjckJCIzKCkqKioqKipcWi9OYUY+JCIzNnFTUyRmYzJgIkY+NyQkIjMnKioqKioqKlwkZkMmZUY+JCIzWkUlUU4ob0o1OkY+NyQkIjNFTEwkZXo2OkInRj4kIjMnPk1FbVFMKlI5Rj43JCQiM1NtbW07PUMjbydGPiQiM3FwNnomelFNRyJGPjckJCIzLW1tbW0jcFMxKEY+JCIzXSUqenEqKikpKT0zIkY+NyQkIjNdKioqKlxpYEEzdkY+JCIzR1glRy1jVj9mKEYyNyQkIjNzbG1tbSh5OCF6Rj4kIjNzUEprSXk0cVFGMjckJCIzVisrXWkudEskKUY+JCEzaSR6bXUsZjxCIkYyNyQkIjM5KytdKDN6TXUpRj4kITNbZGkiKUdaJCplckYyNyQkIjMjcG1tO0hfPzwqRj4kITNpKGVTVXM8UlgiRj43JCQiM0lubVQmR00pbyQqRj4kITM3P0JrJWVXZyQ9Rj43JCQiM2VtbTt6aWhsJipGPiQhMyNHJ2VXKylvbEMjRj43JCQiMycpKioqXFBDc3l4KkY+JCEzbDd1LG8meUBzI0Y+NyQkIjM5TExMMyNHLCoqKkY+JCEzcEVOViRIbEdCJEY+NyQkIjMjM0ZwXnkhUis1ISM8JCIzUHFcQGIoZW10J0Y+NyQkIjNMM19dXChvPCsiRmF0JCIzSihcY0tEVmdyJ0Y+NyQkIjMlZTlUUXJZSisiRmF0JCIzSy8yOSI0bGFwJ0Y+NyQkIjNOJDN4InlZXy81RmF0JCIzTVxoITRDQ1xuJ0Y+NyQkIjNQZSpbb2chRzI1RmF0JCIzelJjTmtWJlJqJ0Y+NyQkIjNSTDNfTmwuNTVGYXQkIjM3UFxSK004JGYnRj43JCQiM1YkZWtHUltiLCJGYXQkIjNmXFJKPnQkPl4nRj43JCQiM0NMJDMtRGc1LSJGYXQkIjM0P1dmPlVMSmtGPjckJCIzNExlKlsnUjNLNUZhdCQiMyU+aVU+KSkqKj1GJ0Y+NyQkIjM8TExlenc1VjVGYXQkIjM+YE53Ikc7WzYnRj43JCQiM2ttbW1KK0lpNUZhdCQiMyNlXDk4OitwJWVGPjckJCIzISoqKipcUFEjXCIzIkZhdCQiMyVwdnlRaCQqZmUmRj43JCQiM0JMTCRlIipbSDciRmF0JCIzXWY/Z09DK1ldRj43JCQiMyMqKioqKioqcHZ4bDZGYXQkIjMvVSJmOF1vOF8lRj43JCQiM3oqKioqXF9xbjI3RmF0JCIzWFtHWEIoZSsvJUY+NyQkIjMlKSoqKlxpJnBAWzdGYXQkIjN1ZUo9NDp3Lk9GPjckJCIzIykqKioqXDInSEtIIkZhdCQiMyslKSpIVm0+QzokRj43JCQiM19tbW13YW5MOEZhdCQiMyl5MUFeKDMqZXgjRj43JCQiMycqKioqKipcMmdvUCJGYXQkIjNiPiZHXlF2TVMjRj43JCQiM0NMTGVSPCpmVCJGYXQkIjN5VWkiKXAnPj00I0Y+NyQkIjMnKioqKioqXClIeGU5RmF0JCIzK1s3TDlkXnk8Rj43JCQiM1ltbSJIIW8tKlwiRmF0JCIzWkBEdiczbCM0OkY+NyQkIjMpKSoqKlw3ay42YSJGYXQkIjMzXSM9JSk9Yk9EIkY+NyQkIjNlbW1tVDlDI2UiRmF0JCIzbnJcKCopZWYnRzVGPjckJCIzIioqKipcaSEqM2BpIkZhdCQiM1k3UyhHejokKT0pRjI3JCQiM1FMTEwkKnp5bTtGYXQkIjNvI1IoW2VpdzRrRjI3JCQiM0dMTCQzTjEjNDxGYXQkIjN2JkdhKz9aLiRbRjI3JCQiM2ttbSJIWXQ3diJGYXQkIjNLKVxcMFBcbVwkRjI3JCQiMyUqKioqKioqcChHKip5IkZhdCQiMzMxSyQ+KVwmKXBDRjI3JCQiM2xtbTs5QEJNPUZhdCQiMyUqUUFVVCpHMF8iRjI3JCQiM0VMTExgdiZRKD1GYXQkIjMjSDxcIiplImU5KClGNTckJCIzMCsrRE9sNTs+RmF0JCIzaVs2Vi1ZNDdRRjU3JCQiMy8rK3YuVWFjPkZhdCQiM1YjPkJYLDY+LCJGNTckJCIiI0YrRiotJSZDT0xPUkc2JiUkUkdCRyQiIzUhIiIkRitGXV9sRl5fbC1GJjYkN1M3JEYqRio3JEYwRio3JEY3Rio3JEY8Rio3JEZCRio3JEZHRio3JEZMRio3JEZRRio3JEZWRio3JEZlbkYqNyRGam5GKjckRl9vRio3JEZkb0YqNyRGaW9GKjckRl5wRio3JEZjcEYqNyRGaHBGKjckRl1xRio3JEZicUYqNyRGZ3FGKjckRlxyRio3JEZhckYqNyRGZnJGKjckRmBzRio3JEZqc0YqNyRGXXdGKjckRmd3Rio3JEZceEYqNyRGYXhGKjckRmZ4Rio3JEZbeUYqNyRGYHlGKjckRmV5Rio3JEZqeUYqNyRGX3pGKjckRmR6Rio3JEZpekYqNyRGXltsRio3JEZjW2xGKjckRmhbbEYqNyRGXVxsRio3JEZiXGxGKjckRmdcbEYqNyRGXF1sRio3JEZhXWxGKjckRmZdbEYqNyRGW15sRio3JEZgXmxGKkZkXmwtRmhebDYmRmpebEZeX2xGXl9sRl5fbC0lJlRJVExFRzYjUS9CZW5kaW5nfm1vbWVudDYiLSUqQVhFU1NUWUxFRzYjJSRCT1hHLSUrQVhFU0xBQkVMU0c2J1EieEZoYmxRIUZoYmwtJSVGT05URzYkJSpIRUxWRVRJQ0FHRlxfbCUrSE9SSVpPTlRBTEdGZmNsLUZoXmw2IyUlTk9ORUctJSVWSUVXRzYkO0ZeX2wkIiM/Rl1fbDskITEoXDFXeGJBViQhIzskIjFXej1PI1xnJHBGY2RsLSUqR1JJRFNUWUxFRzYjJSxSRUNUQU5HVUxBUkctJSxPUklFTlRBVElPTkc2JCQiI1hGK0ZdZWwtJSpMSU5FU1RZTEVHNiNGKy0lK1BST0pFQ1RJT05HNiNGW19s</Plot></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQiK0BvKFE9JSEjNTcjLyUieEckIisybDRXRkYm</Equation></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQhKzgmMyMpXCMhIio3Iy8lInhHJCIrTyoqKioqKioqISM1</Equation></Text-field><Text-field layout="Maple Plot" style="Maple Plot"><Plot height="488" plot-scale="1.0" plot-xtrans="0.0" plot-ytrans="0.0" type="two-dimensional" width="488">LSUlUExPVEc2LS0lJ0NVUlZFU0c2JDdbbzckJCIiIUYrJCEzJnk9XSZId0VLOCEjSzckJCIzOUxMTEwzVmZWISM+JCIzMUddKD5ycVFBIiEjPTckJCIzJ3BtbTtIW0Q6KUYyJCIzVVJLazldKW82I0Y1NyQkIjNMTExMZTAkPUMiRjUkIjNIMyJ6NFA4LCRIRjU3JCQiM0lMTEwzUkJyO0Y1JCIzaCNlJWVXSVlXTkY1NyQkIjNZbW07empmKTQjRjUkIjNHNyRSI1snR0MmUkY1NyQkIjM9TEwkZTQ7W1wjRjUkIjNVRXlKN0FPXFRGNTckJCIzcCoqKipcaSd5XSFIRjUkIjNvRzBOeFRbcFRGNTckJCIzLExMJGV6cyRITEY1JCIzX2spM2x5YU8qUkY1NyQkIjNfKioqKlw3aUlfUEY1JCIzeVkwIkhjdCU+T0Y1NyQkIjMjcG1tbUBYdD0lRjUkIjNxKGVdKip6a3UtJEY1NyQkIjNRTExMM3lfcVhGNSQiM1VXQ2UpW0VATCNGNTckJCIzaSoqKioqKlwxIT4rJkY1JCIzVSRRR2l5XVhOIkY1NyQkIjMoKSoqKioqKlxaL05hRjUkIjNfKnp6MyN6KVtsIkYyNyQkIjMnKioqKioqKlwkZkMmZUY1JCEzZVhPS3R4KXA8IkY1NyQkIjNFTEwkZXo2OkInRjUkITMtS056bFg7akRGNTckJCIzU21tbTs9QyNvJ0Y1JCEzTToyLFFCTD1XRjU3JCQiMy1tbW1tI3BTMShGNSQhM2s3dFdIcGtsaEY1NyQkIjNdKioqKlxpYEEzdkY1JCEzTCRSQSFcXCI0UylGNTckJCIzc2xtbW0oeTghekY1JCEzbVJ3IXk6TmgwIiEjPDckJCIzVisrXWkudEskKUY1JCEzJVsvUlVBNkdKIkZqcTckJCIzdCoqKioqXHMvIlEmKUY1JCEzPHp0TGo0Q1U5RmpxNyQkIjM5KytdKDN6TXUpRjUkITNBdyh5V2BIamQiRmpxNyQkIjNfTExlKm9seCYqKUY1JCEzbzlhcSUqUT9APEZqcTckJCIzI3BtbTtIXz88KkY1JCEzVWxaYTU7OnI9RmpxNyQkIjNJbm1UJkdNKW8kKkY1JCEzQ0NkYjksSzg/RmpxNyQkIjNlbW07emlobCYqRjUkITMhM3NXN0VwKGZARmpxNyQkIjMnKSoqKlxQQ3N5eCpGNSQhM24hPnB3Lk5ESyNGanE3JCQiMzlMTEwzI0csKioqRjUkITNHODk2TWBHIVwjRmpxNyQkIjMjM0ZwXnkhUis1RmpxJCEzWUZBUEIlUnVcIkZqcTckJCIzTDNfXVwobzwrIkZqcSQhM0MiZVRfaUdaXCJGanE3JCQiMyVlOVRRcllKKyJGanEkITM5ISlIPGQpPj9cIkZqcTckJCIzTiQzeCJ5WV8vNUZqcSQhMyk0Kj1UPEpKKlsiRmpxNyQkIjNQZSpbb2chRzI1RmpxJCEzaS41I2VyMFJbIkZqcTckJCIzUkwzX05sLjU1RmpxJCEzI1sxU2xTMSZ5OUZqcTckJCIzViRla0dSW2IsIkZqcSQhMy82Lmk0P3RuOUZqcTckJCIzQ0wkMy1EZzUtIkZqcSQhM1E4I0dwIikqKXBYIkZqcTckJCIzNExlKlsnUjNLNUZqcSQhMzNnRzQ3O2dOOUZqcTckJCIzPExMZXp3NVY1RmpxJCEzZkpVOlQ0TTk5RmpxNyQkIjNrbW1tSitJaTVGanEkITM1MndsTHlpeDhGanE3JCQiMyEqKioqXFBRI1wiMyJGanEkITNxeSgqM2lYSFQ4RmpxNyQkIjNCTEwkZSIqW0g3IkZqcSQhMzcwKTMhKT0hNGs3RmpxNyQkIjMjKioqKioqKnB2eGw2RmpxJCEzT2RVWzc/OCc9IkZqcTckJCIzeioqKipcX3FuMjdGanEkITMtJm9mJj02ZzY2RmpxNyQkIjMlKSoqKlxpJnBAWzdGanEkITMnZl8/OSskNFQ1RmpxNyQkIjMjKSoqKipcMidIS0giRmpxJCEzNVUmZTskPkJZJypGNTckJCIzX21tbXdhbkw4RmpxJCEzdSFbJm9CUz12KilGNTckJCIzJyoqKioqKlwyZ29QIkZqcSQhMz0nZk8mKmZiX0YpRjU3JCQiM0NMTGVSPCpmVCJGanEkITMhXFgqKnk/OWNsKEY1NyQkIjMnKioqKioqXClIeGU5RmpxJCEzNVJgQEkjKipRKnBGNTckJCIzWW1tIkghby0qXCJGanEkITMxK0Y3dGk4J1EnRjU3JCQiMykpKioqXDdrLjZhIkZqcSQhMz84SycpcC84bWRGNTckJCIzZW1tbVQ5QyNlIkZqcSQhM2t3I2V1QmxcPCZGNTckJCIzIioqKipcaSEqM2BpIkZqcSQhMyFSVlM5Y3g9ZCVGNTckJCIzUUxMTCQqenltO0ZqcSQhMy4wc0d2M0QxU0Y1NyQkIjNHTEwkM04xIzQ8RmpxJCEzZ0UqM3hUL0tXJEY1NyQkIjNrbW0iSFl0N3YiRmpxJCEzU0NncFVrOStIRjU3JCQiMyUqKioqKioqcChHKip5IkZqcSQhM0w/KzsuO2M5Q0Y1NyQkIjNsbW07OUBCTT1GanEkITNBKWU4P1JAUSg9RjU3JCQiM0VMTExgdiZRKD1GanEkITM/NkpVIW9iV1MiRjU3JCQiMzArK0RPbDU7PkZqcSQhMzVoJFJAam0mKT0qRjI3JCQiMy8rK3YuVWFjPkZqcSQhM3U+ZDgjPSY+JW8lRjI3JCQiIiNGK0YqLSUmQ09MT1JHNiYlJFJHQkckIiM1ISIiJEYrRmZfbEZnX2wtRiY2JDdTNyRGKkYqNyRGMEYqNyRGN0YqNyRGPEYqNyRGQUYqNyRGRkYqNyRGS0YqNyRGUEYqNyRGVUYqNyRGWkYqNyRGaW5GKjckRl5vRio3JEZjb0YqNyRGaG9GKjckRl1wRio3JEZicEYqNyRGZ3BGKjckRlxxRio3JEZhcUYqNyRGZnFGKjckRlxyRio3JEZmckYqNyRGYHNGKjckRmpzRio3JEZkdEYqNyRGZndGKjckRmB4Rio3JEZleEYqNyRGanhGKjckRl95Rio3JEZkeUYqNyRGaXlGKjckRl56Rio3JEZjekYqNyRGaHpGKjckRl1bbEYqNyRGYltsRio3JEZnW2xGKjckRlxcbEYqNyRGYVxsRio3JEZmXGxGKjckRltdbEYqNyRGYF1sRio3JEZlXWxGKjckRmpdbEYqNyRGX15sRio3JEZkXmxGKjckRmlebEYqRl1fbC1GYV9sNiZGY19sRmdfbEZnX2xGZ19sLSUmVElUTEVHNiNROFNoZWFyfmZvcmNlfmlufnRoZX5iZWFtNiItJSpBWEVTU1RZTEVHNiMlJEJPWEctJStBWEVTTEFCRUxTRzYnUSJ4RmFjbFEhRmFjbC0lJUZPTlRHNiQlKkhFTFZFVElDQUdGZV9sJStIT1JJWk9OVEFMR0ZfZGwtRmFfbDYjJSVOT05FRy0lJVZJRVdHNiQ7RmdfbCQiIz9GZl9sOyQhMkNNWyI0K1ZbRCEjOyQiMUEpPngjNCQ0diVGXGVsLSUqR1JJRFNUWUxFRzYjJSxSRUNUQU5HVUxBUkctJSxPUklFTlRBVElPTkc2JCQiI1hGK0ZmZWwtJSpMSU5FU1RZTEVHNiNGKy0lK1BST0pFQ1RJT05HNiNGZF9s</Plot></Text-field></Output></Group></Section><Text-field layout="Normal" style="Text"/><Section><Title><Text-field layout="Heading 1" style="Heading 1"> Civil engineering case study </Text-field></Title><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">restart: with(plots): with(Optimization): with(LinearAlgebra): </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">A deflection of the elastic prismatic beam on the elastic Winkler soil is analyzed here. The differential equation governing this problem has the following form: </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">Diff(y(x),x$4)-4*beta^4*y(x)-q/EJ=0;</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiMvLCgtJSVEaWZmRzYkLSUieUc2IyUieEctJSIkRzYkRisiIiUiIiIqKEYvRjApJSViZXRhR0YvRjBGKEYwISIiKiYlInFHRjAlI0VKR0Y0RjQiIiE=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">where  </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">beta=sqrt(sqrt(k/4/EJ));</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiMvJSViZXRhRywkKigiIiMhIiJGJyMiIiJGJyomJSJrR0YqJSNFSkdGKCNGKiIiJUYq</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">The entire length of this beam is partitioned into three different subsets, which reflects the changes in boundary conditions, various elastic constants of the subsoil as well as the beam stiffness variations. The above equation reduces to classical Euler-Bernoulli beam deflection when one drop k=0 for the one of  the intervals along this structure. The differential equations valid for those partitions are de1, de2 and de3. They return the constants _C1,..., _C12, while the boundary conditions bc1,bc2 reflect the situation at the left edge and bc3, bc4 - at the right end. The remaining boundary conditions are equivalent to the continuity conditions for x=L1 and x=L2. As it is apparent from the additional static scheme, the second interval does not contain elastic foundation, so that the corresponding equilibrium differential equation has classical polynomial solution obtained from the straightforward integration. Furthermore, the beam is once more symmetric, so that the deflections and the bending moment functions are symmetric, whereas the slope and the shear force - antysymmetric. </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">de1:=diff(y[1](x),x$4)-4*beta1^4*y[1](x)-q1/EJ1=0;</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRkZTFHLywoLSUlZGlmZkc2JC0mJSJ5RzYjIiIiNiMlInhHLSUiJEc2JEYwIiIlRi4qKEY0Ri4pJSZiZXRhMUdGNEYuRipGLiEiIiomJSNxMUdGLiUkRUoxR0Y4RjgiIiE=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">de2:=diff(y[2](x),x$4)-4*beta2^4*y[2](x)-q2/EJ2=0;</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRkZTJHLywoLSUlZGlmZkc2JC0mJSJ5RzYjIiIjNiMlInhHLSUiJEc2JEYwIiIlIiIiKihGNEY1KSUmYmV0YTJHRjRGNUYqRjUhIiIqJiUjcTJHRjUlJEVKMkdGOUY5IiIh</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">de3:=diff(y[3](x),x$4)-4*beta3^4*y[3](x)-q3/EJ3=0;</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRkZTNHLywoLSUlZGlmZkc2JC0mJSJ5RzYjIiIkNiMlInhHLSUiJEc2JEYwIiIlIiIiKihGNEY1KSUmYmV0YTNHRjRGNUYqRjUhIiIqJiUjcTNHRjUlJEVKM0dGOUY5IiIh</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">Now we determine the general solutions for those ordinary differential equations using ' dsolve' command as  </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">dsolve(de1,y[1](x)); assign(%);</Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">dsolve(de2,y[2](x)); assign(%);</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiMvLSYlInlHNiMiIiI2IyUieEcsLCoqIiIlISIiJSZiZXRhMUchIiUlJEVKMUdGLiUjcTFHRihGLiomJSRfQzFHRigtJSRzaW5HNiMqKCIiIyNGKEY5Ri9GKEYqRihGKEYoKiYlJF9DMkdGKC0lJGV4cEdGN0YoRigqJiUkX0MzR0YoLSUkY29zR0Y3RihGKComJSRfQzRHRigtRj42IywkRjhGLkYoRig=</Equation></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiMvLSYlInlHNiMiIiM2IyUieEcsLCoqIiIlISIiJSZiZXRhMkchIiUlJEVKMkdGLiUjcTJHIiIiRi4qJiUkX0MxR0YzLSUkZXhwRzYjKihGKCNGM0YoRi9GM0YqRjNGM0YzKiYlJF9DMkdGMy0lJHNpbkdGOEYzRjMqJiUkX0MzR0YzLSUkY29zR0Y4RjNGMyomJSRfQzRHRjMtRjc2IywkRjlGLkYzRjM=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">dsolve(de3,y[3](x)); assign(%);</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiMvLSYlInlHNiMiIiQ2IyUieEcsLCoqIiIlISIiJSZiZXRhM0chIiUlJEVKM0dGLiUjcTNHIiIiRi4qJiUkX0MxR0YzLSUkY29zRzYjKigiIiMjRjNGOkYvRjNGKkYzRjNGMyomJSRfQzJHRjMtJSRzaW5HRjhGM0YzKiYlJF9DM0dGMy0lJGV4cEdGOEYzRjMqJiUkX0M0R0YzLUZDNiMsJEY5Ri5GM0Yz</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">We introduce the constants  _C5 .. _C8 instead of  _C1 .. _C4 to define y2(x) as well as the constants  _C9 .. _C12  instead of  _C1 .. _C4 for the needs of y3(x) </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">y[2](x):=subs(_C1=_C5,_C2=_C6,_C3=_C7,_C4=_C8,y[2](x)); </Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+LSYlInlHNiMiIiM2IyUieEcsLCoqIiIlISIiJSZiZXRhMkchIiUlJEVKMkdGLiUjcTJHIiIiRi4qJiUkX0M1R0YzLSUkZXhwRzYjKihGKCNGM0YoRi9GM0YqRjNGM0YzKiYlJF9DNkdGMy0lJHNpbkdGOEYzRjMqJiUkX0M3R0YzLSUkY29zR0Y4RjNGMyomJSRfQzhHRjMtRjc2IywkRjlGLkYzRjM=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">y[3](x):=subs(_C1=_C9,_C2=_C10,_C3=_C11,_C4=_C12,y[3](x));</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+LSYlInlHNiMiIiQ2IyUieEcsLCoqIiIlISIiJSZiZXRhM0chIiUlJEVKM0dGLiUjcTNHIiIiRi4qJiUkX0M5R0YzLSUkY29zRzYjKigiIiMjRjNGOkYvRjNGKkYzRjNGMyomJSVfQzEwR0YzLSUkc2luR0Y4RjNGMyomJSVfQzExR0YzLSUkZXhwR0Y4RjNGMyomJSVfQzEyR0YzLUZDNiMsJEY5Ri5GM0Yz</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">Let us introduce the boundary conditions for the left edge of the beam typical for the free support in the direction perpendicular to its length </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc1:=simplify(subs(x=0,y[1](x)=0)); </Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRiYzFHLywkKiYjIiIiIiIlRikqKCwsJSNxMUchIiIqLEYqRiklJF9DMUdGKS0lJHNpbkc2IyIiIUYpKSUmYmV0YTFHRipGKSUkRUoxR0YpRikqKkYqRiklJF9DMkdGKUY1RilGN0YpRikqLEYqRiklJF9DM0dGKS0lJGNvc0dGM0YpRjVGKUY3RilGKSoqRipGKSUkX0M0R0YpRjVGKUY3RilGKUYpRjYhIiVGN0YuRilGKUY0</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc2:=simplify(subs(x=0,diff(y[1](x),x$2))=0);</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRiYzJHLywkKigiIiMiIiIpJSZiZXRhMUdGKEYpLCoqJiUkX0MxR0YpLSUkc2luRzYjIiIhRilGKSUkX0MyRyEiIiomJSRfQzNHRiktJSRjb3NHRjFGKUYpJSRfQzRHRjRGKUY0RjI=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">and, further, the boundary conditions for the right edge of the beam - the same as before (free end)</Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc3:=simplify(subs(x=L,diff(y[3](x),x$2))=0);</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRiYzNHLywkKigiIiMiIiIpJSZiZXRhM0dGKEYpLCoqJiUkX0M5R0YpLSUkY29zRzYjKihGKCNGKUYoRitGKSUiTEdGKUYpRikqJiUlX0MxMEdGKS0lJHNpbkdGMUYpRikqJiUlX0MxMUdGKS0lJGV4cEdGMUYpISIiKiYlJV9DMTJHRiktRjw2IywkRjJGPUYpRj1GKUY9IiIh</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc4:=simplify(subs(x=L,diff(y[3](x),x$3))=0);</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM+JSRiYzRHLywkKioiIiMiIiJGKCNGKUYoKSUmYmV0YTNHIiIkRiksKiomJSRfQzlHRiktJSRzaW5HNiMqKEYoRipGLEYpJSJMR0YpRikhIiIqJiUlX0MxMEdGKS0lJGNvc0dGM0YpRikqJiUlX0MxMUdGKS0lJGV4cEdGM0YpRjYqJiUlX0MxMkdGKS1GPjYjLCRGNEY2RilGKUYpRjYiIiE=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">Let us introduce all the continuity conditions connecting the deflection functions y1 and y2 for x=L as well as y2 and y3 for x=2L </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc5:=simplify(subs(x=L1,y[1](x))-subs(x=L1,y[2](x))=0);</Text-field></Input><Output><Text-field layout="Maple Output12" style="2D Output"><Equation style="2D Output">NiM+JSRiYzVHLywkKiYjIiIiIiIlRikqLCw2KiglI3ExR0YpKSUmYmV0YTJHRipGKSUkRUoyR0YpISIiKjBGKkYpJSRfQzFHRiktJSRzaW5HNiMqKCIiIyNGKUY5JSZiZXRhMUdGKSUjTDFHRilGKSlGO0YqRiklJEVKMUdGKUYvRilGMUYpRikqMEYqRiklJF9DMkdGKS0lJGV4cEdGN0YpRj1GKUY+RilGL0YpRjFGKUYpKjBGKkYpJSRfQzNHRiktJSRjb3NHRjdGKUY9RilGPkYpRi9GKUYxRilGKSowRipGKSUkX0M0R0YpLUZCNiMsJEY4RjJGKUY9RilGPkYpRi9GKUYxRilGKSooJSNxMkdGKUY9RilGPkYpRikqMEYqRiklJF9DNUdGKS1GQjYjKihGOUY6RjBGKUY8RilGKUY9RilGPkYpRi9GKUYxRilGMiowRipGKSUkX0M2R0YpLUY2RlFGKUY9RilGPkYpRi9GKUYxRilGMiowRipGKSUkX0M3R0YpLUZGRlFGKUY9RilGPkYpRi9GKUYxRilGMiowRipGKSUkX0M4R0YpLUZCNiMsJEZSRjJGKUY9RilGPkYpRi9GKUYxRilGMkYpRjshIiVGPkYyRjBGaG5GMUYyRilGKSIiIQ==</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc6:=simplify(subs(x=L1,diff(y[1](x),x))-subs(x=L1,diff(y[2](x),x))=0);</Text-field></Input><Output><Text-field layout="Maple Output12" style="2D Output"><Equation style="2D Output">NiM+JSRiYzZHLywkKiYiIiMjIiIiRigsMiooJSRfQzFHRiotJSRjb3NHNiMqKEYoRiklJmJldGExR0YqJSNMMUdGKkYqRjJGKiEiIiooJSRfQzJHRipGMkYqLSUkZXhwR0YwRipGNCooJSRfQzNHRiotJSRzaW5HRjBGKkYyRipGKiooJSRfQzRHRipGMkYqLUY4NiMsJEYxRjRGKkYqKiglJF9DNUdGKiUmYmV0YTJHRiotRjg2IyooRihGKUZERipGM0YqRipGKiooJSRfQzZHRiotRi9GRkYqRkRGKkYqKiglJF9DN0dGKi1GPEZGRipGREYqRjQqKCUkX0M4R0YqRkRGKi1GODYjLCRGR0Y0RipGNEYqRjQiIiE=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc7:=simplify(subs(x=L1,EJ1*diff(y[1](x),x$2))-subs(x=L1,EJ2*diff(y[2](x),x$2))=0);</Text-field></Input><Output><Text-field layout="Maple Output12" style="2D Output"><Equation style="2D Output">NiM+JSRiYzdHLywyKiwiIiMiIiIlJEVKMUdGKSUkX0MxR0YpLSUkc2luRzYjKihGKCNGKUYoJSZiZXRhMUdGKSUjTDFHRilGKSlGMUYoRikhIiIqLEYoRilGKkYpJSRfQzJHRilGM0YpLSUkZXhwR0YuRilGKSosRihGKUYqRiklJF9DM0dGKS0lJGNvc0dGLkYpRjNGKUY0KixGKEYpRipGKSUkX0M0R0YpRjNGKS1GODYjLCRGL0Y0RilGKSosRihGKSUkRUoyR0YpJSRfQzVHRikpJSZiZXRhMkdGKEYpLUY4NiMqKEYoRjBGRkYpRjJGKUYpRjQqLEYoRilGQ0YpJSRfQzZHRiktRi1GSEYpRkVGKUYpKixGKEYpRkNGKSUkX0M3R0YpLUY8RkhGKUZFRilGKSosRihGKUZDRiklJF9DOEdGKUZFRiktRjg2IywkRklGNEYpRjQiIiE=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc8:=simplify(subs(x=L1,EJ1*diff(y[1](x),x$3))-subs(x=L1,EJ2*diff(y[2](x),x$3))=P);</Text-field></Input><Output><Text-field layout="Maple Output12" style="2D Output"><Equation style="2D Output">NiM+JSRiYzhHLywkKigiIiMiIiJGKCNGKUYoLDIqKiUkRUoxR0YpJSRfQzFHRiktJSRjb3NHNiMqKEYoRiolJmJldGExR0YpJSNMMUdGKUYpKUYzIiIkRilGKSoqRi1GKSUkX0MyR0YpRjVGKS0lJGV4cEdGMUYpISIiKipGLUYpJSRfQzNHRiktJSRzaW5HRjFGKUY1RilGOyoqRi1GKSUkX0M0R0YpRjVGKS1GOjYjLCRGMkY7RilGKSoqJSRFSjJHRiklJF9DNUdGKSklJmJldGEyR0Y2RiktRjo2IyooRihGKkZJRilGNEYpRilGKSoqRkZGKSUkX0M2R0YpLUYwRktGKUZIRilGOyoqRkZGKSUkX0M3R0YpLUY/RktGKUZIRilGKSoqRkZGKSUkX0M4R0YpRkhGKS1GOjYjLCRGTEY7RilGO0YpRjslIlBH</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc9:=simplify(subs(x=L21,y[2](x))-subs(x=L21,y[3](x))=0);</Text-field></Input><Output><Text-field layout="Maple Output12" style="2D Output"><Equation style="2D Output">NiM+JSRiYzlHLywkKiYjIiIiIiIlRikqLCw2KiglI3EyR0YpKSUmYmV0YTNHRipGKSUkRUozR0YpISIiKjBGKkYpJSRfQzVHRiktJSRleHBHNiMqKCIiIyNGKUY5JSZiZXRhMkdGKSUkTDIxR0YpRikpRjtGKkYpJSRFSjJHRilGL0YpRjFGKUYpKjBGKkYpJSRfQzZHRiktJSRzaW5HRjdGKUY9RilGPkYpRi9GKUYxRilGKSowRipGKSUkX0M3R0YpLSUkY29zR0Y3RilGPUYpRj5GKUYvRilGMUYpRikqMEYqRiklJF9DOEdGKS1GNjYjLCRGOEYyRilGPUYpRj5GKUYvRilGMUYpRikqKCUjcTNHRilGPUYpRj5GKUYpKjBGKkYpJSRfQzlHRiktRkY2IyooRjlGOkYwRilGPEYpRilGPUYpRj5GKUYvRilGMUYpRjIqMEYqRiklJV9DMTBHRiktRkJGUUYpRj1GKUY+RilGL0YpRjFGKUYyKjBGKkYpJSVfQzExR0YpLUY2RlFGKUY9RilGPkYpRi9GKUYxRilGMiowRipGKSUlX0MxMkdGKS1GNjYjLCRGUkYyRilGPUYpRj5GKUYvRilGMUYpRjJGKUY7ISIlRj5GMkYwRmhuRjFGMkYpRikiIiE=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc10:=simplify(subs(x=L21,diff(y[2](x),x))-subs(x=L21,diff(y[3](x),x))=0);</Text-field></Input><Output><Text-field layout="Maple Output12" style="2D Output"><Equation style="2D Output">NiM+JSViYzEwRy8sJComIiIjIyIiIkYoLDIqKCUkX0M1R0YqJSZiZXRhMkdGKi0lJGV4cEc2IyooRihGKUYuRiolJEwyMUdGKkYqISIiKiglJF9DNkdGKi0lJGNvc0dGMUYqRi5GKkY0KiglJF9DN0dGKi0lJHNpbkdGMUYqRi5GKkYqKiglJF9DOEdGKkYuRiotRjA2IywkRjJGNEYqRioqKCUkX0M5R0YqLUY8NiMqKEYoRiklJmJldGEzR0YqRjNGKkYqRkdGKkY0KiglJV9DMTBHRiotRjhGRUYqRkdGKkYqKiglJV9DMTFHRipGR0YqLUYwRkVGKkYqKiglJV9DMTJHRipGR0YqLUYwNiMsJEZGRjRGKkY0RipGNCIiIQ==</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc11:=simplify(subs(x=L21,EJ2*diff(y[2](x),x$2))-subs(x=L21,EJ3*diff(y[3](x),x$2))=M);</Text-field></Input><Output><Text-field layout="Maple Output12" style="2D Output"><Equation style="2D Output">NiM+JSViYzExRy8sMiosIiIjIiIiJSRFSjJHRiklJF9DNUdGKSklJmJldGEyR0YoRiktJSRleHBHNiMqKEYoI0YpRihGLUYpJSRMMjFHRilGKUYpKixGKEYpRipGKSUkX0M2R0YpLSUkc2luR0YwRilGLEYpISIiKixGKEYpRipGKSUkX0M3R0YpLSUkY29zR0YwRilGLEYpRjgqLEYoRilGKkYpJSRfQzhHRilGLEYpLUYvNiMsJEYxRjhGKUYpKixGKEYpJSRFSjNHRiklJF9DOUdGKS1GPDYjKihGKEYyJSZiZXRhM0dGKUYzRilGKSlGSEYoRilGKSosRihGKUZDRiklJV9DMTBHRiktRjdGRkYpRklGKUYpKixGKEYpRkNGKSUlX0MxMUdGKUZJRiktRi9GRkYpRjgqLEYoRilGQ0YpJSVfQzEyR0YpRklGKS1GLzYjLCRGR0Y4RilGOCUiTUc=</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">bc12:=simplify(subs(x=L21,EJ2*diff(y[2](x),x$3))-subs(x=L21,EJ3*diff(y[3](x),x$3))=0);</Text-field></Input><Output><Text-field layout="Maple Output12" style="2D Output"><Equation style="2D Output">NiM+JSViYzEyRy8sJCooIiIjIiIiRigjRilGKCwyKiolJEVKMkdGKSUkX0M1R0YpKSUmYmV0YTJHIiIkRiktJSRleHBHNiMqKEYoRipGMEYpJSRMMjFHRilGKSEiIioqRi1GKSUkX0M2R0YpLSUkY29zR0Y0RilGL0YpRikqKkYtRiklJF9DN0dGKS0lJHNpbkdGNEYpRi9GKUY3KipGLUYpJSRfQzhHRilGL0YpLUYzNiMsJEY1RjdGKUYpKiolJEVKM0dGKSUkX0M5R0YpLUY/NiMqKEYoRiolJmJldGEzR0YpRjZGKUYpKUZLRjFGKUYpKipGRkYpJSVfQzEwR0YpLUY7RklGKUZMRilGNyoqRkZGKSUlX0MxMUdGKUZMRiktRjNGSUYpRikqKkZGRiklJV9DMTJHRilGTEYpLUYzNiMsJEZKRjdGKUY3RilGNyIiIQ==</Equation></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">We need to introduce the specific values of the beam parameters like k, m, EJ, L in each interval separately before the final graphs can be made. </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">k1:=10: q1:=10: EJ1:=2000: L1:=5: beta1:=sqrt(sqrt(k1/4/EJ1)): k2:=10: q2:=0: EJ2:=210: L2:=6: beta2:=sqrt(sqrt(k2/4/EJ2)): k3:=10: q3:=0: EJ3:=300: L3:=4: beta3:=sqrt(sqrt(k3/4/EJ3)): P:=100.0: M:=10.0: L:=L1+L2+L3: L21:=L1+L2: </Text-field></Input></Group><Group><Input><Text-field layout="Normal" prompt="&gt; " style="Maple Input">evalf(bc1): evalf(bc2): evalf(bc3): evalf(bc4): evalf(bc5): evalf(bc6): evalf(bc7): evalf(bc8): evalf(bc9): evalf(bc10): evalf(bc11): evalf(bc12):</Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Normal">Let us determine all integration constants for our problem as a solution for the boundary conditions applied  </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">fsolve({bc1,bc2,bc3,bc4,bc5,bc6,bc7,bc8,bc9,bc10,bc11,bc12},{_C1,_C2,_C3,_C4,_C5,_C6,_C7,_C8,_C9,_C10,_C11,_C12}): assign(%):</Text-field><Text-field layout="Normal" style="Normal">We simplify the deflections functions in each interval of the beam. There holds  </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">simplify(y[1](x)): simplify(y[2](x)): simplify(y[3](x)): </Text-field><Text-field layout="Normal" style="Normal">The graph of the beam deflections - everyone must remember that the real deflection is directed downwards - in opposite direction to that visualized on this graph</Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">y1:=y[1](x): y2:=y[2](x): y3:=y[3](x): deflection:=piecewise(x&lt;L,y1,x&lt;L1+L2,y2,x&lt;L,y3): fmax:=Maximize(deflection,x=0..L): evalf(fmax); fmin:=Minimize(deflection,x=0..L): evalf(fmin); plot(deflection,x=0..L, title=`Deflection of the beam`,axes=boxed);  </Text-field><Text-field layout="Normal" style="Normal">The graph of the slope along the beam </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">y1:=diff(y[1](x),x): y2:=diff(y[2](x),x): y3:=diff(y[3](x),x): Slope:=piecewise(x&lt;L1,y1,x&lt;L1+L2,y2,x&lt;L,y3):</Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">p1:=plot(Slope,x=0..L, title=`Slope of the beam`,axes=boxed): p2:=plot(0,x=0..L,axes=boxed,colour=black): display({p1,p2}); </Text-field><Text-field layout="Normal" style="Normal">The graph of the bending moment  </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">y1:=-EJ1*diff(y[1](x),x$2): y2:=-EJ2*diff(y[2](x),x$2): y3:=-EJ3*diff(y[3](x),x$2): moment:=piecewise(x&lt;L1,y1,x&lt;L1+L2,y2,x&lt;L,y3): Mmax:=Maximize(moment,x=0..L): evalf(Mmax); Mmin:=Minimize(moment,x=0..L): evalf(Mmin); p1:=plot(moment,x=0..L, title=`Bending moment`,axes=boxed): p2:=plot(0,x=0..L,axes=boxed,colour=black): display({p1,p2}); </Text-field><Text-field layout="Normal" style="Normal">Finally, we make the graph of the shear force </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">y1:=-EJ1*diff(y[1](x),x$3): y2:=-EJ2*diff(y[2](x),x$3): y3:=-EJ3*diff(y[3](x),x$3): shear:=piecewise(x&lt;L1,y1,x&lt;L1+L2,y2,x&lt;L,y3): Tmax:=Maximize(shear,x=0..L): evalf(Tmax); Tmin:=Minimize(shear,x=0..L): evalf(Tmin); </Text-field><Text-field layout="Normal" prompt="&gt; " style="Maple Input">p1:=plot(shear,x=0..L, title=`Shear force in the beam`,axes=boxed): p2:=plot(0,x=0..L,axes=boxed,colour=black): display({p1,p2});</Text-field></Input><Output><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQiKyM9OU4yIiEiKTcjLyUieEckIisqKioqKioqXCJGJg==</Equation></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQiKzI0SjdDISM+NyMvJSJ4RyQiK1IiSChRNyEjPA==</Equation></Text-field><Text-field layout="Maple Plot" style="Maple Plot"><Plot height="488" plot-scale="1.0" plot-xtrans="0.0" plot-ytrans="0.0" type="two-dimensional" width="488">LSUlUExPVEc2LC0lJ0NVUlZFU0c2JDdnbjckJCIiIUYrJCEzcyN5REo3OjZiJiEjTTckJCIzJykqKioqKlw3dCZwSyEjPSQiMy8saEVBdmxdaiEjPzckJCIzJCoqKipcKD03VDloRjIkIjNhZXdGJTNwNz0iISM+NyQkIjNYKioqKlwoPUhQSipGMiQiMy9RXSF5Y2RkeSJGOzckJCIzOysrREphVWA3ISM8JCIzYyZmMTNSJCpmUSNGOzckJCIzKSoqKlxQJUdaUmQiRkQkIjNtXXRLKXBlRSlIRjs3JCQiMyUpKipcKD0yNzYoPUZEJCIzJ1FKUVxXdGphJEY7NyQkIjMnKioqXChvKiozKXlARkQkIjNxMSZSVUcvbDolRjs3JCQiMy8rXShvZkhxXCNGRCQiMylSdGZlPmB2JFtGOzckJCIzLitdUGYnSFUiR0ZEJCIzdyk0SiRIInlZZiZGOzckJCIzMysrXTcqMzA5JEZEJCIzIUdfIipSQEMqKlsnRjs3JCQiMzorK0RjZSp5VSRGRCQiMyxAO0NTYT00dUY7NyQkIjM7KytdKFtEOXYkRkQkIjNgU2gwa1ImR2opRjs3JCQiM2MqKioqXGlOR3dTRkQkIjNqYWREODxMNjVGMjckJCIzNysrXTdYTSpRJUZEJCIzeXEhKilwKT1NJD0iRjI3JCQiMy8rXShvJVFqdFlGRCQiM3djQW1lNlNwOEYyNyQkIjMyKytdaThvNl1GRCQiMyZIKm9OVndQTTtGMjckJCIzaSoqKioqKlw+MClIJkZEJCIzNUkwaHgwMS0+RjI3JCQiM1kqKlwoPS1wNmomRkQkIjNTOkteeC1EckFGMjckJCIzZCoqKioqXDJNZyNmRkQkIjNlb2tzWS1EZEVGMjckJCIzNStdKD14WiZcaUZEJCIzJ28qKT55a2dOOiRGMjckJCIzOytdaTokNHdiJ0ZEJCIzOW5iKVE2XGZxJEYyNyQkIjMtKyt2PSNSIXpvRkQkIjNNTFs2eCxhdlZGMjckJCIzcStdUDRBQHVyRkQkIjMxOCZcVio+JlEzJkYyNyQkIjNJKytEY2hmI1woRkQkIjNrWmYkUmJ5ImZmRjI3JCQiMykpKipcKG9mMkwjeUZEJCIzY15JKD4pSHoucUYyNyQkIjNNKipcN3lHPjYiKUZEJCIzLF9TXSFmLnAuKUYyNyQkIjN3Kyt2b282QSUpRkQkIjMpeVlaJDRicyVIKkYyNyQkIjNxKioqKipceEpMdSlGRCQiM3EyQjYjKipmajIiRkQ3JCQiM1crK3YkKnlkZCEqRkQkIjMvVVJ3QV9HUTdGRDckJCIzIyoqKlwoPTxGO08qRkQkIjNsKD46JVEjcE9UIkZENyQkIjM1KioqXGkwQSMqcCpGRCQiM04kcHVJUzg+aiJGRDckJCIzKikqKioqXDJtRCs1ISM7JCIzTUN5X3hCJzQmPUZENyQkIjMqKioqKlxpMFhFLiJGW3YkIjNca3khSEJENDYjRkQ3JCQiMyUqKlwoby9RKj4xIkZbdiQiM1FvMjNHJ287UCNGRDckJCIzPSsrdlEoelM0IkZbdiQiM21RLEhSW1InbyNGRDckJCIzKioqXCg9LSxGQzZGW3YkIjM9JT5pIlEsNDhJRkQ3JCQiMzMrdiQ0dEZlOiJGW3YkIjNbNnI4aWwkKSlRJEZENyQkIjMhKioqKlw3MyJvJz0iRlt2JCIzbS1XW0gxdiN6JEZENyQkIjMtK3ZvejspKj03Rlt2JCIzY1NXKnAkUVtkVUZENyQkIjMxKysrJio0NF03Rlt2JCIzaysqUj0zTSlbWkZENyQkIjM1K103alohPkciRlt2JCIzXXBXIkdgRCQqSCZGRDckJCIzNCt2PSg0Yk1KIkZbdiQiMyNvNl0lUlYyKCplRkQ3JCQiMzsrK114bFdVOEZbdiQiMzdaUGdUYlQmXCdGRDckJCIzOStdaSYzdWNQIkZbdiQiMyJRbDJkcTdPQyhGRDckJCIzIioqKioqKlw7JFIwOUZbdiQiM3NCIzQzRFVQKHpGRDckJCIzOCt2PS0qenFWIkZbdiQiM1EmKnk1Pl90PykpRkQ3JCQiMzUrK11GU0NfOUZbdiQiM2kiekolKTRFRkQqRkQ3JCQiMzMrRCJHOjN1WSJGW3YkIjNVOEknUT93R3EqRkQ3JCQiMzF2JDRZNmNiWiJGW3YkIjMxQyp5JjNNXF8qKkZENyQkIjMvXWlTd1NxJFsiRlt2JCIzXSNHYS9vbTItIkZbdjckJCIzYShvL3QweXhbIkZbdiQiM11oIkgpcHN0TDVGW3Y3JCQiMy1ESj9RPyY9XCJGW3YkIjNfdVJgcDUmby8iRlt2NyQkIjMnUU1fJ0chKilRXCJGW3YkIjMhb1Q9NzhpTTAiRlt2NyQkIjNfaTo1PmcjZlwiRlt2JCIza2tJK1omNCwxIkZbdjckJCIzIz48RVZeV3BcIkZbdiQiMyE+VlBkJXBXajVGW3Y3JCQiMzsieV0mNEknelwiRlt2JCIzNUtveS1Oem01Rlt2NyQkIjNlIVJ2Wl0iKSopXCJGW3YkIjNJO1phVCNcLDIiRlt2NyQkIiM6RitGKi0lJkNPTE9SRzYmJSRSR0JHJCIjNSEiIiRGK0ZkXmxGZV5sLSUmVElUTEVHNiNRN0RlZmxlY3Rpb25+b2Z+dGhlfmJlYW02Ii0lKkFYRVNTVFlMRUc2IyUkQk9YRy0lK0FYRVNMQUJFTFNHNiRRInhGal5sUSFGal5sLUZfXmw2IyUlTk9ORUctJSVWSUVXRzYkO0ZlXmxGXF5sOyQhMkdWKjMkWylIU0BGRCQiMjFodmpBXzo0IiEjOi0lKkdSSURTVFlMRUc2IyUsUkVDVEFOR1VMQVJHLSUsT1JJRU5UQVRJT05HNiQkIiNYRitGaGBsLSUqTElORVNUWUxFRzYjRistJStQUk9KRUNUSU9ORzYjRmJebA==</Plot></Text-field><Text-field layout="Maple Plot" style="Maple Plot"><Plot height="488" plot-scale="1.0" plot-xtrans="0.0" plot-ytrans="0.0" type="two-dimensional" width="488">LSUlUExPVEc2LS0lJ0NVUlZFU0c2JDdTNyQkIiIhRitGKjckJCIzJykqKioqKlw3dCZwSyEjPUYqNyQkIjMkKioqKlwoPTdUOWhGL0YqNyQkIjNYKioqKlwoPUhQSipGL0YqNyQkIjM7KytESmFVYDchIzxGKjckJCIzKSoqKlxQJUdaUmQiRjlGKjckJCIzJSkqKlwoPTI3Nig9RjlGKjckJCIzJyoqKlwobyoqMyl5QEY5Rio3JCQiMy8rXShvZkhxXCNGOUYqNyQkIjMuK11QZidIVSJHRjlGKjckJCIzMysrXTcqMzA5JEY5Rio3JCQiMzorK0RjZSp5VSRGOUYqNyQkIjM7KytdKFtEOXYkRjlGKjckJCIzYyoqKipcaU5Hd1NGOUYqNyQkIjM3KytdN1hNKlElRjlGKjckJCIzLytdKG8lUWp0WUY5Rio3JCQiMzIrK11pOG82XUY5Rio3JCQiM2kqKioqKipcPjApSCZGOUYqNyQkIjNZKipcKD0tcDZqJkY5Rio3JCQiM2QqKioqKlwyTWcjZkY5Rio3JCQiMzUrXSg9eFomXGlGOUYqNyQkIjM7K11pOiQ0d2InRjlGKjckJCIzLSsrdj0jUiF6b0Y5Rio3JCQiM3ErXVA0QUB1ckY5Rio3JCQiM0krK0RjaGYjXChGOUYqNyQkIjMpKSoqXChvZjJMI3lGOUYqNyQkIjNNKipcN3lHPjYiKUY5Rio3JCQiM3crK3ZvbzZBJSlGOUYqNyQkIjNxKioqKipceEpMdSlGOUYqNyQkIjNXKyt2JCp5ZGQhKkY5Rio3JCQiMyMqKipcKD08RjtPKkY5Rio3JCQiMzUqKipcaTBBIypwKkY5Rio3JCQiMyopKioqKlwybUQrNSEjO0YqNyQkIjMqKioqKlxpMFhFLiJGaHFGKjckJCIzJSoqXChvL1EqPjEiRmhxRio3JCQiMz0rK3ZRKHpTNCJGaHFGKjckJCIzKioqXCg9LSxGQzZGaHFGKjckJCIzMyt2JDR0RmU6IkZocUYqNyQkIjMhKioqKlw3MyJvJz0iRmhxRio3JCQiMy0rdm96OykqPTdGaHFGKjckJCIzMSsrKyYqNDRdN0ZocUYqNyQkIjM1K103alohPkciRmhxRio3JCQiMzQrdj0oNGJNSiJGaHFGKjckJCIzOysrXXhsV1U4RmhxRio3JCQiMzkrXWkmM3VjUCJGaHFGKjckJCIzIioqKioqKlw7JFIwOUZocUYqNyQkIjM4K3Y9LSp6cVYiRmhxRio3JCQiMzMrRCJHOjN1WSJGaHFGKjckJCIjOkYrRiotJSZDT0xPUkc2JiUkUkdCRyRGKyEiIkZddUZddS1GJjYkN11vNyRGKiQiM1EjSGdbLjR1JT4hIz43JEYtJCIzZyVmPUQmUidIJD5GZXU3JEYxJCIzbW92aDVXejA+RmV1NyRGNCQiM0s1JzM1K19UKD1GZXU3JEY3JCIzbWplJkdKUnQmPUZldTckRjskIjMrbGwnSGxfQyg9RmV1NyRGPiQiM09kdiZ5PDAnSD5GZXU3JEZBJCIzSy9RInlGWHQvI0ZldTckRkQkIjNPWTQ/InkpcFpBRmV1NyRGRyQiM2kmKlEjZmcoW1ZERmV1NyRGSiQiM3FhXEg0J0diJ0hGZXU3JEZNJCIzK2I4XVtmcV1NRmV1NyRGUCQiMyJbOjVENlswOSVGZXU3JEZTJCIzcHFxZlliMC9dRmV1NyRGViQiMyttbWk0Vm46Z0ZldTckRlkkIjN6eipHbVQyOTUoRmV1NyQkIjMxK3ZvL3dsVVtGOSQiMzw0bngmZUB5I3lGZXU3JEZmbiQiMyU9LVNBXyo0KTQqRmV1NyQkIjNJKytEY20nWzomRjkkIjM7TjhpYTVrUjpGLzckRmluJCIzcStcTGIlPXU2I0YvNyRGXG8kIjMpKmZDNGtueGhLRi83JEZfbyQiMypmMWRfUSFbV1NGLzckRmJvJCIzd1c2NUdLeWZZRi83JCQiMzgrK3ZWJnlOUydGOSQiM2ElUkkweTBgJ1tGLzckRmVvJCIzVFslPSZbdHc6XUYvNyQkIjNrKlwoPW5VSz1uRjkkIjNaMyNIIUhISTpeRi83JEZobyQiMyF6KzpRIUdnZF5GLzckJCIzIjNdaVNyRG0tKEY5JCIzU09VW14lPnU5JkYvNyRGW3AkIjNrVXRDMDFyIjQmRi83JCQiMyY0XTdHPS9NTChGOSQiM3NlKTQ6by9CKVxGLzckRl5wJCIzYyEqcGomNCRwQltGLzckRmFwJCIzISk+QWFNJD1sTSVGLzckRmRwJCIzLTIoeTU9LUZ5JEYvNyRGZ3AkIjMqUmtaQCo0YFBJRi83JEZqcCQiMy8zMD9lM0pUQEYvNyRGXXEkIjN3SjYtXmcyazZGLzckRmBxJCIzM29XJlEvLj5aIkZldTckRmNxJCEzNDlqY29mSE81Ri83JEZmcSQhMy0iXHc1dTpRNyNGLzckRmpxJCEzZ0I9UiJHd1VHJEYvNyRGXXIkITMzaSxleFYwOVZGLzckRmByJCEzVW8heSpSUUElUiZGLzckRmNyJCEzSkAnUXJhI3kraUYvNyRGZnIkITNbKXBSZVshKm8lcEYvNyRGaXIkITNvY0QiNEEyKTR3Ri83JEZccyQhM1VyKyVIdXNbQSlGLzckRl9zJCEzNVcjKTNrUENOKClGLzckRmJzJCEzdUsqb0NPeTM8KkYvNyRGZXMkITM7Jil6JEgjZWU7JipGLzckRmhzJCEzTVFXI2ZZIiozdypGLzckRlt0JCEzKUcrOToiKSllZyoqRi83JEZedCQhM09FLj5lS1syNUY5NyRGYXQkITNOMSlRZnpyVCwiRjk3JCQiMzUrK11GU0NfOUZocSQhMyxNUSdIMzFlLCJGOTckRmR0JCEzNFRiaHdJcDs1Rjk3JCQiMzF2JDRZNmNiWiJGaHEkITN2Zl1bTm0kcCwiRjk3JCQiMy9daVN3U3EkWyJGaHEkITMhbypHT2FLMTw1Rjk3JCQiM2Eoby90MHl4WyJGaHEkITNeL1U/IVElNDw1Rjk3JCQiMy1ESj9RPyY9XCJGaHEkITNNTDRdZy82PDVGOTckJCIzJ1FNXydHISopUVwiRmhxJCEzck40eiRSOXIsIkY5NyQkIjNfaTo1PmcjZlwiRmhxJCEzIyo9VGo+azY8NUY5NyQkIjMjPjxFVl5XcFwiRmhxJCEzY2lTJlIicDY8NUY5NyQkIjM7InldJjRJJ3pcIkZocSQhMy5VNTxvcjY8NUY5NyQkIjNlIVJ2Wl0iKSopXCJGaHEkITN4InBrPkU8ciwiRjlGZnQtRmp0NiZGXHUkIiM1Rl51Rl11Rl11LSUmVElUTEVHNiNRMlNsb3Blfm9mfnRoZX5iZWFtNiItJSpBWEVTU1RZTEVHNiMlJEJPWEctJStBWEVTTEFCRUxTRzYnUSJ4RltkbFEhRltkbC0lJUZPTlRHNiQlKkhFTFZFVElDQUdGZmNsJStIT1JJWk9OVEFMR0ZpZGwtRmp0NiMlJU5PTkVHLSUlVklFV0c2JDtGXXVGZ3Q7JCEyY2g2RyJbeFo1RmhxJCIxW1VHNyR5VFkmRmhxLSUqR1JJRFNUWUxFRzYjJSxSRUNUQU5HVUxBUkctJSxPUklFTlRBVElPTkc2JCQiI1hGK0ZdZmwtJSpMSU5FU1RZTEVHNiNGKy0lK1BST0pFQ1RJT05HNiNGZWNs</Plot></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQiKydIVExiKCEiKTcjLyUieEckIitFRl8qKioqISIq</Equation></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQhKy9nIUdvKiEiKTcjLyUieEckIissKysrXSEiKg==</Equation></Text-field><Text-field layout="Maple Plot" style="Maple Plot"><Plot height="488" plot-scale="1.0" plot-xtrans="0.0" plot-ytrans="0.0" type="two-dimensional" width="488">LSUlUExPVEc2LS0lJ0NVUlZFU0c2JDdTNyQkIiIhRitGKjckJCIzJykqKioqKlw3dCZwSyEjPUYqNyQkIjMkKioqKlwoPTdUOWhGL0YqNyQkIjNYKioqKlwoPUhQSipGL0YqNyQkIjM7KytESmFVYDchIzxGKjckJCIzKSoqKlxQJUdaUmQiRjlGKjckJCIzJSkqKlwoPTI3Nig9RjlGKjckJCIzJyoqKlwobyoqMyl5QEY5Rio3JCQiMy8rXShvZkhxXCNGOUYqNyQkIjMuK11QZidIVSJHRjlGKjckJCIzMysrXTcqMzA5JEY5Rio3JCQiMzorK0RjZSp5VSRGOUYqNyQkIjM7KytdKFtEOXYkRjlGKjckJCIzYyoqKipcaU5Hd1NGOUYqNyQkIjM3KytdN1hNKlElRjlGKjckJCIzLytdKG8lUWp0WUY5Rio3JCQiMzIrK11pOG82XUY5Rio3JCQiM2kqKioqKipcPjApSCZGOUYqNyQkIjNZKipcKD0tcDZqJkY5Rio3JCQiM2QqKioqKlwyTWcjZkY5Rio3JCQiMzUrXSg9eFomXGlGOUYqNyQkIjM7K11pOiQ0d2InRjlGKjckJCIzLSsrdj0jUiF6b0Y5Rio3JCQiM3ErXVA0QUB1ckY5Rio3JCQiM0krK0RjaGYjXChGOUYqNyQkIjMpKSoqXChvZjJMI3lGOUYqNyQkIjNNKipcN3lHPjYiKUY5Rio3JCQiM3crK3ZvbzZBJSlGOUYqNyQkIjNxKioqKipceEpMdSlGOUYqNyQkIjNXKyt2JCp5ZGQhKkY5Rio3JCQiMyMqKipcKD08RjtPKkY5Rio3JCQiMzUqKipcaTBBIypwKkY5Rio3JCQiMyopKioqKlwybUQrNSEjO0YqNyQkIjMqKioqKlxpMFhFLiJGaHFGKjckJCIzJSoqXChvL1EqPjEiRmhxRio3JCQiMz0rK3ZRKHpTNCJGaHFGKjckJCIzKioqXCg9LSxGQzZGaHFGKjckJCIzMyt2JDR0RmU6IkZocUYqNyQkIjMhKioqKlw3MyJvJz0iRmhxRio3JCQiMy0rdm96OykqPTdGaHFGKjckJCIzMSsrKyYqNDRdN0ZocUYqNyQkIjM1K103alohPkciRmhxRio3JCQiMzQrdj0oNGJNSiJGaHFGKjckJCIzOysrXXhsV1U4RmhxRio3JCQiMzkrXWkmM3VjUCJGaHFGKjckJCIzIioqKioqKlw7JFIwOUZocUYqNyQkIjM4K3Y9LSp6cVYiRmhxRio3JCQiMzMrRCJHOjN1WSJGaHFGKjckJCIjOkYrRiotJSZDT0xPUkc2JiUkUkdCRyRGKyEiIkZddUZddS1GJjYkN2JvRik3JEYtJCIzQUclUT88eSUpZSJGOTckRjEkIjN1dkZTJSkpKWYmNCNGOTckRjQkIjN3Wlw1cCE+dW8iRjk3JEY3JCIzMU5dN1xSLlZBRi83JEY7JCEzI3lmJHA/VUAnRyNGOTckRj4kITMpZVtkZVcyKWViRjk3JEZBJCEzQ18xeCQ+VjUiKipGOTckRkQkITNJIVE6Q3hgXGEiRmhxNyRGRyQhM2Q9cUZFZG8tQUZocTckRkokITNtc2AnKik0NywqSEZocTckRk0kITNJQjUjZXVjdngkRmhxNyRGUCQhM0FeJCk+ZGRCcVpGaHE3JEZTJCEzZzMiR1hoQjkpZUZocTckRlYkITN1bklgQ2xAaXFGaHE3JEZZJCEzLGMnNFQnM1VIIylGaHE3JCQiMzErdm8vd2xVW0Y5JCEzOTBYKFFAU28nKilGaHE3JEZmbiQhM3VxbC85QUE/JypGaHE3JCQiM0krK0RjbSdbOiZGOSQhM09cJmVgYmdcJikpRmhxNyRGaW4kITNhSVJ1YGVVJDQpRmhxNyQkIjNhKlxQZls1WVkmRjkkITNSSDd4aiwqSEAoRmhxNyRGXG8kITNQRUReKikpWyVSakZocTckJCIzJyoqXFAlWzpneWRGOSQhMy1kdiY+UnRJZCZGaHE3JEZfbyQhMystaldXQ0g5W0ZocTckRmJvJCEzPU9mJSpvXTcjPSRGaHE3JEZlbyQhMy8xIVFkJ3owIm8iRmhxNyRGaG8kITNHLydmS0ghZWM9Rjk3JEZbcCQiM0QlcCJSa2RpNDZGaHE3JEZecCQiMzMhW3h0dyZcMkNGaHE3JEZhcCQiMzpUUkhyIzMpSE9GaHE3JEZkcCQiM0VDQmMmKltud1hGaHE3JEZncCQiM1soKmYjW1QkM2xhRmhxNyRGanAkIjMuLm0jW3VXZkEnRmhxNyRGXXEkIjNJInBbOFYmejJvRmhxNyRGYHEkIjNkNj0sQyJ5R0AoRmhxNyQkIjNUK0QxOVlVSSYqRjkkIjMnb0gkXDZxIipwdEZocTckRmNxJCIzbzgmSChSRWB5dUZocTckJCIzLSoqXGlsUyozJikqRjkkIjNudkEyUzw2TnZGaHE3JEZmcSQiM08oUSZ6KXBMTGIoRmhxNyQkIjMmKSoqXCg9JDNYOzVGaHEkIjMjUTY2WEQiPUp2RmhxNyRGanEkIjNxNXZEXmMxbnVGaHE3JCQiMycqXChvL1Y+dC8iRmhxJCIzS1heWCxpeXR0RmhxNyRGXXIkIjNBJFFLSHg2I1tzRmhxNyQkIjMxXSg9PHhPIXk1RmhxJCIzSy55YHIpKlt2cUZocTckRmByJCIzIVJQcllVKWZub0ZocTckJCIzIVElW1lPbSdmNCJGaHEkIjMsJylvajU8JDQlb0ZocTckJCIzZyhvelRgYHk0IkZocSQiM1MsJCkpPjw2USJvRmhxNyQkIjNnNHIuJClweik0IkZocSQiM24kUWQnbz0zK29GaHE3JCQiM1VKWCo9VlMoKjQiRmhxJCIzUyh6KWUlXFNpeSdGaHE3JCQiM0JgPnYhKVFvKzZGaHEkIjNtITNIIz12R3N4RmhxNyQkIjMvdiQ0J0h0aSw2RmhxJCIzW0Z3YzFNQWV4RmhxNyQkIjNsaSFSXTcsYTUiRmhxJCIzZlc1VyQzbDNxKEZocTckJCIzM10oby8jXDw0NkZocSQiM2lNW0c7bndUd0ZocTckJCIzN0QiRzheQW42IkZocSQiMyk0KmYxLFhaPXZGaHE3JEZjciQiM3lZN28vN2cpUShGaHE3JCQiMy4rRGM7KlsrOSJGaHEkIjNzRltcR3AqcDQoRmhxNyRGZnIkIjM3eltnIT0pSCF5J0ZocTckRmlyJCIzPzU5I1EmKnkoKTQnRmhxNyRGXHMkIjNMNjpkSF56O2BGaHE3JEZfcyQiM19BPyI0WGM+XyVGaHE3JEZicyQiM0MpUWpvclNQcCRGaHE3JEZlcyQiMzElZlNlJkdAJilHRmhxNyRGaHMkIjNbZSo0ISo9Wyh5QEZocTckRlt0JCIzTVk6Ryg0KT1WOUZocTckRl50JCIzbFtkLiM0UGshKSlGOTckRmF0JCIzQ1FocHcuazJURjk3JCQiMzUrK11GU0NfOUZocSQiMy5YXShRJXkqW1UjRjk3JEZkdCQiM0EmUilSSkZzYzZGOTckJCIzL11pU3dTcSRbIkZocSQiM0V0KT1cJ0c7bEhGL0ZmdC1GanQ2JkZcdSQiIzVGXnVGXXVGXXUtJSZUSVRMRUc2I1EvQmVuZGluZ35tb21lbnQ2Ii0lKkFYRVNTVFlMRUc2IyUkQk9YRy0lK0FYRVNMQUJFTFNHNidRInhGYGVsUSFGYGVsLSUlRk9OVEc2JCUqSEVMVkVUSUNBR0ZbZWwlK0hPUklaT05UQUxHRl5mbC1GanQ2IyUlTk9ORUctJSVWSUVXRzYkO0ZddUZndDskITElMyNwM0MybyoqISM5JCIxJ2Z1R3JQLDcpRmlmbC0lKkdSSURTVFlMRUc2IyUsUkVDVEFOR1VMQVJHLSUsT1JJRU5UQVRJT05HNiQkIiNYRitGY2dsLSUqTElORVNUWUxFRzYjRistJStQUk9KRUNUSU9ORzYjRmpkbA==</Plot></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQiK2hzX2VgISIpNyMvJSJ4RyQiKzMrKytdISIq</Equation></Text-field><Text-field layout="Maple Output" style="2D Output"><Equation style="2D Output">NiM3JCQhKyJ6XHNnIyEiKTcjLyUieEckIitlY3puN0Ym</Equation></Text-field><Text-field layout="Maple Plot" style="Maple Plot"><Plot height="488" plot-scale="1.0" plot-xtrans="0.0" plot-ytrans="0.0" type="two-dimensional" width="488">LSUlUExPVEc2LS0lJ0NVUlZFU0c2JDdTNyQkIiIhRitGKjckJCIzJykqKioqKlw3dCZwSyEjPUYqNyQkIjMkKioqKlwoPTdUOWhGL0YqNyQkIjNYKioqKlwoPUhQSipGL0YqNyQkIjM7KytESmFVYDchIzxGKjckJCIzKSoqKlxQJUdaUmQiRjlGKjckJCIzJSkqKlwoPTI3Nig9RjlGKjckJCIzJyoqKlwobyoqMyl5QEY5Rio3JCQiMy8rXShvZkhxXCNGOUYqNyQkIjMuK11QZidIVSJHRjlGKjckJCIzMysrXTcqMzA5JEY5Rio3JCQiMzorK0RjZSp5VSRGOUYqNyQkIjM7KytdKFtEOXYkRjlGKjckJCIzYyoqKipcaU5Hd1NGOUYqNyQkIjM3KytdN1hNKlElRjlGKjckJCIzLytdKG8lUWp0WUY5Rio3JCQiMzIrK11pOG82XUY5Rio3JCQiM2kqKioqKipcPjApSCZGOUYqNyQkIjNZKipcKD0tcDZqJkY5Rio3JCQiM2QqKioqKlwyTWcjZkY5Rio3JCQiMzUrXSg9eFomXGlGOUYqNyQkIjM7K11pOiQ0d2InRjlGKjckJCIzLSsrdj0jUiF6b0Y5Rio3JCQiM3ErXVA0QUB1ckY5Rio3JCQiM0krK0RjaGYjXChGOUYqNyQkIjMpKSoqXChvZjJMI3lGOUYqNyQkIjNNKipcN3lHPjYiKUY5Rio3JCQiM3crK3ZvbzZBJSlGOUYqNyQkIjNxKioqKipceEpMdSlGOUYqNyQkIjNXKyt2JCp5ZGQhKkY5Rio3JCQiMyMqKipcKD08RjtPKkY5Rio3JCQiMzUqKipcaTBBIypwKkY5Rio3JCQiMyopKioqKlwybUQrNSEjO0YqNyQkIjMqKioqKlxpMFhFLiJGaHFGKjckJCIzJSoqXChvL1EqPjEiRmhxRio3JCQiMz0rK3ZRKHpTNCJGaHFGKjckJCIzKioqXCg9LSxGQzZGaHFGKjckJCIzMyt2JDR0RmU6IkZocUYqNyQkIjMhKioqKlw3MyJvJz0iRmhxRio3JCQiMy0rdm96OykqPTdGaHFGKjckJCIzMSsrKyYqNDRdN0ZocUYqNyQkIjM1K103alohPkciRmhxRio3JCQiMzQrdj0oNGJNSiJGaHFGKjckJCIzOysrXXhsV1U4RmhxRio3JCQiMzkrXWkmM3VjUCJGaHFGKjckJCIzIioqKioqKlw7JFIwOUZocUYqNyQkIjM4K3Y9LSp6cVYiRmhxRio3JCQiMzMrRCJHOjN1WSJGaHFGKjckJCIjOkYrRiotJSZDT0xPUkc2JiUkUkdCRyRGKyEiIkZddUZddS1GJjYkN1xvNyRGKiQiM2MmRy5hLj5tXCdGOTckRi0kIjNXVEdCNzNsO0tGOTckRjEkIjNTeiVIVHIkZWZNRi83JEY0JCEzVz1YKT44XDMhSEY5NyRGNyQhMyFHWVJ6PGwmKT0nRjk3JEY7JCEzR2hCVUYmNCl6JSpGOTckRj4kITNnaVhJVkQlW0QiRmhxNyRGQSQhM3MuOHJkNFF1OkZocTckRkQkITNeP2UrWV4qbyE+RmhxNyRGRyQhM0ZbN0JgZmhTQUZocTckRkokITN3YHNIbkRkJ2UjRmhxNyRGTSQhM1NTKSkpZkMpKlEqR0ZocTckRlAkITNSRXQpcDU9TEMkRmhxNyRGUyQhM29OWlklXFwmKWYkRmhxNyRGViQhMyF5TXdoPCIpZSVSRmhxNyQkIjM0K3ZveiIqW0pYRjkkITNkVTp3JVJyYTUlRmhxNyRGWSQhMz0zRmsiRyRRbVVGaHE3JCQiMzFdN3lEZDllWkY5JCEzIT10R0MsRUZPJUZocTckJCIzMSt2by93bFVbRjkkITNJa09jQDlnZldGaHE3JCQiMzFEMTlXTiJcKVtGOSQhMyMzKy52NlojM1hGaHE3JCQiMzFdUGYkW3ByI1xGOSQhM0snKVtuM2cuZFhGaHE3JCQiMy04LktgdUhbXEY5JCEzbTB5UVNfWyJlJUZocTckJCIzM3ZvL0JhVXBcRjkkITMpWyp6WCZlcmZnJUZocTckJCIzNWMsInpTKikqelxGOSQhM0FIXUA6KUcjPVlGaHE3JCQiMzdQTXgjUmAwKlxGOSQhMzxfJ1I6XCZcSVlGaHE3JCQiMy8+bmp4dDYsXUY5JCIzNTdlJ3lxWCRlYEZocTckRmZuJCIzY0kiZk8lUWljYEZocTckJCIzSSsrRGNtJ1s6JkY5JCIzKEdpcic+YzFLYEZocTckRmluJCIzXnoiekdyZlZJJkZocTckRlxvJCIzXk1gdSVbMzhBJkZocTckRl9vJCIzdXRgRl1FOT1eRmhxNyRGYm8kIjM/akcneSFSWmtcRmhxNyRGZW8kIjNvJEc/J281M3RaRmhxNyRGaG8kIjNaJD5NSmsjekFYRmhxNyRGW3AkIjNBSSVmeXd4aEMlRmhxNyRGXnAkIjNbQ0RlK1JGKSpRRmhxNyRGYXAkIjNFSzxAdjhOJlskRmhxNyRGZHAkIjMhUmMkKipmIio0KDMkRmhxNyRGZ3AkIjMmKiozMl0hKj4/aSNGaHE3JEZqcCQiMyJRPkpUZC80NiNGaHE3JEZdcSQiM3MoeSk+XVBeKmUiRmhxNyRGYHEkIjM1OVBHQkcwdTVGaHE3JEZjcSQiM2soPlgnKT4rZismRjk3JEZmcSQhM28qUig0L2suIypcISM+NyRGanEkITM4KjMvOlNuKUhfRjk3JEZdciQhM1cmXGhVTG0mSCcqRjk3JEZgciQhMy1ZJ1E+dm02UyJGaHE3JEZjciQhM3VlX3pfOzxqPEZocTckRmZyJCEzUUZcMlFbNCIzI0ZocTckRmlyJCEzbVkvei1ROURCRmhxNyRGXHMkITNgLzlmRycqKUhdI0ZocTckJCIzL11QTVBqYE03RmhxJCEzQ05YP3ckNCVlREZocTckRl9zJCEzTXQpNC4xIkgkZiNGaHE3JCQiMzMrRDF6eSpmRSJGaHEkITNXRVYwblk1MkVGaHE3JEZicyQhM1c7TldzN0MpZiNGaHE3JCQiMzVdaTpJKnp3SCJGaHEkITN1KnBbbWZSbGMjRmhxNyRGZXMkITNTTG0pZVZqOl4jRmhxNyQkIjM4XVBNUDMmeksiRmhxJCEzV2lUUEcjeixXI0ZocTckRmhzJCEzKW9hbmVfRSZbQkZocTckRlt0JCEzYVNHQT4sdGc/RmhxNyRGXnQkITNEL1VGRTRFNTxGaHE3JEZhdCQhMycpZVQ+bW5mUTdGaHE3JEZkdCQhMzJKNVVUMz09cEY5RmZ0LUZqdDYmRlx1JCIjNUZedUZddUZddS0lJlRJVExFRzYjUThTaGVhcn5mb3JjZX5pbn50aGV+YmVhbTYiLSUqQVhFU1NUWUxFRzYjJSRCT1hHLSUrQVhFU0xBQkVMU0c2J1EieEZmY2xRIUZmY2wtJSVGT05URzYkJSpIRUxWRVRJQ0FHRmFjbCUrSE9SSVpPTlRBTEdGZGRsLUZqdDYjJSVOT05FRy0lJVZJRVdHNiQ7Rl11Rmd0OyQhMHdGYkpzLSRbISM4JCIxQVImPWBBImViISM5LSUqR1JJRFNUWUxFRzYjJSxSRUNUQU5HVUxBUkctJSxPUklFTlRBVElPTkc2JCQiI1hGK0ZqZWwtJSpMSU5FU1RZTEVHNiNGKy0lK1BST0pFQ1RJT05HNiNGYGNs</Plot></Text-field></Output></Group><Group><Input><Text-field layout="Normal" style="Normal">Let us note as before, that an application of the concentrated loadings must result in the jumps on the additional diagrams. </Text-field></Input></Group><Group><Input><Text-field layout="Normal" style="Text">Let us mention also that one can apply here the other supports for the beam resting on the elastic foundation like telescope or clamped edge. If some of them are inserted for 0&lt;x&lt;L then two of the equations bc5-bc12 must contain some extra conditions like zeroing of the displacements and moments (for a simple support). When some support is added for x=0 or x=L, the conditions bc1-bc4 must be corrected accordingly by setting y(x)=0 and diff(y(x),x)=0 in the case of the clamped adge. </Text-field></Input></Group></Section><Section><Title><Text-field layout="Heading 1" style="Heading 1">Reference</Text-field></Title><Group><Input><Text-field layout="Normal" style="Help Notes">S. Timoshenko, J.N. Goodier, Theory of Elasticity, second edition, McGraw-Hill Book Company Ltd., New York-Toronto-London, 1951. </Text-field></Input></Group></Section><Group><Input><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/></Worksheet>