restart: Example of use of MAPLE 14 to solve differential equations for beam by: Claude Daley TUZOV3RLVWI8b2I8Uj1NRExDZE5GWjxMOmBWPkQ6QFRyRHRcXENCYE5cXEBOZFxcUWdxeEhhSmZIb2VkeT1JakxdVURATzxQa2I8bmdoUkVcXFFCbExLPFReRVRbUFd3XXI/TG9PXUxXRHRTVFVPeHFFTHVkeGtwaFhmWHFdZVhuWFBdaExvcE9dUFJvQHFOXU9KXFxSPm1SQVBvP0x1a0BxXFxMTzxATkJFTGNMcnlZV0hlUVhVcFZNUkw8Tjt4dXVBdW5BbFZgdV50eGBxcXNxcW1oVV1QbVRQTUM+altPZEtHZGtJeEF5XVVZdVV5c1NYYEFXc2dhYXdPeW5oZ1VxcEdQeGNeY2o/Xjs+YFZvc1ZIYW1IaF1xclBpb1V3eV95X3lHYG9mYE9YaW5QcXRQaVJBcFtnXl9mXnV2aGhhd09Zb1FQb0dgcj5hckZPbW5Gb2xQcGxRcj9YW2hwb2hoW3lJX0ZIaFpGWmpCVVNFVUtpZ3NHaXNpbXV2SE92XXdoaXV1eGNYZGF0c1l4YXlIZ011XktoS19obl9IVFFCc1NzPmFma012TDtXQmxKRlhwbVhwb2hwb2RMQmlQRHhrUGxMUExwPGl4ZXl0P21QXFxFV2NFU3FwWXhtWW5oUGI9W1pwc25Jd015amhXdE1ZdE92XXRxeXV5d1NHdmZJdW1gXFxpQW9UUWJcXE9mXFxmdXBpd1V5cGtwYTxeYD4+altXYktfaz5vdEJfbnJBZEZfY0ZWX0pYalJYZ05GX2dmX193c0duW0huakBMRz1YbVVYXVh1RmFzRlFrRFBLW2l5cW13VklxckV4XFxkTFZcXE1WPHdwQXI7WEpEdW14XXZCSWxEUXNETXNmYVF2XFxRWkg+VURCdUVAcXJAaVRPZVRGTUlWV2ZBdWNsd1JhdXNYZ1M/P2lyP0lMaWNcXFl0cV13UklScVd2QXljYWdjOlVSOkxtWm1XaG1zdFR2X1FtQXBLWFxcUUJ1cE1wTkdNTW1sVkZET0BQbGlsdU5dcnNIWW1xdlNZcGFFb0psTVhsdUJ4TTtMTTxGcj1RZWNobkxHX3l4bmJAb2JhdXNYaF53XWw/XFxfXmVocXdoYWhhcXF3V3lecW1yaGdVcXBkUXdkT2lOaXI/aVpUTjpjaE1tVVhtZ25DaFxcZWdOUXJeX2NMPUhEVXR2Z2l3R1VxbVliPVdiT1ZYbVJfQXdiQVdkW3NUZ0hlR1h5c0RARVQ9O2ZRQWRmS3RMUXRic2VEbVNIbWZuV3NPaXRva0Zga2ZldXRoT3J0W2dpZ3l4aXl1YWReZVhlcXRHd1ZeVXZAaWNdZUQ8TVI8bXZJeWVJUXhsR1Y9cWJrV0lJc0V4W3laSXI9b3hnWXVtQ1M7VVI6dE9aQFJgVE5dVE5LbVJETVNEQHBFXFx3eXR5c3lrVVhtVWl2RXlsU0F5Y21qXVhuXVVzUGhPY1BNX0xWXkhubFBwbEx0R0hrQ0hzdXV3d3hyZDx1U0l1S212P0V2TGR2X11VPV1sS0h0Z2FsY1RUYklxSkFMOjx2cW1vVkVxPE15SlBTX0hTQ0VTXlBMT2V0RFRLRVRrRFBrPlBNXFxUdkpdbG5teXZJWUR0bFh5WXlpeXJBeXJNa1tQSjxMSmZgb2ZAWVdMa0ZAUz11TkltbV50cktleVl4WXhJeWZJdW1wckBxcmZ4TUdMTTw8bnNRWG9Rd09NbEhNUjxNSlN5blpAbjplVG9UUG1UcHFwdXRVdzxpakVMb2RcXHhpeXVZYFA+cUpcXGx3WXlxWXBXYVxcU1JATmZAUGxddkJNc0VBc1ldeDxVakF0S3h5dnl0eUN1WExdVj5FakxcXFA+PFJtWE5pdE9JUHBnWHRheFNNaU9PaFRPVVBvZFBvUXhsUU5fPXl0UXlwWXdReU91VFFVaGtOXVREVHdFVHNGYXNmZE9nZG5iPWtcXGlNc0hUS2lRdF14akVYa0VuOlhrXmR2YXl2cXhYaXFVdFhYQGFrU0x5alhSWkhebl5aTkZ3QmdmSk91P0dcXEpQc01OdD5hbkl3bXhGWmxeaXZfaU55Z29IeHBxeFBAc1RmbFBhb1NXYmBOaWFpbXFPdXF4Z2l2ZGFeXl5eam5eaF5Bc0tIYF1vcnY+aWpBbl13ckhgZEdOXTw+bmNWZFBvZFBgbVZgc1RPbWNheWlwb2hwZE9XbFxcYVxcRFBpYj5ja3l4cXludlljPXh0XFxgdURRdVRReXhpeXVZXXFuZ154YWFuY1ZAb1J3Xm5eYG5Hd0xpbk54bGtoYExxdXV3d3dwclRHdT1OXTw+blhGb2Zgb0ZnY0dnXmlhXl9mXl94bmFYZHJPbmRwbj1Yaj1mZlVXYkBgW1tWeW4/d0pJYnV5bHBnaG9neWhZcWlRc0VZc2NWbVVGYFxcX2pMeWRub2hwb24+aV9hdl5BT3h2P2BLXmA+PmJNP2o8YW1FeFxcaU5wPlhjaHhpV29rSGltdVZkTllgYj90Wk5zc2BnZ2dnb1d5cD5jZF9uW05fSlljUlhtVVhfZ1hcXFZeXUZPXVxcUGJ1cGhnQWVYdlpHRlpaP3JKSXlGYXRtb3ZGSW1cXFF2XFxnZE9hX2dmX2NudVt2d0poXVJhZnFRaTx4X21Rc0FvWmNOXFxMTlxcbFBmP1FbZD5pdE9pcE52Vm9kYj87VVhoZXV0Z1JYSWY+V2NoVXhtWXhPZVRtU0htU3hrSXhbc3dKZ1lWXVVWTUVgYWJZO0lqPWZ3Z2l3WXZBeWM9T2I8X1RPSWZeX2dxdXdYeWRpc1VQQ3duVWJAP0JKWUlES0NES0RNU0RNS0RMO1N3c0hoXXVKZVRHPXV5b1M/b2JpZXlndXV4Z3lHWWVxQ0c9XURrb0V3W1hjUXRfT3NEUVM/aXhtSWZbO0JuWUNYSXM/TXdzT1hfUWNCSVVHUXlRSXN4Y1hkeVVRQUJvU1JkY1hkR3dPV2JaR052QGpxTVhLUFlobFV2QE9MSXNfQXdiQXNAcHhySXlzSVVSPVVuXFxzVVl0WXBuVjxXQk5xPlBkUm5gQ2BwUHFjaFZpdVdpTHBzSkhePT9zeGZtdXZoQHFvPXBKW2hcXHl2WXdZYHN3SmdZXk9UYz9TYXNkc0dpcz1USj1EY3dyUXl0cW9VdUNpWkdOblRLbFF4bEFTd1xcb19IeVhpcXVNb2RIcEhtT0VVU0V5b3lweXR5TXlBeUF0VWx4SjpVUjo8VzxkUnRcXFdoZGpyYVNoZHJIbW89dEpIPGxAQHA9RG5bPmc8Z2I/Z1ppYXZ0YGhjUWxkSG1Wb3JAcXJobl9oRmo7SGpmT1xcY1d3UGlva1h3Wkg+Y3NbdWRBSXlYbVJUTVVUT3Q/U2VTa0NIa0NmXVRbd2VZd0V1P1dsO2JAP0JKYWVGYXNGQXlyQVlEW1liW3lLQ1VoP2hYdVZsRUJiPUNuU0lSYVhEa3RMYUdsX1VbZ2I/bFBNWGtqXVhuXXJ4VWpAQEpKUUt4ZG1cXERPY0RrZ0xUW2BsUGhPVU15ckF5amR4clhxdXhQW0l4eD10SjxKR0RKX0RVY0RPY1xcV251c19YU1FgVHhVal9Vc09McGBxTWw9bHhoU00/bls+ZlpfZE9nZF9obl9IcHNZd2NJd2NRXmdmc0hxc0hhbG1HbHdvWkheXVJBZk1JXzpeYD5ObWZedzxBYW9wcG5WdVRRdUw/cz1Id04+dEpqOlFVVEh1T0lPPllVVEhVVXVTd3VvU2xKWkhOSmFPSlVYW3FNUFF0djxVQFhvZVhPVE1tW0heYmdic0dpc1ZnY29mXU9tT29pS2ZjRl91V2l1U1djbXd5eGl5S1F0RmZbOz5OZVRPZVR0TVl0U1djbURZU3RWWWZBdWNWX2VWP2NCP2NvVXdQSWdUZXJXcGo6PFRRYHNGYVNQZHhieHVMYW1ZeG1pcXZgcXZmYXdmeG1ITFJ4PEtHREo9PHZQaW9VXXFzeFJeRWtyZVRnZHNcXHRTS3lKVGlwZXVqPV1LR0RKd11SR2l0bTx0TGFLWkhOWlhTZExPZFxcamdkc2RwVElBclJwZlRiaENnZE9nREFzQkFWPVNDQ0lSXFxjR0dpaXRleFxcWWdhPVZGSmdFVG1lbWBtcHRtckpITj09d1BUVlRYTXh5TDxMTTxkU0dYWXFxd2tIUEdRdmVhUE1dbm08WFpBUlA8eVpleEZOPURPZ2RPR21TSG1WR2lRU0l1U1FvZEhtVFBtcHl3WXltdlhMUjxNUnluSXVtQHhxUkRPOnBqOlVsXFxQcGxQUGdkT0dIb0FnXFw7ZmtHaGtXZ2VXR2VhdmR3d2VGYDxLRWRtRFZNaW5FY2N3Rl9jRl9faXZfVU9laFhjSXRdQ0xHUmt3Q1BJV0A7dEpoT2RtU1t1d0pJbj1UVWFIbWhld2dpd2t4dTpcXFA+XFxwPGBYXWRsREVVRVVwQmFMcFVQbVRQWXVVWW1QYEh1P2lyX0hMWUFYS0VUS2xrVGZbU15BX0dRXVl2XXlPV0dRXVJAa0RwWXdReWM/ZUlOPXI6UVI6Y0M7Y2daWUJFQ2NOYXRORWQ7Z2I+dXNYZ0lReWdZdVNbeUM/Q1JSaVg6S0U8UFJHSWo/YFlEVFE/bFFQcXRQcVdobVc9eWpJdHJYWVdEPWtmPFY6ZEs7ZHVtdXdYaVFscUtlbXdDWXNFWVRPZWtXbWxFaFhrWFZrYHRgdGtyXXlFZEs7ZHV2cXRrSWo/SG1TSG1kUD9QcEVRWEtQWWpFVWg8SkdESmdFVlFxclt1dF1kU0l1U0FBcjw9SkdEakBMUkdpTEVUcXF1d0hxdktQVlpFVm1obkN0eGo8Uj1lazptVVhtTVl4UmRMcHZBVkFwS1c8WUVVUEBsTDxwTnZscjxMTWQ9TkRYa0VobkxFT1VkdV1scVxcRW5peG9pVHNzYFVWXVVKYXU9PGxOSEpnQHZtQVNDZVFTRE1TTG9UWFlSUWs/SGo7SGpycFBIZls7ZnVacHZ2TmRBdlpBbm5YXm9SP1taSF5aWFpOYW1BT3VjWGRhbnFcXEdmUXBfVz9wWUVaR0ZnP1ZHaUlmO3hLQ1doSXZtQVNja3hrbVhwbXJ4VUJUa2VlZ1NxRXJzO1dib1dObVRQTVRkZ3JoZ2NtRXhcXGlSb212S09Zc0VZW2VyPD1CWkdGZ2xvc1BYX1FTdl1ZdlRXaElvYkBvSmVUbWhSRXBMbWxWRkFOb0F5dVl5XW1NY0huWVxcWGZhSmI9b2tJVG1IcUF4VVpQVl9Rc09gTG9hV1RhcENUcUhMTTw8dEpwdmpYd0tQbHRNTExMTGxNWGxdVE9VbkJ1alxcaU1wTHFBeFVaTm1vVmdqWFo7PmpAYGA7aGBxQXBQcHZGYGtGRmxgcV1pdl9pbnBYT2d5cGl3QXRWWVo6XmBeaF92X2hJT2hsT3BCV2hJWHBtWGBFUGlqYGdSPlpKQWxIPm9lV2hJbm9BTztjQ2NBQm95UnFBR3BzeDo7QlpHRkdDVHlNSFFLZXU9QjpvYm5FU2BtVmBTRVdZPEtIU1djPGdFUGN4Wl1YSTtCSkFkSDtzRVlzRV1TRl1Jb013Tj95VGlJYm13OztCVEt0X2NWX2VWQ0VTQ11nc3dGdVNJVWVUb2tIU1djP2tJUl9zPzxXQlVVZFBvZHZOSUNDQ0Neb2VuX2huQ2RgcUVxdVhxbWZYc0dpc0dmZ3U9PFdCX2V3UGlPaGBxQWRyWWRUT2VkUG9UdmV1eGZKQW47b3ZgcXZybk87dEpvVE5bRE47aFNjRF47ZlZhdVZlVE9BeUxlc147RlVVVVVdRUU9QlpHRmc/Z2I/Z1pVSGRbcmlbcmhdVl5deFRZV2lnR1dNaU5fdF1Rd2RRY115QmRpRGZnQlhBUlRLZk1rWWhhdXNHREtDREhtU0hlQ3lReFFvR1dNZ29FQkdDdk9HaXh5d3lxeUlfU05jRE9jYl1zQlpHZmBXZlt3U3hDeV5VdGBnU2tDSGtDZ2NHZ3BtWHBlQ2pRZHNFWXNdTmZReHJMTm1MT2Zpd2dJeU9IcWJ0eVxcSXRKbGtTPEpHZVM9VVBgXXNCcGtIcHF3VXlweGtJeEs/YE5vYVZcXGxZb1xcVkw8bEJ1THVsTz5xSzpVWE5BbEdoa0dEdUFgTT5tTlRcXFBiPVRUTVVUaGxPaGxIbVBHRXdYbVJAbVJ2YEtUYVdfZVZfUHhxPXh2bVI/PVZaPW51WHF1bFZOPUpKYXduXFxSeUlUPlxcbEpAbDptT0JJc0NJblpdUmRkbGRVVlxcYHVWYVVYWFh3XFxZckFUT2VwWGVxdEVQb0FWQGVKOjx0Snl3bkF3S1lqZllSSExzRFFzdHV2Vz5kU2dsVG5ddj5pSklvTXdeZF52YXl2cV93UklsV0llS0dkO3FaUE5rYWFlYlFmQT5iYT5vVG5xZT91VE5eVmBtVkBzXVZaQF5bcnl3eXd5VV5cXE5eaGRhdGNQZT1gXFxsbnNxT2BMWGxNaGRfYWVgcG5gaHl1eXhJXmxbUXdkUWtoeDo7ZkxVUj51d1hpaUNxSV5BZm11dkhpY1JDSDxPc1xcU2RbS3lwaXd1VXlwaVdPdWN0S0l0S2RxPXVma3hQaWdVVVZBVUpiaG5bTHJVWXV1QXlrWXZOeFBLbVVwTFluQXdSQXVSZVRgTFRWRVM9UXRMUWx2WFJQVE47RHZMYG46PEpvRFBkSG9jSFR2eGxGXVJITG52VFdOQW9LdWpJdE1QbFZMXXFnPUtiYXdhQHI+YWpGbFVJVU1pQG9iQG49eW5xWFR2dVl1aXdxeFJJcE1LTXlZUW9PVU93UFldXXBZUVNETVNmXFxPZlxceGF1dEtJb0R5bk9tb1hlcXRteGZJdUdtUFRMVkZ0TXhcXHlaSXI9WFZBcWt3cXZVeFc8WXI9WW5dWG5PVHVuTXlvWXdBRUpLZG15dG94UHlkXFxUPDxSPU12XFxRdkxhbE1QUEhBc0tYTnlQeWRZT2w9dFhoUXU9d2FRbURRWE9scXdxeFVtdU1tSjo8SlRUTlB5V09sTFBscHdVeXBNaz1wWGhhdXN0V1hhUWZhTzo8Uj1VV0JAbWxkVkRRdW9YV2NAcFtVckBoakV0TFxcdVk7XmBWT2RASW11dmhoZ2RPZ1xccz5nR1Ftb25cXFByTklnTUVoUUFCOmNDZEdGXFxLR2RLZ15fZl5ldkRpZFljWW5JZGRHVkQ/Qjo7Zk9NVHBZc2lzaUJ3dHVZd1l1eURFVktjRFBnR1VtYndvQjo7dGtvYlxcUXZcXGFlV2dlY3N2THNndG9Zd1F5Qj9jQltjRV1COjt3WFVSYXlzWXdmTlVXW1FyP1dFcFtXSnNnd2l2UXdVQHlyQVlWaUdCOltYZkdGWD9YZztVaj9WYXFzV09Wb2djR2dYb09FSzxKWj1tamFqZUBxckBtVlxcUGdNdW5UTE1UbGpAcGpkVEk9WXRheGNUT151VmF1dXl4WVl4dUl5Tj9AT1doTTw8SkppT2ltcXNxVkVxbGdkTGl5VkVkTm1pdkxoS1xcZXVeeUx3ZFZVeXBpdW9kUG9UWXBhdVNyPVlySHFzSHlCSWxdZGx4RHZAaWtVXFxvWnl3aXlraVBKOmRrP21SQG1qXFxpVmZcXGtePXg8RFJbRWp4WW1CQVVSQFg/dVJBdWtUZFBkUHF0UFFuXFxQbkF5a1l2ckx0Ojx3Z3RzWGhRZVBZU3hWSUlvUDxWSkRLRFlTXUBvQ2FSQWxLVjxNeFxcWXJlVl9ldmJJdF14c1ZIUT1Yakc8anhNUlhJeWdJUWxtTlxcTUpkSGxbPUxgTGxZbHFiTVdkTU1VVE1VXFxMTlxcTk9QU0N5UmFwU1dQeHBxeFBleF5pWGVVVmZlV3U9c1xcPFJfdUtVRHN3eXk/ZVBdZHJ0TEs/RGtLQHNgZGxPeWxiYHU8SGw+ZVhXRHRRcFBMYHRbcU1feVdDXXZ3TWtmYUpDcGp1VVJedVlURFNObVdkaW53SG5ISW5LZXF5ZHJlVFdwSE86SXNDSXNTVFBgXUtlVFA7REttRVA8QVVARFNBeHVMXFxWXFxseGFwdWB1VkRtUktVbENQdlxcUXZSUU1GYFh1bXhmSXVYaWFQT3leV2FVd2pxTmlydnR4aXFpWHZjSW5IeWh0cFxcSUBjbkZ1TlB0Z09vX1htdGB0S1dkcWZoZFhud1BsbnZhdm9idFZkTFBtQXBuc1ZeVndnQWhiPV95eG92WlBdO15vbFZkSXBtcUBcXGN2bVRRZ2BvZkBHaEpZdWl3cVdvZFBvQFtJclNHZVNTY2VIRFt4ZD1HXFxZZ3NpeVljRHh1eW1vUkxlc0VjSGZJZFl5eWtRVEdlY2RRV29LZ3FjVHdRdkN3R1hNVW55ZVZlSG9tSF9bWWJpUldDdnVzZE9TZ09Td1F1dFtvY2p1Rmppc21ReURteGFlU2dpWD5XZUxNeEhZZ29LdWFRV1hraWRlU3BJWWd3UkpddkpBQnNfZkZnRE5ldl9dSXVTSFJvaFtDSU1jWXFpdXFtU0htUz9nYj9vWXhtWU5jQ2RDdEplZ2E/ZGR5d3dfUlN5ZElVU19DR3FBYz5VR19jaU51YnlXRz9XWFhVSF9DY3VdUm1jRmNDZ01VZm95czpPZUF3Z3RvRXhtQl47VExPWEJlSU9PSD5nRz5dZ1dRVWtnYkJ1c0ddRnA/dEFnZE9nZE5NR289WGo9Rk1jQ1Q8bFxcUUpyaVh1aVRRVXZ1dVVdYE9MPWxidW5eRHhZUFZHdFBfQHZUUE1feFFpUU1jRG9UZXNKcW5AVW9CTVNteW07Ykl1UktHZ1R3YmlHRWRDU2NVRG9TWEpleEVBRVJ1U1NPVE1jZXhjWVRxc0hxY1dlVXRxd1dZaWxNRUxBeFFlVXlXaD1jR09fVFdVZm9NWFF1dEpxZkB1WENpZWxXdmJnc1tZZ2k/c05dSHNXV2hNRVxccUZ0bUZaR2M+VVJ5XWg9VXVTSWhlVXVNR2M8U0I9U1NETVM+R1NTT0lZWXl0RVdqP2dJYXc6XXlVZ2dTT2Q+WWR1Y0NPX0ZUcXVeZ1dsdVRXdXJCYVRdX2JUdUJ5U0JvY3NOeVJcXEN0Sl9VOl1WOmlXPU1YYEtJa012PmNSQEVVU0VVbW12RklEcGtDY3FoO1FmQ1tWQUtlcVdVZVd0WGFmS21SYFdiXnFnQ11YdVtId2NDY09FeD9nUktDY0l5YUV5XVdyeENGW0NyWXltQmlOT2VtVmBtUml0X0h5Xm1rUWRXTnlZVmF5Sz1WV1FqbklyR3BtWWlyaUlWcUVvTXVSXFxgb3FAVWxhcXhZa0dFeGFMeHhkVU9pWE5weD5US3lAcUBNS295VXZYb1RRd0JUb0NkTm9RdldlUXl1bUx4bHlUcUJlbVFweGZAVllYV2p4UU9gdEtteFxcTFdnTVNvcVFRTXl4ZXR0XFxZZF13bWVNWGxRd1VNOzxYcXF3V1lLUWxPSnlXdml0ZXhUWXRReF1TcWFwaGV1dEBxckBtaFVPZVRPWVVZZ2lwbFBwbHBMZ0xVUll1VXlYZ1F1T3hRRWhwQFVwWFFZYExNeFxcWEJBVDxAblFgUG5wV1dRcT9US1BcXGo/aGpjZHFKPGxKYVJrRVhrRUo7REpJbW12RFZxYVRteU1TRHI7bG9LPXl4SVdjYG5RcHFCYHllXU5ycVdjPW5eUFF1XW5oTFNkaHZKWVdeYE5bcFFeTFV0XVJvZW10dE14UHF4YUtiWFhyYXB4SU1qPFFfZHZeYXZ2TFluQU9qPFBqTFBsTFReUUxBeXRoaFV1XFxZckFQeVl4Y1l0YWBWXFxEc21JTExRUkFEeGtZdEBQVlxceFRQeE9ZbVNZdHdiSXRdeGxpdFVoPE9iPE14XFxZckBTZ01sa2hqP2hKXzxXZnlzS0VybVR1U11YXnlVaEVxWWRxUXBZU2RSQEFMUUFLeHlVVXFuZF1MZFRPVXFwYmVwVGROWVFVP3ltU0VYXlFvY1hwY2RuWW1KP0lOPGhQRGh4ZV12QVVNUFFUQUV0XUxOdVlUR2hZaFBWUXR0X0F0Yl1ZclFXblB1YWlYd1xcWUdobl5MW3JQcXRQdVJBdUJ4ZWx5b3dXeXBpd1RpcFVxcGdXXXVZYHF2YHFgcG5gcGF3c1hgZ2ZRbmpfXFxvRnhEWXNqWXlveXBnP2tcXEFuaXZxdlFsRF54Q0ZfZk5cXHlPam1YcG1gdVFJcFhvYm9gdFo/ZExwcF1hXmVpaEpPbGxxeGBeW0RPZzpvZklxbWdnZ2dncWJHdFxcYHdmYWc9d2dhUXldaGdiTl5cXE5qTFB0c1d4YElkPHBiW0d2YXZtdk9uSFlsc0l0bE5sYl5yUlF5UWhdTnliPWhqSGpcXG1ScFlZS2VtQE1Ob01sdWRqd21PVnFWd3FNeGRqPkhUbXBQeER4SnFueEx1cmF4cGhPQ1h2XVl2XXF3aHFxb1V3UGFvZmBvQ1hMYUxNaHBqWF1KY1VYYXFzd2F3bXhzYkB4Y3luWVBsRmB0UUFsRHlVb3FKU1BwWmh2WmBuVFxcS0RNclpgTj1tTU5gdGRoVGVMc1o9T1VRdW5IV01UbUZ1V1JRTVxcbGxmRFVMZExPZE5LaG9AVHFfVXNQZFB2XFxuaUh1O0huR0xTTFFUQz1NTmB0RnlKX2RqQHBqdEBxcmBPV01xTnhTcGVQQmFuRlhwdGV4ZFFrRFBraWxxclFmc1ZoVGFwY1dgc094XlF1TVBgd15zSF5scFFeT0lvZWZvW1dwPVBhcXFiUWlmWVhfR293Tklhbk53ZlloV15deGZyd29fZlFjTWF3aml0b1h5TFd3PXl0akllVXZ3P1ZuWj5zQkFzQnl0UXlsXFxWbk9Xb1BnaWxJc2FmW0pZYXBuaGZBdVV3cGhnb1dXcVB5c0l5Y15QZXNHaXNJeF15cnVveGZJY1BgbHU/a1hxeEZJbW1WdExRdEBna1Rmbl5Hbkloa1V2YFBgbE5gd1RpcGVPd05Jb2BwbmBYdkF5a2locGc/Y3N3XFxsZ3VPYG49SGRnZmhmP3A6QW5eZnZnaWNATmBiRmNFZ15TXnVaYF5beGVyd2x2VndjVm5seG5heGZbR2ZbcXZHWW1dVl5dVndveHB4UG9kUHduSXdNaW5faG5OdmlHd214ZnFaQG46cGVodmF5dm1oR2VzSXI9eFpOd3ZbWXJBSHlsPmNdRnFzSHFXVmFwX1xcaF9uZmBvZnd3WGlxbld3X2l2X2BiPV94Y3BxdFF3ZU51RGZkRHZbSXZgbVZgVUZgXFxfSml1VnFpbWVodG9mVG1pVWlUdmVkU2NiPWdnXmVSWFNGT3VYTklZY2dldGNXREFYUXNXTVVYX19GR3NEaVVITFN3SXF0PWlyVWF0VkVHQ01mQHF5TllnP1l1QklHPGliaFtiTXFUU29iQkdkXXNSaHV1eGd5QklkXUNGW0NGSXFld1NZX2lkUU13XU1XZUl2PXliQ0lSTmxUQFBRVFFWXWRPP0BtVVhtdT1Zcl1OYGxOTF1TXmB5XFxJdEZhUm5RU2tFWGtdTHdFdGFQTXRcXFhiUFZvaHZFeXJCPVpUVlpsWWtWQXg/b2hgcWI+X2JmTmVuQHNPaXRveGRpcGVvYWBWUG1cXFFdRVZbRVB2XFxRdjpAajpwYXdPeVJPZVRPbVJAbW5oZ1VxcF9Xc1BwZmw+bzp3aUxpbXNHaXNHeGtJeD1uWkY+cGtIcEtHdXhmZ2Zfb2xRXXBhXFxBR2xtcWJJcF1HR29XP2diP29yUWdqQFo6cFpAaHNXVmx2YGlDPl50eGpIUWdEaWxcXFBuXFxwaGZBdUtxb1dXYVBnaz9oYm5Xb014bGBWeWZGZWxgZlhhcXNfXFx2Z3NYaGFVX25gWG5dWHZKSF49T2dXQW5SQW9ET2BLSWo9dlpCYWZOeHFraGBbR2hmSVpKeV1yV3hKdmt0P3VecHRwZmdUQWxXbmRmQGU7R29KVltUQHled2R3YXlabl5cXHlbTV9pb094XkljYEFebHZtTk9fZ3F1d1hhdT9fY0ZfQ1hxUEB5Z3lwWUF5T1ZjPmhaQG5vW0BbOlBhXm9mYG93WGlxdXZheXZlXmZqW0BzWj93SkluV1hhcW9vS29aTWlrbVhwbUltbXZmTFZcXE1Gd15pXFxoWHlbRmlzR2JlV3JKQVxcbUZkVl9lVnhtWXh1SXhheEFjcUhwa0hwdl51XFxgbUpHeFxcR2NkcGR5RnJxXls6RmhwcGdXUWNITlxcaVhiYVBcXHNpdkF4XXg/ZXJAaFtWdz92bE0+XFxFdmlidnl0QXY9eFtibl5cXFBhV1dxcGd2c0ddcUdtO0hnQk9eVVhkQU9lX3ZaX2dmX2drVXZgSG93S0dxY2dobklnP1hvVkBwQUBuWz5aPklleGBpc0lwXXdycnltcHBwcFhcXGBeY2pBeGpBbmJ4blpAblpRdW9YZ05GWl5wbmBQcE1Hd2tZVlFoX1VzYGVzVGd2aXl3aVt0Sj9oOnV2V3lSWWNZbl9YY1F0V1NJcD14UEtGcE1TZFl1P09JRl10ZndWX2VWT3NFWXN3X2l2X3NoXFxjaFxcaUxrZEtDaVFEZEs7PE48cW9XVXFyWGpGZVNHdVF1YXdtSHFtdXZUQG12YFh0bVJAbVJYRXFsZVZ4YXlzeW5JdW1QQHNUVW5xdFdYYVdbRVZbUXdkUU9zbXVZbXJXXFxyXlhWYXVWQUVNVnl0WXVZd0RZbGFWW1VscGB1b213R2xSPV1qR2hrR01TRE1rcXhwcW1VWG1tVl1NPnlvS2ByblVPTkFMWV1qQ3RVbzxKTlBsV2htd0hXTXFOUG1QcXRQeURZbGFuZHBVY01zakBPVDxVb1BXT1F2P1dwXllnb1F3T3lpeVl5WUlfRD9cXGBmZjxxaGVBbEpAXFxseVxcQ0FzO0lyO2hrcXB2YV5vO09nQk9eVWNHR2NDSHdjSU9RPExDaVVhaGteXXJ5ZE9ZWU5ycXA7PG5OaGtVdFBsQFE/cHNdWFJBcEtPUVFsbFZLUW4/XVhFRUtRYFJwVFVcXHVzWGhRbW12Rkl2YUFuakhZQmhtd11saGlPUj1wWnV4aGl1ZmFyTmxtZ2h4Xk1OdHVUcXRXWGF5cFl1aXV1dlV4R21ZU0hVV0hnO1lpRGFsQFdidnFpVFlbbFdnO0l2VXFaOlBeeV55alliZE9nZFZfSUFta1Zeaj5gSmdtYUdsQ1B0TVl0SWBdc05eS2h4U3drV1ZhcFhnUXFvRj9idmFuXUlsS2huX2heX0BpXk9uZ1d1cEhwdT9pWG9ua2ZcXE9mXFxuV2NoSGF0X3hiZm5Bd3hoaXVdWHV1dmhoYXZDQVxcWD9hXVF1b1hnaXhxeFFxSGhgXnZqSklidkh5V3hyOz9bP0BaSnZqaWhmZG9mYG94Y3luWVBveWFyb1hnUXFddW5IT2dkT2ZNXVNkY2RIPWVqQ1JcXDt3b1NWS0FEVVNHPXVGWldnZVdHX29ZTm9pR1Flb1NjWU10WD1JdlFVPT9DSGd1bE9iVmtEUGtEV09Jb01GZWNYZXF0R11WdmFoSGdIXkNZWGlCYl14bEtySVVDOjtUPmdocVNETnNCU0VVU3R5Q2hRdF14QjxLQjxrSXhrYVBYVE1VVGFyQ1hMP0hTU3RUTHRrQ1ByPFFyUGVvVGVwaXV1eExPYkVtTkhsdVFzRFFzYkB0UW1SYXFjTWBoZmhvZ0h3UGhsR2djR1d3a2hnQkd0O19fQk5meGdmSz5sVlF0VlFsUXhuP1ZaOj5hT2hsT2B5THdgPXFqR1ZvZVlUVWZARUhHY3ZgcXZsP1Q6V1c/PWlGO0N1Z2Z5c2RmQ1VsP1lrUVZsXXJ1eXd5d2dHXVlaTVZcXE1SO1dVTkBPbHVtcmFWSHBqSkFsVkhrXnRzaWhUPHl3PkBqOjxMW3F5d1l5dmB5QFlNaV10b0l3TjxMa1F4XXhSSVBRcF13QlFqOkRxZWRwRFRqXWhsZXRUeF15a3lyT2RMT0RMS0RMZnFTR1FKXFxkVUd1U01pa0BgamBMTHhNWF5RVjo8b01kS2tRcEJpbjtgVFttV2htT0ZdbHJBdz5tVlBsbU5IS1Vha2JhUVd1cGhldVBoT1VtVkhhbXNIVj1xanBkV1RBdz1xWWpEdENxVHJBcUZtVDpNTkA8anQ8S1V4V2lxdXdYVVF5bllJcW11alFYUW49dzpZdWFlTElpU3NAeWJMUGxMeFxcaXJFSE5bRE5OUFR3WHloWXFAeG5bcHhnWXVZbXF2RW1PXFx2eGRvVkVKOjxOSGhuX2hOP0RSX2l2X2FUeHRYaGFVaj1YamVtWHBtUkBtQllOY1RQbVRQc1h4S115Rl14bmF4RkhrQ0h1dGhYZXF4Z1l1YXRTWGBRXFxdckJEcTtVdXRlb1tMWWlQa0VRczw8Sm5UTlo8TjpoU11BTmNcXG9UZXBEZXlDdW5OQHRLWVRSRXlneXBZcVRGPVReYVNeQFlJVXNQaE9RXFxPUj1US0VUa1hZcXFXRGBrZlxcT2ZcXFl3ZVljVVRpeHF4UXFARE1cXFV2YWRWOjxKR0FNcWxXVlR0Sml4ZXl0cWVnZU9zTkhfZG9ha3lneVd5VXZnW3FsVU9lRkFjO0ZmYU5tVmBrQkFheW9sa0F4W1liREBzSGZddF5oXXFyR3hmSXFtT2BsTkB0VUhkYV9bbl5gPj5qW1diYUl5XFxoYkVAZWV2c3ZJeW1paXZfaT5oeVlPb1p2ZWZmZXRgbE9od2dpdz9YeHk+Y2tOcmVoYm1eakRPZE9eXUtvanJOYkBXcmlhWl1faUk+WmJfYmJWYFRHcFxcZ1pldlxcT2ZcXEdmXXReeFRpcGVPdklHY0RPY1RGYWxfXmlpZnVBeD15W3N3XVNWZVxcUWJyZ1t1R25DYHZ2X2ZiWGRVR1o6TmFhT3heSXNhdmNYYHlxeXF5aWNfYW1WYF1xd2hxaWhlcXRLaW1EaGdAYXZjaHBld3RMWW52UWJRVlxcYF5jYnl0aXhtaj5yW29bXFx4dmRObUJvX3JOdHN5WltgcGhgcXZgcVJvYlNHZVNmcVVPX0ppYUNIa0NgeGBGdT9HbltIPmNJX0tJdEtJcXNIUWdHcXF5Ykl0XUdXTXFmZ19Vc09IcjtJUk9oZ1NXZVVXRFtZaG11dkdlSj9kal15cklYdF1keVNXUkFoW3VtWllKeExTQD1vW2RUYExMcGRMY1VOXWxsP21XUkFwW3VySGhNVnFRXFxkeE1NVExddm5cXHhaSWJTSXVTYWRyaGl1cWBuXlo6cGVecGZeR21qQXhqb1xcTUZjXmdfUFldXj9faV9ja25gYEZaS2dpQ0BmYkBwVnBqTkZkZk9fTGF3V3FkUXNVd0hpbWY8aWdVdWhyWXlpYXRjV0RVc1laRVZbRXJoU0Q+ZVZwW0lMb1c9T2I8X3ZwS1RiU2JEc3ZJeWVxS3JyU1I6W3hBZ0l1bXhmU1VwX2NJXUhNTWNBd2JBXVZeXWZlV2dlX3VfPXNecXRcXG12Ul9JQT1FXFxDV1NPZWdFdWxndmF3ZXhNZk4/eEd3SFhBRmlhdG9tR2VTYjw7Z0xRdExVWXVVWWI9QzpPeV91dXhnWWV3VGlvVHlvSVdPZE5HWUtJeXNBeWtZVltRRnNzZ3hPeWRjYlJbRFM9eDtlSXZhdl9tRnRNeW5JV2VvVGdfRmlzY19rVXFvb3hoWXVRc19IV3ZsTkxZbFddal5gSzpwUl10UXl0bVddd049WWFEdTtRUkBUVXA8a05gWGlxdXdUWG1VeGhoVXVQS2FNU0N0Vl9QVHNxc1dYUV5IbmhpdXVYbGdAcUNAVWFpcVZNVGB4V1dhVkpBXFxkaW1xaWZibnV5QGY7UVpEZmRWYXVWcWNYYGFjYGBgTl5wd3dYaV1LRlxcS3Fxd1dpZFh2WkF2OnFvb2hyaVhhQHFmaHBhdj95SlBsXXheSW9tRndteGZpQ1FsX05yUE5eWGhta3lhb2lfSE5qQEBaYl9dQmldbXBmR1F1dGhoZXhwcXh4W1hiQWBsUEleTV93VGlwZXlDb3lOaWZFdWRyP2lya3Zaa2l2T2hKSVJdeXJJd3lZeXl4eURPY0RPQ0VTQ0dzbWlkQWRqV1lYV0NCVXlgQ0ZiPUM6b0ZcXEFmY1dUYU9kXFxdeXZheUJ5R2xVVExFSVVrSGY9ZmpFY0xDSGNfVERxdFNvZGJbR2lfZVVXZVVbRVZbWW1xdkdpdkV5ZElhZXNTVFxcP1hLQXJAU0VrW0JHQ0JaPUhObVRQbWJBd2JpeU15QXhbWXJdVVZdZVRvPVBLTXBAbUtsTVhsTVFrTXY+aG9naE9ZZVJBeFVoVWtadEp3WHlod3dYaXFFZ2xjPmdcXElgTmB2c0FoZEduRmBqXWdqbkFocWBgVnBqRFlzRUlfOmBud09raVFeYm9nPXBcXFhmdzo+Wj4+X0NfYjtfZF53ZmFXYXROYUxYakBxa1dWY0s+dEJJbF12W1heYWJQcztXa1F2X1hHcWxnXnM+a1xcQV54UGFvVmxCVnhLZmxtUHBscGpHVl1QP2RKP3BnV3VwRmY9WWxWcGpeUVt0V3F5T3dXV2Jed11wPmR3QXlrWXZuP1paSF5KYVtbZm9eYG5eQG1SQG1Wd3F4Z2FmXl9mTmF0Ul9jQlBxV2dJd2NJU2FTQ3E9ZGpFV1FNR3ZBeV15YztFUjtlZl9nZk5HdUt3dF5xaFpdZjxjWVh5SW9pZltDZnc9dWRvU253U0FrQ1Y7Y2ldRmJtYkZPRW9LV2lxdXdfZ3ZtdkZJZT9XQ1FrYj5fYnI9WXI9Q2VBVFhnSHdNeW5pRXVrWHJVWXV1ZXRjWERFaEdBY2NfRmdjR0dPWGtLSWE/R1hPZkZxU2hddVlzY0BfdkRLWUhvY29bZmJ1RUg9WGo9WF1rR2lxQjpVVks9VVI9aXhleXRteWFpZ1V1aFBJc2p3aHF3Q0tHUnhLRkFjYkF3YmlJdW13VkJBZFtDaGtHaGRPdWdXVE1VVEFvQ1dLUz9LY08/Z2BPdGt3ckA/aUhLZ2hdaVpLVllrc3JJeF1JeEdfQkdBdDtFQjtDQk5vUndneFBZVXljeW5ZZGpJRmhZRnVTSXVvRGdLbV95bFltUkZATWs9eWpJVk9lV0BdWGxlakBwakxtUEFFcExUVVo9b0NhT3Jgb09wak5JcElUSlNETWJtalZpcXV1UGo8UGpUT2VUd215c3l0WGtFWFtgTURFV29YdXF4V21Qcl9Zc1F4TGlsVWZAbWlIcGp5VmZBdWtwdmBxdk49eG5heGZNVnVMU01kS2N4V1lsa21YcG1xeXdZeWtpcT5kc0F4akl0TWhAVWtQamh1ckdYTVFpbkV1bHZheXZxVGdQVXdEWWxhUl5JT15ZTj9hWUdNTlV4d3RkV1RhUGw9bE5NT29NWGxNV3RVeWRwc01VVXlpeGl4WUd5bXl0cW5gcE50dW08SmRZbXhkWXRhd1RpcGVsUXhsWU1xbkd1TkhdbWJNbEhMdD5VUkZVeGtIcGt4akhkTURNU0RNdmVAckNYUHI9eFpJU01wTltZVT9MbUl0SklsTW5IcGtITWo8VjpUeW1JdW14VllsWXJJdml4cXhRb0hZWGdkT2d0UklwXVxcSF55d2l5b3RrWGRQb2RgUG9XUXFTcF5fX3BJUF5eP29pWW5GYXNGSVtNQnRhUU9eaEU/ZVI/bWp5c2l1eVRvPWBMZ1lyY01ySExsYkV1PmVveHhraHl1eXhZaGF1c2x5RUFKOlVYPV1uZ11UPnFRR2FKV2FZYGVYdl1YWkFyOzxXQlxcUEk9d1Y9UWxddkJcXHdNdXFUTFRBeVJrRFBrdFV2RXg/THhsPHRGRGxEZW4/ZVI/PXBJVUpjPVNWeVJCWXM6VXBHQXNadU1LTE1oZU9kTXhLRVhrRXB0dFReYEpaSGtrRXY8aUpxdFBxPHVhSG5dSE5fSHhLRGp3bEtUSE53VXlwaXJIPUw7ZE9vPEo6PFdCPEo6YG5GXFxQT01vZFBvPFVSPVV4bVl4SWRNdFxcVl1VVj1oTTw8bls8dEphbE9obHdVeEd5UExEdU51V2I9S1pETz1kazpVcXBld3RsWGZPW2hxd2hBdVU+WlROWjo+WmI/Wzo+WkdGWjpCR0NCOjtmWztCOjtiQD9KWkhOOjxKOnA6O1dCO0I6O2ZbPlQ7Qjo7dEo+RzpjO0I6bzpCOlVaWlxcOlxcSkVUZ0VhcXNXV3l2WXhJWWNET2NqV0c6VWY6V3dOZ0hfTWdlV2dlT2dkP2dqV1hhcXNBT0hEV2NFV1NFVVNFU0NFQ1lTT0NmT2g/Z2I/eWV5YXlhXXduO0o8THFeQXVrWFZmbHJTUFFvTW9sWXJpTVZMSW9NdU5FVVNFeVV5ZXlPWXI9WUp1XUs6VVI6dXJyWHF1eGo/aGpTUG1UcFhlcXRHYXVWYW1cXGlNZVRPZUxPbkhXTXFqZll0cGhXVXFsZ1RVXFx1TztwUmF5eTtkUF5leUhwS2pcXFRzPEo6PEo6YG5cXHROXFx0VFs8UDszO1wiXHtcfQ==LSUlUk9PVEc2Jy0lKUJPVU5EU19YRzYjJCIiISEiIi0lKUJPVU5EU19ZR0YnLSUtQk9VTkRTX1dJRFRIRzYjJCIlZ1FGKi0lLkJPVU5EU19IRUlHSFRHNiMkIiU1P0YqLSUpQ0hJTERSRU5HNiI= The following aliases simplify the definition of loads. step_load := (x) -> Heaviside(x); # distributed force dist_load := (w,a,b) -> w*step_load(x-a)- w*step_load(x-b); # distributed force

