(load 'p3d.lsp)
(defun vtx (xval yval zval) (make-vertex :x xval :y yval :z zval))
(defun vtxn (xval yval zval xnrm ynrm znrm)
	( make-vertex :x xval :y yval :z zval 
		:normal (make-vector :x xnrm :y ynrm :z znrm) ) )
(defun vtxc (xval yval zval red green blue alpha)
	( make-vertex :x xval :y yval :z zval 
		:clr (make-color :r red :g green :b blue :a alpha) ) )
(defun vtxcn (xval yval zval red green blue alpha xnrm ynrm znrm )
	( make-vertex :x xval :y yval :z zval 
		:clr (make-color :r red :g green :b blue :a alpha)
		:normal (make-vector :x xnrm :y ynrm :z znrm) ) )
(defun make-vertex-array (len vlist) ; number of vertices, and vertex list
	(do	((varray (make-array len) varray)
		 (vertlist vlist (cdr vertlist))
		 (i 0 (+ i 1)))
		((eq i len) varray)
		(setf (aref varray i) (eval (car vertlist)))))
(defun tri (i1 i2 i3)
	(triangle (aref vertex-array i1) (aref vertex-array i2)
		(aref vertex-array i3)))
(setq vertex-array (make-vertex-array
 265 '(
(vtxcn 0.000000 0.000000 0.000000 1.000000 1.000000 1.000000 1.000000 0.000000 0.000000 0.000000)
(vtxcn 0.315789 0.473684 0.428966 1.000000 1.000000 1.000000 1.000000 -0.973443 -0.135461 -0.184549)
(vtxcn 0.315789 0.428966 0.473684 1.000000 1.000000 1.000000 1.000000 -0.973443 -0.184549 -0.135461)
(vtxcn 0.303532 0.473684 0.473684 1.000000 1.000000 1.000000 1.000000 -0.988359 -0.107578 -0.107578)
(vtxcn 0.315789 0.428966 0.526316 1.000000 1.000000 1.000000 1.000000 -0.973443 -0.184550 0.135461)
(vtxcn 0.303532 0.473684 0.526316 1.000000 1.000000 1.000000 1.000000 -0.988359 -0.107578 0.107578)
(vtxcn 0.315789 0.473684 0.571034 1.000000 1.000000 1.000000 1.000000 -0.975989 -0.134573 0.171278)
(vtxcn 0.315789 0.526316 0.428966 1.000000 1.000000 1.000000 1.000000 -0.973443 0.135461 -0.184550)
(vtxcn 0.303532 0.526316 0.473684 1.000000 1.000000 1.000000 1.000000 -0.988359 0.107578 -0.107578)
(vtxcn 0.303532 0.526316 0.526316 1.000000 1.000000 1.000000 1.000000 -0.988359 0.107578 0.107578)
(vtxcn 0.315789 0.526316 0.571034 1.000000 1.000000 1.000000 1.000000 -0.975989 0.134573 0.171278)
(vtxcn 0.315789 0.571034 0.473684 1.000000 1.000000 1.000000 1.000000 -0.975989 0.171278 -0.134573)
(vtxcn 0.315789 0.571034 0.526316 1.000000 1.000000 1.000000 1.000000 -0.975989 0.171278 0.134573)
(vtxcn 0.368421 0.368421 0.428966 1.000000 1.000000 1.000000 1.000000 -0.694646 -0.694646 -0.186905)
(vtxcn 0.368421 0.352530 0.473684 1.000000 1.000000 1.000000 1.000000 -0.590941 -0.798147 -0.117260)
(vtxcn 0.352530 0.368421 0.473684 1.000000 1.000000 1.000000 1.000000 -0.798147 -0.590941 -0.117260)
(vtxcn 0.368421 0.352530 0.526316 1.000000 1.000000 1.000000 1.000000 -0.590941 -0.798147 0.117260)
(vtxcn 0.352530 0.368421 0.526316 1.000000 1.000000 1.000000 1.000000 -0.798147 -0.590941 0.117260)
(vtxcn 0.368421 0.368421 0.571034 1.000000 1.000000 1.000000 1.000000 -0.696284 -0.696284 0.174294)
(vtxcn 0.368421 0.421053 0.372222 1.000000 1.000000 1.000000 1.000000 -0.732599 -0.435837 -0.522825)
(vtxcn 0.368421 0.372222 0.421053 1.000000 1.000000 1.000000 1.000000 -0.732599 -0.522825 -0.435837)
(vtxcn 0.334714 0.421053 0.421053 1.000000 1.000000 1.000000 1.000000 -0.840387 -0.383243 -0.383243)
(vtxcn 0.318209 0.421053 0.473684 1.000000 1.000000 1.000000 1.000000 -0.901628 -0.410485 -0.136269)
(vtxcn 0.318209 0.421053 0.526316 1.000000 1.000000 1.000000 1.000000 -0.901628 -0.410485 0.136269)
(vtxcn 0.368421 0.372222 0.578947 1.000000 1.000000 1.000000 1.000000 -0.732599 -0.522824 0.435837)
(vtxcn 0.334714 0.421053 0.578947 1.000000 1.000000 1.000000 1.000000 -0.840387 -0.383243 0.383243)
(vtxcn 0.368421 0.421053 0.627778 0.000000 0.000000 1.000000 1.000000 -0.762454 -0.450214 0.464727)
(vtxcn 0.368421 0.473684 0.352530 1.000000 1.000000 1.000000 1.000000 -0.590941 -0.117260 -0.798147)
(vtxcn 0.368421 0.428966 0.368421 1.000000 1.000000 1.000000 1.000000 -0.694646 -0.186905 -0.694646)
(vtxcn 0.352530 0.473684 0.368421 1.000000 1.000000 1.000000 1.000000 -0.798147 -0.117260 -0.590941)
(vtxcn 0.318209 0.473684 0.421053 1.000000 1.000000 1.000000 1.000000 -0.901628 -0.136269 -0.410485)
(vtxcn 0.318209 0.473684 0.578947 1.000000 1.000000 1.000000 1.000000 -0.901628 -0.136269 0.410486)
(vtxcn 0.368421 0.428966 0.631579 0.000000 0.000000 1.000000 1.000000 -0.694646 -0.186905 0.694646)
(vtxcn 0.352530 0.473684 0.631579 0.000000 0.000000 1.000000 1.000000 -0.798147 -0.117260 0.590942)
(vtxcn 0.368421 0.473684 0.647470 0.000000 0.000000 1.000000 1.000000 -0.661462 -0.130095 0.738609)
(vtxcn 0.368421 0.526316 0.352530 1.000000 1.000000 1.000000 1.000000 -0.590941 0.117260 -0.798147)
(vtxcn 0.352530 0.526316 0.368421 1.000000 1.000000 1.000000 1.000000 -0.798147 0.117260 -0.590941)
(vtxcn 0.318209 0.526316 0.421053 1.000000 1.000000 1.000000 1.000000 -0.901628 0.136269 -0.410485)
(vtxcn 0.318209 0.526316 0.578947 1.000000 1.000000 1.000000 1.000000 -0.901627 0.136270 0.410485)
(vtxcn 0.352530 0.526316 0.631579 0.000000 0.000000 1.000000 1.000000 -0.798147 0.117260 0.590942)
(vtxcn 0.368421 0.526316 0.647470 0.000000 0.000000 1.000000 1.000000 -0.661462 0.130095 0.738609)
(vtxcn 0.368421 0.571034 0.368421 1.000000 1.000000 1.000000 1.000000 -0.696284 0.174294 -0.696284)
(vtxcn 0.368421 0.578947 0.372222 1.000000 1.000000 1.000000 1.000000 -0.732599 0.435837 -0.522824)
(vtxcn 0.334714 0.578947 0.421053 1.000000 1.000000 1.000000 1.000000 -0.840387 0.383243 -0.383243)
(vtxcn 0.318209 0.578947 0.473684 1.000000 1.000000 1.000000 1.000000 -0.901628 0.410486 -0.136269)
(vtxcn 0.318209 0.578947 0.526316 1.000000 1.000000 1.000000 1.000000 -0.901627 0.410485 0.136270)
(vtxcn 0.334714 0.578947 0.578947 1.000000 1.000000 1.000000 1.000000 -0.840387 0.383242 0.383242)
(vtxcn 0.368421 0.578947 0.627778 0.000000 0.000000 1.000000 1.000000 -0.762453 0.450214 0.464728)
(vtxcn 0.368421 0.571034 0.631579 0.000000 0.000000 1.000000 1.000000 -0.696283 0.174295 0.696284)
(vtxcn 0.368421 0.627778 0.421053 0.000000 1.000000 0.000000 1.000000 -0.762454 0.464727 -0.450214)
(vtxcn 0.368421 0.631579 0.428966 0.000000 1.000000 0.000000 1.000000 -0.694646 0.694646 -0.186905)
(vtxcn 0.352530 0.631579 0.473684 0.000000 1.000000 0.000000 1.000000 -0.798147 0.590942 -0.117260)
(vtxcn 0.352530 0.631579 0.526316 0.000000 1.000000 0.000000 1.000000 -0.798147 0.590942 0.117260)
(vtxcn 0.368421 0.631579 0.571034 0.000000 1.000000 0.000000 1.000000 -0.696283 0.696284 0.174295)
(vtxcn 0.368421 0.627778 0.578947 0.000000 1.000000 0.000000 1.000000 -0.762453 0.464728 0.450214)
(vtxcn 0.368421 0.647470 0.473684 0.000000 1.000000 0.000000 1.000000 -0.661462 0.738609 -0.130095)
(vtxcn 0.368421 0.647470 0.526316 0.000000 1.000000 0.000000 1.000000 -0.661462 0.738609 0.130095)
(vtxcn 0.421053 0.368421 0.372222 1.000000 1.000000 1.000000 1.000000 -0.435837 -0.732599 -0.522825)
(vtxcn 0.421053 0.334714 0.421053 1.000000 1.000000 1.000000 1.000000 -0.383243 -0.840387 -0.383243)
(vtxcn 0.372222 0.368421 0.421053 1.000000 1.000000 1.000000 1.000000 -0.522825 -0.732599 -0.435837)
(vtxcn 0.421053 0.318209 0.473684 1.000000 1.000000 1.000000 1.000000 -0.410485 -0.901628 -0.136269)
(vtxcn 0.421053 0.318209 0.526316 1.000000 1.000000 1.000000 1.000000 -0.410485 -0.901628 0.136269)
(vtxcn 0.372222 0.368421 0.578947 1.000000 1.000000 1.000000 1.000000 -0.522824 -0.732599 0.435837)
(vtxcn 0.421053 0.334714 0.578947 1.000000 1.000000 1.000000 1.000000 -0.383243 -0.840387 0.383243)
(vtxcn 0.421053 0.368421 0.627778 0.000000 0.000000 1.000000 1.000000 -0.450214 -0.762454 0.464727)
(vtxcn 0.421053 0.421053 0.334714 1.000000 1.000000 1.000000 1.000000 -0.383242 -0.383242 -0.840387)
(vtxcn 0.421053 0.372222 0.368421 1.000000 1.000000 1.000000 1.000000 -0.435837 -0.522825 -0.732599)
(vtxcn 0.372222 0.421053 0.368421 1.000000 1.000000 1.000000 1.000000 -0.522825 -0.435837 -0.732599)
(vtxcn 0.421053 0.372222 0.631579 0.000000 0.000000 1.000000 1.000000 -0.435837 -0.522824 0.732599)
(vtxcn 0.372222 0.421053 0.631579 0.000000 0.000000 1.000000 1.000000 -0.522824 -0.435837 0.732599)
(vtxcn 0.421053 0.421053 0.665286 0.000000 0.000000 1.000000 1.000000 -0.440522 -0.440522 0.782228)
(vtxcn 0.421053 0.473684 0.318209 1.000000 1.000000 1.000000 1.000000 -0.410485 -0.136269 -0.901628)
(vtxcn 0.421053 0.473684 0.681791 0.000000 0.000000 1.000000 1.000000 -0.496915 -0.163833 0.852194)
(vtxcn 0.421053 0.526316 0.318209 1.000000 1.000000 1.000000 1.000000 -0.410485 0.136269 -0.901628)
(vtxcn 0.421053 0.526316 0.681791 0.000000 0.000000 1.000000 1.000000 -0.496915 0.163833 0.852194)
(vtxcn 0.421053 0.578947 0.334714 1.000000 1.000000 1.000000 1.000000 -0.383243 0.383243 -0.840387)
(vtxcn 0.372222 0.578947 0.368421 1.000000 1.000000 1.000000 1.000000 -0.522824 0.435837 -0.732599)
(vtxcn 0.372222 0.578947 0.631579 0.000000 0.000000 1.000000 1.000000 -0.522825 0.435837 0.732598)
(vtxcn 0.421053 0.578947 0.665286 0.000000 0.000000 1.000000 1.000000 -0.440523 0.440523 0.782227)
(vtxcn 0.421053 0.627778 0.368421 0.000000 1.000000 0.000000 1.000000 -0.450214 0.464727 -0.762454)
(vtxcn 0.372222 0.631579 0.421053 0.000000 1.000000 0.000000 1.000000 -0.522824 0.732599 -0.435837)
(vtxcn 0.421053 0.631579 0.372222 0.000000 1.000000 0.000000 1.000000 -0.435837 0.732599 -0.522824)
(vtxcn 0.372222 0.631579 0.578947 0.000000 1.000000 0.000000 1.000000 -0.522825 0.732598 0.435837)
(vtxcn 0.421053 0.631579 0.627778 0.000000 1.000000 0.000000 1.000000 -0.450214 0.762453 0.464728)
(vtxcn 0.421053 0.627778 0.631579 0.000000 1.000000 0.000000 1.000000 -0.450214 0.464728 0.762453)
(vtxcn 0.421053 0.665286 0.421053 0.000000 1.000000 0.000000 1.000000 -0.440522 0.782228 -0.440522)
(vtxcn 0.421053 0.681791 0.473684 0.000000 1.000000 0.000000 1.000000 -0.496915 0.852194 -0.163833)
(vtxcn 0.421053 0.681791 0.526316 0.000000 1.000000 0.000000 1.000000 -0.496915 0.852194 0.163833)
(vtxcn 0.421053 0.665286 0.578947 0.000000 1.000000 0.000000 1.000000 -0.440523 0.782227 0.440523)
(vtxcn 0.473684 0.315789 0.428966 1.000000 1.000000 1.000000 1.000000 -0.135461 -0.973443 -0.184549)
(vtxcn 0.473684 0.303532 0.473684 1.000000 1.000000 1.000000 1.000000 -0.107578 -0.988359 -0.107578)
(vtxcn 0.428966 0.315789 0.473684 1.000000 1.000000 1.000000 1.000000 -0.184549 -0.973443 -0.135461)
(vtxcn 0.473684 0.303532 0.526316 1.000000 1.000000 1.000000 1.000000 -0.107578 -0.988359 0.107578)
(vtxcn 0.428966 0.315789 0.526316 1.000000 1.000000 1.000000 1.000000 -0.184550 -0.973443 0.135461)
(vtxcn 0.473684 0.315789 0.571034 1.000000 1.000000 1.000000 1.000000 -0.134573 -0.975989 0.171278)
(vtxcn 0.473684 0.368421 0.352530 1.000000 1.000000 1.000000 1.000000 -0.117260 -0.590941 -0.798147)
(vtxcn 0.473684 0.352530 0.368421 1.000000 1.000000 1.000000 1.000000 -0.117260 -0.798147 -0.590941)
(vtxcn 0.428966 0.368421 0.368421 1.000000 1.000000 1.000000 1.000000 -0.186905 -0.694646 -0.694646)
(vtxcn 0.473684 0.318209 0.421053 1.000000 1.000000 1.000000 1.000000 -0.136269 -0.901628 -0.410485)
(vtxcn 0.473684 0.318209 0.578947 1.000000 1.000000 1.000000 1.000000 -0.136269 -0.901628 0.410486)
(vtxcn 0.428966 0.368421 0.631579 0.000000 0.000000 1.000000 1.000000 -0.186905 -0.694646 0.694646)
(vtxcn 0.473684 0.352530 0.631579 0.000000 0.000000 1.000000 1.000000 -0.117260 -0.798147 0.590942)
(vtxcn 0.473684 0.368421 0.647470 0.000000 0.000000 1.000000 1.000000 -0.130095 -0.661462 0.738609)
(vtxcn 0.473684 0.421053 0.318209 1.000000 1.000000 1.000000 1.000000 -0.136269 -0.410485 -0.901628)
(vtxcn 0.473684 0.421053 0.681791 0.000000 0.000000 1.000000 1.000000 -0.163833 -0.496915 0.852194)
(vtxcn 0.473684 0.473684 0.303532 1.000000 1.000000 1.000000 1.000000 -0.107578 -0.107578 -0.988359)
(vtxcn 0.473684 0.428966 0.315789 1.000000 1.000000 1.000000 1.000000 -0.135461 -0.184549 -0.973443)
(vtxcn 0.428966 0.473684 0.315789 1.000000 1.000000 1.000000 1.000000 -0.184549 -0.135461 -0.973443)
(vtxcn 0.473684 0.428966 0.684211 0.000000 0.000000 1.000000 1.000000 -0.135461 -0.184550 0.973443)
(vtxcn 0.428966 0.473684 0.684211 0.000000 0.000000 1.000000 1.000000 -0.184550 -0.135461 0.973443)
(vtxcn 0.473684 0.473684 0.696468 0.000000 0.000000 1.000000 1.000000 -0.134451 -0.134451 0.981757)
(vtxcn 0.473684 0.526316 0.303532 1.000000 1.000000 1.000000 1.000000 -0.107578 0.107578 -0.988359)
(vtxcn 0.428966 0.526316 0.315789 1.000000 1.000000 1.000000 1.000000 -0.184550 0.135461 -0.973443)
(vtxcn 0.428966 0.526316 0.684211 0.000000 0.000000 1.000000 1.000000 -0.184550 0.135461 0.973443)
(vtxcn 0.473684 0.526316 0.696468 0.000000 0.000000 1.000000 1.000000 -0.134451 0.134451 0.981757)
(vtxcn 0.473684 0.571034 0.315789 1.000000 1.000000 1.000000 1.000000 -0.134573 0.171278 -0.975989)
(vtxcn 0.473684 0.578947 0.318209 1.000000 1.000000 1.000000 1.000000 -0.136269 0.410486 -0.901628)
(vtxcn 0.473684 0.571034 0.684211 0.000000 0.000000 1.000000 1.000000 -0.134573 0.171278 0.975989)
(vtxcn 0.473684 0.578947 0.681791 0.000000 0.000000 1.000000 1.000000 -0.163833 0.496915 0.852194)
(vtxcn 0.473684 0.631579 0.352530 0.000000 1.000000 0.000000 1.000000 -0.117260 0.590942 -0.798147)
(vtxcn 0.428966 0.631579 0.368421 0.000000 1.000000 0.000000 1.000000 -0.186905 0.694646 -0.694646)
(vtxcn 0.428966 0.631579 0.631579 0.000000 1.000000 0.000000 1.000000 -0.186906 0.694646 0.694646)
(vtxcn 0.473684 0.631579 0.647470 0.000000 1.000000 0.000000 1.000000 -0.130095 0.661463 0.738609)
(vtxcn 0.473684 0.647470 0.368421 0.000000 1.000000 0.000000 1.000000 -0.130095 0.738609 -0.661462)
(vtxcn 0.473684 0.681791 0.421053 0.000000 1.000000 0.000000 1.000000 -0.163833 0.852194 -0.496915)
(vtxcn 0.473684 0.684211 0.428966 0.000000 1.000000 0.000000 1.000000 -0.135461 0.973443 -0.184550)
(vtxcn 0.428966 0.684211 0.473684 0.000000 1.000000 0.000000 1.000000 -0.184550 0.973443 -0.135461)
(vtxcn 0.428966 0.684211 0.526316 0.000000 1.000000 0.000000 1.000000 -0.184550 0.973443 0.135461)
(vtxcn 0.473684 0.684211 0.571034 0.000000 1.000000 0.000000 1.000000 -0.134573 0.975989 0.171278)
(vtxcn 0.473684 0.681791 0.578947 0.000000 1.000000 0.000000 1.000000 -0.163833 0.852194 0.496915)
(vtxcn 0.473684 0.647470 0.631579 0.000000 1.000000 0.000000 1.000000 -0.130095 0.738609 0.661463)
(vtxcn 0.473684 0.696468 0.473684 0.000000 1.000000 0.000000 1.000000 -0.134451 0.981757 -0.134451)
(vtxcn 0.473684 0.696468 0.526316 0.000000 1.000000 0.000000 1.000000 -0.134451 0.981757 0.134451)
(vtxcn 0.526316 0.303532 0.473684 1.000000 1.000000 1.000000 1.000000 0.107578 -0.988359 -0.107578)
(vtxcn 0.526316 0.315789 0.428966 1.000000 1.000000 1.000000 1.000000 0.135461 -0.973443 -0.184550)
(vtxcn 0.526316 0.303532 0.526316 1.000000 1.000000 1.000000 1.000000 0.107578 -0.988359 0.107578)
(vtxcn 0.526316 0.315789 0.571034 1.000000 1.000000 1.000000 1.000000 0.134573 -0.975989 0.171278)
(vtxcn 0.526316 0.352530 0.368421 1.000000 1.000000 1.000000 1.000000 0.117260 -0.798147 -0.590941)
(vtxcn 0.526316 0.368421 0.352530 1.000000 1.000000 1.000000 1.000000 0.117260 -0.590941 -0.798147)
(vtxcn 0.526316 0.318209 0.421053 1.000000 1.000000 1.000000 1.000000 0.136269 -0.901628 -0.410485)
(vtxcn 0.526316 0.318209 0.578947 1.000000 1.000000 1.000000 1.000000 0.136270 -0.901627 0.410485)
(vtxcn 0.526316 0.352530 0.631579 0.000000 0.000000 1.000000 1.000000 0.117260 -0.798147 0.590942)
(vtxcn 0.526316 0.368421 0.647470 0.000000 0.000000 1.000000 1.000000 0.130095 -0.661462 0.738609)
(vtxcn 0.526316 0.421053 0.318209 1.000000 1.000000 1.000000 1.000000 0.136269 -0.410485 -0.901628)
(vtxcn 0.526316 0.421053 0.681791 0.000000 0.000000 1.000000 1.000000 0.163833 -0.496915 0.852194)
(vtxcn 0.526316 0.428966 0.315789 1.000000 1.000000 1.000000 1.000000 0.135461 -0.184550 -0.973443)
(vtxcn 0.526316 0.473684 0.303532 1.000000 1.000000 1.000000 1.000000 0.107578 -0.107578 -0.988359)
(vtxcn 0.526316 0.428966 0.684211 0.000000 0.000000 1.000000 1.000000 0.135461 -0.184550 0.973443)
(vtxcn 0.526316 0.473684 0.696468 0.000000 0.000000 1.000000 1.000000 0.134451 -0.134451 0.981757)
(vtxcn 0.526316 0.526316 0.303532 1.000000 1.000000 1.000000 1.000000 0.107578 0.107578 -0.988359)
(vtxcn 0.526316 0.526316 0.696468 0.000000 0.000000 1.000000 1.000000 0.134451 0.134451 0.981757)
(vtxcn 0.526316 0.571034 0.315789 1.000000 1.000000 1.000000 1.000000 0.134573 0.171278 -0.975989)
(vtxcn 0.526316 0.578947 0.318209 1.000000 1.000000 1.000000 1.000000 0.136270 0.410485 -0.901628)
(vtxcn 0.526316 0.571034 0.684211 0.000000 0.000000 1.000000 1.000000 0.134573 0.171278 0.975989)
(vtxcn 0.526316 0.578947 0.681791 0.000000 0.000000 1.000000 1.000000 0.163833 0.496915 0.852194)
(vtxcn 0.526316 0.631579 0.352530 0.000000 1.000000 0.000000 1.000000 0.117260 0.590942 -0.798147)
(vtxcn 0.526316 0.631579 0.647470 0.000000 1.000000 0.000000 1.000000 0.130095 0.661463 0.738609)
(vtxcn 0.526316 0.647470 0.368421 0.000000 1.000000 0.000000 1.000000 0.130095 0.738609 -0.661462)
(vtxcn 0.526316 0.681791 0.421053 0.000000 1.000000 0.000000 1.000000 0.163833 0.852194 -0.496915)
(vtxcn 0.526316 0.684211 0.428966 0.000000 1.000000 0.000000 1.000000 0.135461 0.973443 -0.184550)
(vtxcn 0.526316 0.681791 0.578947 0.000000 1.000000 0.000000 1.000000 0.163833 0.852194 0.496915)
(vtxcn 0.526316 0.684211 0.571034 0.000000 1.000000 0.000000 1.000000 0.134573 0.975989 0.171278)
(vtxcn 0.526316 0.647470 0.631579 0.000000 1.000000 0.000000 1.000000 0.130095 0.738609 0.661463)
(vtxcn 0.526316 0.696468 0.473684 0.000000 1.000000 0.000000 1.000000 0.134451 0.981757 -0.134451)
(vtxcn 0.526316 0.696468 0.526316 0.000000 1.000000 0.000000 1.000000 0.134451 0.981757 0.134451)
(vtxcn 0.571034 0.315789 0.473684 1.000000 1.000000 1.000000 1.000000 0.171278 -0.975989 -0.134573)
(vtxcn 0.571034 0.315789 0.526316 1.000000 1.000000 1.000000 1.000000 0.171278 -0.975989 0.134573)
(vtxcn 0.571034 0.368421 0.368421 1.000000 1.000000 1.000000 1.000000 0.174294 -0.696284 -0.696284)
(vtxcn 0.578947 0.368421 0.372222 1.000000 1.000000 1.000000 1.000000 0.435837 -0.732599 -0.522824)
(vtxcn 0.578947 0.334714 0.421053 1.000000 1.000000 1.000000 1.000000 0.383243 -0.840387 -0.383243)
(vtxcn 0.578947 0.318209 0.473684 1.000000 1.000000 1.000000 1.000000 0.410486 -0.901628 -0.136269)
(vtxcn 0.578947 0.318209 0.526316 1.000000 1.000000 1.000000 1.000000 0.410485 -0.901627 0.136270)
(vtxcn 0.578947 0.334714 0.578947 1.000000 1.000000 1.000000 1.000000 0.383242 -0.840387 0.383242)
(vtxcn 0.578947 0.368421 0.627778 0.000000 0.000000 1.000000 1.000000 0.450214 -0.762453 0.464728)
(vtxcn 0.571034 0.368421 0.631579 0.000000 0.000000 1.000000 1.000000 0.174295 -0.696283 0.696284)
(vtxcn 0.578947 0.372222 0.368421 1.000000 1.000000 1.000000 1.000000 0.435837 -0.522824 -0.732599)
(vtxcn 0.578947 0.421053 0.334714 1.000000 1.000000 1.000000 1.000000 0.383243 -0.383243 -0.840387)
(vtxcn 0.578947 0.372222 0.631579 0.000000 0.000000 1.000000 1.000000 0.435837 -0.522825 0.732598)
(vtxcn 0.578947 0.421053 0.665286 0.000000 0.000000 1.000000 1.000000 0.440523 -0.440523 0.782227)
(vtxcn 0.571034 0.473684 0.315789 1.000000 1.000000 1.000000 1.000000 0.171278 -0.134573 -0.975989)
(vtxcn 0.578947 0.473684 0.318209 1.000000 1.000000 1.000000 1.000000 0.410486 -0.136269 -0.901628)
(vtxcn 0.578947 0.473684 0.681791 0.000000 0.000000 1.000000 1.000000 0.496915 -0.163833 0.852194)
(vtxcn 0.571034 0.473684 0.684211 0.000000 0.000000 1.000000 1.000000 0.171278 -0.134573 0.975989)
(vtxcn 0.571034 0.526316 0.315789 1.000000 1.000000 1.000000 1.000000 0.171278 0.134573 -0.975989)
(vtxcn 0.578947 0.526316 0.318209 1.000000 1.000000 1.000000 1.000000 0.410485 0.136270 -0.901628)
(vtxcn 0.578947 0.526316 0.681791 0.000000 0.000000 1.000000 1.000000 0.496915 0.163833 0.852194)
(vtxcn 0.571034 0.526316 0.684211 0.000000 0.000000 1.000000 1.000000 0.171278 0.134573 0.975989)
(vtxcn 0.578947 0.578947 0.334714 1.000000 1.000000 1.000000 1.000000 0.383242 0.383242 -0.840387)
(vtxcn 0.578947 0.578947 0.665286 0.000000 0.000000 1.000000 1.000000 0.440523 0.440523 0.782227)
(vtxcn 0.578947 0.627778 0.368421 0.000000 1.000000 0.000000 1.000000 0.450214 0.464728 -0.762453)
(vtxcn 0.571034 0.631579 0.368421 0.000000 1.000000 0.000000 1.000000 0.174295 0.696284 -0.696283)
(vtxcn 0.578947 0.631579 0.372222 0.000000 1.000000 0.000000 1.000000 0.435837 0.732598 -0.522825)
(vtxcn 0.578947 0.631579 0.627778 0.000000 1.000000 0.000000 1.000000 0.450214 0.762453 0.464728)
(vtxcn 0.578947 0.627778 0.631579 0.000000 1.000000 0.000000 1.000000 0.450214 0.464728 0.762453)
(vtxcn 0.571034 0.631579 0.631579 0.000000 1.000000 0.000000 1.000000 0.174295 0.696283 0.696283)
(vtxcn 0.578947 0.665286 0.421053 0.000000 1.000000 0.000000 1.000000 0.440523 0.782227 -0.440523)
(vtxcn 0.571034 0.684211 0.473684 0.000000 1.000000 0.000000 1.000000 0.171278 0.975989 -0.134573)
(vtxcn 0.578947 0.681791 0.473684 0.000000 1.000000 0.000000 1.000000 0.496915 0.852194 -0.163833)
(vtxcn 0.578947 0.681791 0.526316 0.000000 1.000000 0.000000 1.000000 0.496915 0.852194 0.163833)
(vtxcn 0.571034 0.684211 0.526316 0.000000 1.000000 0.000000 1.000000 0.171278 0.975989 0.134573)
(vtxcn 0.578947 0.665286 0.578947 0.000000 1.000000 0.000000 1.000000 0.440523 0.782227 0.440523)
(vtxcn 0.627778 0.368421 0.421053 1.000000 0.000000 0.000000 1.000000 0.464727 -0.762454 -0.450214)
(vtxcn 0.631579 0.368421 0.428966 1.000000 0.000000 0.000000 1.000000 0.694646 -0.694646 -0.186905)
(vtxcn 0.631579 0.352530 0.473684 1.000000 0.000000 0.000000 1.000000 0.590942 -0.798147 -0.117260)
(vtxcn 0.631579 0.352530 0.526316 1.000000 0.000000 0.000000 1.000000 0.590942 -0.798147 0.117260)
(vtxcn 0.631579 0.368421 0.571034 1.000000 0.000000 0.000000 1.000000 0.696284 -0.696283 0.174295)
(vtxcn 0.627778 0.368421 0.578947 1.000000 0.000000 0.000000 1.000000 0.464728 -0.762453 0.450214)
(vtxcn 0.627778 0.421053 0.368421 1.000000 0.000000 0.000000 1.000000 0.464727 -0.450214 -0.762454)
(vtxcn 0.631579 0.421053 0.372222 1.000000 0.000000 0.000000 1.000000 0.732599 -0.435837 -0.522824)
(vtxcn 0.631579 0.372222 0.421053 1.000000 0.000000 0.000000 1.000000 0.732599 -0.522824 -0.435837)
(vtxcn 0.631579 0.372222 0.578947 1.000000 0.000000 0.000000 1.000000 0.732598 -0.522825 0.435837)
(vtxcn 0.631579 0.421053 0.627778 1.000000 0.000000 0.000000 1.000000 0.762453 -0.450214 0.464728)
(vtxcn 0.627778 0.421053 0.631579 1.000000 0.000000 0.000000 1.000000 0.464728 -0.450214 0.762453)
(vtxcn 0.631579 0.428966 0.368421 1.000000 0.000000 0.000000 1.000000 0.694646 -0.186905 -0.694646)
(vtxcn 0.631579 0.473684 0.352530 1.000000 0.000000 0.000000 1.000000 0.590942 -0.117260 -0.798147)
(vtxcn 0.631579 0.428966 0.631579 1.000000 0.000000 0.000000 1.000000 0.694646 -0.186906 0.694646)
(vtxcn 0.631579 0.473684 0.647470 1.000000 0.000000 0.000000 1.000000 0.661463 -0.130095 0.738609)
(vtxcn 0.631579 0.526316 0.352530 1.000000 0.000000 0.000000 1.000000 0.590942 0.117260 -0.798147)
(vtxcn 0.631579 0.526316 0.647470 1.000000 0.000000 0.000000 1.000000 0.661463 0.130095 0.738609)
(vtxcn 0.631579 0.571034 0.368421 1.000000 0.000000 0.000000 1.000000 0.696284 0.174295 -0.696283)
(vtxcn 0.627778 0.578947 0.368421 1.000000 0.000000 0.000000 1.000000 0.464728 0.450214 -0.762453)
(vtxcn 0.631579 0.578947 0.372222 1.000000 0.000000 0.000000 1.000000 0.732598 0.435837 -0.522825)
(vtxcn 0.631579 0.578947 0.627778 1.000000 0.000000 0.000000 1.000000 0.762453 0.450214 0.464728)
(vtxcn 0.631579 0.571034 0.631579 1.000000 0.000000 0.000000 1.000000 0.696283 0.174295 0.696283)
(vtxcn 0.627778 0.578947 0.631579 1.000000 0.000000 0.000000 1.000000 0.464728 0.450214 0.762453)
(vtxcn 0.631579 0.627778 0.421053 1.000000 0.000000 0.000000 1.000000 0.762453 0.464728 -0.450214)
(vtxcn 0.627778 0.631579 0.421053 1.000000 0.000000 0.000000 1.000000 0.464728 0.762453 -0.450214)
(vtxcn 0.631579 0.631579 0.428966 1.000000 0.000000 0.000000 1.000000 0.694646 0.694646 -0.186906)
(vtxcn 0.631579 0.631579 0.571034 1.000000 0.000000 0.000000 1.000000 0.696283 0.696283 0.174295)
(vtxcn 0.631579 0.627778 0.578947 1.000000 0.000000 0.000000 1.000000 0.762453 0.464728 0.450214)
(vtxcn 0.627778 0.631579 0.578947 1.000000 0.000000 0.000000 1.000000 0.464728 0.762453 0.450214)
(vtxcn 0.631579 0.647470 0.473684 1.000000 0.000000 0.000000 1.000000 0.661463 0.738609 -0.130095)
(vtxcn 0.631579 0.647470 0.526316 1.000000 0.000000 0.000000 1.000000 0.661463 0.738609 0.130095)
(vtxcn 0.647470 0.368421 0.473684 1.000000 0.000000 0.000000 1.000000 0.738609 -0.661462 -0.130095)
(vtxcn 0.647470 0.368421 0.526316 1.000000 0.000000 0.000000 1.000000 0.738609 -0.661462 0.130095)
(vtxcn 0.665286 0.421053 0.421053 1.000000 0.000000 0.000000 1.000000 0.782228 -0.440522 -0.440522)
(vtxcn 0.681791 0.421053 0.473684 1.000000 0.000000 0.000000 1.000000 0.852194 -0.496915 -0.163833)
(vtxcn 0.681791 0.421053 0.526316 1.000000 0.000000 0.000000 1.000000 0.852194 -0.496915 0.163833)
(vtxcn 0.665286 0.421053 0.578947 1.000000 0.000000 0.000000 1.000000 0.782227 -0.440523 0.440523)
(vtxcn 0.647470 0.473684 0.368421 1.000000 0.000000 0.000000 1.000000 0.738609 -0.130095 -0.661462)
(vtxcn 0.681791 0.473684 0.421053 1.000000 0.000000 0.000000 1.000000 0.852194 -0.163833 -0.496915)
(vtxcn 0.684211 0.473684 0.428966 1.000000 0.000000 0.000000 1.000000 0.973443 -0.135461 -0.184550)
(vtxcn 0.684211 0.428966 0.473684 1.000000 0.000000 0.000000 1.000000 0.973443 -0.184550 -0.135461)
(vtxcn 0.684211 0.428966 0.526316 1.000000 0.000000 0.000000 1.000000 0.973443 -0.184550 0.135461)
(vtxcn 0.684211 0.473684 0.571034 1.000000 0.000000 0.000000 1.000000 0.975989 -0.134573 0.171278)
(vtxcn 0.681791 0.473684 0.578947 1.000000 0.000000 0.000000 1.000000 0.852194 -0.163833 0.496915)
(vtxcn 0.647470 0.473684 0.631579 1.000000 0.000000 0.000000 1.000000 0.738609 -0.130095 0.661463)
(vtxcn 0.647470 0.526316 0.368421 1.000000 0.000000 0.000000 1.000000 0.738609 0.130095 -0.661462)
(vtxcn 0.681791 0.526316 0.421053 1.000000 0.000000 0.000000 1.000000 0.852194 0.163833 -0.496915)
(vtxcn 0.684211 0.526316 0.428966 1.000000 0.000000 0.000000 1.000000 0.973443 0.135461 -0.184550)
(vtxcn 0.684211 0.526316 0.571034 1.000000 0.000000 0.000000 1.000000 0.975989 0.134573 0.171278)
(vtxcn 0.681791 0.526316 0.578947 1.000000 0.000000 0.000000 1.000000 0.852194 0.163833 0.496915)
(vtxcn 0.647470 0.526316 0.631579 1.000000 0.000000 0.000000 1.000000 0.738609 0.130095 0.661463)
(vtxcn 0.665286 0.578947 0.421053 1.000000 0.000000 0.000000 1.000000 0.782227 0.440523 -0.440523)
(vtxcn 0.684211 0.571034 0.473684 1.000000 0.000000 0.000000 1.000000 0.975989 0.171278 -0.134573)
(vtxcn 0.681791 0.578947 0.473684 1.000000 0.000000 0.000000 1.000000 0.852194 0.496915 -0.163833)
(vtxcn 0.684211 0.571034 0.526316 1.000000 0.000000 0.000000 1.000000 0.975989 0.171278 0.134573)
(vtxcn 0.681791 0.578947 0.526316 1.000000 0.000000 0.000000 1.000000 0.852194 0.496915 0.163833)
(vtxcn 0.665286 0.578947 0.578947 1.000000 0.000000 0.000000 1.000000 0.782227 0.440523 0.440523)
(vtxcn 0.647470 0.631579 0.473684 1.000000 0.000000 0.000000 1.000000 0.738609 0.661463 -0.130095)
(vtxcn 0.647470 0.631579 0.526316 1.000000 0.000000 0.000000 1.000000 0.738609 0.661463 0.130095)
(vtxcn 0.696468 0.473684 0.473684 1.000000 0.000000 0.000000 1.000000 0.981757 -0.134451 -0.134451)
(vtxcn 0.696468 0.473684 0.526316 1.000000 0.000000 0.000000 1.000000 0.981757 -0.134451 0.134451)
(vtxcn 0.696468 0.526316 0.473684 1.000000 0.000000 0.000000 1.000000 0.981757 0.134451 -0.134451)
(vtxcn 0.696468 0.526316 0.526316 1.000000 0.000000 0.000000 1.000000 0.981757 0.134451 0.134451)
))) ;to end vertex array
(setq object (def-gob :children (list
(tri 1 2 3 )
(tri 2 4 5 )
(tri 3 2 5 )
(tri 5 4 6 )
(tri 7 3 8 )
(tri 3 7 1 )
(tri 8 3 5 )
(tri 8 5 9 )
(tri 9 5 6 )
(tri 10 9 6 )
(tri 8 11 7 )
(tri 8 9 12 )
(tri 11 8 12 )
(tri 12 9 10 )
(tri 13 14 15 )
(tri 14 16 17 )
(tri 15 14 17 )
(tri 17 16 18 )
(tri 19 20 21 )
(tri 15 20 13 )
(tri 20 15 22 )
(tri 21 20 22 )
(tri 22 15 17 )
(tri 22 17 23 )
(tri 18 24 25 )
(tri 23 18 25 )
(tri 23 17 18 )
(tri 25 24 26 )
(tri 27 28 29 )
(tri 21 28 19 )
(tri 28 21 30 )
(tri 29 28 30 )
(tri 22 2 1 )
(tri 21 22 1 )
(tri 30 21 1 )
(tri 2 23 4 )
(tri 2 22 23 )
(tri 4 31 6 )
(tri 4 25 31 )
(tri 4 23 25 )
(tri 26 32 33 )
(tri 31 26 33 )
(tri 31 25 26 )
(tri 33 32 34 )
(tri 35 29 36 )
(tri 29 35 27 )
(tri 36 29 30 )
(tri 36 30 37 )
(tri 37 30 7 )
(tri 30 1 7 )
(tri 6 31 38 )
(tri 6 38 10 )
(tri 38 31 33 )
(tri 38 33 39 )
(tri 39 33 34 )
(tri 40 39 34 )
(tri 36 41 35 )
(tri 41 36 42 )
(tri 42 36 37 )
(tri 42 37 43 )
(tri 37 7 11 )
(tri 43 37 11 )
(tri 44 43 11 )
(tri 45 44 12 )
(tri 44 11 12 )
(tri 12 10 45 )
(tri 45 10 46 )
(tri 10 38 46 )
(tri 47 46 48 )
(tri 46 38 48 )
(tri 38 39 48 )
(tri 48 39 40 )
(tri 43 49 42 )
(tri 49 43 50 )
(tri 50 43 44 )
(tri 50 44 51 )
(tri 51 44 45 )
(tri 51 45 52 )
(tri 53 52 54 )
(tri 52 45 54 )
(tri 45 46 54 )
(tri 54 46 47 )
(tri 51 55 50 )
(tri 51 52 56 )
(tri 55 51 56 )
(tri 56 52 53 )
(tri 57 58 59 )
(tri 59 58 13 )
(tri 58 60 13 )
(tri 60 14 13 )
(tri 14 60 61 )
(tri 14 61 16 )
(tri 16 62 18 )
(tri 16 61 62 )
(tri 61 63 62 )
(tri 62 63 64 )
(tri 65 66 67 )
(tri 57 59 20 )
(tri 67 20 19 )
(tri 67 66 57 )
(tri 67 57 20 )
(tri 20 59 13 )
(tri 18 62 24 )
(tri 24 62 26 )
(tri 68 62 64 )
(tri 68 69 26 )
(tri 62 68 26 )
(tri 69 68 70 )
(tri 67 28 27 )
(tri 71 67 27 )
(tri 67 71 65 )
(tri 28 67 19 )
(tri 26 69 32 )
(tri 32 69 70 )
(tri 72 32 70 )
(tri 32 72 34 )
(tri 73 71 35 )
(tri 71 27 35 )
(tri 34 74 40 )
(tri 74 34 72 )
(tri 76 75 41 )
(tri 75 73 41 )
(tri 73 35 41 )
(tri 76 41 42 )
(tri 48 77 47 )
(tri 48 40 77 )
(tri 77 40 74 )
(tri 78 77 74 )
(tri 76 79 75 )
(tri 80 42 49 )
(tri 81 79 80 )
(tri 76 42 79 )
(tri 79 42 80 )
(tri 80 49 50 )
(tri 54 82 53 )
(tri 82 54 83 )
(tri 54 47 77 )
(tri 83 77 84 )
(tri 83 54 77 )
(tri 84 77 78 )
(tri 80 85 81 )
(tri 80 50 55 )
(tri 86 80 55 )
(tri 85 80 86 )
(tri 86 55 56 )
(tri 87 86 56 )
(tri 53 82 88 )
(tri 87 53 88 )
(tri 56 53 87 )
(tri 88 82 83 )
(tri 89 90 91 )
(tri 90 92 93 )
(tri 91 90 93 )
(tri 93 92 94 )
(tri 95 96 97 )
(tri 97 96 57 )
(tri 96 98 57 )
(tri 98 58 57 )
(tri 91 98 89 )
(tri 58 98 91 )
(tri 58 91 60 )
(tri 60 93 61 )
(tri 60 91 93 )
(tri 61 93 94 )
(tri 61 94 63 )
(tri 94 99 63 )
(tri 63 100 64 )
(tri 63 99 100 )
(tri 99 101 100 )
(tri 100 101 102 )
(tri 97 66 65 )
(tri 103 97 65 )
(tri 97 103 95 )
(tri 66 97 57 )
(tri 64 100 68 )
(tri 68 100 102 )
(tri 104 68 102 )
(tri 68 104 70 )
(tri 105 106 107 )
(tri 107 106 71 )
(tri 106 65 71 )
(tri 65 106 103 )
(tri 104 108 109 )
(tri 70 104 109 )
(tri 70 109 72 )
(tri 109 108 110 )
(tri 111 107 112 )
(tri 107 111 105 )
(tri 112 107 73 )
(tri 107 71 73 )
(tri 72 109 113 )
(tri 72 113 74 )
(tri 113 109 110 )
(tri 114 113 110 )
(tri 112 115 111 )
(tri 115 112 116 )
(tri 116 112 75 )
(tri 112 73 75 )
(tri 74 113 117 )
(tri 74 117 78 )
(tri 117 118 78 )
(tri 117 113 114 )
(tri 120 119 79 )
(tri 119 116 79 )
(tri 116 75 79 )
(tri 120 79 81 )
(tri 84 121 83 )
(tri 84 78 121 )
(tri 121 78 118 )
(tri 122 121 118 )
(tri 120 123 119 )
(tri 120 81 85 )
(tri 124 120 85 )
(tri 123 120 124 )
(tri 126 125 86 )
(tri 125 85 86 )
(tri 124 85 125 )
(tri 127 126 87 )
(tri 126 86 87 )
(tri 128 127 129 )
(tri 129 127 88 )
(tri 127 87 88 )
(tri 83 121 130 )
(tri 129 83 130 )
(tri 88 83 129 )
(tri 130 121 122 )
(tri 126 131 125 )
(tri 126 127 132 )
(tri 131 126 132 )
(tri 132 127 128 )
(tri 133 90 89 )
(tri 134 133 89 )
(tri 90 133 135 )
(tri 90 135 92 )
(tri 92 135 136 )
(tri 92 136 94 )
(tri 137 96 95 )
(tri 138 137 95 )
(tri 96 137 139 )
(tri 96 139 98 )
(tri 89 98 139 )
(tri 89 139 134 )
(tri 136 140 99 )
(tri 94 136 99 )
(tri 99 140 141 )
(tri 99 141 101 )
(tri 101 141 142 )
(tri 101 142 102 )
(tri 143 138 103 )
(tri 138 95 103 )
(tri 102 144 104 )
(tri 144 102 142 )
(tri 145 106 105 )
(tri 146 145 105 )
(tri 103 106 145 )
(tri 103 145 143 )
(tri 144 147 108 )
(tri 104 144 108 )
(tri 108 147 148 )
(tri 108 148 110 )
(tri 149 146 111 )
(tri 146 105 111 )
(tri 110 150 114 )
(tri 150 110 148 )
(tri 151 149 115 )
(tri 149 111 115 )
(tri 151 115 152 )
(tri 152 115 116 )
(tri 117 153 118 )
(tri 153 154 118 )
(tri 117 114 153 )
(tri 153 114 150 )
(tri 155 152 119 )
(tri 152 116 119 )
(tri 118 156 122 )
(tri 156 118 154 )
(tri 157 155 123 )
(tri 155 119 123 )
(tri 157 123 124 )
(tri 158 157 124 )
(tri 158 124 159 )
(tri 159 124 125 )
(tri 129 160 128 )
(tri 160 161 128 )
(tri 160 129 130 )
(tri 162 160 130 )
(tri 130 122 162 )
(tri 162 122 156 )
(tri 163 159 131 )
(tri 159 125 131 )
(tri 163 131 132 )
(tri 164 163 132 )
(tri 132 128 164 )
(tri 164 128 161 )
(tri 165 133 134 )
(tri 165 166 135 )
(tri 133 165 135 )
(tri 135 166 136 )
(tri 167 137 138 )
(tri 167 168 169 )
(tri 167 169 139 )
(tri 137 167 139 )
(tri 165 134 170 )
(tri 134 169 170 )
(tri 134 139 169 )
(tri 166 165 171 )
(tri 165 170 171 )
(tri 136 166 140 )
(tri 166 172 140 )
(tri 166 171 172 )
(tri 173 174 141 )
(tri 140 173 141 )
(tri 140 172 173 )
(tri 141 174 142 )
(tri 167 138 175 )
(tri 175 138 143 )
(tri 176 175 143 )
(tri 167 175 168 )
(tri 177 174 173 )
(tri 174 177 178 )
(tri 174 178 144 )
(tri 142 174 144 )
(tri 179 145 146 )
(tri 143 145 179 )
(tri 143 179 176 )
(tri 179 180 176 )
(tri 181 182 147 )
(tri 178 181 147 )
(tri 144 178 147 )
(tri 147 182 148 )
(tri 179 146 183 )
(tri 183 146 149 )
(tri 179 183 180 )
(tri 183 184 180 )
(tri 182 185 186 )
(tri 185 182 181 )
(tri 182 186 150 )
(tri 148 182 150 )
(tri 183 149 151 )
(tri 183 151 184 )
(tri 151 187 184 )
(tri 187 151 152 )
(tri 153 186 154 )
(tri 186 188 154 )
(tri 188 186 185 )
(tri 186 153 150 )
(tri 189 187 190 )
(tri 187 152 190 )
(tri 190 152 155 )
(tri 189 190 191 )
(tri 193 192 194 )
(tri 193 194 156 )
(tri 154 193 156 )
(tri 193 154 188 )
(tri 190 155 157 )
(tri 190 157 191 )
(tri 191 157 158 )
(tri 195 191 158 )
(tri 196 158 159 )
(tri 195 158 196 )
(tri 197 195 196 )
(tri 198 197 199 )
(tri 197 196 199 )
(tri 198 199 161 )
(tri 200 198 161 )
(tri 160 200 161 )
(tri 200 194 192 )
(tri 200 160 194 )
(tri 194 160 162 )
(tri 194 162 156 )
(tri 196 159 163 )
(tri 199 163 164 )
(tri 196 163 199 )
(tri 199 164 161 )
(tri 201 169 168 )
(tri 201 202 203 )
(tri 201 203 170 )
(tri 169 201 170 )
(tri 170 203 204 )
(tri 170 204 171 )
(tri 205 206 172 )
(tri 171 205 172 )
(tri 171 204 205 )
(tri 172 206 173 )
(tri 207 175 176 )
(tri 201 208 209 )
(tri 168 175 201 )
(tri 175 207 208 )
(tri 175 208 201 )
(tri 201 209 202 )
(tri 210 206 205 )
(tri 173 206 210 )
(tri 210 211 212 )
(tri 173 212 177 )
(tri 173 210 212 )
(tri 177 212 178 )
(tri 207 176 213 )
(tri 213 176 180 )
(tri 214 213 180 )
(tri 207 213 208 )
(tri 215 212 211 )
(tri 212 215 216 )
(tri 212 216 181 )
(tri 178 212 181 )
(tri 217 214 184 )
(tri 214 180 184 )
(tri 181 218 185 )
(tri 218 181 216 )
(tri 219 217 220 )
(tri 217 184 220 )
(tri 220 184 187 )
(tri 219 220 221 )
(tri 223 222 224 )
(tri 223 224 188 )
(tri 185 223 188 )
(tri 223 185 218 )
(tri 220 187 189 )
(tri 226 225 191 )
(tri 220 225 221 )
(tri 220 189 191 )
(tri 225 220 191 )
(tri 225 226 227 )
(tri 229 228 230 )
(tri 229 230 222 )
(tri 193 230 192 )
(tri 224 222 193 )
(tri 222 230 193 )
(tri 224 193 188 )
(tri 226 191 195 )
(tri 226 195 227 )
(tri 227 195 197 )
(tri 231 227 197 )
(tri 231 197 198 )
(tri 232 231 198 )
(tri 232 230 228 )
(tri 232 198 230 )
(tri 230 198 200 )
(tri 230 200 192 )
(tri 233 203 202 )
(tri 233 234 204 )
(tri 203 233 204 )
(tri 204 234 205 )
(tri 235 209 208 )
(tri 202 209 235 )
(tri 202 235 236 )
(tri 233 202 236 )
(tri 233 236 237 )
(tri 234 233 237 )
(tri 205 234 210 )
(tri 234 237 210 )
(tri 237 238 210 )
(tri 210 238 211 )
(tri 239 213 214 )
(tri 208 213 239 )
(tri 208 239 240 )
(tri 235 208 240 )
(tri 240 241 242 )
(tri 235 240 242 )
(tri 236 235 242 )
(tri 237 236 243 )
(tri 236 242 243 )
(tri 237 243 244 )
(tri 237 244 238 )
(tri 238 244 245 )
(tri 211 238 215 )
(tri 238 245 215 )
(tri 245 246 215 )
(tri 215 246 216 )
(tri 239 214 247 )
(tri 247 214 217 )
(tri 239 247 248 )
(tri 240 239 248 )
(tri 240 248 241 )
(tri 248 249 241 )
(tri 245 250 251 )
(tri 250 245 244 )
(tri 245 251 252 )
(tri 246 245 252 )
(tri 246 252 218 )
(tri 216 246 218 )
(tri 247 217 219 )
(tri 253 219 221 )
(tri 248 219 253 )
(tri 247 219 248 )
(tri 254 249 255 )
(tri 249 253 255 )
(tri 248 253 249 )
(tri 256 254 257 )
(tri 254 255 257 )
(tri 256 251 250 )
(tri 251 256 258 )
(tri 256 257 258 )
(tri 223 252 222 )
(tri 252 251 222 )
(tri 251 258 222 )
(tri 252 223 218 )
(tri 253 221 225 )
(tri 259 225 227 )
(tri 255 225 259 )
(tri 253 225 255 )
(tri 255 259 260 )
(tri 257 255 260 )
(tri 229 258 228 )
(tri 258 257 228 )
(tri 257 260 228 )
(tri 258 229 222 )
(tri 259 227 231 )
(tri 260 231 232 )
(tri 259 231 260 )
(tri 260 232 228 )
(tri 261 242 241 )
(tri 261 262 243 )
(tri 242 261 243 )
(tri 243 262 244 )
(tri 261 241 263 )
(tri 263 241 249 )
(tri 261 263 264 )
(tri 262 261 264 )
(tri 262 264 250 )
(tri 244 262 250 )
(tri 263 249 254 )
(tri 264 254 256 )
(tri 263 254 264 )
(tri 264 256 250 )
) ) ) ;to close earlier setq
(setq best-light (def-gob :children (list
	(light (make-point :x 20.0 :y 20.0 :z 0.0)
		(make-color :r 0.7 :g 0.7 :b 0.7))
	(ambient (make-color :r 0.3 :g 0.3 :b 0.3)))))
(setq best-camera (make-camera :lookfrom (make-point :x 1.5 :y 0.5 :z 1.5)
				:lookat (make-point :x 0.5 :y 0.5 :z 0.5)
				:fovea 45.0 :up y-vec :hither -0.1 
				:yon -10.0 ))
(snap object best-light best-camera)