(convex-hull-3d (flatten
(mapcar
#'(lambda (l)
(print l)
(send-all (send l :bodies) :worldcoords)
(send-all (send l :bodies) :vertices)
)
(list (elt (send pr2 :rarm :gripper :links) 0)))))
とすると,
/irteusgl 0 error: float vector expected in (send #:inst31879 :init :faces geometry::faces :edges geometry::edges :vertices geometry::vertices :primitive (list :convex-hull geometry::vertices))
というエラーになります.
条件は詰め切れていないんですが,最終的にconvex-hull-3dの最後の
(setq body (instance body-class :init
:faces faces
:edges edges
:vertices vertices
:primitive (list :convex-hull vertices )))
のedgesでsend e :set-angleしようとしてエラーになります.
[r607]でprimtpatch.l のconvex-hull-3d-oldの一部にアップデートしました.上の例題は解けていますが,どれぐらい解けるかはわかりません.
Related
Commit: [r607]