Zio2I0kieEc2IkYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLUkqSGVhdmlzaWRlR0YlNiM5JEYlRiVGJQ==

Zio2JUkid0c2IkkiYUdGJUkiYkdGJUYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLCYqJjkkIiIiLUkqc3RlcF9sb2FkR0YlNiMsJkkieEdGJUYuOSUhIiJGLkYuKiZGLUYuLUYwNiMsJkYzRi45JkY1Ri5GNUYlRiVGJQ==

The following aliases simplify the definition of derivatives (used for boundary conditions). D3 := (x) -> D(D(D(x))); # short form for 3rd derivative D2 := (x) -> D(D(x)); # short form for 2nd derivative D1 := (x) -> D(x); # short form for 1st derivative

Zio2I0kieEc2IkYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLUkiREdGJTYjLUYqNiMtRio2IzkkRiVGJUYl

Zio2I0kieEc2IkYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLUkiREdGJTYjLUYqNiM5JEYlRiVGJQ==

Zio2I0kieEc2IkYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLUkiREdGJTYjOSRGJUYlRiU=

Length, Stiffness, Load at "a", Load at end, Location of "a" L := 2; EI := 1;

IiIj

IiIi

wa:=1;we:=3;a:=.5;

IiIi

IiIk

JCIiJiEiIg==

loads := -we*x/L; #loads := -dist_load(wa,a,L)-(x-a)/(L-a)*dist_load(we-wa,a,L);

LCRJInhHNiIjISIkIiIj

plot(loads,x=0..L,title=`LOADS`, color=blue);

