Contents
Aaron Klapheck
clear, clc, home
fprintf('The date and time: %s \n', datestr(now))
The date and time: 29-Sep-2008 10:01:19
Givens and Setup
l = 1; a = .4; b = .6; w = 200; F = 500;
By = (w*a.^2./2 + F*b)/l;
Ay = F + w*a - By;
x = [0:0.001*l:l];
Shear
V = Ay*(x>=0).*(x-0).^0 - w*(x>=0).*(x-0).^1 + w*(x>=a).*(x-a).^1 - ...
F*(x>=b).*(x-b).^0 + By*(x>=l).*(x-l).^0;
plot(x,V), grid
maxV = max(abs(V));
fprintf('\nThe Maximum Shear is %g N \n', maxV)
The Maximum Shear is 316 N
Moment
M = Ay*(x>=0).*(x-0).^1 - w/2*(x>=0).*(x-0).^2 + w/2*(x>=a).*(x-a).^2 - ...
F*(x>=b).*(x-b).^1 + By*(x>=l).*(x-l).^1;
plot(x,M), grid
maxM = max(abs(M));
fprintf('\nThe Maximum Moment is %g N \n', maxM)
The Maximum Moment is 126.4 N