(gl:call-list *turtle-list*)))
(list 0 (1- (world-width-in-pixels)) (- (1- (world-width-in-pixels))) 0 0)
(list 0 0 0 (1- (world-height-in-pixels)) (- (1- (world-height-in-pixels))))))
(gl:call-list *turtle-list*)))
(list 0 (1- (world-width-in-pixels)) (- (1- (world-width-in-pixels))) 0 0)
(list 0 0 0 (1- (world-height-in-pixels)) (- (1- (world-height-in-pixels))))))