A loose rod of mass m1 and length l leans against one of the faces of a cube of mass m _(2) and side length a . The assembly is placed on a horizontal table with one end of the rod touching the table and its other end leaning against the edge of the cube. We set the rod and the center of mass of the cube on the same vertical plane, and then we release the assembly from the rest. For frictionless contacts, we calculate the separation runtime of the rod from the cube as a function of m _(2)/ m _(1) and a / l . This entails forming the equation describing the motion of the system. The equation of motion is analytically unsolvable nonlinear differential equation. Applying a Computer Algebra System, specifically Mathematica [1] [2], we solve the equation numerically. Utilizing the solution, in addition to evaluating the separation runtime, we quantify a list of dynamic quantities, such as the time-dependent interface forces, and, geometric quantities, such as the trajectory of the loose end of the rod. A robust Mathematica code addresses the “what if” scenarios.
展开▼
机译：质量为m1且长度为l的松杆靠在质量为m _（2）和边长为a的立方体的一个面上。将组件放置在水平桌子上，杆的一端接触桌子，另一端倚靠立方体的边缘。我们将杆和立方体的质心设置在同一垂直平面上，然后从其余部分释放组件。对于无摩擦接触，我们根据m _（2）/ m _（1）和a / l计算杆与立方体的分离时间。这需要形成描述系统运动的方程式。运动方程是不可解析的非线性微分方程。应用计算机代数系统，特别是Mathematica [1] [2]，我们可以对方程进行数值求解。利用该解决方案，除了评估分离时间之外，我们还对一系列动态量（例如，与时间有关的界面力）和几何量（例如，杆的松动端的轨迹）进行量化。强大的Mathematica代码可解决“假设情况”。
展开▼
