(defjoint sarm3
:shape sarm-b3
:color 4
:parent sarm2
:axis :z
:offset (make-coords
:pos #f(0 -300 0)
:rot (rotation-matrix -pi/2 :z))
:low-limit (deg2rad -30)
:high-limit (deg2rad 60)
)
というように定義できる.