(glMatrixMode GL_PROJECTION)
(glLoadIdentity)
(cond ((3d-mode?) (let ((ratio (if (= height 0) width (/ width height))))
(gluPerspective 45 ratio 0.1 100))) ;0.1
(glMatrixMode GL_PROJECTION)
(glLoadIdentity)
(cond ((3d-mode?) (let ((ratio (if (= height 0) width (/ width height))))
(gluPerspective 45 ratio 0.1 100))) ;0.1