scalar r = 0.3;
point point1 = point( 0 [ m ], 0 [ m ], 0 [ m ] );
point point2 = point( 0.1 [ m ], 0 [ m ], 0.0000e+000 [ m ] );
solid solid1 = cylinder( point1, point2, r *1[ m], mass = 1 [ kg ] );
point point3 = point( 0 [ m ], 0 [ m ], 0.3 [ m ] );
color green = RGB( 65, 186, 48 );
body body1 = body( color = green );
force force1 = moment( body1, point3, projectX, 2 [ kg m2/ s2 ], list(  ) );
body body2 = body( color = RGB( 255, 153, 153 ) );
force force2 = moment( body1, point( 0 [ m ], 0 [ m ], -0.3 [ m ] ), projectX, 2 [ kg m2/ s2 ], list(  ) );
solid solid2 = mirror( solid1, planePV( point( -0.5 [ m ], 0 [ m ], 0 [ m ] ), projectX ) );
color blue = RGB( 57, 57, 204 );
body body3 = body( color = blue );
joint joint4 = screw( body3, body1, point( -0.5 [ m ], 0 [ m ], 0 [ m ] ), reverse( projectX ), 0.1 [ m ] );
point point4 = point( -2 [ m ], 1[ m ], 0.0000e+000 [ m ] );
point point5 = point( -2[ m ], 1.1 [ m ], 0.0000e+000 [ m ] );
solid solid3 = cylinder( point4, point5, r*1[m], mass = 1 [ kg ] );
color Yellow = RGB( 207, 218, 5 );
body body4 = body( color = Yellow );
line line2 = polyLine( list( point( -1.7 [ m ], 1 [ m ], 0 [ m ] ), point( -1.7 [ m ], 5 [ m ], 0 [ m ] ) ) );
line line3 = polyLine( list( point( -2.3 [ m ], 1 [ m ], 0 [ m ] ), point( -2.3 [ m ], 5 [ m ], 0 [ m ] ) ) );
joint joint9 = user( body4, body2, nodePoint( point4 ), noX:, yesY:, noZ:, noFiX:, noFiY:, noFiZ: );
line line4 = polyLine( list( point( -1.1 [ m ], 0 [ m ], 0 [ m ] ), point4 ) );
color black = RGB( 0, 0, 0 );
body body5 = body( color = black );
joint joint10 = rotational( body5, body4, point4, projectZ );
joint joint11 = rotational( body5, body3, point( -1.1 [ m ], 0 [ m ], 0 [ m ] ), projectZ );
line line1 = polyLine( list( point( 1 [ m ], -0.3 [ m ], 0 [ m ] ), point( -3 [ m ], -0.3 [ m ], 0 [ m ] ) ) );
joint joint1 = user( body2, body3, nodePoint( point( -1 [ m ], -0.3 [ m ], 0 [ m ] ) ), yesX:, noY:, noZ:, noFiX:, noFiY:, noFiZ: );
sensor Угол = angleVV( reverse( projectX ), vectorPP( point( -1.1 [ m ], 0 [ m ], 0 [ m ] ), point4 ) );
sensor a = acceleration( point5 );
scalar scalar1 = 1.5;
force F = force( body4, point5, reverse( projectY ), scalar1*1[N], list(  ) );

/\///////////////////////////////////////////////////////////////////////////////////
/\   Прикрепление объектов
body body1 < (solid1 );
body body2 < (point1, line2, line3, line1 );
body body3 < (solid2 );
body body4 < (solid3, point5, point4 );
body body5 < (line4 );

/\///////////////////////////////////////////////////////////////////////////////////
/\   Команды исследования
command command1 = boundaryProblem( list( scalar1 ), list( Угол, a ), list( 45  [ deg ], 0.0  [ m/ s2 ] ), 0.0001, 0.0001, 1000,
	comForceAndAccelerate );
command command4 = sequence( list( command1 ) );

/\///////////////////////////////////////////////////////////////////////////////////
/\   Инерциальное звено;
set ground = body2;

/\///////////////////////////////////////////////////////////////////////////////////
/\   Единицы измерения;
set units = SI;