opengl 0.8.0 → 0.9.0

data/examples/RedBook/light.rb

@@ -1,6 +1,8 @@
 # This example comes from the Red Book chapter 5, example 5-1 light.c
 
 require 'opengl'
+require 'glu'
+require 'glut'
 require 'mathn'
 
 def init
@@ -151,4 +153,3 @@ glutDisplayFunc :display
 glutReshapeFunc :reshape
 glutKeyboardFunc :keyboard
 glutMainLoop
-

data/examples/RedBook/lines.rb

@@ -1,13 +1,13 @@
 #
 # Copyright (c) 1993-1997, Silicon Graphics, Inc.
-# ALL RIGHTS RESERVED 
-# Permission to use, copy, modify, and distribute this software for 
+# ALL RIGHTS RESERVED
+# Permission to use, copy, modify, and distribute this software for
 # any purpose and without fee is hereby granted, provided that the above
 # copyright notice appear in all copies and that both the copyright notice
-# and this permission notice appear in supporting documentation, and that 
+# and this permission notice appear in supporting documentation, and that
 # the name of Silicon Graphics, Inc. not be used in advertising
 # or publicity pertaining to distribution of the software without specific,
-# written prior permission. 
+# written prior permission.
 #
 # THE MATERIAL EMBODIED ON THIS SOFTWARE IS PROVIDED TO YOU "AS-IS"
 # AND WITHOUT WARRANTY OF ANY KIND, EXPRESS, IMPLIED OR OTHERWISE,
@@ -21,8 +21,8 @@
 # ADVISED OF THE POSSIBILITY OF SUCH LOSS, HOWEVER CAUSED AND ON
 # ANY THEORY OF LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE
 # POSSESSION, USE OR PERFORMANCE OF THIS SOFTWARE.
-# 
-# US Government Users Restricted Rights 
+#
+# US Government Users Restricted Rights
 # Use, duplication, or disclosure by the Government is subject to
 # restrictions set forth in FAR 52.227.19(c)(2) or subparagraph
 # (c)(1)(ii) of the Rights in Technical Data and Computer Software
@@ -38,91 +38,93 @@
 # This program demonstrates geometric primitives and
 # their attributes.
 require 'opengl'
+require 'glu'
+require 'glut'
 require 'mathn'
 include Gl,Glu,Glut
 
 def drawOneLine(x1,y1,x2,y2)
-	glBegin(GL_LINES)
-	glVertex((x1),(y1))
-	glVertex((x2),(y2))
-	glEnd()
+  glBegin(GL_LINES)
+  glVertex((x1),(y1))
+  glVertex((x2),(y2))
+  glEnd()
 end
 
 def init
-	glClearColor(0.0, 0.0, 0.0, 0.0)
-	glShadeModel(GL_FLAT)
+  glClearColor(0.0, 0.0, 0.0, 0.0)
+  glShadeModel(GL_FLAT)
 end
 
 display = Proc.new do
