wkentaro
10/16/2015 - 5:48 PM

irteusgl (body-) demo (non convex model cannot be displayed on OS X

irteusgl (body-) demo (non convex model cannot be displayed on OS X

body_minus_demo.l
content_copyfile_download
;; vim: set ft=lisp:
(setq a (make-cube 3 3 3))

(setq b (make-cube 3 1 1))
(send b :set-color :red)

(objects (list a b))

(setq c (body- a b))
(objects (list c))