LSUlUExPVEc2KC0lJ0NVUlZFU0c2IzdkdzckJCIiISEiIiQhIiEhIiI3JCQiMDhEXStAOjAiISM7JCEwcFB2XSJHeDohIzs3JCQiMEJYITRRV20+ISM7JCEwJXljOGRtXEghIzs3JCQiMHhhND5xYCpIISM7JCEwO0trR2JJXCUhIzs3JCQiMDdDWydwNkpTISM7JCEwPU9zV3ZtLychIzs3JCQiMFF2XSxUPjEmISM7JCEwMThFXzZIZighIzs3JCQiMGhAVidvazxnISM7JCEwVCNbJ0hxay0qISM7NyQkIjAnR2Q5XEEycSEjOyQhMCRmPVBQM141ISM6NyQkIjB1WyhcemtJISkhIzskITBKaUM+KGYvNyEjOjckJCIwT3JVJikpeV0hKiEjOyQhLzI5RyQ9d04iISM5NyQkIjAiSGU7SCw1NSEjOiQhMFB1W1A+XV4iISM6NyQkIjByVCRvKVFDNSIhIzokITBjN0RJZU9sIiEjOjckJCIwKVwqKilmKVsxNyEjOiQhMFkjXCkqR3Q0PSEjOjckJCIvI1J5Y2w0SiIhIzkkITB6ZTxOW2snPiEjOjckJCIwO0trW1s7VCIhIzokITBDWydIRlo8QCEjOjckJCIwYjVAQXlJXSIhIzokITAkZTtMdGhhQSEjOjckJCIwYDA2LSh6NjshIzokITBIZTtgJnA8QyEjOjckJCIwaEFYNScqUXEiISM6JCEwI1J5Y1QlZWIjISM6NyQkIjAkZTtMI0g1Ij0hIzokITB1WyhcUWE7RiEjOjckJCIwOERdP2dlIT4hIzokITBwUHZJIXplRyEjOjckJCIwR2I1IlshKjQ/ISM6JCEwIkhlO3MmWywkISM6NyQkIjAsLS8pKXoqM0AhIzokITAtLjEjKXBNOyQhIzo3JCQiMC8zO0thQkAjISM6JCEwMTdDW0omPUwhIzo3JCQiMEFWJ0dWRzJCISM6JCEwI1snSFxFNFkkISM6NyQkIjA6SGU7eic0QyEjOiQhMHNWKFsoPVhoJCEjOjckJCIvMTdDJ1FnXiMhIzkkIS80PU96MHVQISM5NyQkIjA4RV8lW2kzRSEjOiQhLyNSeUVQSCJSISM5NyQkIjBeLTBdPyczRiEjOiQhMHhgMnZJSDElISM6NyQkIjAjXClwekQ+IkchIzokITBSeGFwKSl5QCUhIzo3JCQiMClvUHYpKilIIkghIzokITBMbEkiW1twViEjOjckJCIvI1J5Y3UyLCQhIzkkITB6ZTwmPTs7WCEjOjckJCIwI1wpcHpaJD5KISM6JCEwUnhhcEAhelkhIzo3JCQiMCI9T3NjIXBAJCEjOiQhMHJVJjMmZWAjWyEjOjckJCIwPlF3X3A1SyQhIzokITBIZDlILzspXCEjOjckJCIwYzZCWWRhVCQhIzokITBNbk0+Jz1CXiEjOjckJCIwOklnU1snPU4hIzokITBCWCE0RSh6RiYhIzo3JCQiMDA2QS9WZGgkISM6JCEwZTtMYzlPVSYhIzo3JCQiMCV5YzhcQjxQISM6JCEwd14uUF9lZCYhIzo3JCQiMEFXKW88WTtRISM6JCEwTG1LbCNwQ2QhIzo3JCQiMEVfLzRWLiNSISM6JCEwUnljajkwKWUhIzo3JCQiMHVbKFxKUj9TISM6JCEwN0JZcyplSWchIzo3JCQiMGxIZnkzRjclISM6JCEwWiUqKXlKMSU9JyEjOjckJCIwJFwpcD54VEElISM6JCEwUnhhemxpTCchIzo3JCQiMEFWJ0doVDxWISM6JCEwI1snSD5DaFonISM6NyQkIjBtSmpZeVVVJSEjOiQhMFwoXCpwPGtqJyEjOjckJCIwUXZdVGQpPlghIzokITAyOEU3J3l6biEjOjckJCIwdVomNFh3QFkhIzokITBoQFZ3WUUkcCEjOjckJCIwMDU/Zy0kPlohIzokITAyOkkhUiYqeXEhIzo3JCQiMChIZj1oZ0ZbISM6JCEwWCopeTw0OUMoISM6NyQkIjA6SWcrKlFAXCEjOiQhMEJYITROMyNRKCEjOjckJCIwYjVAVUx5LSYhIzokITAkZTtMLHZUdiEjOjckJCIwemU8JmYlWzcmISM6JCEwPlF3Iypvc28oISM6NyQkIjBMbElUaTRCJiEjOiQhMCp6Zj5PV1l5ISM6NyQkIjBLa0coSF9BYCEjOiQhMFsnSGZXeSQpeiEjOjckJCIwMjlHdyp6RWEhIzokITA2QFVrKj5TIikhIzo3JCQiMCYpcFIqZl9GYiEjOiQhMHhhNCoqKUciSCkhIzo3JCQiMGU6SlUnPUdjISM6JCEwUHRZanpBVykhIzo3JCQiMF8uMmF3JUdkISM6JCEwR2I1IltyI2YpISM6NyQkIjBuTG4lUiNbI2UhIzokIS8wNT9mQlAoKSEjOTckJCIwNkBVL3kqR2YhIzokITBtSmoxbk0qKSkhIzo3JCQiMEdjN1hXI0dnISM6JCEwVSUpb25tQi8qISM6NyQkIjB3Xi5uPEY4JyEjOiQhMGtGYl13ISo+KiEjOjckJCIwSGQ5NCJIRmkhIzokITAkZj1QbSQ0TSohIzo3JCQiMGxJaFU3PUwnISM6JCEwKWY+Uic9eFwqISM6NyQkIjBHYzdsRD5WJyEjOiQhMFUlKW9aKSl5ayohIzo3JCQiMCYqKil6PiZ6SmwhIzokITAjXClweiNwKHoqISM6NyQkIjA8TG1LNGhqJyEjOiQhMHZcKiopUjthKiohIzo3JCQiMD1Pc1cnPUtuISM6JCEwViYzbnojKTQ1ISM5NyQkIjAtLzNjI2VJbyEjOiQhLzE3JVEoZUM1ISM4NyQkIjAwND1jQiNScCEjOiQhME9yVWAkKTMvIiEjOTckJCIwQ1olKjMqZVBxISM6JCEwNDxNT1FjMCIhIzk3JCQiMG1KakUnPVFyISM6JCEwdlwqUnpzcTUhIzk3JCQiLywtLzVcU3MhIzkkITAtLjFsdGczIiEjOTckJCIwOkhlJypHWEwoISM6JCEwUHVbTXosNSIhIzk3JCQiLyhSelFxWlYoISM5JCEwJjQ+ZWJAOjYhIzk3JCQiMDpIZXdbVWAoISM6JCEwUHVbSlAsOCIhIzk3JCQiMHJVJjMoZjFrKCEjOiQhMFQiR2MqKTRZNiEjOTckJCIwKil5ZHZpWHQoISM6JCEwJG9POFc9ZzYhIzk3JCQiMFolKil5dCFIJXkhIzokITA8TW81T2s8IiEjOTckJCIwQFQjWytvU3ohIzokITA9T3MrLTY+IiEjOTckJCIwJilwUio0VVAhKSEjOiQhMFsmNFxKaDA3ISM5NyQkIjBzVyopZVs5OSkhIzokITByVCQpRzw3QSIhIzk3JCQiMCNcKXAqcCplQykhIzokITB1WiZcWClvQiIhIzk3JCQiMGQ5SGVINE0pISM6JCEwPlB1VlI2RCIhIzk3JCQiLyNSeScqXD1XKSEjOSQhMCllPCZceGlFIiEjOTckJCIpJVEuYSkhIikkISp3XTVHIiEiKTckJCIwXChcKiozNVonKSEjOiQhMGlDXDhscUgiISM5NyQkIjBpQlo5IVtSKCkhIzokITBhMzwtQTRKIiEjOTckJCIwbUpqMSJlWCkpISM6JCEwdlwqZnIkb0siISM5NyQkIjB3XzBeQGAlKikhIzokITAiSGVFIyl6VDghIzk3JCQiMEZhM2QpNFchKiEjOiQhMDlHY3k5bU4iISM5NyQkIjBCWCE0VSZIOSohIzokITB5Yzg4VjlQIiEjOTckJCIwYzdEcSF5ViMqISM6JCEwKW9QMHJjJ1EiISM5NyQkIjBUI1snNGIxTiohIzokITBPc1dFKWYtOSEjOTckJCIwRV4tWFsnWyUqISM6JCEwcFB2RShIPDkhIzk3JCQiMCRvT3QvUVgmKiEjOiQhMC4wNTIyPVYiISM5NyQkIjBOcVNUJnlbJyohIzokITBiNUAieUpaOSEjOTckJCIwR2M3RGw+diohIzokITBXKW8oeSV6aTkhIzk3JCQiMDE3Q0d2WCUpKiEjOiQhMCI9TyNIJ293OSEjOTckJCIwZDhGYXlVJioqISM6JCEwLzI5eVRKXCIhIzk3JCQiMCc9UDl0Zy81ISM5JCEwemQ6KDQicF0iISM5NyQkIi8sLUNQTTo1ISM4JCEwOklnZTpJXyIhIzk3JCQiMG5NcGUhZkQ1ISM5JCEwLC0vKWVRUTohIzk3JCQiMChbKFwiKVJaLiIhIzkkITBKaUNzNEBiIiEjOTckJCIwKFJ6eSFIXS8iISM5JCEwJzQ+PU9hbjohIzk3JCQiMG1LbGEnUWI1ISM5JCEuKno+KXpJZSIhIzc3JCQiMD1OcXklcGw1ISM5JCEwd18wPVUmKWYiISM5NyQkIjBrRmIlPUR2NSEjOSQhMFkiSG94KEdoIiEjOTckJCIwOklnaVpeMyIhIzkkITBCWCFSOXNGOyEjOTckJCIwIj5RYz1RJjQiISM5JCEwJ0dkJXlzSWsiISM5NyQkIjA5RmFFJGUwNiEjOSQhLzI5KSpbUGU7ISM4NyQkIjByVSZvbTI7NiEjOSQhMDI5Rys6VG4iISM5NyQkIjBmPVBFPmA3IiEjOSQhMCp5ZCYqKXl6byIhIzk3JCQiMCNSeU9Vc042ISM5JCEwKWU8YmplLjwhIzk3JCQiME1vTyQ+PFk2ISM5JCEwXi0wIXpEPjwhIzk3JCQiMGtGYkFTaToiISM5JCEwWSJIUS5PTTwhIzk3JCQiMFsmNCo+JFFsNiEjOSQhMEFWJyl6dSFbPCEjOTckJCIwKFwqKnldRHc2ISM5JCEwWSNcPUVRazwhIzk3JCQiMG9PdClcWSY9IiEjOSQhMC4wNVsoPnk8ISM5NyQkIjAsLC1JeWg+IiEjOSQhMF4sLlhuVXoiISM5NyQkIjAkcFEoUmhjPyIhIzkkIS8vMyc0I1wzPSEjODckJCIwJioqKXomZTE7NyEjOSQhMCNcKXB5KTRDPSEjOTckJCIwaUNcT3RmQSIhIzkkITAkcFFaKycqUT0hIzk3JCQiMEJYITQzSk83ISM5JCEwJXljOGlZYT0hIzk3JCQiMHVbKDRRIWVDIiEjOSQhMDdCWXIwKG89ISM5NyQkIjBNbk1IVmdEIiEjOSQhMCwsLSVcMSUpPSEjOTckJCIwWydIUiN6bUUiISM5JCEwc1cqZSk9KyE+ISM5NyQkIjAvMjkneSRmRiIhIzkkITBiNUB6MVIiPiEjOTckJCIwbk1wVVBmRyIhIzkkITAsLS85MSpHPiEjOTckJCIwIkhlY3pFJ0giISM5JCEwUHVbJD5TVz4hIzk3JCQiMDZBV091akkiISM5JCEwPExtYWgmZj4hIzk3JCQiME1vTyRHOjs4ISM5JCEwXi0wREhVKD4hIzk3JCQiMCJIZWMsLEY4ISM5JCEwUHVbQjowKj4hIzk3JCQiLzE3V2Z3TzghIzgkIS80PTsqW14rIyEjODckJCIwQ1snSEI9WjghIzkkITBPc1dcdDItIyEjOTckJCIwZTpKN0BtTiIhIzkkITBQdFlvSlwuIyEjOTckJCIwVyhbPC0lcE8iISM5JCEwO0ppSzUvMCMhIzk3JCQiMGAwNm9cbVAiISM5JCEwSGU7X3VcMSMhIzk3JCQiMEBUI28pKXonUSIhIzkkITAiPU8tJCk+ITMjISM5NyQkIjAlKW9QYkBuUiIhIzkkITBGYDFMIzMmNCMhIzk3JCQiMGxIZm80clMiISM5JCEwWiUqKUdYbTVAISM5NyQkIi8kZj1wOXJUIiEjOCQhMCUqKXlQP25EQCEjOTckJCIwUnhhRFl0VSIhIzkkITAzO0tRPjU5IyEjOTckJCIwIkhlJzQkXFA5ISM5JCEwUHVba1JpOiMhIzk3JCQiMHVbKCopcCJvVyIhIzkkITA3QllbRC08IyEjOTckJCIwZjxOQS52WCIhIzkkITBRd18kW0QnPSMhIzk3JCQiMCc+Uj02MW45ISM5JCEwJXpleDtmK0EhIzk3JCQiLyNSeSM9RHg5ISM4JCEwemU8dXhlQCMhIzk3JCQiMFYmM1BjKyhbIiEjOSQhMDlHY1gzMEIjISM5NyQkIjBzVigpKWYkeVwiISM5JCEwZTpKKVJ2WUEhIzk3JCQiMFcoW3hVQDI6ISM5JCEwO0ppVEAzRSMhIzk3JCQiMFsmND4oZXleIiEjOSQhMEFWJ3khKXl3QSEjOTckJCIvLjFzKmZ2XyIhIzgkITBYITRlKlI4SCMhIzk3JCQiMCY0Pj07PFE6ISM5JCEwVidHRnVEMkIhIzk3JCQiMCYzPHV3S1o6ISM5JCEwR2M3XiIqNEsjISM5NyQkIjAkZTtgYHZkOiEjOSQhMHVbKEhJak9CISM5NyQkIjBUIkd3eiN5YyIhIzkkITA2QVcnPnVeQiEjOTckJCIwKWY+PlMqeWQiISM5JCEwKFJ6RzUlb08jISM5NyQkIjB4YTQuQnplIiEjOSQhMDtLa2ElKT1RIyEjOTckJCIwemQ6eGR2ZiIhIzkkITBvT3RsT2pSIyEjOTckJCIwYDE4PXR6ZyIhIzkkIS8pZj54Zj5UIyEjODckJCIwMDU/IykqKnloIiEjOSQhMDM6SXRcb1UjISM5NyQkIi8nPlI5WiRHOyEjOCQhLyV6ZXI/RFcjISM4NyQkIjA6SWdbL3lqIiEjOSQhMEJYIUhucWNDISM5NyQkIjBcKFw+bURbOyEjOSQhMEJZI0hcUXNDISM5NyQkIjAwNT8lekVlOyEjOSQhMDM6SSI+UyhbIyEjOTckJCIwVSRvJypbRG87ISM5JCEwOERdTSNRLUQhIzk3JCQiMHVaJjRqb3k7ISM5JCEwaEBWWUghPUQhIzk3JCQiMC8zOy0lSClvIiEjOSQhMDE3Qy5UQ2AjISM5NyQkIjAjWydIakwiKXAiISM5JCEwQ1olXC8/WkQhIzk3JCQiMExsSXQoKiozPCEjOSQhMCp6ZipmJ1xqRCEjOTckJCIwOkhlR00pPTwhIzkkITBzVihHOUR5RCEjOTckJCIwZjxOKyUqKUc8ISM5JCEwUXdfK1RMZiMhIzk3JCQiMFYnR3hXN1I8ISM5JCEwbEhmcidvM0UhIzk3JCQiME1uTUZHJls8ISM5JCEwLCwtVCN6QUUhIzk3JCQiMFJ5Y1RfJmU8ISM5JCEwZjxOaUd5aiMhIzk3JCQiME1uTUQrJm88ISM5JCEwLCwtUV1GbCMhIzk3JCQiMHBReE1UIno8ISM5JCEwLzM7LTcob0UhIzk3JCQiMEppQ2xKJil5IiEjOSQhMFokcHl1eiNvIyEjOTckJCIwKFF4OWhPKnoiISM5JCEvMztzIlwhKnAjISM4NyQkIjBhMzxRViI0PSEjOSQhMCJHY3NdcjhGISM5NyQkIjBUIkd3dSIpPT0hIzkkITA2QVdARSNHRiEjOTckJCIwKil5ZEI/I0g9ISM5JCEwTW9PTklRdSMhIzk3JCQiMCJIZXddbVI9ISM5JCEwUHVbaChcZkYhIzk3JCQiMCllPE4kbyJcPSEjOSQhMCNRdy1EdnRGISM5NyQkIjBNb09QZyNmPSEjOSQhMF4tMGMhKikpeSMhIzk3JCQiMFUlKW9ANCJwPSEjOSQhMGpFYCNRbS5HISM5NyQkIjA8TW9ZJnl6PSEjOSQhMEVeLT95Jz5HISM5NyQkIjB5YzhSQiEqKT0hIzkkITA9TnEzTk4kRyEjOTckJCIwZjxOW0wnKio9ISM5JCEwUXdfQV0lXEchIzk3JCQiLyhSel8yJzQ+ISM4JCEwYjQ+SDZXJ0chIzk3JCQiMCYpcFJCJls+PiEjOSQhMHhhNCZ5QXpHISM5NyQkIjAlKil5KHpxJEg+ISM5JCEwVSRvJz5jUypHISM5NyQkIjBvTnJXYCVSPiEjOSQhMF8uMjwhPTRIISM5NyQkIjBtS2wpMzldPiEjOSQhMCoqKXpIOEBESCEjOTckJCIwYjQ+QVMqZj4hIzkkITBLa0dMNSpSSCEjOTckJCIwNkBVVTgncD4hIzkkITBtSmo4P1cmSCEjOTckJCIwWSJIPVImKno+ISM5JCEwPlB1KDMkKnBIISM5NyQkIjAwNT8hPkYhKj4hIzkkITAyOkkmeVMmKUghIzk3JCQiIz8hIiIkISNJISIiLSUlVklFV0c2JDskIiIhISIiJCIjPyEiIiUoREVGQVVMVEctJStBWEVTTEFCRUxTRzYkLUkjbWlHNiMvSSttb2R1bGVuYW1lRzYiSSxUeXBlc2V0dGluZ0dJKF9zeXNsaWJHNiI2NVEieDYiLyUnZmFtaWx5R1EhNiIvJSVzaXplR1EjMTA2Ii8lJWJvbGRHUSZmYWxzZTYiLyUnaXRhbGljR1EldHJ1ZTYiLyUqdW5kZXJsaW5lR1EmZmFsc2U2Ii8lKnN1YnNjcmlwdEdRJmZhbHNlNiIvJSxzdXBlcnNjcmlwdEdRJmZhbHNlNiIvJStmb3JlZ3JvdW5kR1EoWzAsMCwwXTYiLyUrYmFja2dyb3VuZEdRLlsyNTUsMjU1LDI1NV02Ii8lJ29wYXF1ZUdRJmZhbHNlNiIvJStleGVjdXRhYmxlR1EmZmFsc2U2Ii8lKXJlYWRvbmx5R1EmZmFsc2U2Ii8lKWNvbXBvc2VkR1EmZmFsc2U2Ii8lKmNvbnZlcnRlZEdRJmZhbHNlNiIvJStpbXNlbGVjdGVkR1EmZmFsc2U2Ii8lLHBsYWNlaG9sZGVyR1EmZmFsc2U2Ii8lNnNlbGVjdGlvbi1wbGFjZWhvbGRlckdRJmZhbHNlNiIvJSxtYXRodmFyaWFudEdRJ2l0YWxpYzYiUSE2Ii0lJlRJVExFRzYkLSUpX1RZUEVTRVRHNiMtSSNtaUc2Iy9JK21vZHVsZW5hbWVHNiJJLFR5cGVzZXR0aW5nR0koX3N5c2xpYkc2IjY2USZMT0FEUzYiLyUnZmFtaWx5R1EwVGltZXN+TmV3flJvbWFuNiIvJSVzaXplR1EjMTA2Ii8lJWJvbGRHUSZmYWxzZTYiLyUnaXRhbGljR1EldHJ1ZTYiLyUqdW5kZXJsaW5lR1EmZmFsc2U2Ii8lKnN1YnNjcmlwdEdRJmZhbHNlNiIvJSxzdXBlcnNjcmlwdEdRJmZhbHNlNiIvJStmb3JlZ3JvdW5kR1EoWzAsMCwwXTYiLyUrYmFja2dyb3VuZEdRLlsyNTUsMjU1LDI1NV02Ii8lJ29wYXF1ZUdRJmZhbHNlNiIvJStleGVjdXRhYmxlR1EmZmFsc2U2Ii8lKXJlYWRvbmx5R1EmZmFsc2U2Ii8lKWNvbXBvc2VkR1EmZmFsc2U2Ii8lKmNvbnZlcnRlZEdRJmZhbHNlNiIvJStpbXNlbGVjdGVkR1EmZmFsc2U2Ii8lLHBsYWNlaG9sZGVyR1EmZmFsc2U2Ii8lNnNlbGVjdGlvbi1wbGFjZWhvbGRlckdRJmZhbHNlNiIvJTBmb250X3N0eWxlX25hbWVHUSVUZXh0NiIvJSxtYXRodmFyaWFudEdRJ2l0YWxpYzYiLSUtVFJBTlNQQVJFTkNZRzYjJCIiISEiIi0lJkNPTE9SRzYmJSRSR0JHJCIiISEiIiQiIiEhIiIkIiM1ISIiLSUlUk9PVEc2Jy0lKUJPVU5EU19YRzYjJCIkXSUhIiItJSlCT1VORFNfWUc2IyQiJHEjISIiLSUtQk9VTkRTX1dJRFRIRzYjJCIlK2khIiItJS5CT1VORFNfSEVJR0hURzYjJCIlXU8hIiItJSlDSElMRFJFTkc2Ig==

supports := {D1(y)(0) = 0, D2(y)(L)=0,y(L)=0,y(0)=0}: de := EI*diff(y(x),x$4) = loads; # Form differential equation

Ly1JJWRpZmZHJSpwcm90ZWN0ZWRHNiQtRiQ2JC1GJDYkLUYkNiQtSSJ5RzYiNiNJInhHRi9GMUYxRjFGMSwkRjEjISIkIiIj

dsolve({de}union supports ,y(x)): # Solve boundary value problem yy := rhs(%); # Extract deflection th := diff(yy,x); # Extract slope m := EI*diff(yy,x$2); # Extract moment v := EI*diff(yy,x$3); # Extract shear

LCgqJEkieEc2IiIiJiMhIiIiIyEpKiRGJCIiJCMiIioiI1MqJEYkIiIjIyEiKCIjPw==

LCgqJEkieEc2IiIiJSMhIiIiIzsqJEYkIiIjIyIjRiIjU0YkIyEiKCIjNQ==

LCgqJEkieEc2IiIiJCMhIiIiIiVGJCMiI0YiIz8jISIoIiM1IiIi

LCYqJEkieEc2IiIiIyMhIiQiIiUjIiNGIiM/IiIi

plot(yy,x=0..L,title=`Beam Deflection`, color=blue);