-	glClear(GL_COLOR_BUFFER_BIT)
-	
-	# select white for all lines
-	glColor(1.0, 1.0, 1.0)
-	
-	# in 1st row, 3 lines, each with a different stipple
-	glEnable(GL_LINE_STIPPLE)
-	
-	glLineStipple(1, 0x0101) # dotted
-	drawOneLine(50.0, 125.0, 150.0, 125.0)
-	glLineStipple(1, 0x00FF) # dashed
-	drawOneLine(150.0, 125.0, 250.0, 125.0)
-	glLineStipple(1, 0x1C47)  # dash/dot/dash
-	drawOneLine(250.0, 125.0, 350.0, 125.0)
-	
-	# in 2nd row, 3 wide lines, each with different stipple
-	glLineWidth(5.0)
-	glLineStipple(1, 0x0101) # dotted
-	drawOneLine(50.0, 100.0, 150.0, 100.0)
-	glLineStipple(1, 0x00FF) # dashed
-	drawOneLine(150.0, 100.0, 250.0, 100.0)
-	glLineStipple(1, 0x1C47) # dash/dot/dash
-	drawOneLine(250.0, 100.0, 350.0, 100.0)
-	glLineWidth(1.0)
-	
-	# in 3rd row, 6 lines, with dash/dot/dash stipple
-	# as part of a single connected line strip
-	glLineStipple(1, 0x1C47)  # dash/dot/dash
-	glBegin(GL_LINE_STRIP)
-	for i in  0..6
-		glVertex(50.0 + (i * 50.0), 75.0)
-	end
-	glEnd()
-	
-	# in 4th row, 6 independent lines with same stipple
-	for i in 0..5
-		drawOneLine(50.0 + (i * 50.0), 50.0, 50.0 + ((i+1) * 50.0), 50.0)
-	end
-	
-	# in 5th row, 1 line, with dash/dot/dash stipple
-	# and a stipple repeat factor of 5
-	glLineStipple(5, 0x1C47)  # dash/dot/dash
-	drawOneLine(50.0, 25.0, 350.0, 25.0)
-	
-	glDisable(GL_LINE_STIPPLE)
-	glutSwapBuffers()
+  glClear(GL_COLOR_BUFFER_BIT)
+
+  # select white for all lines
+  glColor(1.0, 1.0, 1.0)
+
+  # in 1st row, 3 lines, each with a different stipple
+  glEnable(GL_LINE_STIPPLE)
+
+  glLineStipple(1, 0x0101) # dotted
+  drawOneLine(50.0, 125.0, 150.0, 125.0)
+  glLineStipple(1, 0x00FF) # dashed
+  drawOneLine(150.0, 125.0, 250.0, 125.0)
+  glLineStipple(1, 0x1C47)  # dash/dot/dash
+  drawOneLine(250.0, 125.0, 350.0, 125.0)
+
+  # in 2nd row, 3 wide lines, each with different stipple
+  glLineWidth(5.0)
+  glLineStipple(1, 0x0101) # dotted
+  drawOneLine(50.0, 100.0, 150.0, 100.0)
+  glLineStipple(1, 0x00FF) # dashed
+  drawOneLine(150.0, 100.0, 250.0, 100.0)
+  glLineStipple(1, 0x1C47) # dash/dot/dash
+  drawOneLine(250.0, 100.0, 350.0, 100.0)
+  glLineWidth(1.0)
+
+  # in 3rd row, 6 lines, with dash/dot/dash stipple
+  # as part of a single connected line strip
+  glLineStipple(1, 0x1C47)  # dash/dot/dash
+  glBegin(GL_LINE_STRIP)
+  for i in  0..6
+    glVertex(50.0 + (i * 50.0), 75.0)
+  end
+  glEnd()
+
+  # in 4th row, 6 independent lines with same stipple
+  for i in 0..5
+    drawOneLine(50.0 + (i * 50.0), 50.0, 50.0 + ((i+1) * 50.0), 50.0)
+  end
+
+  # in 5th row, 1 line, with dash/dot/dash stipple
+  # and a stipple repeat factor of 5
+  glLineStipple(5, 0x1C47)  # dash/dot/dash
+  drawOneLine(50.0, 25.0, 350.0, 25.0)
+
+  glDisable(GL_LINE_STIPPLE)
+  glutSwapBuffers()
 end
 
 reshape = Proc.new do |w, h|
-	glViewport(0, 0,  w,  h)
-	glMatrixMode(GL_PROJECTION)
-	glLoadIdentity()
-	GLU.Ortho2D(0.0,  w, 0.0,  h)
+  glViewport(0, 0,  w,  h)
+  glMatrixMode(GL_PROJECTION)
+  glLoadIdentity()
+  GLU.Ortho2D(0.0,  w, 0.0,  h)
 end
 
 keyboard = Proc.new do |key, x, y|
-	case (key)
-		when ?\e
-			exit(0)
-	end
+  case (key)
+    when ?\e
+      exit(0)
+  end
 end
 
 glutInit
 glutInitDisplayMode(GLUT_DOUBLE | GLUT_RGB)
-glutInitWindowSize(400, 150) 
+glutInitWindowSize(400, 150)
 glutInitWindowPosition(100, 100)
 glutCreateWindow($0)
 init()
-glutDisplayFunc(display) 
+glutDisplayFunc(display)
 glutReshapeFunc(reshape)
 glutKeyboardFunc(keyboard)
 glutMainLoop()

data/examples/RedBook/list.rb

@@ -1,13 +1,13 @@
 #
 # Copyright (c) 1993-1997, Silicon Graphics, Inc.
-# ALL RIGHTS RESERVED 
-# Permission to use, copy, modify, and distribute this software for 
+# ALL RIGHTS RESERVED
+# Permission to use, copy, modify, and distribute this software for
 # any purpose and without fee is hereby granted, provided that the above
 # copyright notice appear in all copies and that both the copyright notice
