; wire-colour doesn't work with draw-cube
; moreover draw-cube has a strange structure
(save-name "draw-cube-wire-colour-test.scm")
(clear-colour (vector 0.1 0.2 0.3))
(clear)
(wire-colour (vector 1 0 0))
(line-width 5)
(hint-wire)
(rotate (vector 45 45 0))
(scale (vector 5 5 5))
(every-frame (draw-cube))