LSUlUExPVEc2KC0lJ0NVUlZFU0c2IzdkdzckJCIiISEiIiQiIiEhIiI3JCQiMDhEXStAOjAiISM7JCEwaSgpb3N4UCVRISM+NyQkIjBCWCE0UVdtPiEjOyQhL29VMm5JTzghIzw3JCQiMHhhND5xYCpIISM7JCEwTidcVyg9KXpJISM9NyQkIjA3Q1sncDZKUyEjOyQhMHJccCZHNFNiISM9NyQkIjBRdl0sVD4xJiEjOyQhMHpMdk9Yam4pISM9NyQkIjBoQFYnb2s8ZyEjOyQhMEthXE8tJT03ISM8NyQkIjAnR2Q5XEEycSEjOyQhMCJldFQqWzZrIiEjPDckJCIwdVsoXHprSSEpISM7JCEwLmh4UzMyOSMhIzw3JCQiME9yVSYpKXldISohIzskITBOO3pmWC5xIyEjPDckJCIwIkhlO0gsNTUhIzokITBLSGszWShRTCEjPDckJCIwclQkbylRQzUiISM6JCEwUmhXSEtEJlIhIzw3JCQiMClcKiopZilbMTchIzokITBqI29ZKyQpKnAlISM8NyQkIi8jUnljbDRKIiEjOSQhMGIpb2g8djNiISM8NyQkIjA7S2tbWztUIiEjOiQhMFxoP0UiUlVqISM8NyQkIjBiNUBBeUldIiEjOiQhMHpZVyVRRFdyISM8NyQkIjBgMDYtKHo2OyEjOiQhMGU/T2NQPTopISM8NyQkIjBoQVg1JypRcSIhIzokITBNIUhuI3AsMCohIzw3JCQiMCRlO0wjSDUiPSEjOiQhMFhpdS1PWCwiISM7NyQkIjA4RF0/Z2UhPiEjOiQhMFo9Sl5nZTYiISM7NyQkIjBHYjUiWyEqND8hIzokITAkem01TmlKNyEjOzckJCIwLC0vKSl6KjNAISM6JCEwPCFST0o+WTghIzs3JCQiMC8zO0thQkAjISM6JCEwYUtxcS0sWiIhIzs3JCQiMEFWJ0dWRzJCISM6JCEwKT5sMXBwKGUiISM7NyQkIjA6SGU7eic0QyEjOiQhMC0keiMqM1w9PCEjOzckJCIvMTdDJ1FnXiMhIzkkIS9UcCVwWCZlPSEjOjckJCIwOEVfJVtpM0UhIzokITBCIjRQWSNRKT4hIzs3JCQiMF4tMF0/JzNGISM6JCEwazBZPj1ENyMhIzs3JCQiMCNcKXB6RD4iRyEjOiQhMHMrQ3pqJHBBISM7NyQkIjApb1B2KSopSCJIISM6JCEvJkgrdCFSO0MhIzo3JCQiLyNSeWN1MiwkISM5JCEwTyNIeDBwaEQhIzs3JCQiMCNcKXB6WiQ+SiEjOiQhMCYpXFcuIlFFRiEjOzckJCIwIj1Pc2MhcEAkISM6JCEwQk96J3pDeEchIzs3JCQiMD5Rd19wNUskISM6JCEwN2RMIW8/VEkhIzs3JCQiMGM2QllkYVQkISM6JCEwXi0uc0RBPiQhIzs3JCQiMDpJZ1NbJz1OISM6JCEwPVZmaGkpZkwhIzs3JCQiMDA2QS9WZGgkISM6JCEwazhDKD0qKT5OISM7NyQkIjAleWM4XEI8UCEjOiQhMCw7QCtAJSpvJCEjOzckJCIwQVcpbzxZO1EhIzokITBFPC8wcHMmUSEjOzckJCIwRV8vNFYuI1IhIzokITBUTGlOJTNOUyEjOzckJCIwdVsoXEpSP1MhIzokITBDTDskKlEjM1UhIzs3JCQiMGxIZnkzRjclISM6JCEwJFs/KG80clElISM7NyQkIjAkXClwPnhUQSUhIzokITBbKWZ0UDttWCEjOzckJCIwQVYnR2hUPFYhIzokITBDSiVRdy9LWiEjOzckJCIwbUpqWXlVVSUhIzokITA+LT0ySk8jXCEjOzckJCIwUXZdVGQpPlghIzokITBGcl1FJD4nNCYhIzs3JCQiMHVaJjRYd0BZISM6JCEwKVxudFRKIkcmISM7NyQkIjAwNT9nLSQ+WiEjOiQhME5BZjkhW2ZhISM7NyQkIjAoSGY9aGdGWyEjOiQhMCJveGcpKkhlYyEjOzckJCIwOklnKypRQFwhIzokITAlKT0kZkQ+SmUhIzs3JCQiMGI1QFVMeS0mISM6JCEwWGc5Pj4iR2chIzs3JCQiMHplPCZmJVs3JiEjOiQhMG5IdUtCIjNpISM7NyQkIjBMbElUaTRCJiEjOiQhMGskKkdLbWFTJyEjOzckJCIwS2tHKEhfQWAhIzokIS9GLldILHdsISM6NyQkIjAyOUd3KnpFYSEjOiQhMFYlUW5qVnFuISM7NyQkIjAmKXBSKmZfRmIhIzokITBaLTorPCRlcCEjOzckJCIwZTpKVSc9R2MhIzokIS82dS9YLllyISM6NyQkIjBfLjJhdyVHZCEjOiQhMG1AQDczSEwoISM7NyQkIjBuTG4lUiNbI2UhIzokITBwcC8sKD03diEjOzckJCIwNkBVL3kqR2YhIzokIS8oUUNlLmNxKCEjOjckJCIwR2M3WFcjR2chIzokIS9lJ3B0ZCUqKXkhIzo3JCQiMHdeLm48RjgnISM6JCEwbSUpW0REQjMpISM7NyQkIjBIZDk0IkhGaSEjOiQhMC9nYSUqZWlEKSEjOzckJCIwbEloVTc9TCchIzokITAmeU1HIVx3VykhIzs3JCQiMEdjN2xEPlYnISM6JCEwKVFcMk4uSScpISM7NyQkIjAmKiopej4mekpsISM6JCEweSZvYXgmNCIpKSEjOzckJCIwPExtSzRoaichIzokITA5QUxBUSgpKiopISM7NyQkIjA9T3NXJz1LbiEjOiQhL2BCIVI2MDwqISM6NyQkIjAtLzNjI2VJbyEjOiQhMFF6LWZoXk0qISM7NyQkIjAwND1jQiNScCEjOiQhMDM3SkshUk8mKiEjOzckJCIwQ1olKjMqZVBxISM6JCEwXFNOWXZ6cSohIzs3JCQiMG1KakUnPVFyISM6JCEwdms+PUE9KSkqISM7NyQkIi8sLS81XFNzISM5JCEwUTdMbSNvMDUhIzo3JCQiMDpIZScqR1hMKCEjOiQhMCJbcyNvKzstIiEjOjckJCIvKFJ6UXFaVighIzkkITB1a0A1I1FRNSEjOjckJCIwOkhld1tVYCghIzokITAlPkApPU9bMCIhIzo3JCQiMHJVJjMoZjFrKCEjOiQhMCZ6d2NrP3M1ISM6NyQkIjAqKXlkdmlYdCghIzokITBFcGlXR3QzIiEjOjckJCIwWiUqKXl0IUgleSEjOiQhMGljNUdEWDUiISM6NyQkIjBAVCNbK29TeiEjOiQhMGgvNlUvKT42ISM6NyQkIjAmKXBSKjRVUCEpISM6JCEwUkBZOSFwTTYhIzo3JCQiMHNXKillWzk5KSEjOiQhL3RwQS5WXTYhIzk3JCQiMCNcKXAqcCplQykhIzokITBfNzBhWWY7IiEjOjckJCIwZDlIZUg0TSkhIzokITAiWzZxYSEpejYhIzo3JCQiLyNSeScqXD1XKSEjOSQhMGUjKVwzWFU+IiEjOjckJCIpJVEuYSkhIikkITApW0l6RjAzNyEjOjckJCIwXChcKiozNVonKSEjOiQhMDQxbmUlcEE3ISM6NyQkIjBpQlo5IVtSKCkhIzokITAvWTgoSDNONyEjOjckJCIwbUpqMSJlWCkpISM6JCEwdHdpZiIpKls3ISM6NyQkIjB3XzBeQGAlKikhIzokITBZJSpwYzw8RSIhIzo3JCQiMEZhM2QpNFchKiEjOiQhMDpgQ0ozU0YiISM6NyQkIjBCWCE0VSZIOSohIzokITBuKSkpNDEpZkciISM6NyQkIjBjN0RxIXlWIyohIzokITBBKG9ZZyV5SCIhIzo3JCQiMFQjWyc0YjFOKiEjOiQhMG4lejJULjU4ISM6NyQkIjBFXi1YWydbJSohIzokITBiJD4mR10zSyIhIzo3JCQiMCRvT3QvUVgmKiEjOiQhMDEnKik9UT1KOCEjOjckJCIwTnFTVCZ5WycqISM6JCEwSktzJmYlPU0iISM6NyQkIjBHYzdEbD52KiEjOiQhMDhRJkg/M184ISM6NyQkIjAxN0NHdlglKSohIzokITBbJEciKjQjNE8iISM6NyQkIjBkOEZheVUmKiohIzokITBvMCRmdyY0UCIhIzo3JCQiMCc9UDl0Zy81ISM5JCEwd2t5JSkpKSp5OCEjOjckJCIvLC1DUE06NSEjOCQhLzk7QDgmelEiISM5NyQkIjBuTXBlIWZENSEjOSQhMEcmKXpebGdSIiEjOjckJCIwKFsoXCIpUlouIiEjOSQhMCIpUiQ+RSVIUyIhIzo3JCQiMChSenkhSF0vIiEjOSQhMCxsKilcYy1UIiEjOjckJCIwbUtsYSdRYjUhIzkkIS9pSEdSOzw5ISM5NyQkIjA9TnF5JXBsNSEjOSQhLyopKXBmek5VIiEjOTckJCIwa0ZiJT1EdjUhIzkkITBfUyIqKVE2SDkhIzo3JCQiMDpJZ2laXjMiISM5JCEwNiQzPStVTTkhIzo3JCQiMCI+UWM9USY0IiEjOSQhMEotKSlvWyVSOSEjOjckJCIwOUZhRSRlMDYhIzkkITAoKUdIKj4qUlciISM6NyQkIjByVSZvbTI7NiEjOSQhMHJqWGdyIls5ISM6NyQkIjBmPVBFPmA3IiEjOSQhMGhMeFNNOVgiISM6NyQkIjAjUnlPVXNONiEjOSQhMEgicEVVamE5ISM6NyQkIjBNb08kPjxZNiEjOSQhMClHXiRcUXRYIiEjOjckJCIwa0ZiQVNpOiIhIzkkITBbKFx0I2UlZjkhIzo3JCQiMFsmNCo+JFFsNiEjOSQhLl5Jam00WSIhIzg3JCQiMChcKip5XUR3NiEjOSQhMD5EaVRTQVkiISM6NyQkIjBvT3QpXFkmPSIhIzkkITAnUjBsWihHWSIhIzo3JCQiMCwsLUl5aD4iISM5JCEwKUcjKjNoNGo5ISM6NyQkIjAkcFEoUmhjPyIhIzkkITAzOCwlZSNHWSIhIzo3JCQiMCYqKil6JmUxOzchIzkkITA7ejEiRy1pOSEjOjckJCIwaUNcT3RmQSIhIzkkITB4ZVsuajJZIiEjOjckJCIwQlghNDNKTzchIzkkITBqNypINyQqZTkhIzo3JCQiMHVbKDRRIWVDIiEjOSQhMDRjJylwInljOSEjOjckJCIwTW5NSFZnRCIhIzkkITBESkJhZlJYIiEjOjckJCIwWydIUiN6bUUiISM5JCEwI2U1WEZaXTkhIzo3JCQiMC8yOSd5JGZGIiEjOSQhMFlcJClHdnBXIiEjOjckJCIwbk1wVVBmRyIhIzkkIS9tQC9NclU5ISM5NyQkIjAiSGVjekUnSCIhIzkkITA4TGZ6IXlQOSEjOjckJCIwNkFXT3VqSSIhIzkkITA3RiNmS1ZLOSEjOjckJCIwTW9PJEc6OzghIzkkIS8mW040bm5VIiEjOTckJCIwIkhlYywsRjghIzkkITBmeCwsMyo+OSEjOjckJCIvMTdXZndPOCEjOCQhMFs9RSFbQjg5ISM6NyQkIjBDWydIQj1aOCEjOSQhMDFGP2h3YlMiISM6NyQkIjBlOko3QG1OIiEjOSQhME8+Z21oIilSIiEjOjckJCIwVyhbPC0lcE8iISM5JCEwQ0J6NFEmKlEiISM6NyQkIjBgMDZvXG1QIiEjOSQhMGh2Rz5KNFEiISM6NyQkIjBAVCNvKSl6J1EiISM5JCEwaSUqM1BDOVAiISM6NyQkIjAlKW9QYkBuUiIhIzkkITAqcHRHa2loOCEjOjckJCIwbEhmbzRyUyIhIzkkITA9YXMjbyQzTiIhIzo3JCQiLyRmPXA5clQiISM4JCEwTTMrIz4kKlI4ISM6NyQkIjBSeGFEWXRVIiEjOSQhMDcheSR5ZyNHOCEjOjckJCIwIkhlJzQkXFA5ISM5JCEwR0Z3VnBoSiIhIzo3JCQiMHVbKCopcCJvVyIhIzkkITAmb0pmbWcvOCEjOjckJCIwZjxOQS52WCIhIzkkITBbI29zVCMzSCIhIzo3JCQiMCc+Uj02MW45ISM5JCEvRCdbTz4heTchIzk3JCQiLyNSeSM9RHg5ISM4JCEwIkhkN0UoUUUiISM6NyQkIjBWJjNQYysoWyIhIzkkITAsdSZRdCYpXDchIzo3JCQiMHNWKCkpZiR5XCIhIzkkITBzIyk9QGFQQiIhIzo3JCQiMFcoW3hVQDI6ISM5JCEwPCFvRktOPjchIzo3JCQiMFsmND4oZXleIiEjOSQhL1pdc3pcLTchIzk3JCQiLy4xcypmdl8iISM4JCEwTDgyXW5tPSIhIzo3JCQiMCY0Pj07PFE6ISM5JCEweVg0KVElKW82ISM6NyQkIjAmMzx1d0taOiEjOSQhMDcyKHpEL2A2ISM6NyQkIjAkZTtgYHZkOiEjOSQhMEQ4a1p1WDgiISM6NyQkIjBUIkd3eiN5YyIhIzkkIS93WFVCRTs2ISM5NyQkIjApZj4+Uyp5ZCIhIzkkITBNKVJKSF0oNCIhIzo3JCQiMHhhNC5CemUiISM5JCEwTitYNGgkeTUhIzo3JCQiMHpkOnhkdmYiISM5JCEwdGdbT18mZjUhIzo3JCQiMGAxOD10emciISM5JCEwJmZzMkp3UTUhIzo3JCQiMDA1PyMpKip5aCIhIzkkITB1P1gjUV49NSEjOjckJCIvJz5SOVokRzshIzgkITBEbjgjelxuKiohIzs3JCQiMDpJZ1sveWoiISM5JCEwJ1xlI3BPbHcqISM7NyQkIjBcKFw+bURbOyEjOSQhMHkoeiteOVMmKiEjOzckJCIwMDU/JXpFZTshIzkkITAlXFV2Xjk+JCohIzs3JCQiMFUkbycqW0RvOyEjOSQhMG5wbEEtWjQqISM7NyQkIjB1WiY0am95OyEjOSQhMCpHZG1ONWMpKSEjOzckJCIwLzM7LSVIKW8iISM5JCEwYDpgKDRsSycpISM7NyQkIjAjWydIakwiKXAiISM5JCEwM1pEKW8/KyUpISM7NyQkIjBMbEl0KCoqMzwhIzkkIS8jW0BsQSVSIikhIzo3JCQiMDpIZUdNKT08ISM5JCEwTiN6Kj5WJyoqeSEjOzckJCIwZjxOKyUqKUc8ISM5JCEwYUJwLDg0bCghIzs3JCQiMFYnR3hXN1I8ISM5JCEwXmoiKVE2V1IoISM7NyQkIjBNbk1GRyZbPCEjOSQhLmopKik+Y2JyISM5NyQkIjBSeWNUXyZlPCEjOSQhMHJDWClIIXkqbyEjOzckJCIwTW5NRCsmbzwhIzkkITBiXGQ+IykpUW0hIzs3JCQiMHBReE1UIno8ISM5JCEwWiIpZl8jZWVqISM7NyQkIjBKaUNsSiYpeSIhIzkkITAoSDRtPVkzaCEjOzckJCIwKFF4OWhPKnoiISM5JCEwX3E6W21uImUhIzs3JCQiMGEzPFFWIjQ9ISM5JCEwZiUpemsjeV1iISM7NyQkIjBUIkd3dSIpPT0hIzkkITBFJz4lPlNeRyYhIzs3JCQiMCopeWRCPyNIPSEjOSQhMF9vIVIicG8qXCEjOzckJCIwIkhld11tUj0hIzkkITA3PTRBRltxJSEjOzckJCIwKWU8TiRvIlw9ISM5JCEwTiQqKltyJnBWJSEjOzckJCIwTW9PUGcjZj0hIzkkITBlc2N1aC46JSEjOzckJCIwVSUpb0A0InA9ISM5JCEwY2BPWHcnb1EhIzs3JCQiMDxNb1kmeXo9ISM5JCEwS2dnKClSN2MkISM7NyQkIjB5YzhSQiEqKT0hIzkkITA8SG03KGUkSCQhIzs3JCQiMGY8TltMJyoqPSEjOSQhMEZEW3FaVylIISM7NyQkIi8oUnpfMic0PiEjOCQhLyVwekEhSCNwIyEjOjckJCIwJilwUkImWz4+ISM5JCEvcDAzMGgsQyEjOjckJCIwJSopeSh6cSRIPiEjOSQhMFhuTHkmXDRAISM7NyQkIjBvTnJXYCVSPiEjOSQhMF8xTXVmLyI9ISM7NyQkIjBtS2wpMzldPiEjOSQhMFwpM1Y8VyNcIiEjOzckJCIwYjQ+QVMqZj4hIzkkITBHbkhdZCs/IiEjOzckJCIwNkBVVTgncD4hIzkkITBYKUdMS08zIiohIzw3JCQiMFkiSD1SJip6PiEjOSQhMCdlLjolSDssJyEjPDckJCIwMDU/IT5GISo+ISM5JCEwQjBITXgiPUghIzw3JCQiIz8hIiIkIiIhISIiLSUlVklFV0c2JDskIiIhISIiJCIjPyEiIiUoREVGQVVMVEctJStBWEVTTEFCRUxTRzYkLUkjbWlHNiMvSSttb2R1bGVuYW1lRzYiSSxUeXBlc2V0dGluZ0dJKF9zeXNsaWJHNiI2NVEieDYiLyUnZmFtaWx5R1EhNiIvJSVzaXplR1EjMTA2Ii8lJWJvbGRHUSZmYWxzZTYiLyUnaXRhbGljR1EldHJ1ZTYiLyUqdW5kZXJsaW5lR1EmZmFsc2U2Ii8lKnN1YnNjcmlwdEdRJmZhbHNlNiIvJSxzdXBlcnNjcmlwdEdRJmZhbHNlNiIvJStmb3JlZ3JvdW5kR1EoWzAsMCwwXTYiLyUrYmFja2dyb3VuZEdRLlsyNTUsMjU1LDI1NV02Ii8lJ29wYXF1ZUdRJmZhbHNlNiIvJStleGVjdXRhYmxlR1EmZmFsc2U2Ii8lKXJlYWRvbmx5R1EmZmFsc2U2Ii8lKWNvbXBvc2VkR1EmZmFsc2U2Ii8lKmNvbnZlcnRlZEdRJmZhbHNlNiIvJStpbXNlbGVjdGVkR1EmZmFsc2U2Ii8lLHBsYWNlaG9sZGVyR1EmZmFsc2U2Ii8lNnNlbGVjdGlvbi1wbGFjZWhvbGRlckdRJmZhbHNlNiIvJSxtYXRodmFyaWFudEdRJ2l0YWxpYzYiUSE2Ii0lJlRJVExFRzYkLSUpX1RZUEVTRVRHNiMtSSNtaUc2Iy9JK21vZHVsZW5hbWVHNiJJLFR5cGVzZXR0aW5nR0koX3N5c2xpYkc2IjY2UTBCZWFtfkRlZmxlY3Rpb242Ii8lJ2ZhbWlseUdRMFRpbWVzfk5ld35Sb21hbjYiLyUlc2l6ZUdRIzEwNiIvJSVib2xkR1EmZmFsc2U2Ii8lJ2l0YWxpY0dRJXRydWU2Ii8lKnVuZGVybGluZUdRJmZhbHNlNiIvJSpzdWJzY3JpcHRHUSZmYWxzZTYiLyUsc3VwZXJzY3JpcHRHUSZmYWxzZTYiLyUrZm9yZWdyb3VuZEdRKFswLDAsMF02Ii8lK2JhY2tncm91bmRHUS5bMjU1LDI1NSwyNTVdNiIvJSdvcGFxdWVHUSZmYWxzZTYiLyUrZXhlY3V0YWJsZUdRJmZhbHNlNiIvJSlyZWFkb25seUdRJmZhbHNlNiIvJSljb21wb3NlZEdRJmZhbHNlNiIvJSpjb252ZXJ0ZWRHUSZmYWxzZTYiLyUraW1zZWxlY3RlZEdRJmZhbHNlNiIvJSxwbGFjZWhvbGRlckdRJmZhbHNlNiIvJTZzZWxlY3Rpb24tcGxhY2Vob2xkZXJHUSZmYWxzZTYiLyUwZm9udF9zdHlsZV9uYW1lR1ElVGV4dDYiLyUsbWF0aHZhcmlhbnRHUSdpdGFsaWM2Ii0lLVRSQU5TUEFSRU5DWUc2IyQiIiEhIiItJSZDT0xPUkc2JiUkUkdCRyQiIiEhIiIkIiIhISIiJCIjNSEiIi0lJVJPT1RHNictJSlCT1VORFNfWEc2IyQiJDUnISIiLSUpQk9VTkRTX1lHNiMkIiRxIyEiIi0lLUJPVU5EU19XSURUSEc2IyQiJSF6JiEiIi0lLkJPVU5EU19IRUlHSFRHNiMkIiVJTCEiIi0lKUNISUxEUkVORzYi

plot(th,x=0..L,title=`Beam Slope`, color=blue);