-# and this permission notice appear in supporting documentation, and that 
+# and this permission notice appear in supporting documentation, and that
 # the name of Silicon Graphics, Inc. not be used in advertising
 # or publicity pertaining to distribution of the software without specific,
-# written prior permission. 
+# written prior permission.
 #
 # THE MATERIAL EMBODIED ON THIS SOFTWARE IS PROVIDED TO YOU "AS-IS"
 # AND WITHOUT WARRANTY OF ANY KIND, EXPRESS, IMPLIED OR OTHERWISE,
@@ -21,8 +21,8 @@
 # ADVISED OF THE POSSIBILITY OF SUCH LOSS, HOWEVER CAUSED AND ON
 # ANY THEORY OF LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE
 # POSSESSION, USE OR PERFORMANCE OF THIS SOFTWARE.
-# 
-# US Government Users Restricted Rights 
+#
+# US Government Users Restricted Rights
 # Use, duplication, or disclosure by the Government is subject to
 # restrictions set forth in FAR 52.227.19(c)(2) or subparagraph
 # (c)(1)(ii) of the Rights in Technical Data and Computer Software
@@ -35,69 +35,71 @@
 # OpenGL(R) is a registered trademark of Silicon Graphics, Inc.
 #
 #  list.c
-#  This program demonstrates how to make and execute a 
-#  display list.  Note that attributes, such as current 
+#  This program demonstrates how to make and execute a
+#  display list.  Note that attributes, such as current
 #  color and matrix, are changed.
 require 'opengl'
+require 'glu'
+require 'glut'
 require 'mathn'
 include Gl,Glu,Glut
 
 $listName = 0
 
 def init
-	$listName = glGenLists(1)
-	glNewList($listName, GL_COMPILE)
-	glColor(1.0, 0.0, 0.0)  # /*  current color red  */
-	glBegin(GL_TRIANGLES)
-	glVertex(0.0, 0.0)
-	glVertex(1.0, 0.0)
-	glVertex(0.0, 1.0)
-	glEnd()
-	glTranslate(1.5, 0.0, 0.0) # /*  move position  */
-	glEndList()
-	glShadeModel(GL_FLAT)
+  $listName = glGenLists(1)
+  glNewList($listName, GL_COMPILE)
+  glColor(1.0, 0.0, 0.0)  # /*  current color red  */
+  glBegin(GL_TRIANGLES)
+  glVertex(0.0, 0.0)
+  glVertex(1.0, 0.0)
+  glVertex(0.0, 1.0)
+  glEnd()
+  glTranslate(1.5, 0.0, 0.0) # /*  move position  */
+  glEndList()
+  glShadeModel(GL_FLAT)
 end
 
 def drawLine
-	glBegin(GL_LINES)
-	glVertex(0.0, 0.5)
-	glVertex(15.0, 0.5)
-	glEnd()
+  glBegin(GL_LINES)
+  glVertex(0.0, 0.5)
+  glVertex(15.0, 0.5)
+  glEnd()
 end
 
 display = Proc.new do
-	glClear(GL_COLOR_BUFFER_BIT)
-	glColor(0.0, 1.0, 0.0)  # current color green
-	for i in (0..9 ) # draw 10 triangles
-		glCallList($listName)
-	end
-	drawLine()  # is this line green?  NO!
-							# where is the line drawn?
-	glutSwapBuffers()
+  glClear(GL_COLOR_BUFFER_BIT)
+  glColor(0.0, 1.0, 0.0)  # current color green
+  for i in (0..9 ) # draw 10 triangles
+    glCallList($listName)
+  end
+  drawLine()  # is this line green?  NO!
+              # where is the line drawn?
+  glutSwapBuffers()
 end
 
 reshape = Proc.new do |w, h|
-	glViewport(0, 0, w, h)
-	glMatrixMode(GL_PROJECTION)
-	glLoadIdentity()
-	if (w <= h) 
-		GLU.Ortho2D(0.0, 2.0, -0.5 * h/w, 1.5 * h/w)
-	else
-		GLU.Ortho2D(0.0, 2.0 * w/h, -0.5, 1.5) 
-	end
-	glMatrixMode(GL_MODELVIEW)
-	glLoadIdentity()
+  glViewport(0, 0, w, h)
+  glMatrixMode(GL_PROJECTION)
+  glLoadIdentity()
+  if (w <= h)
+    GLU.Ortho2D(0.0, 2.0, -0.5 * h/w, 1.5 * h/w)
+  else
+    GLU.Ortho2D(0.0, 2.0 * w/h, -0.5, 1.5)
+  end
+  glMatrixMode(GL_MODELVIEW)
+  glLoadIdentity()
 end
 
 keyboard = Proc.new do |key, x, y|
