User Portlet User Portlet

Discussions
This is a shear diagram for beams. Thank you so much in advance. Show[Plot[40 - 6 x, {x, 0, 3}], Plot[12 - 6 x, {x, 3, 8}], Plot[60 - 6 x, {x, 8, 10}], PlotRange -> All, AxesOrigin -> Automatic] ![enter image description...