LSUlUExPVEc2KC0lJ0NVUlZFU0c2IzdkdzckJCIiISEiIiQiIiEhIiI3JCQiMDhEXStAOjAiISM7JCEwOGUxSDhnRyghIzw3JCQiMEJYITRRV20+ISM7JCEvVFU8K1RdOCEjOjckJCIweGE0PnFgKkghIzskITBmb3ZfLGkuIyEjOzckJCIwN0NbJ3A2SlMhIzskITBbJj5GOjY3RiEjOzckJCIwUXZdLFQ+MSYhIzskITB1MClHR1dxTCEjOzckJCIwaEBWJ29rPGchIzskITBGR1RFLiFvUiEjOzckJCIwJ0dkOVxBMnEhIzskITBCQ2ssdlBkJSEjOzckJCIwdVsoXHprSSEpISM7JCEwLU86PihSJz0mISM7NyQkIjBPclUmKSl5XSEqISM7JCEwSk56TExJeSYhIzs3JCQiMCJIZTtILDU1ISM6JCEweiQpXHJiQFEnISM7NyQkIjByVCRvKVFDNSIhIzokITAyOilbJj53Km8hIzs3JCQiMClcKiopZilbMTchIzokITByPEZdL1VZKCEjOzckJCIvI1J5Y2w0SiIhIzkkITAoUTAnSEgmPSEpISM7NyQkIjA7S2tbWztUIiEjOiQhMFtYIykzOSpRJikhIzs3JCQiMGI1QEF5SV0iISM6JCEwJXo3dXl1KioqKSEjOzckJCIwYDA2LSh6NjshIzokITA3Lm55QEtgKiEjOzckJCIwaEFYNScqUXEiISM6JCEwKUdwMSFSRygqKiEjOzckJCIwJGU7TCNINSI9ISM6JCEwIj5oeFcrWjUhIzo3JCQiMDhEXT9nZSE+ISM6JCEwPG1XR1koKjMiISM6NyQkIjBHYjUiWyEqND8hIzokITBzOFJTc184IiEjOjckJCIwLC0vKSl6KjNAISM6JCEwaGZ4NSdIeDYhIzo3JCQiMC8zO0thQkAjISM6JCEwaChSYWR3PjchIzo3JCQiMEFWJ0dWRzJCISM6JCEweik+TCpIdkQiISM6NyQkIjA6SGU7eic0QyEjOiQhMCZRaidIU3BIIiEjOjckJCIvMTdDJ1FnXiMhIzkkITBVQi5JRWtMIiEjOjckJCIwOEVfJVtpM0UhIzokITByZGpCKmZwOCEjOjckJCIwXi0wXT8nM0YhIzokITAqSCY0SHdUUyIhIzo3JCQiMCNcKXB6RD4iRyEjOiQhMEBwWCh6YFE5ISM6NyQkIjApb1B2KSopSCJIISM6JCEwKHpLSDcjM1oiISM6NyQkIi8jUnljdTIsJCEjOSQhMDFIQ0cxM10iISM6NyQkIjAjXClwelokPkohIzokITBqSmJmakVgIiEjOjckJCIwIj1Pc2MhcEAkISM6JCEwWyI+QFkrZzohIzo3JCQiMD5Rd19wNUskISM6JCEwJHpnXS4neWUiISM6NyQkIjBjNkJZZGFUJCEjOiQhMHhzVjk5PmgiISM6NyQkIjA6SWdTWyc9TiEjOiQhMCNwVk5XI3BqIiEjOjckJCIwMDZBL1ZkaCQhIzokITB5JFs7WkJmOyEjOjckJCIwJXljOFxCPFAhIzokITBvcGQkUUgibyIhIzo3JCQiMEFXKW88WTtRISM6JCEwZWRKWD47cSIhIzo3JCQiMEVfLzRWLiNSISM6JCEwImZ3XCcqZUA8ISM6NyQkIjB1WyhcSlI/UyEjOiQhMFokPkVPY1I8ISM6NyQkIjBsSGZ5M0Y3JSEjOiQhMDRQX2RzbXYiISM6NyQkIjAkXClwPnhUQSUhIzokITBqdkQhZlBzPCEjOjckJCIwQVYnR2hUPFYhIzokITBbJUhXOnEmeSIhIzo3JCQiMG1Kall5VVUlISM6JCEwYzYkZjFvKnoiISM6NyQkIjBRdl1UZCk+WCEjOiQhMFleMVs+NSI9ISM6NyQkIjB1WiY0WHdAWSEjOiQhMDRDLCJcIT4jPSEjOjckJCIwMDU/Zy0kPlohIzokITA3V19HbTYkPSEjOjckJCIwKEhmPWhnRlshIzokITByUy5hSiwlPSEjOjckJCIwOklnKypRQFwhIzokIS1OSzN5WT0hIzc3JCQiMGI1QFVMeS0mISM6JCEwYyNlRkozYD0hIzo3JCQiMHplPCZmJVs3JiEjOiQhLy9QbTpvZD0hIzk3JCQiMExsSVRpNEImISM6JCEwNiQ+OiJwOSc9ISM6NyQkIjBLa0coSF9BYCEjOiQhMHApUjAzcWo9ISM6NyQkIjAyOUd3KnpFYSEjOiQhMEtLZUkiM2w9ISM6NyQkIjAmKXBSKmZfRmIhIzokITAqUS9UKltfJz0hIzo3JCQiMGU6SlUnPUdjISM6JCEwWTVXUyFHaz0hIzo3JCQiMF8uMmF3JUdkISM6JCEwQEtwWiU+aT0hIzo3JCQiMG5MbiVSI1sjZSEjOiQhMGgyYXhXImY9ISM6NyQkIjA2QFUveSpHZiEjOiQhMDttOEovWiY9ISM6NyQkIjBHYzdYVyNHZyEjOiQhMCYqPmhFdiRcPSEjOjckJCIwd14ubjxGOCchIzokITBSZjk9P0UlPSEjOjckJCIwSGQ5NCJIRmkhIzokITBNPj54KlxOPSEjOjckJCIwbEloVTc9TCchIzokITBRcSEpb0dsIz0hIzo3JCQiMEdjN2xEPlYnISM6JCEwVGE3KTQnbyI9ISM6NyQkIjAmKiopej4mekpsISM6JCEvTygpRyZ5aCE9ISM5NyQkIjA8TG1LNGhqJyEjOiQhLypcXCFSI1J6IiEjOTckJCIwPU9zVyc9S24hIzokITBqTCNvXWwieSIhIzo3JCQiMC0vM2MjZUlvISM6JCEwOW4reEIibzwhIzo3JCQiMDA0PWNCI1JwISM6JCEwIjMwKkhmP3YiISM6NyQkIjBDWiUqMyplUHEhIzokITBuOSo+cl1PPCEjOjckJCIwbUpqRSc9UXIhIzokITBBYVIiSGk+PCEjOjckJCIvLC0vNVxTcyEjOSQhMFVQeG1aOXEiISM6NyQkIjA6SGUnKkdYTCghIzokITBCdiIqXGRRbyIhIzo3JCQiLyhSelFxWlYoISM5JCEwJmYvLGI9azshIzo3JCQiMDpIZXdbVWAoISM6JCEvOU4kKVJ0VjshIzk3JCQiMHJVJjMoZjFrKCEjOiQhMDNCKFFdJTNpIiEjOjckJCIwKil5ZHZpWHQoISM6JCEwJmZgOiMpeSpmIiEjOjckJCIwWiUqKXl0IUgleSEjOiQhMGMvIkdoXXU6ISM6NyQkIjBAVCNbK29TeiEjOiQhMCdbKDM5JnpdOiEjOjckJCIwJilwUio0VVAhKSEjOiQhME1jKzU0bF8iISM6NyQkIjBzVyopZVs5OSkhIzokITAjUWowLlwqXCIhIzo3JCQiMCNcKXAqcCplQykhIzokITAtZyh6T1ZyOSEjOjckJCIwZDlIZUg0TSkhIzokITBDZSQ0KDReVyIhIzo3JCQiLyNSeScqXD1XKSEjOSQhMGBRMTpPalQiISM6NyQkIiklUS5hKSEiKSQhME1tJG9dWChRIiEjOjckJCIwXChcKiozNVonKSEjOiQhMC8qRyVIb19OIiEjOjckJCIwaUJaOSFbUigpISM6JCEwaj8tSCJwRTghIzo3JCQiMG1KajEiZVgpKSEjOiQhMCQ9YygqPTAkSCIhIzo3JCQiMHdfMF5AYCUqKSEjOiQhMDs2aFNYMUUiISM6NyQkIjBGYTNkKTRXISohIzokITAjek0ocDt5QSIhIzo3JCQiMEJYITRVJkg5KiEjOiQhMDckPS5DQyU+IiEjOjckJCIwYzdEcSF5ViMqISM6JCEweT1rKTRGZjYhIzo3JCQiMFQjWyc0YjFOKiEjOiQhMClIRj9eVEA2ISM6NyQkIjBFXi1YWydbJSohIzokITBrXiJHeCsnMyIhIzo3JCQiMCRvT3QvUVgmKiEjOiQhMDY+QkA6LzAiISM6NyQkIjBOcVNUJnlbJyohIzokITBUNXYjem42NSEjOjckJCIwR2M3RGw+diohIzokITA+RlddLkxzKiEjOzckJCIwMTdDR3ZYJSkqISM6JCEwS2Z6SmVWTyohIzs3JCQiMGQ4RmF5VSYqKiEjOiQhMGs8cEljQSQqKSEjOzckJCIwJz1QOXRnLzUhIzkkITBpJ2ZfSTJsJikhIzs3JCQiLywtQ1BNOjUhIzgkITBfJSkpKXp5I0giKSEjOzckJCIwbk1wZSFmRDUhIzkkITAmNHRFPToyeCEjOzckJCIwKFsoXCIpUlouIiEjOSQhMEtbJjQhZl9LKCEjOzckJCIwKFJ6eSFIXS8iISM5JCEwMVUmXGxKISpvISM7NyQkIjBtS2xhJ1FiNSEjOSQhMDdiJGZYIm9XJyEjOzckJCIwPU5xeSVwbDUhIzkkITAqej5HKlEqKipmISM7NyQkIjBrRmIlPUR2NSEjOSQhLlBVKFsqM2UmISM5NyQkIjA6SWdpWl4zIiEjOSQhMEFXdT5gQjkmISM7NyQkIjAiPlFjPVEmNCIhIzkkITB2OlMoZislbyUhIzs3JCQiMDlGYUUkZTA2ISM5JCEwImYuOXBWQVUhIzs3JCQiMHJVJm9tMjs2ISM5JCEwKFFIUVImSHUkISM7NyQkIjBmPVBFPmA3IiEjOSQhMEtSPW1Fb0okISM7NyQkIjAjUnlPVXNONiEjOSQhMHVbKydSLUxHISM7NyQkIjBNb08kPjxZNiEjOSQhMCdmV1l1MVZCISM7NyQkIjBrRmJBU2k6IiEjOSQhMC8kNElZOG49ISM7NyQkIjBbJjQqPiRRbDYhIzkkITBwQm0uKCk9ViIhIzs3JCQiMChcKip5XUR3NiEjOSQhL2tXeiE0dTUqISM7NyQkIjBvT3QpXFkmPSIhIzkkITA8Vi92WU9tJSEjPDckJCIwLCwtSXloPiIhIzkkIjApKlxhZCopKnBgISM9NyQkIjAkcFEoUmhjPyIhIzkkIi8xaWxWLm5eISM7NyQkIjAmKiopeiZlMTs3ISM5JCIwWzEiZk5QRjUhIzs3JCQiMGlDXE90ZkEiISM5JCIwJSp6Vyx6Z14iISM7NyQkIjBCWCE0M0pPNyEjOSQiMCQzVSF5PiRHPyEjOzckJCIwdVsoNFEhZUMiISM5JCIwaCFvIVFRMV0jISM7NyQkIjBNbk1IVmdEIiEjOSQiMGhRPCU9KD4sJCEjOzckJCIwWydIUiN6bUUiISM5JCIwaSpwVD8mXGEkISM7NyQkIjAvMjkneSRmRiIhIzkkIjBXPE9Nci0sJSEjOzckJCIwbk1wVVBmRyIhIzkkIjBcanNDbVNeJSEjOzckJCIwIkhlY3pFJ0giISM5JCIwKFIlZi8nb05dISM7NyQkIjA2QVdPdWpJIiEjOSQiMGVxPG08cGEmISM7NyQkIjBNb08kRzo7OCEjOSQiMCw5a1ZWQS8nISM7NyQkIjAiSGVjLCxGOCEjOSQiMEgtM0p6RmYnISM7NyQkIi8xN1dmd084ISM4JCIwWScpMyQ+dygzKCEjOzckJCIwQ1snSEI9WjghIzkkIjBUYCdRJ2ZqaCghIzs3JCQiMGU6SjdAbU4iISM5JCIwYVFaMVxfNCkhIzs3JCQiMFcoWzwtJXBPIiEjOSQiLyQzTVcnWz0nKSEjOjckJCIwYDA2b1xtUCIhIzkkIjBcJW9ZaUo1IiohIzs3JCQiMEBUI28pKXonUSIhIzkkIjBoYClwd3BCJyohIzs3JCQiMCUpb1BiQG5SIiEjOSQiMCd6SzAuWjc1ISM6NyQkIjBsSGZvNHJTIiEjOSQiL2UzSDchWzEiISM5NyQkIi8kZj1wOXJUIiEjOCQiMCpcJikqcGtdNiIhIzo3JCQiMFJ4YURZdFUiISM5JCIwI2VVN1hJbTYhIzo3JCQiMCJIZSc0JFxQOSEjOSQiMC1gUjFPcEAiISM6NyQkIjB1WygqKXAib1ciISM5JCIwZGtfUCFHajchIzo3JCQiMGY8TkEudlgiISM5JCIwbCd5WCpmaEoiISM6NyQkIjAnPlI9NjFuOSEjOSQiMC5gaF9AS08iISM6NyQkIi8jUnkjPUR4OSEjOCQiMCkpUTtsS0pUIiEjOjckJCIwViYzUGMrKFsiISM5JCIwZGslKVJEMVkiISM6NyQkIjBzVigpKWYkeVwiISM5JCIwX1s4TDpJXiIhIzo3JCQiMFcoW3hVQDI6ISM5JCIwQjBNKHAxZTohIzo3JCQiMFsmND4oZXleIiEjOSQiL0E5aUgjKTM7ISM5NyQkIi8uMXMqZnZfIiEjOCQiMGhRN0U0WmwiISM6NyQkIjAmND49OzxROiEjOSQiMEhcYHFwV3EiISM6NyQkIjAmMzx1d0taOiEjOSQiMDtMUlRAcXUiISM6NyQkIjAkZTtgYHZkOiEjOSQiMHdmNnhFXXoiISM6NyQkIjBUIkd3eiN5YyIhIzkkIjAqendVRSI0JT0hIzo3JCQiMClmPj5TKnlkIiEjOSQiMFxYSEVvaSk9ISM6NyQkIjB4YTQuQnplIiEjOSQiMHdkZndONCQ+ISM6NyQkIjB6ZDp4ZHZmIiEjOSQiMCopb00lXEx0PiEjOjckJCIwYDE4PXR6ZyIhIzkkIjAsIlFoKXomPT8hIzo3JCQiMDA1PyMpKip5aCIhIzkkIjAlM3pvcTVoPyEjOjckJCIvJz5SOVokRzshIzgkIi9GciIpPUAwQCEjOTckJCIwOklnWy95aiIhIzkkIjBUVlYrUFg5IyEjOjckJCIwXChcPm1EWzshIzkkIjBmTj48NHQ9IyEjOjckJCIwMDU/JXpFZTshIzkkIjBRIz1BTmRGQSEjOjckJCIwVSRvJypbRG87ISM5JCIwbGtuWkdxRSMhIzo3JCQiMHVaJjRqb3k7ISM5JCIwXyVIPVBYMkIhIzo3JCQiMC8zOy0lSClvIiEjOSQiME5uKj5EJlJNIyEjOjckJCIwI1snSGpMIilwIiEjOSQiMEBFJSlReTBRIyEjOjckJCIwTGxJdCgqKjM8ISM5JCIwKil6X20tLFUjISM6NyQkIjA6SGVHTSk9PCEjOSQiMDonejRRLmJDISM6NyQkIjBmPE4rJSopRzwhIzkkIjBCV3J6ISopKlsjISM6NyQkIjBWJ0d4VzdSPCEjOSQiME51N3A4V18jISM6NyQkIjBNbk1GRyZbPCEjOSQiMDInXE4oKkhiRCEjOjckJCIwUnljVF8mZTwhIzkkIjBqbHFZL3RlIyEjOjckJCIwTW5NRCsmbzwhIzkkIi9DUGVFNT1FISM5NyQkIjBwUXhNVCJ6PCEjOSQiMFliZnRiKlxFISM6NyQkIjBKaUNsSiYpeSIhIzkkIjA2JEhaRTV4RSEjOjckJCIwKFF4OWhPKnoiISM5JCIwUmFObXRzcSMhIzo3JCQiMGEzPFFWIjQ9ISM5JCIwLWpqNTpNdCMhIzo3JCQiMFQiR3d1Iik9PSEjOSQiMCJ5Zlk4Q2VGISM6NyQkIjAqKXlkQj8jSD0hIzkkIjBBTmZuYlB5IyEjOjckJCIwIkhld11tUj0hIzkkIjBIVmpyNSIzRyEjOjckJCIwKWU8TiRvIlw9ISM5JCIwLj50b1ciSEchIzo3JCQiME1vT1BnI2Y9ISM5JCIvQiJvTCFHXUchIzk3JCQiMFUlKW9ANCJwPSEjOSQiMEJoKVFtb3BHISM6NyQkIjA8TW9ZJnl6PSEjOSQiL2FUUDJMKilHISM5NyQkIjB5YzhSQiEqKT0hIzkkIjBCVyxpTF4hSCEjOjckJCIwZjxOW0wnKio9ISM5JCIwd0N1KmUpPSNIISM6NyQkIi8oUnpfMic0PiEjOCQiMF8pZXY/Q09IISM6NyQkIjAmKXBSQiZbPj4hIzkkIi5PT3osIlxIISM4NyQkIjAlKil5KHpxJEg+ISM5JCIwLilcOjZmZ0ghIzo3JCQiMG9OcldgJVI+ISM5JCIwRlpEJHkmMyhIISM6NyQkIjBtS2wpMzldPiEjOSQiMD5hbyRwNSEpSCEjOjckJCIwYjQ+QVMqZj4hIzkkIjAkSEBXLjMoKUghIzo3JCQiMDZAVVU4J3A+ISM5JCIwRGdiO0FEKkghIzo3JCQiMFkiSD1SJip6PiEjOSQiMDM/PCZccycqSCEjOjckJCIwMDU/IT5GISo+ISM5JCIwKD5XXlFBKipIISM6NyQkIiM/ISIiJCIiJCEiIi0lJVZJRVdHNiQ7JCIiISEiIiQiIz8hIiIlKERFRkFVTFRHLSUrQVhFU0xBQkVMU0c2JC1JI21pRzYjL0krbW9kdWxlbmFtZUc2IkksVHlwZXNldHRpbmdHSShfc3lzbGliRzYiNjVRIng2Ii8lJ2ZhbWlseUdRITYiLyUlc2l6ZUdRIzEwNiIvJSVib2xkR1EmZmFsc2U2Ii8lJ2l0YWxpY0dRJXRydWU2Ii8lKnVuZGVybGluZUdRJmZhbHNlNiIvJSpzdWJzY3JpcHRHUSZmYWxzZTYiLyUsc3VwZXJzY3JpcHRHUSZmYWxzZTYiLyUrZm9yZWdyb3VuZEdRKFswLDAsMF02Ii8lK2JhY2tncm91bmRHUS5bMjU1LDI1NSwyNTVdNiIvJSdvcGFxdWVHUSZmYWxzZTYiLyUrZXhlY3V0YWJsZUdRJmZhbHNlNiIvJSlyZWFkb25seUdRJmZhbHNlNiIvJSljb21wb3NlZEdRJmZhbHNlNiIvJSpjb252ZXJ0ZWRHUSZmYWxzZTYiLyUraW1zZWxlY3RlZEdRJmZhbHNlNiIvJSxwbGFjZWhvbGRlckdRJmZhbHNlNiIvJTZzZWxlY3Rpb24tcGxhY2Vob2xkZXJHUSZmYWxzZTYiLyUsbWF0aHZhcmlhbnRHUSdpdGFsaWM2IlEhNiItJSZUSVRMRUc2JC0lKV9UWVBFU0VURzYjLUkjbWlHNiMvSSttb2R1bGVuYW1lRzYiSSxUeXBlc2V0dGluZ0dJKF9zeXNsaWJHNiI2NlErQmVhbX5TbG9wZTYiLyUnZmFtaWx5R1EwVGltZXN+TmV3flJvbWFuNiIvJSVzaXplR1EjMTA2Ii8lJWJvbGRHUSZmYWxzZTYiLyUnaXRhbGljR1EldHJ1ZTYiLyUqdW5kZXJsaW5lR1EmZmFsc2U2Ii8lKnN1YnNjcmlwdEdRJmZhbHNlNiIvJSxzdXBlcnNjcmlwdEdRJmZhbHNlNiIvJStmb3JlZ3JvdW5kR1EoWzAsMCwwXTYiLyUrYmFja2dyb3VuZEdRLlsyNTUsMjU1LDI1NV02Ii8lJ29wYXF1ZUdRJmZhbHNlNiIvJStleGVjdXRhYmxlR1EmZmFsc2U2Ii8lKXJlYWRvbmx5R1EmZmFsc2U2Ii8lKWNvbXBvc2VkR1EmZmFsc2U2Ii8lKmNvbnZlcnRlZEdRJmZhbHNlNiIvJStpbXNlbGVjdGVkR1EmZmFsc2U2Ii8lLHBsYWNlaG9sZGVyR1EmZmFsc2U2Ii8lNnNlbGVjdGlvbi1wbGFjZWhvbGRlckdRJmZhbHNlNiIvJTBmb250X3N0eWxlX25hbWVHUSVUZXh0NiIvJSxtYXRodmFyaWFudEdRJ2l0YWxpYzYiLSUtVFJBTlNQQVJFTkNZRzYjJCIiISEiIi0lJkNPTE9SRzYmJSRSR0JHJCIiISEiIiQiIiEhIiIkIiM1ISIiLSUlUk9PVEc2Jy0lKUJPVU5EU19YRzYjJCIkXSYhIiItJSlCT1VORFNfWUc2IyQiJHEjISIiLSUtQk9VTkRTX1dJRFRIRzYjJCIlXWYhIiItJS5CT1VORFNfSEVJR0hURzYjJCIlU0whIiItJSlDSElMRFJFTkc2Ig==

plot(m,x=0..L,title=`Bending Moment`, color=blue);