-	case (key)
-		when ?\e
-			exit(0)
-	end
+  case (key)
+    when ?\e
+      exit(0)
+  end
 end
 
 # Main Loop
-# Open window with initial window size, title bar, 
+# Open window with initial window size, title bar,
 # RGBA display mode, and handle input events.
 glutInit
 glutInitDisplayMode(GLUT_DOUBLE | GLUT_RGB)

data/examples/RedBook/material.rb

@@ -2,14 +2,14 @@
 # Copyright (c) Mark J. Kilgard, 1994.
 #
 # (c) Copyright 1993, Silicon Graphics, Inc.
-# ALL RIGHTS RESERVED 
-# Permission to use, copy, modify, and distribute this software for 
+# ALL RIGHTS RESERVED
+# Permission to use, copy, modify, and distribute this software for
 # any purpose and without fee is hereby granted, provided that the above
 # copyright notice appear in all copies and that both the copyright notice
-# and this permission notice appear in supporting documentation, and that 
+# and this permission notice appear in supporting documentation, and that
 # the name of Silicon Graphics, Inc. not be used in advertising
 # or publicity pertaining to distribution of the software without specific,
-# written prior permission. 
+# written prior permission.
 #
 # THE MATERIAL EMBODIED ON THIS SOFTWARE IS PROVIDED TO YOU "AS-IS"
 # AND WITHOUT WARRANTY OF ANY KIND, EXPRESS, IMPLIED OR OTHERWISE,
@@ -23,8 +23,8 @@
 # ADVISED OF THE POSSIBILITY OF SUCH LOSS, HOWEVER CAUSED AND ON
 # ANY THEORY OF LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE
 # POSSESSION, USE OR PERFORMANCE OF THIS SOFTWARE.
-# 
-# US Government Users Restricted Rights 
+#
+# US Government Users Restricted Rights
 # Use, duplication, or disclosure by the Government is subject to
 # restrictions set forth in FAR 52.227.19(c)(2) or subparagraph
 # (c)(1)(ii) of the Rights in Technical Data and Computer Software
@@ -41,33 +41,35 @@
 # Several objects are drawn using different material characteristics.
 # A single light source illuminates the objects.
 require 'opengl'
+require 'glu'
+require 'glut'
 include Gl,Glu,Glut
 
-# Initialize z-buffer, projection matrix, light source, 
+# Initialize z-buffer, projection matrix, light source,
 # and lighting model.  Do not specify a material property here.
 def myinit
-	ambient = [ 0.0, 0.0, 0.0, 1.0 ]
-	diffuse = [ 1.0, 1.0, 1.0, 1.0 ]
-	position = [ 0.0, 3.0, 2.0, 0.0 ]
-	lmodel_ambient = [ 0.4, 0.4, 0.4, 1.0 ]
-	local_view = [ 0.0 ]
-	
-	glEnable(GL_DEPTH_TEST)
-	glDepthFunc(GL_LESS)
-	
-	glLight(GL_LIGHT0, GL_AMBIENT, ambient)
-	glLight(GL_LIGHT0, GL_DIFFUSE, diffuse)
-	glLight(GL_LIGHT0, GL_POSITION, position)
-	glLightModel(GL_LIGHT_MODEL_AMBIENT, lmodel_ambient)
-	glLightModel(GL_LIGHT_MODEL_LOCAL_VIEWER, local_view)
-	
-	glEnable(GL_LIGHTING)
-	glEnable(GL_LIGHT0)
-	
-	glClearColor(0.0, 0.1, 0.1, 0.0)
+  ambient = [ 0.0, 0.0, 0.0, 1.0 ]
+  diffuse = [ 1.0, 1.0, 1.0, 1.0 ]
+  position = [ 0.0, 3.0, 2.0, 0.0 ]
+  lmodel_ambient = [ 0.4, 0.4, 0.4, 1.0 ]
+  local_view = [ 0.0 ]
+
+  glEnable(GL_DEPTH_TEST)
+  glDepthFunc(GL_LESS)
+
+  glLight(GL_LIGHT0, GL_AMBIENT, ambient)
+  glLight(GL_LIGHT0, GL_DIFFUSE, diffuse)
+  glLight(GL_LIGHT0, GL_POSITION, position)
+  glLightModel(GL_LIGHT_MODEL_AMBIENT, lmodel_ambient)
+  glLightModel(GL_LIGHT_MODEL_LOCAL_VIEWER, local_view)
+
+  glEnable(GL_LIGHTING)
+  glEnable(GL_LIGHT0)
+
+  glClearColor(0.0, 0.1, 0.1, 0.0)
 end
 
