function H = topple_contactHorizontal(th,P)

% AUTOMATICALLY GENERATED  --  DO NOT EDIT
% Computes horizontal component of contact force for a stick toppling from rest.

m = P.m;
g = P.g;
L = P.L;
I = P.I;

H = -(L.^2.*g.*m.^2.*(3.*sin(2.*th) - 4.*sin(th)))./(2.*(I + L.^2.*m));

end

MatthewPeterKelly
github-repos/MATLAB/MatthewPeterKelly-dscTutorials/dscTutorials-e1e97a9be03ec146f88bd6ddd9e06db7ee52e242/toppling_stick/topple_contactHorizontal.m
dscTutorials
github-repos/MATLAB/MatthewPeterKelly-dscTutorials
e1e97a9be03ec146f88bd6ddd9e06db7ee52e242