LSUlUExPVEc2KC0lJ0NVUlZFU0c2IzdkdzckJCIiISEiIiQhIighIiI3JCQiMDhEXStAOjAiISM7JCEwOno0ZFohZW8hIzo3JCQiMEJYITRRV20+ISM7JCEwKCopKWU0XFh0JyEjOjckJCIweGE0PnFgKkghIzskITAvIj43QXAmZichIzo3JCQiMDdDWydwNkpTISM7JCEwInkhSChIJ2ZYJyEjOjckJCIwUXZdLFQ+MSYhIzskITA3djhBaXBKJyEjOjckJCIwaEBWJ29rPGchIzskITBBKCo+WGkiKT0nISM6NyQkIjAnR2Q5XEEycSEjOyQhMD1JV3olKVswJyEjOjckJCIwdVsoXHprSSEpISM7JCEwZUhVSGRyImYhIzo3JCQiME9yVSYpKXldISohIzskITBqWUwuKCoqemQhIzo3JCQiMCJIZTtILDU1ISM6JCEwKWUkUlRlIVJjISM6NyQkIjByVCRvKVFDNSIhIzokITAib2Q0czA6YiEjOjckJCIwKVwqKilmKVsxNyEjOiQhMDlFeSUzanZgISM6NyQkIi8jUnljbDRKIiEjOSQhMG1odzlIZUImISM6NyQkIjA7S2tbWztUIiEjOiQhMFxNWj8yODUmISM6NyQkIjBiNUBBeUldIiEjOiQhMGk/PSZSTHpcISM6NyQkIjBgMDYtKHo2OyEjOiQhMHNgJSk+VVgkWyEjOjckJCIwaEFYNScqUXEiISM6JCEwOVsxUzJAciUhIzo3JCQiMCRlO0wjSDUiPSEjOiQhMCYqUjY+ZypwWCEjOjckJCIwOERdP2dlIT4hIzokITAiUTl5YFJXVyEjOjckJCIwR2I1IlshKjQ/ISM6JCEwYjpNN0ZwSSUhIzo3JCQiMCwtLykpeiozQCEjOiQhME9rRyV6S3dUISM6NyQkIjAvMztLYUJAIyEjOiQhMFUrM2wjUlNTISM6NyQkIjBBVidHVkcyQiEjOiQhMHhZJHlOKGUiUiEjOjckJCIwOkhlO3onNEMhIzokIS45WiZIIj55JCEjODckJCIvMTdDJ1FnXiMhIzkkITBpZjkrbkprJCEjOjckJCIwOEVfJVtpM0UhIzokITB5bTI+TkZfJCEjOjckJCIwXi0wXT8nM0YhIzokITAncGljRS8kUiQhIzo3JCQiMCNcKXB6RD4iRyEjOiQhMHQhKj1TJVtmSyEjOjckJCIwKW9QdikqKUgiSCEjOiQhMC5QLD1mI0hKISM6NyQkIi8jUnljdTIsJCEjOSQhMCV5Iz5CJW8uSSEjOjckJCIwI1wpcHpaJD5KISM6JCEwYyYpej1oWidHISM6NyQkIjAiPU9zYyFwQCQhIzokITBKcSNwRFNTRiEjOjckJCIwPlF3X3A1SyQhIzokITA5Jik9XUkiM0UhIzo3JCQiMGM2QllkYVQkISM6JCEwOyEqKSpvUSgpWyMhIzo3JCQiMDpJZ1NbJz1OISM6JCEwUWMiPll0ZUIhIzo3JCQiMDA2QS9WZGgkISM6JCEwc1YjPVEjcEIjISM6NyQkIjAleWM4XEI8UCEjOiQhMDBickBWLDYjISM6NyQkIjBBVylvPFk7USEjOiQhMCMpKSlmOlpuKT4hIzo3JCQiMEVfLzRWLiNSISM6JCEvKFE9NG4iZT0hIzk3JCQiMHVbKFxKUj9TISM6JCEwYEdNIypHXHQiISM6NyQkIjBsSGZ5M0Y3JSEjOiQhL0sqZWBDJjQ7ISM5NyQkIjAkXClwPnhUQSUhIzokITBfdGEoeXomWyIhIzo3JCQiMEFWJ0doVDxWISM6JCEwYShILjJvczghIzo3JCQiMG1Kall5VVUlISM6JCEwQCE+InpHUEMiISM6NyQkIjBRdl1UZCk+WCEjOiQhMGhNQjtNIUg2ISM6NyQkIjB1WiY0WHdAWSEjOiQhMHkpKXpJR3UrIiEjOjckJCIwMDU/Zy0kPlohIzokITBBdm0oNDU8KikhIzs3JCQiMChIZj1oZ0ZbISM6JCEwIikqM2BjNFN3ISM7NyQkIjA6SWcrKlFAXCEjOiQhL0tEViFlNmEnISM6NyQkIjBiNUBVTHktJiEjOiQhMDQpSD52cyxgISM7NyQkIjB6ZTwmZiVbNyYhIzokITBkLTBTZiZ6VCEjOzckJCIwTGxJVGk0QiYhIzokITBuIzNAUVBnSCEjOzckJCIwS2tHKEhfQWAhIzokITBBazAyPGIiPiEjOzckJCIwMjlHdyp6RWEhIzokITA5T2FZY3FMKCEjPDckJCIwJilwUipmX0ZiISM6JCIwY1ZCYktZKlIhIzw3JCQiMGU6SlUnPUdjISM6JCIwWyp5MCEpW0I6ISM7NyQkIjBfLjJhdyVHZCEjOiQiMDpzaCUzKFtqIyEjOzckJCIwbkxuJVIjWyNlISM6JCIwJDNhQFNVJXAkISM7NyQkIjA2QFUveSpHZiEjOiQiMER2Lyk+cUlbISM7NyQkIjBHYzdYVyNHZyEjOiQiMEExS18hby9mISM7NyQkIjB3Xi5uPEY4JyEjOiQiMGBHbTVtYC0oISM7NyQkIjBIZDk0IkhGaSEjOiQiMFxKaG4tNy4pISM7NyQkIjBsSWhVNz1MJyEjOiQiMD41Uzc7SjgqISM7NyQkIjBHYzdsRD5WJyEjOiQiMHQ4UjEkKXksIiEjOjckJCIwJioqKXo+JnpKbCEjOiQiMHIuMGJPNzciISM6NyQkIjA8TG1LNGhqJyEjOiQiMDMxUyxZIkc3ISM6NyQkIjA9T3NXJz1LbiEjOiQiL1UjNHBiY0siISM5NyQkIjAtLzNjI2VJbyEjOiQiMDtYTmxfWFUiISM6NyQkIjAwND1jQiNScCEjOiQiMDcudnkkZks6ISM6NyQkIjBDWiUqMyplUHEhIzokIjB1cyNvcE5IOyEjOjckJCIwbUpqRSc9UXIhIzokIjAoKUghKiopZXNzIiEjOjckJCIvLC0vNVxTcyEjOSQiL04lSEQ2ZCM9ISM5NyQkIjA6SGUnKkdYTCghIzokIjBqdTMnZT86PiEjOjckJCIvKFJ6UXFaVighIzkkIjAibyI+aUsmND8hIzo3JCQiMDpIZXdbVWAoISM6JCIwRVVgYkw/NSMhIzo3JCQiMHJVJjMoZjFrKCEjOiQiMCZmbT5DdSo+IyEjOjckJCIwKil5ZHZpWHQoISM6JCIwQENrJCopKVtHIyEjOjckJCIwWiUqKXl0IUgleSEjOiQiMDMyZ1VlPVEjISM6NyQkIjBAVCNbK29TeiEjOiQiMEY6Qy4iPW9DISM6NyQkIjAmKXBSKjRVUCEpISM6JCIwJz4hUjZzQ2IjISM6NyQkIjBzVyopZVs5OSkhIzokIjBhSF10Xz1rIyEjOjckJCIwI1wpcCpwKmVDKSEjOiQiMHN6bkhsLXQjISM6NyQkIjBkOUhlSDRNKSEjOiQiMFJeLHBOJjRHISM6NyQkIi8jUnknKlw9VykhIzkkIjBONzQkKnpDKkchIzo3JCQiKSVRLmEpISIpJCIwWGtBMiM9c0ghIzo3JCQiMFwoXCoqMzVaJykhIzokIi90QSIqZjxkSSEjOTckJCIwaUJaOSFbUigpISM6JCIwQCpRWXBfSEohIzo3JCQiMG1KajEiZVgpKSEjOiQiL0JsJmZWN0AkISM5NyQkIjB3XzBeQGAlKikhIzokIjBtNEkjKSpwJ0ckISM6NyQkIjBGYTNkKTRXISohIzokIjA3KUgzPDZnTCEjOjckJCIwQlghNFUmSDkqISM6JCIwLXNJeGNBViQhIzo3JCQiMGM3RHEheVYjKiEjOiQiMFEsSFxmV10kISM6NyQkIjBUI1snNGIxTiohIzokIjBja2opUVh6TiEjOjckJCIwRV4tWFsnWyUqISM6JCIwdGs7JSozb2skISM6NyQkIjAkb090L1FYJiohIzokIi9iOW1BJz5yJCEjOTckJCIwTnFTVCZ5WycqISM6JCIwQjwkeiJHLHkkISM6NyQkIjBHYzdEbD52KiEjOiQiMDRAbD8ubSVRISM6NyQkIjAxN0NHdlglKSohIzokIjBqZ0V6VVwhUiEjOjckJCIwZDhGYXlVJioqISM6JCIwOisyZTVDKFIhIzo3JCQiMCc9UDl0Zy81ISM5JCIwaE5tViVbRlMhIzo3JCQiLywtQ1BNOjUhIzgkIjBKIz4qZShHITQlISM6NyQkIjBuTXBlIWZENSEjOSQiMG5xKFErZltUISM6NyQkIjAoWyhcIilSWi4iISM5JCIwRipba0VHKj4lISM6NyQkIjAoUnp5IUhdLyIhIzkkIjBXO1EzUlpEJSEjOjckJCIwbUtsYSdRYjUhIzkkIi47JykpcCkpM1YhIzg3JCQiMD1OcXklcGw1ISM5JCIwLV4ncDg0aFYhIzo3JCQiMGtGYiU9RHY1ISM5JCIwaCtMVXV6UyUhIzo3JCQiMDpJZ2laXjMiISM5JCIwd2FPYW1cWCUhIzo3JCQiMCI+UWM9USY0IiEjOSQiMEcvNCwqKT1dJSEjOjckJCIwOUZhRSRlMDYhIzkkIjBYaiRRJFtwYSUhIzo3JCQiMHJVJm9tMjs2ISM5JCIvQFMiZSdcImYlISM5NyQkIjBmPVBFPmA3IiEjOSQiMDs3bFAzI0hZISM6NyQkIjAjUnlPVXNONiEjOSQiMHAkb1ZwJCpwWSEjOjckJCIwTW9PJD48WTYhIzkkIjBzXGgpcCgqM1ohIzo3JCQiMGtGYkFTaToiISM5JCIvQTVSUSNbdSUhIzk3JCQiMFsmNCo+JFFsNiEjOSQiMGN4bVZgZXglISM6NyQkIjAoXCoqeV1EdzYhIzkkIjBpYDp6WjMiWyEjOjckJCIwb090KVxZJj0iISM5JCIwWXhMdWgpUVshIzo3JCQiMCwsLUl5aD4iISM5JCIwMiNlLCxicFshIzo3JCQiMCRwUShSaGM/IiEjOSQiLz1fY28qXCpbISM5NyQkIjAmKiopeiZlMTs3ISM5JCIwd25NV1c1I1whIzo3JCQiMGlDXE90ZkEiISM5JCIwWUchUkYsV1whIzo3JCQiMEJYITQzSk83ISM5JCIwJik9TkFgZydcISM6NyQkIjB1Wyg0USFlQyIhIzkkIjAtOGQ5W1gpXCEjOjckJCIwTW5NSFZnRCIhIzkkIjAwR208NEUrJiEjOjckJCIwWydIUiN6bUUiISM5JCIwazl3cHgjPl0hIzo3JCQiMC8yOSd5JGZGIiEjOSQiMCpvR1klUT8uJiEjOjckJCIwbk1wVVBmRyIhIzkkIjBQJCoqM3MoUi8mISM6NyQkIjAiSGVjekUnSCIhIzkkIjBRKW8lUiZHYV0hIzo3JCQiMDZBV091akkiISM5JCIwZVdnLmlCMSYhIzo3JCQiME1vTyRHOjs4ISM5JCIwYngnUjtGb10hIzo3JCQiMCJIZWMsLEY4ISM5JCIwQSNvPDVpc10hIzo3JCQiLzE3V2Z3TzghIzgkIjBBKmVZI0dYMiYhIzo3JCQiMENbJ0hCPVo4ISM5JCIwMUZGbGRXMiYhIzo3JCQiMGU6SjdAbU4iISM5JCIwPio9KGUrRDImISM6NyQkIjBXKFs8LSVwTyIhIzkkIjA8bVE1J0dvXSEjOjckJCIwYDA2b1xtUCIhIzkkIjAnKT4oPXNLaV0hIzo3JCQiMEBUI28pKXonUSIhIzkkIjBvc2RGPFMwJiEjOjckJCIwJSlvUGJAblIiISM5JCIwQHB0T0BRLyYhIzo3JCQiMGxIZm80clMiISM5JCIwdCNHR24kNC4mISM6NyQkIi8kZj1wOXJUIiEjOCQiLy0pUUR1aiwmISM5NyQkIjBSeGFEWXRVIiEjOSQiMGRpRUciRyoqXCEjOjckJCIwIkhlJzQkXFA5ISM5JCIwaioqPUw7LClcISM6NyQkIjB1WygqKXAib1ciISM5JCIwMnhXJilbMCdcISM6NyQkIjBmPE5BLnZYIiEjOSQiMDsoKjNFLGUkXCEjOjckJCIwJz5SPTYxbjkhIzkkIjB3WyFlQGI2XCEjOjckJCIvI1J5Iz1EeDkhIzgkIjAjenhuR1skKVshIzo3JCQiMFYmM1BjKyhbIiEjOSQiMHklb2U9WWFbISM6NyQkIjBzVigpKWYkeVwiISM5JCIwdSc+ISkzdj5bISM6NyQkIjBXKFt4VUAyOiEjOSQiMGNeJmZgYyh5JSEjOjckJCIwWyY0PihleV4iISM5JCIvMyp5ZEMnW1ohIzk3JCQiLy4xcypmdl8iISM4JCIuUTAheSkzciUhIzg3JCQiMCY0Pj07PFE6ISM5JCIwYHdtblJybSUhIzo3JCQiMCYzPHV3S1o6ISM5JCIwR1ZANTB0aSUhIzo3JCQiMCRlO2BgdmQ6ISM5JCIwbylHU3djelghIzo3JCQiMFQiR3d6I3ljIiEjOSQiMD5KVEpWNWAlISM6NyQkIjApZj4+Uyp5ZCIhIzkkIjB6LFgrbixbJSEjOjckJCIweGE0LkJ6ZSIhIzkkIjAmRy8qKUc0RlchIzo3JCQiMHpkOnhkdmYiISM5JCIwKip6WjtcUVAlISM6NyQkIjBgMTg9dHpnIiEjOSQiMCgzJSpSKCl5OFYhIzo3JCQiMDA1PyMpKip5aCIhIzkkIjAvKDNMPTZhVSEjOjckJCIvJz5SOVokRzshIzgkIjAiKT5pZ0AoKT0lISM6NyQkIjA6SWdbL3lqIiEjOSQiMHUraT9IczclISM6NyQkIjBcKFw+bURbOyEjOSQiMChmI1siPnJjUyEjOjckJCIwMDU/JXpFZTshIzkkIjB2JUhBamonKVIhIzo3JCQiMFUkbycqW0RvOyEjOSQiMDRiW09aVSJSISM6NyQkIjB1WiY0am95OyEjOSQiMCpcPlI7KGYkUSEjOjckJCIwLzM7LSVIKW8iISM5JCIwJCk9PkRgOXckISM6NyQkIjAjWydIakwiKXAiISM5JCIwN2dWOjhGbyQhIzo3JCQiMExsSXQoKiozPCEjOSQiMHdqN1s0SGYkISM6NyQkIjA6SGVHTSk9PCEjOSQiMG0sISo+ISoqM04hIzo3JCQiMGY8TislKilHPCEjOSQiMDREZ3EnZT9NISM6NyQkIjBWJ0d4VzdSPCEjOSQiME1hZiQ0KnpLJCEjOjckJCIwTW5NRkcmWzwhIzkkIjBGLCxccC9DJCEjOjckJCIwUnljVF8mZTwhIzkkIjBjJ2ZQLWlXSiEjOjckJCIwTW5NRCsmbzwhIzkkIjA2RjRDISlvLyQhIzo3JCQiMHBReE1UIno8ISM5JCIwKkgrMkRVUkghIzo3JCQiMEppQ2xKJil5IiEjOSQiMHhcUU8nM1VHISM6NyQkIjAoUXg5aE8qeiIhIzkkIjBbUG1gU29zIyEjOjckJCIwYTM8UVYiND0hIzkkIjApZURaNDc/RSEjOjckJCIwVCJHd3UiKT09ISM5JCIwKXotJEd1Pl4jISM6NyQkIjAqKXlkQj8jSD0hIzkkIjBMZT5bS0dSIyEjOjckJCIwIkhld11tUj0hIzkkIjAiSFBoOEFxQSEjOjckJCIwKWU8TiRvIlw9ISM5JCIwZiYqZUFbZzojISM6NyQkIjBNb09QZyNmPSEjOSQiMFxhJylcZT8uIyEjOjckJCIwVSUpb0A0InA9ISM5JCIwMkFxOT0kMz4hIzo3JCQiMDxNb1kmeXo9ISM5JCIwaismKSoqNDZ4IiEjOjckJCIweWM4UkIhKik9ISM5JCIvRC9XUXpcOyEjOTckJCIwZjxOW0wnKio9ISM5JCIwaDJyYXR1XSIhIzo3JCQiLyhSel8yJzQ+ISM4JCIwTj4yRGcyUCIhIzo3JCQiMCYpcFJCJls+PiEjOSQiMC9sVjRmREIiISM6NyQkIjAlKil5KHpxJEg+ISM5JCIwJ3AwMGFWIjQiISM6NyQkIjBvTnJXYCVSPiEjOSQiMFdYMVFaZVcqISM7NyQkIjBtS2wpMzldPiEjOSQiMEYoKTNxaXAmeSEjOzckJCIwYjQ+QVMqZj4hIzkkIjBrQWZwXzJQJyEjOzckJCIwNkBVVTgncD4hIzkkIjAkUSRwJFspZihbISM7NyQkIjBZIkg9UiYqej4hIzkkIjBybyhlIUd2QyQhIzs3JCQiMDA1PyE+RiEqPiEjOSQiMCZvVytRJzRmIiEjOzckJCIjPyEiIiQiMEpdI1xnVz9BISNJLSUlVklFV0c2JDskIiIhISIiJCIjPyEiIiUoREVGQVVMVEctJStBWEVTTEFCRUxTRzYkLUkjbWlHNiMvSSttb2R1bGVuYW1lRzYiSSxUeXBlc2V0dGluZ0dJKF9zeXNsaWJHNiI2NVEieDYiLyUnZmFtaWx5R1EhNiIvJSVzaXplR1EjMTA2Ii8lJWJvbGRHUSZmYWxzZTYiLyUnaXRhbGljR1EldHJ1ZTYiLyUqdW5kZXJsaW5lR1EmZmFsc2U2Ii8lKnN1YnNjcmlwdEdRJmZhbHNlNiIvJSxzdXBlcnNjcmlwdEdRJmZhbHNlNiIvJStmb3JlZ3JvdW5kR1EoWzAsMCwwXTYiLyUrYmFja2dyb3VuZEdRLlsyNTUsMjU1LDI1NV02Ii8lJ29wYXF1ZUdRJmZhbHNlNiIvJStleGVjdXRhYmxlR1EmZmFsc2U2Ii8lKXJlYWRvbmx5R1EmZmFsc2U2Ii8lKWNvbXBvc2VkR1EmZmFsc2U2Ii8lKmNvbnZlcnRlZEdRJmZhbHNlNiIvJStpbXNlbGVjdGVkR1EmZmFsc2U2Ii8lLHBsYWNlaG9sZGVyR1EmZmFsc2U2Ii8lNnNlbGVjdGlvbi1wbGFjZWhvbGRlckdRJmZhbHNlNiIvJSxtYXRodmFyaWFudEdRJ2l0YWxpYzYiUSE2Ii0lJlRJVExFRzYkLSUpX1RZUEVTRVRHNiMtSSNtaUc2Iy9JK21vZHVsZW5hbWVHNiJJLFR5cGVzZXR0aW5nR0koX3N5c2xpYkc2IjY2US9CZW5kaW5nfk1vbWVudDYiLyUnZmFtaWx5R1EwVGltZXN+TmV3flJvbWFuNiIvJSVzaXplR1EjMTA2Ii8lJWJvbGRHUSZmYWxzZTYiLyUnaXRhbGljR1EldHJ1ZTYiLyUqdW5kZXJsaW5lR1EmZmFsc2U2Ii8lKnN1YnNjcmlwdEdRJmZhbHNlNiIvJSxzdXBlcnNjcmlwdEdRJmZhbHNlNiIvJStmb3JlZ3JvdW5kR1EoWzAsMCwwXTYiLyUrYmFja2dyb3VuZEdRLlsyNTUsMjU1LDI1NV02Ii8lJ29wYXF1ZUdRJmZhbHNlNiIvJStleGVjdXRhYmxlR1EmZmFsc2U2Ii8lKXJlYWRvbmx5R1EmZmFsc2U2Ii8lKWNvbXBvc2VkR1EmZmFsc2U2Ii8lKmNvbnZlcnRlZEdRJmZhbHNlNiIvJStpbXNlbGVjdGVkR1EmZmFsc2U2Ii8lLHBsYWNlaG9sZGVyR1EmZmFsc2U2Ii8lNnNlbGVjdGlvbi1wbGFjZWhvbGRlckdRJmZhbHNlNiIvJTBmb250X3N0eWxlX25hbWVHUSVUZXh0NiIvJSxtYXRodmFyaWFudEdRJ2l0YWxpYzYiLSUtVFJBTlNQQVJFTkNZRzYjJCIiISEiIi0lJkNPTE9SRzYmJSRSR0JHJCIiISEiIiQiIiEhIiIkIiM1ISIiLSUlUk9PVEc2Jy0lKUJPVU5EU19YRzYjJCIkXSYhIiItJSlCT1VORFNfWUc2IyQiJCsjISIiLSUtQk9VTkRTX1dJRFRIRzYjJCIlNWchIiItJS5CT1VORFNfSEVJR0hURzYjJCIlNU0hIiItJSlDSElMRFJFTkc2Ig==

plot(v,x=0..L,title=`Shear`, color=blue);

