"emdyn" Matlab files
For one degree-of-freedom lumped model: oneDdyn.m

For distributed 1-D beam modeling: