model Bar "Massless bar with two mechanical cuts." MbsCut a b; parameter Position3 r[3] = [0, 0, 0] "Position vector from the origin of cut-frame A to the origin of cut-frame B"; equation // Kinematic relationships of cut-frame A and B b.S = a.S; b.r0 = a.r0 + a.S*r; // Relations between the forces and torques acting at // cut-frame A and B 0 = a.f + b.f; 0 = a.t + b.t - cross(r, a.f); // The function cross defines the cross product // of two vectors end Bar;