diff --git a/flight-sim.lisp b/flight-sim.lisp
index 51abc6d..fa984e4 100644
--- a/flight-sim.lisp
+++ b/flight-sim.lisp
@@ -20,20 +20,11 @@
     arr))
 
 (defparameter *n* (make-array 3 :initial-contents '(0 0 1)))
-(defparameter *v* (make-2d-array 24 3 '(
-					(0.0 1 0) (-0.5 0 0.5) (0.5 0 0.5) 
-					(0.0 1 0) (0.5 0 -0.5) (-0.5 0 -0.5)
-					(0.0 1 0) (0.5 0 0.5) (0.5 0 -0.5)
-					(0.0 1 0) (-0.5 0 -0.5) (-0.5 0 0.5)
-					
-					(0.0 -1 0) (-0.5 0 0.5) (0.5 0 0.5) 
-					(0.0 -1 0) (0.5 0 -0.5) (-0.5 0 -0.5)
-					(0.0 -1 0) (0.5 0 0.5) (0.5 0 -0.5)
-					(0.0 -1 0) (-0.5 0 -0.5) (-0.5 0 0.5)
+(defparameter *v* (make-2d-array 6 3 '((0.0 1 0) (0.5 0 0.5) (0.5 0 -0.5) 
+					(-0.5 0 0.5) (-0.5 0 -0.5) (0.0 -1 0))))
 
-					)))
-(defparameter *faces* (make-2d-array 8 3 '((0 1 2) (3 4 5) (6 7 8) (9 10 11)
-					   (13 12 14) (16 15 17) (19 18 20) (22 21 23))))
+(defparameter *faces* (make-2d-array 8 3 '((0 3 1) (0 2 4) (0 1 2) (0 4 3)
+					   (3 5 1) (2 5 4) (1 5 2) (4 5 3))))
 
 (defparameter *position* (make-array 3 :initial-contents 
 				     '(0 0 -3)))