LSUlUExPVEc2KC0lJ0NVUlZFU0c2IzdkdzckJCIiISEiIiQiJE4iISIjNyQkIjA4RF0rQDowIiEjOyQiLyNvRjI8Klw4ISM4NyQkIjBCWCE0UVdtPiEjOyQiMCVmUyMpKjQoXDghIzk3JCQiMHhhND5xYCpIISM7JCIwVzE9M0YkXDghIzk3JCQiMDdDWydwNkpTISM7JCIwPixzRCJ5WzghIzk3JCQiMFF2XSxUPjEmISM7JCIwKnBbYyN5IVs4ISM5NyQkIjBoQFYnb2s8ZyEjOyQiMEFtVzQlR1o4ISM5NyQkIjAnR2Q5XEEycSEjOyQiMHVDKjR1Slk4ISM5NyQkIjB1WyhcemtJISkhIzskIjAvOD86al5NIiEjOTckJCIwT3JVJikpeV0hKiEjOyQiMGwkZVRpJlFNIiEjOTckJCIwIkhlO0gsNTUhIzokIjBfN1YwXEJNIiEjOTckJCIwclQkbylRQzUiISM6JCIweGhTciUpM00iISM5NyQkIjApXCoqKWYpWzE3ISM6JCIwcmAlKilHM1I4ISM5NyQkIi8jUnljbDRKIiEjOSQiMGIqZnAtNlA4ISM5NyQkIjA7S2tbWztUIiEjOiQiMGxJVE9hXUwiISM5NyQkIjBiNUBBeUldIiEjOiQiMGpPKm9jMEw4ISM5NyQkIjBgMDYtKHo2OyEjOiQiMG4/eCNlXkk4ISM5NyQkIjBoQVg1JypRcSIhIzokIjBYKFtOYkFHOCEjOTckJCIwJGU7TCNINSI9ISM6JCIwa3UkKUgsYUsiISM5NyQkIjA4RF0/Z2UhPiEjOiQiMHciZkV4dkE4ISM5NyQkIjBHYjUiWyEqND8hIzokIjB0eSk+QHE+OCEjOTckJCIwLC0vKSl6KjNAISM6JCIwWCEpKkc6azs4ISM5NyQkIjAvMztLYUJAIyEjOiQiMFpuRTsiSDg4ISM5NyQkIjBBVidHVkcyQiEjOiQiMCk0cSNIdCtKIiEjOTckJCIwOkhlO3onNEMhIzokIjBGJFFaM1gxOCEjOTckJCIvMTdDJ1FnXiMhIzkkIi9YSkE7Xy04ISM4NyQkIjA4RV8lW2kzRSEjOiQiMF9FSjJqKilIIiEjOTckJCIwXi0wXT8nM0YhIzokIjAkPlE3YChcSCIhIzk3JCQiMCNcKXB6RD4iRyEjOiQiMCk9JSlcISlwIUgiISM5NyQkIjApb1B2KSopSCJIISM6JCIwayUqW25lakciISM5NyQkIi8jUnljdTIsJCEjOSQiL0N3dFUsI0ciISM4NyQkIjAjXClwelokPkohIzokIjAlMyIqPkQteDchIzk3JCQiMCI9T3NjIXBAJCEjOiQiMFg4VVEnUXM3ISM5NyQkIjA+UXdfcDVLJCEjOiQiMFhXKkcoeXNFIiEjOTckJCIwYzZCWWRhVCQhIzokIjBiQnUoKTRERSIhIzk3JCQiMDpJZ1NbJz1OISM6JCIwY2cvTlZyRCIhIzk3JCQiMDA2QS9WZGgkISM6JCIwRiYqbyxbPkQiISM5NyQkIjAleWM4XEI8UCEjOiQiMDkhW01pT1k3ISM5NyQkIjBBVylvPFk7USEjOiQiMDhfbmtmMkMiISM5NyQkIjBFXy80Vi4jUiEjOiQiMGQpUkQ9dE03ISM5NyQkIjB1WyhcSlI/UyEjOiQiLzQiPkh0KEc3ISM4NyQkIjBsSGZ5M0Y3JSEjOiQiMDkpKj5hQ0RBIiEjOTckJCIwJFwpcD54VEElISM6JCIwYWpEWHNoQCIhIzk3JCQiMEFWJ0doVDxWISM6JCIwKjR6JVEqPjU3ISM5NyQkIjBtSmpZeVVVJSEjOiQiMG0jUitLPi43ISM5NyQkIjBRdl1UZCk+WCEjOiQiMFQwcm0ieSc+IiEjOTckJCIwdVomNFh3QFkhIzokIjA5UGhwJXoqPSIhIzk3JCQiMDA1P2ctJD5aISM6JCIwJypIQFBoSD0iISM5NyQkIjAoSGY9aGdGWyEjOiQiMCR6c1ZtP3Y2ISM5NyQkIjA6SWcrKlFAXCEjOiQiMCVcKW9aXCRvNiEjOTckJCIwYjVAVUx5LSYhIzokIjBKJzQkbzEvOyIhIzk3JCQiMHplPCZmJVs3JiEjOiQiMGMheWEnPkk6IiEjOTckJCIwTGxJVGk0QiYhIzokIjBCWzx1eFo5IiEjOTckJCIwS2tHKEhfQWAhIzokIjAqXC0+MWBQNiEjOTckJCIwMjlHdyp6RWEhIzokIjBUMkQkUTdINiEjOTckJCIwJilwUipmX0ZiISM6JCIwIlwqR1VbMzciISM5NyQkIjBlOkpVJz1HYyEjOiQiMCQqKio9UUVDNiIhIzk3JCQiMF8uMmF3JUdkISM6JCIwZD5SPCUpUTUiISM5NyQkIjBuTG4lUiNbI2UhIzokIjBwQFxwTmI0IiEjOTckJCIwNkBVL3kqR2YhIzokIjBlTF45YWozIiEjOTckJCIwR2M3WFcjR2chIzokIjBCcGksX3UyIiEjOTckJCIwd14ubjxGOCchIzokIjA7PVtJQnoxIiEjOTckJCIwSGQ5NCJIRmkhIzokIjAkcFlVajpmNSEjOTckJCIwbEloVTc9TCchIzokIjBCLWI4NiRcNSEjOTckJCIwR2M3bEQ+VichIzokIjBNREpcRihSNSEjOTckJCIwJioqKXo+JnpKbCEjOiQiMFAnPSdRPCsuIiEjOTckJCIwPExtSzRoaichIzokIjBIUHZSOig+NSEjOTckJCIwPU9zVyc9S24hIzokIjBQKEgjXCMzNTUhIzk3JCQiMC0vM2MjZUlvISM6JCIvLjVrTjIrNSEjODckJCIwMDQ9Y0IjUnAhIzokIjBjVXBBUSYpKSkqISM6NyQkIjBDWiUqMyplUHEhIzokIjAqcGcmW0RheSohIzo3JCQiMG1KakUnPVFyISM6JCIwY08/RXMleScqISM6NyQkIi8sLS81XFNzISM5JCIvR2JebjlvJiohIzk3JCQiMDpIZScqR1hMKCEjOiQiMCpmcWo4TmwlKiEjOjckJCIvKFJ6UXFaVighIzkkIjA3JyplPjlWTiohIzo3JCQiMDpIZXdbVWAoISM6JCIwOiY0bEBqVSMqISM6NyQkIjByVSYzKGYxayghIzokIi8qbzglUl9AIiohIzk3JCQiMCopeWR2aVh0KCEjOiQiMCYpb0tVU0ssKiEjOjckJCIwWiUqKXl0IUgleSEjOiQiL2lYKUdnbSkpKSEjOTckJCIwQFQjWytvU3ohIzokIi8pZnktPzR4KSEjOTckJCIwJilwUio0VVAhKSEjOiQiMCdwVSN5KilcbCkhIzo3JCQiMHNXKillWzk5KSEjOiQiMHY8YjZoKEcmKSEjOjckJCIwI1wpcCpwKmVDKSEjOiQiMGpMT3EpUSslKSEjOjckJCIwZDlIZUg0TSkhIzokIjBha3AtbkBHKSEjOjckJCIvI1J5JypcPVcpISM5JCIuUFNvUF46KSEjODckJCIpJVEuYSkhIikkIjBUNjVdJ3BIISkhIzo3JCQiMFwoXCoqMzVaJykhIzokIjBCVkRYdD8qeSEjOjckJCIwaUJaOSFbUigpISM6JCIwaSkqKjQ6aHJ4ISM6NyQkIjBtSmoxImVYKSkhIzokIjBpQCpwcm5KdyEjOjckJCIwd18wXkBgJSopISM6JCIwOmovdCJmKVwoISM6NyQkIjBGYTNkKTRXISohIzokIjBRXSF5NUtsdCEjOjckJCIwQlghNFUmSDkqISM6JCIwbVpbN3ovQighIzo3JCQiMGM3RHEheVYjKiEjOiQiMEIqR3UpUTk0KCEjOjckJCIwVCNbJzRiMU4qISM6JCIwMSgqXHAkUlVwISM6NyQkIjBFXi1YWydbJSohIzokIjBNblo9R1UhbyEjOjckJCIwJG9PdC9RWCYqISM6JCIwLys5UEdrbSchIzo3JCQiME5xU1QmeVsnKiEjOiQiMHUiXC0wZDxsISM6NyQkIjBHYzdEbD52KiEjOiQiMHZyLi5RdU8nISM6NyQkIjAxN0NHdlglKSohIzokIjA2cEpKRDhCJyEjOjckJCIwZDhGYXlVJioqISM6JCIwVWI/U0Qlb2chIzo3JCQiMCc9UDl0Zy81ISM5JCIvI0gkejV0SWYhIzk3JCQiLywtQ1BNOjUhIzgkIjBZKHA6JXkhb2QhIzo3JCQiMG5NcGUhZkQ1ISM5JCIwV0sqNCdIN2gmISM6NyQkIjAoWyhcIilSWi4iISM5JCIwQSR6azgmKXBhISM6NyQkIjAoUnp5IUhdLyIhIzkkIi9GYyRvYyQ0YCEjOTckJCIwbUtsYSdRYjUhIzkkIjAlUlshRyU+WV4hIzo3JCQiMD1OcXklcGw1ISM5JCIwUVhtbDRBKVwhIzo3JCQiMGtGYiU9RHY1ISM5JCIwY3FeLF4oR1shIzo3JCQiMDpJZ2laXjMiISM5JCIwWTNIczQlb1khIzo3JCQiMCI+UWM9USY0IiEjOSQiMCIqPmBUUjVdJSEjOjckJCIwOUZhRSRlMDYhIzkkIjAvY1NLVUVMJSEjOjckJCIwclUmb20yOzYhIzkkIjBcNFhfJ3pkVCEjOjckJCIwZj1QRT5gNyIhIzkkIjAkKXktO0NDKyUhIzo3JCQiMCNSeU9Vc042ISM5JCIwKT0nW1Z5ZiNRISM6NyQkIjBNb08kPjxZNiEjOSQiMEpLJlFVPFpPISM6NyQkIjBrRmJBU2k6IiEjOSQiMFpRbDA5TFokISM6NyQkIjBbJjQqPiRRbDYhIzkkIjAkXFwlKlw2OUwhIzo3JCQiMChcKip5XUR3NiEjOSQiMCUqUSY9KnpKNyQhIzo3JCQiMG9PdClcWSY9IiEjOSQiMEciXEdkL2dIISM6NyQkIjAsLC1JeWg+IiEjOSQiMHdoZjAib29GISM6NyQkIjAkcFEoUmhjPyIhIzkkIjBRI1FoVyZ5ZiMhIzo3JCQiMCYqKil6JmUxOzchIzkkIjB3THhyeSkzQyEjOjckJCIwaUNcT3RmQSIhIzkkIjBbOlAiKT51QSMhIzo3JCQiMEJYITQzSk83ISM5JCIwYSV5dm9eTz8hIzo3JCQiMHVbKDRRIWVDIiEjOSQiMFA7cl0nemY9ISM6NyQkIjBNbk1IVmdEIiEjOSQiMCV6LFBWbW47ISM6NyQkIjBbJ0hSI3ptRSIhIzkkIjBqOWJ5RmtZIiEjOjckJCIwLzI5J3kkZkYiISM5JCIwSjVQSXApKkciISM6NyQkIjBuTXBVUGZHIiEjOSQiMHVrXStQeDQiISM6NyQkIjAiSGVjekUnSCIhIzkkIjBtRV8mUXF3KikhIzs3JCQiMDZBV091akkiISM5JCIwXmEmKVxeUisoISM7NyQkIjBNb08kRzo7OCEjOSQiLyc0PykpRzEzJiEjOjckJCIwIkhlYywsRjghIzkkIjA5TVdLLiRHSCEjOzckJCIvMTdXZndPOCEjOCQiMHc5Jnp6ZyN6KiEjPDckJCIwQ1snSEI9WjghIzkkIS9adCk+PHY2IiEjOjckJCIwZTpKN0BtTiIhIzkkITAnR0R3YGNKSSEjOzckJCIwVyhbPC0lcE8iISM5JCEwNlhRJ29UUl4hIzs3JCQiMGAwNm9cbVAiISM5JCEwTSdmT2VLUHIhIzs3JCQiMEBUI28pKXonUSIhIzkkITB0SjtkSzNDKiEjOzckJCIwJSlvUGJAblIiISM5JCEwVD0yQ0w3OCIhIzo3JCQiMGxIZm80clMiISM5JCEwdng8XiNvXDghIzo3JCQiLyRmPXA5clQiISM4JCEwLUVUUDA7YyIhIzo3JCQiMFJ4YURZdFUiISM5JCEwKSkqbygqKnopejwhIzo3JCQiMCJIZSc0JFxQOSEjOSQhMGBFLy0pKnkqPiEjOjckJCIwdVsoKilwIm9XIiEjOSQhMDcjcDhiZio+IyEjOjckJCIwZjxOQS52WCIhIzkkITA+SiNcdE9LQyEjOjckJCIwJz5SPTYxbjkhIzkkITAsSiNRQyxVRSEjOjckJCIvI1J5Iz1EeDkhIzgkITAlb1NAcy9uRyEjOjckJCIwViYzUGMrKFsiISM5JCEweUdhQiQqUTMkISM6NyQkIjBzVigpKWYkeVwiISM5JCEwLz4pb1tNRUwhIzo3JCQiMFcoW3hVQDI6ISM5JCEwJFsncGU2eGAkISM6NyQkIjBbJjQ+KGV5XiIhIzkkITBBMU49OCN6UCEjOjckJCIvLjFzKmZ2XyIhIzgkITBfMT0sJ3orUyEjOjckJCIwJjQ+PTs8UTohIzkkITBOaERYKnlXVSEjOjckJCIwJjM8dXdLWjohIzkkITBSN1cpPm5jVyEjOjckJCIwJGU7YGB2ZDohIzkkITAoZlBfSV4qcCUhIzo3JCQiMFQiR3d6I3ljIiEjOSQhMCopelNBTWMkXCEjOjckJCIwKWY+PlMqeWQiISM5JCEwTDMnPTo3dF4hIzo3JCQiMHhhNC5CemUiISM5JCEwWnU8a1k3VCYhIzo3JCQiMHpkOnhkdmYiISM5JCEwPCYpNERKOWsmISM6NyQkIjBgMTg9dHpnIiEjOSQhMCp5XVFKJD0qZSEjOjckJCIwMDU/IykqKnloIiEjOSQhMDleYXYpKj44JyEjOjckJCIvJz5SOVokRzshIzgkITBNTCRlImVqUSchIzo3JCQiMDpJZ1sveWoiISM5JCEwa2AlM2wtPW0hIzo3JCQiMFwoXD5tRFs7ISM5JCEwa3p5N0NjKG8hIzo3JCQiMDA1PyV6RWU7ISM5JCEwJ29CY1UqUTcoISM6NyQkIjBVJG8nKltEbzshIzkkITBcNkIrZUlQKCEjOjckJCIwdVomNGpveTshIzkkITBic1IleiFcaighIzo3JCQiMC8zOy0lSClvIiEjOSQhMCgzW3ZfX3h5ISM6NyQkIjAjWydIakwiKXAiISM5JCEwTVpid0x1NykhIzo3JCQiMExsSXQoKiozPCEjOSQhMD5vclFcXVMpISM6NyQkIjA6SGVHTSk9PCEjOSQhMFVqZ3dNemwpISM6NyQkIjBmPE4rJSopRzwhIzkkITAwJFxsJmUhPSopISM6NyQkIjBWJ0d4VzdSPCEjOSQhMDBFaWdhVD0qISM6NyQkIjBNbk1GRyZbPCEjOSQhMCoqZkxVTCxWKiEjOjckJCIwUnljVF8mZTwhIzkkITBKaSxcKnokcCohIzo3JCQiME1uTUQrJm88ISM5JCEwRWIpKWZbcCYqKiEjOjckJCIwcFF4TVQiejwhIzkkITA0RDkmeitDNSEjOTckJCIwSmlDbEomKXkiISM5JCEwbyUqUTVNIlw1ISM5NyQkIjAoUXg5aE8qeiIhIzkkITBKWjciKSlHeTUhIzk3JCQiMGEzPFFWIjQ9ISM5JCEwKFtvSilcWjUiISM5NyQkIjBUIkd3dSIpPT0hIzkkIS0tZkYySjYhIzY3JCQiMCopeWRCPyNIPSEjOSQhMERQSytOJmY2ISM5NyQkIjAiSGV3XW1SPSEjOSQhMDcqXCZwdiMpPSIhIzk3JCQiMCllPE4kbyJcPSEjOSQhMCZHJylbd2M5NyEjOTckJCIwTW9PUGcjZj0hIzkkITAsP0cmb2pVNyEjOTckJCIwVSUpb0A0InA9ISM5JCEwcyJbW3A8cTchIzk3JCQiMDxNb1kmeXo9ISM5JCEwcyEqNDAmPis4ISM5NyQkIjB5YzhSQiEqKT0hIzkkITAiKT4pSHFJRTghIzk3JCQiMGY8TltMJyoqPSEjOSQhMChleEdiWGM4ISM5NyQkIi8oUnpfMic0PiEjOCQhMClIMiRvXVxRIiEjOTckJCIwJilwUkImWz4+ISM5JCEwQXJEbjxMVCIhIzk3JCQiMCUqKXkoenEkSD4hIzkkITBjP2x2YD1XIiEjOTckJCIwb05yV2AlUj4hIzkkITAmWz9iKDQ2WiIhIzk3JCQiMG1LbCkzOV0+ISM5JCEvWyp6NShHLTohIzg3JCQiMGI0PkFTKmY+ISM5JCEwOSU0YlUtSjohIzk3JCQiMDZAVVU4J3A+ISM5JCEwKlJsIXlLJmY6ISM5NyQkIjBZIkg9UiYqej4hIzkkITBGPSpRSjshZiIhIzk3JCQiMDA1PyE+RiEqPiEjOSQhMC5bSG8nKTNpIiEjOTckJCIjPyEiIiQhJGwiISIjLSUlVklFV0c2JDskIiIhISIiJCIjPyEiIiUoREVGQVVMVEctJStBWEVTTEFCRUxTRzYkLUkjbWlHNiMvSSttb2R1bGVuYW1lRzYiSSxUeXBlc2V0dGluZ0dJKF9zeXNsaWJHNiI2NVEieDYiLyUnZmFtaWx5R1EhNiIvJSVzaXplR1EjMTA2Ii8lJWJvbGRHUSZmYWxzZTYiLyUnaXRhbGljR1EldHJ1ZTYiLyUqdW5kZXJsaW5lR1EmZmFsc2U2Ii8lKnN1YnNjcmlwdEdRJmZhbHNlNiIvJSxzdXBlcnNjcmlwdEdRJmZhbHNlNiIvJStmb3JlZ3JvdW5kR1EoWzAsMCwwXTYiLyUrYmFja2dyb3VuZEdRLlsyNTUsMjU1LDI1NV02Ii8lJ29wYXF1ZUdRJmZhbHNlNiIvJStleGVjdXRhYmxlR1EmZmFsc2U2Ii8lKXJlYWRvbmx5R1EmZmFsc2U2Ii8lKWNvbXBvc2VkR1EmZmFsc2U2Ii8lKmNvbnZlcnRlZEdRJmZhbHNlNiIvJStpbXNlbGVjdGVkR1EmZmFsc2U2Ii8lLHBsYWNlaG9sZGVyR1EmZmFsc2U2Ii8lNnNlbGVjdGlvbi1wbGFjZWhvbGRlckdRJmZhbHNlNiIvJSxtYXRodmFyaWFudEdRJ2l0YWxpYzYiUSE2Ii0lJlRJVExFRzYkLSUpX1RZUEVTRVRHNiMtSSNtaUc2Iy9JK21vZHVsZW5hbWVHNiJJLFR5cGVzZXR0aW5nR0koX3N5c2xpYkc2IjY2USZTaGVhcjYiLyUnZmFtaWx5R1EwVGltZXN+TmV3flJvbWFuNiIvJSVzaXplR1EjMTA2Ii8lJWJvbGRHUSZmYWxzZTYiLyUnaXRhbGljR1EldHJ1ZTYiLyUqdW5kZXJsaW5lR1EmZmFsc2U2Ii8lKnN1YnNjcmlwdEdRJmZhbHNlNiIvJSxzdXBlcnNjcmlwdEdRJmZhbHNlNiIvJStmb3JlZ3JvdW5kR1EoWzAsMCwwXTYiLyUrYmFja2dyb3VuZEdRLlsyNTUsMjU1LDI1NV02Ii8lJ29wYXF1ZUdRJmZhbHNlNiIvJStleGVjdXRhYmxlR1EmZmFsc2U2Ii8lKXJlYWRvbmx5R1EmZmFsc2U2Ii8lKWNvbXBvc2VkR1EmZmFsc2U2Ii8lKmNvbnZlcnRlZEdRJmZhbHNlNiIvJStpbXNlbGVjdGVkR1EmZmFsc2U2Ii8lLHBsYWNlaG9sZGVyR1EmZmFsc2U2Ii8lNnNlbGVjdGlvbi1wbGFjZWhvbGRlckdRJmZhbHNlNiIvJTBmb250X3N0eWxlX25hbWVHUSVUZXh0NiIvJSxtYXRodmFyaWFudEdRJ2l0YWxpYzYiLSUtVFJBTlNQQVJFTkNZRzYjJCIiISEiIi0lJkNPTE9SRzYmJSRSR0JHJCIiISEiIiQiIiEhIiIkIiM1ISIiLSUlUk9PVEc2Jy0lKUJPVU5EU19YRzYjJCIkIVwhIiItJSlCT1VORFNfWUc2IyQiJCsjISIiLSUtQk9VTkRTX1dJRFRIRzYjJCIlNUohIiItJS5CT1VORFNfSEVJR0hURzYjJCIlNU0hIiItJSlDSElMRFJFTkc2Ig==

subs(x=0,m);

IyEiKCIjNQ==

plot(cos((1/2)*x)+sin(2*x), x = 0 .. 4*Pi);