-# Draw twelve spheres in 3 rows with 4 columns.  
+# Draw twelve spheres in 3 rows with 4 columns.
 # The spheres in the first row have materials with no ambient reflection.
 # The second row has materials with significant ambient reflection.
 # The third row has materials with colored ambient reflection.
@@ -81,186 +83,186 @@ end
 #
 # glTranslatef() is used to move spheres to their appropriate locations.
 display = proc do
-	no_mat = [ 0.0, 0.0, 0.0, 1.0 ]
-	mat_ambient = [ 0.7, 0.7, 0.7, 1.0 ]
-	mat_ambient_color = [ 0.8, 0.8, 0.2, 1.0 ]
-	mat_diffuse = [ 0.1, 0.5, 0.8, 1.0 ]
-	mat_specular = [ 1.0, 1.0, 1.0, 1.0 ]
-	no_shininess = [ 0.0 ]
-	low_shininess = [ 5.0 ]
-	high_shininess = [ 100.0 ]
-	mat_emission = [0.3, 0.2, 0.2, 0.0]
-	
-	glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT)
-	
-	# draw sphere in first row, first column
-	# diffuse reflection only no ambient or specular  
-	glPushMatrix()
-	glTranslate(-3.75, 3.0, 0.0)
-	glMaterial(GL_FRONT, GL_AMBIENT, no_mat)
-	glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
-	glMaterial(GL_FRONT, GL_SPECULAR, no_mat)
-	glMaterial(GL_FRONT, GL_SHININESS, no_shininess)
-	glMaterial(GL_FRONT, GL_EMISSION, no_mat)
-	glutSolidSphere(1.0, 16, 16)
-	glPopMatrix()
-	
-	# draw sphere in first row, second column
-	# diffuse and specular reflection low shininess no ambient
-	glPushMatrix()
-	glTranslate(-1.25, 3.0, 0.0)
-	glMaterial(GL_FRONT, GL_AMBIENT, no_mat)
-	glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
-	glMaterial(GL_FRONT, GL_SPECULAR, mat_specular)
-	glMaterial(GL_FRONT, GL_SHININESS, low_shininess)
-	glMaterial(GL_FRONT, GL_EMISSION, no_mat)
-	glutSolidSphere(1.0, 16, 16)
-	glPopMatrix()
-	
-	# draw sphere in first row, third column
-	# diffuse and specular reflection high shininess no ambient
-	glPushMatrix()
-	glTranslate(1.25, 3.0, 0.0)
-	glMaterial(GL_FRONT, GL_AMBIENT, no_mat)
-	glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
-	glMaterial(GL_FRONT, GL_SPECULAR, mat_specular)
-	glMaterial(GL_FRONT, GL_SHININESS, high_shininess)
-	glMaterial(GL_FRONT, GL_EMISSION, no_mat)
-	glutSolidSphere(1.0, 16, 16)
-	glPopMatrix()
-	
-	# draw sphere in first row, fourth column
-	# diffuse reflection emission no ambient or specular reflection
-	glPushMatrix()
-	glTranslate(3.75, 3.0, 0.0)
-	glMaterial(GL_FRONT, GL_AMBIENT, no_mat)
-	glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
-	glMaterial(GL_FRONT, GL_SPECULAR, no_mat)
-	glMaterial(GL_FRONT, GL_SHININESS, no_shininess)
-	glMaterial(GL_FRONT, GL_EMISSION, mat_emission)
-	glutSolidSphere(1.0, 16, 16)
-	glPopMatrix()
-	
-	# draw sphere in second row, first column
-	# ambient and diffuse reflection no specular  
-	glPushMatrix()
-	glTranslate(-3.75, 0.0, 0.0)
-	glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient)
-	glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
-	glMaterial(GL_FRONT, GL_SPECULAR, no_mat)
-	glMaterial(GL_FRONT, GL_SHININESS, no_shininess)
-	glMaterial(GL_FRONT, GL_EMISSION, no_mat)
-	glutSolidSphere(1.0, 16, 16)
-	glPopMatrix()
-	
-	# draw sphere in second row, second column
-	# ambient, diffuse and specular reflection low shininess
-	glPushMatrix()
-	glTranslate(-1.25, 0.0, 0.0)
-	glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient)
-	glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
-	glMaterial(GL_FRONT, GL_SPECULAR, mat_specular)
-	glMaterial(GL_FRONT, GL_SHININESS, low_shininess)
-	glMaterial(GL_FRONT, GL_EMISSION, no_mat)
-	glutSolidSphere(1.0, 16, 16)
-	glPopMatrix()
-	
-	# draw sphere in second row, third column
-	# ambient, diffuse and specular reflection high shininess
-	glPushMatrix()
-	glTranslate(1.25, 0.0, 0.0)
-	glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient)
-	glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
-	glMaterial(GL_FRONT, GL_SPECULAR, mat_specular)
-	glMaterial(GL_FRONT, GL_SHININESS, high_shininess)
-	glMaterial(GL_FRONT, GL_EMISSION, no_mat)
-	glutSolidSphere(1.0, 16, 16)
-	glPopMatrix()
-	
-	# draw sphere in second row, fourth column
-	# ambient and diffuse reflection emission no specular
-	glPushMatrix()
-	glTranslate(3.75, 0.0, 0.0)
-	glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient)
-	glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
-	glMaterial(GL_FRONT, GL_SPECULAR, no_mat)
-	glMaterial(GL_FRONT, GL_SHININESS, no_shininess)
-	glMaterial(GL_FRONT, GL_EMISSION, mat_emission)
-	glutSolidSphere(1.0, 16, 16)
-	glPopMatrix()
-	
-	# draw sphere in third row, first column
-	# colored ambient and diffuse reflection no specular  
-	glPushMatrix()
-	glTranslate(-3.75, -3.0, 0.0)
-	glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient_color)
-	glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
-	glMaterial(GL_FRONT, GL_SPECULAR, no_mat)
-	glMaterial(GL_FRONT, GL_SHININESS, no_shininess)
-	glMaterial(GL_FRONT, GL_EMISSION, no_mat)
-	glutSolidSphere(1.0, 16, 16)
-	glPopMatrix()
-	
-	# draw sphere in third row, second column
-	# colored ambient, diffuse and specular reflection low shininess
-	glPushMatrix()
-	glTranslate(-1.25, -3.0, 0.0)
-	glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient_color)
-	glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
-	glMaterial(GL_FRONT, GL_SPECULAR, mat_specular)
-	glMaterial(GL_FRONT, GL_SHININESS, low_shininess)
-	glMaterial(GL_FRONT, GL_EMISSION, no_mat)
-	glutSolidSphere(1.0, 16, 16)
-	glPopMatrix()
-	
-	# draw sphere in third row, third column
-	# colored ambient, diffuse and specular reflection high shininess
-	glPushMatrix()
-	glTranslate(1.25, -3.0, 0.0)
-	glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient_color)
-	glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
-	glMaterial(GL_FRONT, GL_SPECULAR, mat_specular)
-	glMaterial(GL_FRONT, GL_SHININESS, high_shininess)
-	glMaterial(GL_FRONT, GL_EMISSION, no_mat)
-	glutSolidSphere(1.0, 16, 16)
-	glPopMatrix()
-	
-	# draw sphere in third row, fourth column
-	# colored ambient and diffuse reflection emission no specular
-	glPushMatrix()
-	glTranslate(3.75, -3.0, 0.0)
-	glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient_color)
-	glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
-	glMaterial(GL_FRONT, GL_SPECULAR, no_mat)
-	glMaterial(GL_FRONT, GL_SHININESS, no_shininess)
-	glMaterial(GL_FRONT, GL_EMISSION, mat_emission)
-	glutSolidSphere(1.0, 16, 16)
-	glPopMatrix()
-	
-	glutSwapBuffers()
+  no_mat = [ 0.0, 0.0, 0.0, 1.0 ]
+  mat_ambient = [ 0.7, 0.7, 0.7, 1.0 ]
+  mat_ambient_color = [ 0.8, 0.8, 0.2, 1.0 ]
+  mat_diffuse = [ 0.1, 0.5, 0.8, 1.0 ]
+  mat_specular = [ 1.0, 1.0, 1.0, 1.0 ]
+  no_shininess = [ 0.0 ]
+  low_shininess = [ 5.0 ]
+  high_shininess = [ 100.0 ]
+  mat_emission = [0.3, 0.2, 0.2, 0.0]
+
+  glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT)
+
+  # draw sphere in first row, first column
+  # diffuse reflection only no ambient or specular
+  glPushMatrix()
+  glTranslate(-3.75, 3.0, 0.0)
+  glMaterial(GL_FRONT, GL_AMBIENT, no_mat)
+  glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
+  glMaterial(GL_FRONT, GL_SPECULAR, no_mat)
+  glMaterial(GL_FRONT, GL_SHININESS, no_shininess)
+  glMaterial(GL_FRONT, GL_EMISSION, no_mat)
+  glutSolidSphere(1.0, 16, 16)
+  glPopMatrix()
+
+  # draw sphere in first row, second column
+  # diffuse and specular reflection low shininess no ambient
+  glPushMatrix()
+  glTranslate(-1.25, 3.0, 0.0)
+  glMaterial(GL_FRONT, GL_AMBIENT, no_mat)
+  glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
+  glMaterial(GL_FRONT, GL_SPECULAR, mat_specular)
+  glMaterial(GL_FRONT, GL_SHININESS, low_shininess)
+  glMaterial(GL_FRONT, GL_EMISSION, no_mat)
+  glutSolidSphere(1.0, 16, 16)
+  glPopMatrix()
+
+  # draw sphere in first row, third column
+  # diffuse and specular reflection high shininess no ambient
+  glPushMatrix()
+  glTranslate(1.25, 3.0, 0.0)
+  glMaterial(GL_FRONT, GL_AMBIENT, no_mat)
+  glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
+  glMaterial(GL_FRONT, GL_SPECULAR, mat_specular)
+  glMaterial(GL_FRONT, GL_SHININESS, high_shininess)
+  glMaterial(GL_FRONT, GL_EMISSION, no_mat)
+  glutSolidSphere(1.0, 16, 16)
+  glPopMatrix()
+
+  # draw sphere in first row, fourth column
+  # diffuse reflection emission no ambient or specular reflection
+  glPushMatrix()
+  glTranslate(3.75, 3.0, 0.0)
+  glMaterial(GL_FRONT, GL_AMBIENT, no_mat)
+  glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
+  glMaterial(GL_FRONT, GL_SPECULAR, no_mat)
+  glMaterial(GL_FRONT, GL_SHININESS, no_shininess)
+  glMaterial(GL_FRONT, GL_EMISSION, mat_emission)
+  glutSolidSphere(1.0, 16, 16)
+  glPopMatrix()
+
+  # draw sphere in second row, first column
+  # ambient and diffuse reflection no specular
+  glPushMatrix()
+  glTranslate(-3.75, 0.0, 0.0)
+  glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient)
+  glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
+  glMaterial(GL_FRONT, GL_SPECULAR, no_mat)
+  glMaterial(GL_FRONT, GL_SHININESS, no_shininess)
+  glMaterial(GL_FRONT, GL_EMISSION, no_mat)
+  glutSolidSphere(1.0, 16, 16)
+  glPopMatrix()
+
+  # draw sphere in second row, second column
+  # ambient, diffuse and specular reflection low shininess
+  glPushMatrix()
+  glTranslate(-1.25, 0.0, 0.0)
+  glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient)
+  glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
+  glMaterial(GL_FRONT, GL_SPECULAR, mat_specular)
+  glMaterial(GL_FRONT, GL_SHININESS, low_shininess)
+  glMaterial(GL_FRONT, GL_EMISSION, no_mat)
+  glutSolidSphere(1.0, 16, 16)
+  glPopMatrix()
+
+  # draw sphere in second row, third column
+  # ambient, diffuse and specular reflection high shininess
+  glPushMatrix()
+  glTranslate(1.25, 0.0, 0.0)
+  glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient)
+  glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
+  glMaterial(GL_FRONT, GL_SPECULAR, mat_specular)
+  glMaterial(GL_FRONT, GL_SHININESS, high_shininess)
+  glMaterial(GL_FRONT, GL_EMISSION, no_mat)
+  glutSolidSphere(1.0, 16, 16)
+  glPopMatrix()
+
+  # draw sphere in second row, fourth column
+  # ambient and diffuse reflection emission no specular
+  glPushMatrix()
+  glTranslate(3.75, 0.0, 0.0)
+  glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient)
+  glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
+  glMaterial(GL_FRONT, GL_SPECULAR, no_mat)
+  glMaterial(GL_FRONT, GL_SHININESS, no_shininess)
+  glMaterial(GL_FRONT, GL_EMISSION, mat_emission)
+  glutSolidSphere(1.0, 16, 16)
+  glPopMatrix()
+
+  # draw sphere in third row, first column
+  # colored ambient and diffuse reflection no specular
+  glPushMatrix()
+  glTranslate(-3.75, -3.0, 0.0)
+  glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient_color)
+  glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
+  glMaterial(GL_FRONT, GL_SPECULAR, no_mat)
+  glMaterial(GL_FRONT, GL_SHININESS, no_shininess)
+  glMaterial(GL_FRONT, GL_EMISSION, no_mat)
+  glutSolidSphere(1.0, 16, 16)
+  glPopMatrix()
+
+  # draw sphere in third row, second column
+  # colored ambient, diffuse and specular reflection low shininess
+  glPushMatrix()
+  glTranslate(-1.25, -3.0, 0.0)
+  glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient_color)
+  glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
+  glMaterial(GL_FRONT, GL_SPECULAR, mat_specular)
+  glMaterial(GL_FRONT, GL_SHININESS, low_shininess)
+  glMaterial(GL_FRONT, GL_EMISSION, no_mat)
+  glutSolidSphere(1.0, 16, 16)
+  glPopMatrix()
+
+  # draw sphere in third row, third column
+  # colored ambient, diffuse and specular reflection high shininess
+  glPushMatrix()
+  glTranslate(1.25, -3.0, 0.0)
+  glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient_color)
+  glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
+  glMaterial(GL_FRONT, GL_SPECULAR, mat_specular)
+  glMaterial(GL_FRONT, GL_SHININESS, high_shininess)
+  glMaterial(GL_FRONT, GL_EMISSION, no_mat)
+  glutSolidSphere(1.0, 16, 16)
+  glPopMatrix()
+
+  # draw sphere in third row, fourth column
+  # colored ambient and diffuse reflection emission no specular
+  glPushMatrix()
+  glTranslate(3.75, -3.0, 0.0)
+  glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient_color)
+  glMaterial(GL_FRONT, GL_DIFFUSE, mat_diffuse)
+  glMaterial(GL_FRONT, GL_SPECULAR, no_mat)
+  glMaterial(GL_FRONT, GL_SHININESS, no_shininess)
+  glMaterial(GL_FRONT, GL_EMISSION, mat_emission)
+  glutSolidSphere(1.0, 16, 16)
+  glPopMatrix()
+
+  glutSwapBuffers()
 end
 
 myReshape = proc do |w, h|
