f5e42ff3a78c

Swap y-axis
[view raw] [browse files]
author Steve Losh <steve@stevelosh.com>
date Thu, 19 May 2016 20:29:50 +0000
parents d9b504caca3b
children 281946a21897
branches/tags (none)
files src/3d/demo.lisp

Changes

--- a/src/3d/demo.lisp	Sun May 15 19:08:06 2016 +0000
+++ b/src/3d/demo.lisp	Thu May 19 20:29:50 2016 +0000
@@ -27,6 +27,7 @@
 (defun draw-point (screen size)
   (circle (vec-x screen) (vec-y screen) size))
 
+
 ;;;; Structs
 (defstruct (point (:constructor make-point (world &optional screen)))
   world screen)
@@ -52,7 +53,7 @@
        points))
 
 (defsketch demo
-    ((width *width*) (height *height*) (y-axis :down) (title "Coding Math")
+    ((width *width*) (height *height*) (y-axis :up) (title "Coding Math")
      (mouse (cons 0 0))
      ;; variables
      (fl 300.0)