Adams Basic Package > Adams View > Adams View > Appendix > S - Z > Simple pendulum sample dataset

Simple pendulum sample dataset

PART/01, GROUND
MARKER/0101 ! MARKER FOR PIVOT POINT

PART/02, MASS=1, CM=0202 ! SWINGING MASS
MARKER/0201, QP=0,0,0 ! MARKER FOR PIVOT POINT
MARKER/0202, QP=1,0,0 ! MARKER FOR MASS CENTER

JOINT/0102, REVOLUTE I=0101, J=0201

GRAPHICS/01, OUTLINE=0201,0202 ! ARM OF PENDULUM
GRAPHICS/02, CIRCLE, CM=0202, ! CIRCLE FOR MASS
, RADIUS=.1 SEG=20

ACCGRAV/ JGRAV = -386. ! ACCEL DUE TO GRAV
OUTPUT/ GRSAVE ! SAVE GRAPHICS FILE
END