-	glViewport(0, 0, w, h)
-	glMatrixMode(GL_PROJECTION)
-	glLoadIdentity()
-	if (w <= (h * 2))
-		glOrtho(-6.0, 6.0, -3.0*(h.to_f*2)/w,	3.0*(h.to_f*2)/w, -10.0, 10.0)
-	else
-		glOrtho(-6.0*w.to_f/(h*2), 6.0*w.to_f/(h*2), -3.0, 3.0, -10.0, 10.0)
-	end
-	glMatrixMode(GL_MODELVIEW)
+  glViewport(0, 0, w, h)
+  glMatrixMode(GL_PROJECTION)
+  glLoadIdentity()
+  if (w <= (h * 2))
+    glOrtho(-6.0, 6.0, -3.0*(h.to_f*2)/w,  3.0*(h.to_f*2)/w, -10.0, 10.0)
+  else
+    glOrtho(-6.0*w.to_f/(h*2), 6.0*w.to_f/(h*2), -3.0, 3.0, -10.0, 10.0)
+  end
+  glMatrixMode(GL_MODELVIEW)
 end
 
 keyboard = Proc.new do |key, x, y|
-	case (key)
-		when ?\e
-		exit(0);
-	end
+  case (key)
+    when ?\e
+    exit(0);
+  end
 end
 
 # Main Loop
-# Open window with initial window size, title bar, 
+# Open window with initial window size, title bar,
 # RGBA display mode, and handle input events.
 glutInit()
 glutInitDisplayMode(GLUT_DOUBLE | GLUT_RGB | GLUT_DEPTH)
@@ -272,4 +274,3 @@ glutReshapeFunc(myReshape)
 glutDisplayFunc(display)
 glutKeyboardFunc(keyboard)
 glutMainLoop()
-