blob: 288f3b424a09cfed5df293c92ecfc1fe33d69b88 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
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;
|