LSUlUExPVEc2Ji0lJ0NVUlZFU0c2JDdnejckJCIiISEiIiQiIzUhIiI3JCQiMClvdDo4IXBnJyEjOyQiMEdWL0MzNzgiISM5NyQkIjAtbEIzYGJCIiEjOiQiMFh1JFFkcFU3ISM5NyQkIjAtcE5mWT8pPSEjOiQiL14kKSk9ZkpPIiEjODckJCIwYj5NW0RHYCMhIzokIjAxLmFHb3JaIiEjOTckJCIwVTBbTDYwPSQhIzokIjB3cHRoWTllIiEjOTckJCIwOCsnRyEqKjR5JCEjOiQiMHMsbTxYJG87ISM5NyQkIi8qPlJEcEZTJSEjOSQiMDpWMSgpZXB1IiEjOTckJCIwNChSNVwhZS8mISM6JCIwLVk3ZEdaIj0hIzk3JCQiMHVvTE15bm8mISM6JCIwJyl5T1B0dCc9ISM5NyQkIjAkKUhbSSk0WWohIzokIjAkeV09IlxcIT4hIzk3JCQiMCdcSCYqSFlPbSEjOiQiMCJSeGgiXGYiPiEjOTckJCIwNGdkb0ZvI3AhIzokIjA7YTooeVpCPiEjOTckJCIwLFosaW8tNCghIzokIi5FWyx0aCM+ISM3NyQkIjAlUmBhJjRQRCghIzokIjAkPWdYJlx4Iz4hIzk3JCQiMCczIyopW11yVCghIzokIjAmb3AxSD9HPiEjOTckJCIweTJMVSJmIWUoISM6JCIwKWVTeSdIdiM+ISM5NyQkIjApNFcrYiIpM3ohIzokIjAzOWtzbUYjPiEjOTckJCIwPHV2ZFJxQikhIzokIi9kdCx5Vzg+ISM4NyQkIjBhTVZIV0xiKSEjOiQiMDhpNV9wLCE+ISM5NyQkIi9cNDYhXCdwKSkhIzkkIjBrXSkzQHEjKT0hIzk3JCQiMGEpeiIpKj1UVyohIzokIjA0YShRNlVTPSEjOTckJCIwLiozTT5zNzUhIzkkIi9eeiMzSkh4IiEjODckJCIwRllaXCplcTUhIzkkIi9LMk1GIj1xIiEjODckJCIwJD1mQ0shejgiISM5JCIwRGkhWzcyLzshIzk3JCQiMHN4OEcoWyg+IiEjOSQiMFJ3Jj1aPzA6ISM5NyQkIjAkb0JOLydHRSIhIzkkIjB4PCNIVyZbUSIhIzk3JCQiMCNcNlA2NkQ4ISM5JCIwViEqek9kLUUiISM5NyQkIjBDKCpSQGorUiIhIzkkIi5YMmJ6OzciISM3NyQkIjBAPmtcNChcOSEjOSQiMHQkRyJlIjQlKSkqISM6NyQkIjA8VypwZy85OiEjOSQiMDIxKSpvMTlTKSEjOjckJCIwLXMkKW90M2UiISM5JCIwYEU5dzpRJG8hIzo3JCQiL2BtRXQvUjshIzgkIjBtSkY0NFxZJiEjOjckJCIwJjR1XGsoPXEiISM5JCIwUkE6JlI1LFMhIzo3JCQiMEA3PDMmeW08ISM5JCIwLno7S2deXyMhIzo3JCQiMG5HW14mR0k9ISM5JCIwPSR6NjglbzgiISM6NyQkIjBIKyFcYXMiKj0hIzkkITBbIVEjUVpUTyIhIzs3JCQiMCdlbj9TJSpmPiEjOSQhMEY2QXUyLVgiISM6NyQkIi8qcDlXVDctIyEjOCQhMCQ9TTwrWEREISM6NyQkIjAvUz1fKm8nMyMhIzkkITBOVzIkUiUpW04hIzo3JCQiMHlfLEAmKmY5IyEjOSQhMHJMZXZQVk4lISM6NyQkIjBrakAqPiQzQCMhIzkkITAlKTRtI2Z0IzQmISM6NyQkIjBHKD1eJFE9RiMhIzkkITB0b0E+R11rJiEjOjckJCIwSl1YZDJjTCMhIzkkITBVJTM7ZHpwZyEjOjckJCIwVFgvaCF5bUIhIzkkITBLViI+JHopPmkhIzo3JCQiMF5TamtgelIjISM5JCEwKCoqUnI7LktqISM6NyQkIjAyY2YjKillSUMhIzkkITBPKio+XC8qM2shIzo3JCQiMGtyYj9DS1kjISM5JCEvZjthc2VXayEjOTckJCIwLS9ALlMqeUMhIzkkIS8qM1AuMXNXJyEjOTckJCIwVE8nZWVsJVwjISM5JCEwdkIoekpXU2shIzo3JCQiLylvXm9yLl4jISM4JCEwV2c1R3VWVSchIzo3JCQiMD4sPF4oM0VEISM5JCEwWHQ5SSUzKlInISM6NyQkIjA7TW4iNEJlRCEjOSQhMHo4NDhbIT5qISM6NyQkIjA5bjxLdS5mIyEjOSQhMHVESDZvPD8nISM6NyQkIjAuKWUvKUdUbCMhIzkkITBuWXEqUU5qZSEjOjckJCIwKmYsYERyN0YhIzkkITBAMUUoKip5TmEhIzo3JCQiMDAoKSlSaCYpekYhIzkkITBcPy8oKno1I1shIzo3JCQiMC80Vzs1KlJHISM5JCEwJlt5K2pZclQhIzo3JCQiMFhcLEdTUiFIISM5JCEwbnYqPm9pIVIkISM6NyQkIjBycjRGRF8nSCEjOSQhMHlDXVRnUmQjISM6NyQkIjBWWXNQdUsuJCEjOSQhMEsneSlcTCIzOyEjOjckJCIwW3BKISoqPiM0JCEjOSQhME4mKlFuL0pSKCEjOzckJCIwTV1AITQzZkohIzkkIjA4KXpEYGBBRSEjOzckJCIwNz1Abk4rQSQhIzkkIjBPI1xlekpxNiEjOjckJCIwdVA1aDVuRyQhIzkkIjBVeiJRJkhvOCMhIzo3JCQiMD1GdCEpUlVNJCEjOSQiMFBfcFsqUUpIISM6NyQkIjBAWG0lKWUoNE0hIzkkIjB1cCNHNTB0UCEjOjckJCIwMSQzL3EvdE0hIzkkIjBCb3Y+RFddJSEjOjckJCIwcykqbyJRSE9OISM5JCIwIip5d1gvJ1FeISM6NyQkIjAlNDVjekkqZiQhIzkkIjAiKSlIUSkqZmZjISM6NyQkIjA0dmwiWyUpZk8hIzkkIjAnKXojSFokUi8nISM6NyQkIjBPZzd6bERwJCEjOSQiL1wzT0l0K2khIzk3JCQiMGpYZncnR0RQISM5JCIwbiIqUS5vK0snISM6NyQkIjA+I1JGQVpjUCEjOSQiMFhOPjUpKXlSJyEjOjckJCIwdlEpKW9kd3kkISM5JCIwKGVzISlbelJrISM6NyQkIjBFJ28uJG9TIVEhIzkkIjBHSEsoPj1aayEjOjckJCIwd0wmPSp5LyNRISM5JCIwYSpbSTBNV2shIzo3JCQiMEYiUUwmKilvJFEhIzkkIjAiW29xYD5KayEjOjckJCIweEcjWyxJYFEhIzkkIjBhdG9qI28yayEjOjckJCIwSG1ZRTZJKVEhIzkkIjAlKSozYldkUWohIzo3JCQiL1E1IlFBRiJSISM4JCIwXHBYZi1eQichIzo3JCQiMChIU3NdUnlSISM5JCIwR2Bzaig+JSllISM6NyQkIi9Nem0hKUhUUyEjOCQiMFo5JVFVWyJSJiEjOjckJCIwJFxgYHovL1QhIzkkIjAjZVFYQyczdiUhIzo3JCQiMCVmV2AvZnBUISM5JCIwSip5bG49SFIhIzo3JCQiMCl6ZClbZCpIVSEjOSQiMFt3LzRARC8kISM6NyQkIi8mZioqZSJ5IkglISM4JCIwOCJvaEtSOj8hIzo3JCQiMC9dUnVVK08lISM5JCIwaCs9WltuYighIzs3JCQiMEJEd2laPVUlISM5JCEvKGV0XlZvJFshIzo3JCQiMDN0eXBhXVslISM5JCEwO1M0JUh4Sj0hIzo3JCQiMEY5LW1NJFxYISM5JCEvaWVsTzlvSyEjOTckJCIwYSI0YS9VM1khIzkkITB0R3FqeSdIWSEjOjckJCIwLUJxKlJTclkhIzkkITBYeipbdSFmNSchIzo3JCQiMGZKXjUzUnQlISM5JCEwWElCRykpcGQoISM6NyQkIjAkZTxzIW8yIVshIzkkITBLJkc1RSNcOCohIzo3JCQiMDNGbjRwKGZbISM5JCEwJz5XLHl2WjUhIzk3JCQiMCd6KjQuV3kjXCEjOSQhL1skXDxMbj4iISM4NyQkIjBHQjNUdyMqKVwhIzkkITAlSCoqKSlbI1FLIiEjOTckJCIwMiNlUjAxXV0hIzkkITAtJWV1aC5UOSEjOTckJCIwJSp6XStCYTYmISM5JCEwYiJRKyoqKmViIiEjOTckJCIvVUF2KVw1PSYhIzgkITBELVdlVHpsIiEjOTckJCIvaicpNDF3U18hIzgkIS9kQnpbKHp0IiEjODckJCIwbjl4dnFUSSYhIzkkITBGJylmQUEmMz0hIzk3JCQiMHh5WCdHMG1gISM5JCEwWnp0YyE9aT0hIzk3JCQiL1hFQFA4TGEhIzgkITAkNHQ0J3pFIT4hIzk3JCQiMDFAcV5iQFkmISM5JCEwKipcITN0UDk+ISM5NyQkIjBoeEZKeDZcJiEjOSQhMENIV1BBRCM+ISM5NyQkIjBSUGxnVnldJiEjOSQhMG9GeiEpKmVEPiEjOTckJCIwPChIKyo0WF8mISM5JCEwZU8oPkFbRj4hIzk3JCQiMCZwMCU+dzZhJiEjOSQhMDBWXHYrI0c+ISM5NyQkIjB0O3lbVXliJiEjOSQhMCYqemJ6WngjPiEjOTckJCIwMlBDKG88KmUmISM5JCEwZClSSiFRUCM+ISM5NyQkIjBVZHFENjBpJiEjOSQhMChldl5uajo+ISM5NyQkIjAkUnAmKUhhXmMhIzkkIS8jNENOSk8hPiEjODckJCIwV0lWcnVEbyYhIzkkIS9hTD9ycygpPSEjODckJCIwVFpOYShvV2QhIzkkITBWYmtxM1glPSEjOTckJCIwVWB3cFEhM2UhIzkkITBXcWsoelwmeSIhIzk3JCQiMFs0KGYpKj12ZSEjOSQhMGMpKnpRcHdxIiEjOTckJCIwUVknKiozd09mISM5JCEwKVtXb3p3QjshIzk3JCQiMDBpQFVSdipmISM5JCEwViFvcHNgSTohIzk3JCQiMHlWQ201RDEnISM5JCEwMCNmZil5NVUiISM5NyQkIjBQOWdZU3Q3JyEjOSQhMCkqXGEjSGouOCEjOTckJCIwVC5ZMUhiPSchIzkkITApPldLNylHPiIhIzk3JCQiMC0kemJ3WGFpISM5JCEwX2MqUTBLZDUhIzk3JCQiMCcpM1ghUjg3aiEjOSQhMGxHOSZSST8lKiEjOjckJCIvdnNiRmZ6aiEjOCQhMDIiZTkvO3MhKSEjOjckJCIwNzNUcHZSVychIzkkITA6PT9gTHEhbyEjOjckJCIwRCg9Kik+WSxsISM5JCEwKlxcKEc8QnImISM6NyQkIjBtMi5NNmhjJyEjOSQhMFAkXGNedlFYISM6NyQkIjByI0hIIyo9Sm0hIzkkIS9lIVxBMXVWJCEjOTckJCIvOFY5eSZmcCchIzgkITAtY2teLidRQyEjOjckJCIweDVRZTFndichIzkkITAlZmUiejxKaCIhIzo3JCQiMHVVamckPT1vISM5JCEwdDY/aTFPcykhIzs3JCQiMFkhKj48KFsjKW8hIzkkITA+XGAjZnQhUiMhIzs3JCQiMGooRzpYZVlwISM5JCIwS2sxJW8nKilbIyEjOzckJCIwdUw5XjtELCghIzkkIjBfT1xeXXclZiEjOzckJCIwRCFbISlIYlRxISM5JCIvRCNSSitzJnAhIzo3JCQiMHdFJlwlKmVxcSEjOSQiMHRwI3A2blx3ISM7NyQkIjBYbEhhTHAzKCEjOSQiMCd5WERrcSoqeSEjOzckJCIwOi9ranhLNSghIzkkIjBROHJfPCJcISkhIzs3JCQiMCVHJSlIPGk+ciEjOSQiME9VTjNvISk0KSEjOzckJCIwYCJHQmUnZjgoISM5JCIwLSkpSDxOby8pISM7NyQkIjAmWyo0Qil5b3IhIzkkIjBWPGxeRklrKCEjOzckJCIwPDMoUTFoLHMhIzkkIjBSbHoob1NUbyEjOzckJCIwQCVRNTZDTHMhIzkkIjBecC8pUlMpcCYhIzs3JCQiMENnP2VyW0UoISM5JCIwPDwxKSl6ISo+JSEjOzckJCIwaEkieiY9QksoISM5JCIwaioqXCN6RVVmISM8NyQkIjB6Ul1oRzFSKCEjOSQhME07YiUzcSM0JiEjOzckJCIwLShwdmhcW3UhIzkkITBeLW8jPVsrNiEjOjckJCIwZVViISo0ZV4oISM5JCEwLVEuLisyIT4hIzo3JCQiMFpHQidSUnZ2ISM5JCEwVCY0RVtXJ3AjISM6NyQkIjBlKD07cndTdyEjOSQhMFx3JlI6NVpPISM6NyQkIjBubCE9eSwueCEjOSQhMGUjcHRFYjVZISM6NyQkIjAqeiVcKilwencoISM5JCEwQER4VHFubCYhIzo3JCQiMCcqcHQ8O3cjeSEjOSQhL0pQbz1nT20hIzk3JCQiMCNcKjN2Xz4qeSEjOSQhL09rV2ZDJXAoISM5NyQkIjB4QSRwLnlleiEjOSQhMF8mR2VYbnIoKSEjOjckJCIwMTt3K2FwLCkhIzkkITAvY2ZHKDN1JyohIzo3JCQiLzxwSUp5eiEpISM4JCEwI1EqPScqXCRmNSEjOTckJCIwJ0htaTxwVyIpISM5JCEvIipIJ1FUazkiISM4NyQkIjBWemQ+Iz4zIykhIzkkITBWZCoqKUg1QTchIzk3JCQiMC9eKkhAanAjKSEjOSQhL2ZMODQhW0ciISM4NyQkIjBoRTtxXXlMKSEjOSQhLyw/ZyczMk0iISM4NyQkIjBtP0M3WyIqUikhIzkkITBvQHEoR1R4OCEjOTckJCIwdDBFO3M9VikhIzkkITA5VSE+KT45UiIhIzk3JCQiLzN6LWlmayUpISM4JCEwXCNlPDNRLDkhIzk3JCQiMCkqb1tpQSV6JSkhIzkkITA2ejpNTVhTIiEjOTckJCIwPFpwL1xVXCkhIzkkITBhXyFII0dvUyIhIzk3JCQiME5EIXBhMjQmKSEjOSQhMDYpUjddRDM5ISM5NyQkIjBgLjYqPSFSXykhIzkkITAkKW9nJ3ohKTM5ISM5NyQkIjBEMW0zNixhKSEjOSQhMCM+ZyRlMCUzOSEjOTckJCIwJyozQEc/amIpISM5JCEwO0Mhb1slcFMiISM5NyQkIjBvNndaSERkKSEjOSQhMGx6WDc/V1MiISM5NyQkIjBSOUpuUSgpZSkhIzkkITBZSyVcbiMzUyIhIzk3JCQiMEBFRSY9Qz4nKSEjOSQhMHIqekhhOiJSIiEjOTckJCIwLlFALlgoXCcpISM5JCEvLyY9THZ3UCIhIzg3JCQiMDIsYkQ5TnIpISM5JCEwW1VrLjZzTCIhIzk3JCQiMEUiSEYuJ2V4KSEjOSQhLyp5NXZzPEciISM4NyQkIjBSQWwpMzhUKSkhIzkkITBPJnl4MVIyNyEjOTckJCIwJT5sIz4lKlIhKikhIzkkITAnbyU0JGZsPzYhIzk3JCQiMCp5ci01R28qKSEjOSQhMD5iJXolNHcsIiEjOTckJCIwelFiW04/LiohIzkkITBsTzNbKHpBISohIzo3JCQiMHVtUkI+MTQqISM5JCEwR0cqKilRcGZ5ISM6NyQkIi95JDMjR3dkIiohIzgkIS9FKnkhKnk2VSchIzk3JCQiMHpmYCVvInlAKiEjOSQhMFhMZydRKlwwJiEjOjckJCIwQCs2J3AlPUcqISM5JCEvIyl5cEQqUWAkISM5NyQkIjBZQT4mPjhWJCohIzkkITBFPnp0KnlMPyEjOjckJCIwPSg+ZTU9NiUqISM5JCEwKFtaYF8pKSlSJCEjOzckJCIwQj9UZTEsWiohIzkkIjBLIXp4WyY+OCIhIzo3JCQiLzY1JGUoKXBgKiEjOCQiMG9EWiplOid5IyEjOjckJCIwKClvSU5VemYqISM5JCIwJFJqWSM0I2ZVISM6NyQkIjBcKSk+SDxZbSohIzkkIjBtYjl4bDciZSEjOjckJCIwJHpGKVtZQHMqISM5JCIwMFE9PiFHJTMoISM6NyQkIjAoZmZGYm0oeSohIzkkIjA7Ry11XztXKSEjOjckJCIwIlEuJm9gNCYpKiEjOSQiMDkkSCpvIjRWJyohIzo3JCQiMFpceVwrVSIqKiEjOSQiMENQRHFIQDIiISM5NyQkIjBwXnFqOXMoKiohIzkkIi95cidmRWg7IiEjODckJCIwZV8oXF54LjUhIzgkIjBESWlUUEdDIiEjOTckJCIwaypvVyQ+LiwiISM4JCIweUdRcE8qNDghIzk3JCQiMCYqeXBWY2wsIiEjOCQiMFQhKT5BLyFlOCEjOTckJCIwWFsqZiZRKT41ISM4JCIwJkh1IkdfcFAiISM5NyQkIjAmeiJIbz9KLSIhIzgkIjAoZmlrRFwiUiIhIzk3JCQiLzxjJXoiNEU1ISM3JCIwJFxCekImM1MiISM5NyQkIjBZMGkhSDFINSEjOCQiMEhJZXo1bVMiISM5NyQkIjAkeltCWnFJNSEjOCQiMFcrVk9jIzM5ISM5NyQkIjBUcTJhWUIuIiEjOCQiMCV6XS1fIikzOSEjOTckJCIwKkcwZSQpKVIuIiEjOCQiMCJmRSc+JUgzOSEjOTckJCIwUE5gPEljLiIhIzgkIjBWN2dPLG5TIiEjOTckJCIwKlswRGB4UTUhIzgkIjAmKkglZTVwKzkhIzk3JCQiMFV1Wlo/Pi8iISM4JCIwYVN2ZmQzUiIhIzk3JCQiMFw2InB6MFg1ISM4JCIwdFQoPilHdFAiISM5NyQkIjBkW01ZJj5bNSEjOCQiMDQ7PUoqPWc4ISM5NyQkIjBuUk1yXFowIiEjOCQiMGJlXUFvS0oiISM5NyQkIjAoRyZwVCd5ZzUhIzgkIjBwXnMjKWV3RCIhIzk3JCQiMC4iNEYpb3AxIiEjOCQiMCpRK1p4aSo9IiEjOTckJCIwMyFcVVx6dDUhIzgkIjAjR0UxI29KNSIhIzk3JCQiL3cmM1Z2Kno1ISM3JCIwaUtibC1qLCIhIzk3JCQiMFEjKXk4J0gnMyIhIzgkIjBNPSV6dEczIyohIzo3JCQiL2w2TVRzIzQiISM3JCIud2o6Lnk9KSEjODckJCIwQi9OcksnKTQiISM4JCIwMlFUQkpLQSghIzo3JCQiMFEoem41JFw1IiEjOCQiMCIqSGdiPmU9JyEjOjckJCIwQjMneTk9NjYhIzgkIjBwUihHViVmOyYhIzo3JCQiMG03YFpueTYiISM4JCIwKXl5XzU/MlQhIzo3JCQiMHlueGRuUDciISM4JCIwKT4lKjQ+Oz1LISM6NyQkIjAoWz5yXWRJNiEjOCQiLjYrakRfRSMhIzg3JCQiL3U8NCQ9bjgiISM3JCIwLSkpcDFXISpbIiEjOjckJCIwR2A/cyd6VTYhIzgkIjBbWlNsOXY4KSEjOzckJCIwMi4nb0hMXDYhIzgkIjAmM0gsYGFYPyEjOzckJCIvdmhiYyplOiIhIzckITAwZz9Xc0ZzIyEjOzckJCIvPDNIbic9OyIhIzckITBvdEsjb3gmeiYhIzs3JCQiMDd1a0JQXTsiISM4JCEwc1UsS3ZUInAhIzs3JCQiMGFtUXUyI282ISM4JCEwO0FMYih6bXchIzs3JCQiMDlRbHphKHA2ISM4JCEwQCEpSEMsJioqeSEjOzckJCIwdjQjXD1JcjYhIzgkITB4JCl5cU1LLykhIzs3JCQiME4iKT0hKltHPCIhIzgkITBicF5pcXY0KSEjOzckJCIwJkhiYWZSdTYhIzgkITBaKDRRQDxpISkhIzs3JCQiMEMoUSgqKlx4PCIhIzgkIS9AOkp0QHd3ISM6NyQkIjBgQC0vLzY9IiEjOCQhMF4qKkgiPVVtbyEjOzckJCIwPSh6PmkrJT0iISM4JCEvVi5xLlJDZSEjOjckJCIwJUdQKlIzcD0iISM4JCEwLm5gIip6dlklISM7NyQkIjB2d28iXGQkPiIhIzgkITBKYTZGUCdwPCEjPDckJCIwIzMhUXpUKSo+IiEjOCQiMCZHIypReUguYCEjOzckJCIwN0cmUiJbZz8iISM4JCIwJXopekZMUz8iISM6NyQkIjAjKVxDVWZBQCIhIzgkIjApeVN2YGEqKj4hIzo3JCQiMFVneWAlZj03ISM4JCIwLSspKTRrVSNIISM6NyQkIjAtbVNsNGBBIiEjOCQiMHU8UT5hUywlISM6NyQkIjByZiFlbllKNyEjOCQiMFZ6ZChHeic0JiEjOjckJCIwRzYuaFd2QiIhIzgkIjB2PCg+KSo0R2khIzo3JCQiMFhSVnRUU0MiISM4JCIwJ1tjaiVvd1soISM6NyQkIjBeJ3A5Wl9dNyEjOCQiMFt6M1ouZngpISM6NyQkIi0jKmVxamM3ISM1JCIwYTtvXCoqKioqKiohIzotJSZDT0xPUkc2JiUkUkdCRyQiIzUhIiIkIiIhISIiJCIiISEiIi0lJVZJRVdHNiQ7JCIiISEiIiQiK2lxamM3ISIpJShERUZBVUxURy0lK0FYRVNMQUJFTFNHNiQtSSNtaUc2Iy9JK21vZHVsZW5hbWVHNiJJLFR5cGVzZXR0aW5nR0koX3N5c2xpYkc2IjY1USJ4NiIvJSdmYW1pbHlHUSE2Ii8lJXNpemVHUSMxMDYiLyUlYm9sZEdRJmZhbHNlNiIvJSdpdGFsaWNHUSV0cnVlNiIvJSp1bmRlcmxpbmVHUSZmYWxzZTYiLyUqc3Vic2NyaXB0R1EmZmFsc2U2Ii8lLHN1cGVyc2NyaXB0R1EmZmFsc2U2Ii8lK2ZvcmVncm91bmRHUShbMCwwLDBdNiIvJStiYWNrZ3JvdW5kR1EuWzI1NSwyNTUsMjU1XTYiLyUnb3BhcXVlR1EmZmFsc2U2Ii8lK2V4ZWN1dGFibGVHUSZmYWxzZTYiLyUpcmVhZG9ubHlHUSZmYWxzZTYiLyUpY29tcG9zZWRHUSZmYWxzZTYiLyUqY29udmVydGVkR1EmZmFsc2U2Ii8lK2ltc2VsZWN0ZWRHUSZmYWxzZTYiLyUscGxhY2Vob2xkZXJHUSZmYWxzZTYiLyU2c2VsZWN0aW9uLXBsYWNlaG9sZGVyR1EmZmFsc2U2Ii8lLG1hdGh2YXJpYW50R1EnaXRhbGljNiJRITYiLSUlUk9PVEc2Jy0lKUJPVU5EU19YRzYjJCIkPyYhIiItJSlCT1VORFNfWUc2IyQiI10hIiItJS1CT1VORFNfV0lEVEhHNiMkIiVJTSEiIi0lLkJPVU5EU19IRUlHSFRHNiMkIiUhKVEhIiItJSlDSElMRFJFTkc2Ig==