@text
References: "THE KINEMAGE: A TOOL FOR SCIENTIFIC COMMUNICATION"
D.C. Richardson and J.S. Richardson (1992) Protein Science vol.1, no. 1, pp. 3-9
  Also Trends in Biochem. Sci. (1994) 19: 135-8

               (Kin 4 abstracted from file demo3_1a.kin by JGK)
Kin.(1)- Geodesic dome, constructed from a cube (animated tour: moview, wordlist)

          KINEMAGE (1) - Geodesic dome construction

     (This) Kin. (1) shows how to construct a Buckminster Fuller-type geodesic dome house starting from a cube, to emphasize the fact that kinemages need not be about molecules.  Each step is explained on the kinemage, so there is less dependence on this text window - just step through the whole sequence, using the "ANIMATE" button or the "a" key.
     First an icosahedron is constructed inside the cube; then pentagons are placed around its vertices and hexagons in its faces to form a soccer ball or "Bucky ball"; then triangles are constructed on each of the soccer-ball faces to make a 180-triangle ball.  (Note that not all edges are equal - measure some.)  The parts not needed for a dome house are deleted, then lower walls and a cupola are added, to produce the final dome house.  View4 shows the dome from the top.
     Because of the regular geometry, this kinemage is in PERSPECTIVE.  Try turning off "perspective" (under "Options"); the effect is especially noticeable with the initial cube and the final dome.
     Each text explanation is specified by a "WORDLIST" in the kinemage file, which acts like a multi-line label.  The FONTSIZE of the wordlist has also been adjusted.  Since the fonts do not come out the same on all monitors and computers, it is usually better for the user to change fontsize for wordlists, labellists, or the point IDs when desired (the most important use is for visibility of the information line when using kinemages in an interactive lecture). The input control is there for an author preparing a presentation to be given on a specific computer. Try changing the various font sizes yourself, using the "Graphics Fonts" dialog box on the "Kluges" submenu.

@kinemage 1 
@caption
Click on "ANIMATE" button to see sequence of geodesic dome construction, starting with cube and icosahedron.
@perspective
@fontsizeword 18
@onewidth
@viewid {cube,icos}
@zoom 1.0
@zslab 180
@center 0.0 0.0 0.0
@matrix
.253072 -.035119 .96681 .025173 .999242 .029706 -.96712 .01682 .253764
@2viewid {ball}
@2zoom 1.0
@2zslab 180
@2center 0.0 0.0 0.0
@2matrix
.006277 .842376 .538853 -.009851 .538889 -.84232 -.999932 -.000021 .01168
@3viewid {dome front}
@3zoom 1.58
@3zslab 250
@3center .347 0.231 -0.066
@3matrix
-.484485 .867293 -.114355 .77432 .485984 .405277 .407069 .107803 -.907014
@4viewid {dome top}
@4zoom 1.58
@4zslab 240
@4center 0.347 0.231 -0.066
@4matrix
-.491766 -.16516 .85492 .814268 .260572 .51872 -.30844 .951223 .006344

@group {The Cube} dominant animate moview= 1
@vectorlist {center} color=white
{0,0,0} P 0 0 0 {0,0,0} 0 0 0
P 0 0 .1 0 0 -.1
P 0 .1 0 0 -.1 0
P .1 0 0 -.1 0 0
@vectorlist {cube} color=gray
{1,1,1} P 1 1 1 {-1,1,1} -1 1 1
{-1,-1,1} -1 -1 1
{1,-1,1} 1 -1 1
1 1 1
{1,1,-1} 1 1 -1
{-1,1,-1} -1 1 -1
{-1,-1,-1} -1 -1 -1
{1,-1,-1} 1 -1 -1
1 1 -1
P -1 1 1 -1 1 -1
P -1 -1 1 -1 -1 -1
P 1 -1 1 1 -1 -1
@dotlist off {spacers}
1.3 1.3 1.3
-1.3 -1.3 -1.3
@labellist {corners} color=gray
{1,1,1} 1 1 1
{-1,1,1} -1 1 1
{-1,-1,1} -1 -1 1
{1,-1,1} 1 -1 1
{1,1,-1} 1 1 -1
{-1,1,-1} -1 1 -1
{-1,-1,-1} -1 -1 -1
{1,-1,-1} 1 -1 -1
@wordlist {intro} master= {words} 
<construct cube
 with corners 
 set 1 unit out >0 -.82 0
@group {icosahedron} dominant animate moview= 1
@vectorlist {thecube} instance= {cube}
@vectorlist {thecenter} instance= {center}
@vectorlist {icosohedron} color=sky
{1, d, 0} P 1 .618 0 {d, 0, 1} .618 0 1
{-d, 0, 1} -.618 0 1
{-1, d, 0} -1 .618 0
{-1,-d, 0} -1 -.618 0
{-d, 0,-1} -.618 0 -1
{d, 0,-1} .618 0 -1
{1,-d, 0} 1 -.618 0
{1, d, 0} 1 .618 0
{d, 0,-1} .618 0 -1
{0, 1,-d} P 0 1 -.618 {0, 1, d} 0 1 .618
{0, 1,-d} P 0 1 -.618 {-d, 0,-1} -.618 0 -1
{0,-1,-d} P 0 -1 -.618 {0,-1, d} 0 -1 .618
{1,-d, 0} 1 -.618 0
{d, 0, 1} .618 0 1
{0,-1, d} 0 -1 .618
{-1,-d, 0} -1 -.618 0
{0,-1, -d} 0 -1 .618
{d, 0, -1} -.618 0 1
{-1,-d, 0}P -1. -.618 0. {-d, 0, 1}-.618 0. 1.
{0, 1, d}0. 1. .618
{d, 0, 1}.618 0. 1.
{0,-1, d}0. -1. .618
{-d, 0,-1}P -.618 0. -1. {-1, d, 0}-1. .618 0.
{0, 1,-d}0. 1. -.618
{-1, d, 0}P -1. .618 0. {0, 1, d}0. 1. .618
{1, d, 0}1. .618 0.
{0, 1,-d}0. 1. -.618
{d, 0,-1}.618 0. -1.
{-d, 0,-1}P -.618 0. -1. {0,-1,-d}0. -1. -.618
{d, 0,-1}.618 0. -1.
{0,-1,-d}P 0. -1. -.618 {1,-d, 0}1. -.618 0.
{-1,-d, 0}P -1. -.618 0. {0,-1,-d}0. -1. -.618
@wordlist {next} master= {words} 
<this is the  
 icosahedron  
 to be built >0 0 0
@group {edges} dominant animate moview= 1
@vectorlist {thecube} instance= {cube}
@vectorlist {theicos} instance= {icosohedron}
@vectorlist {face edges} color= green
{1,-d, 0} P 1 -.618 0 {1, d, 0} 1 .618 0
{-1, d, 0} P -1 .618 0 {-1,-d, 0} -1 -.618 0
{0, 1,-d} P 0 1 -.618 {0, 1, d} 0 1 .618
{0,-1,-d} P 0 -1 -.618 {0,-1, d} 0 -1 .618
{d, 0, 1} P .618 0 1 {-d, 0, 1} -.618 0 1
{-d, 0,-1} P -.618 0 -1 {d, 0,-1} .618 0 -1
@wordlist {next} master= {words} 
<some edges of  
 the icosahedron 
 are in the  
 cube faces>0 0 0
@group {distances} dominant animate moview= 1
@vectorlist {thecube} instance= {cube}
@vectorlist {theicos} instance= {icosohedron}
@vectorlist {theedges} instance= {face edges}
@labellist {triang label} color= green
{  d, 0, 1} P .618 0. 1.
{ 1, d, 0} P 1. .618 0.
{ 1,-d, 0} P 1. -.618 0.
@wordlist {next} master= {words} 
<the distances
 between vertices  
 are all equal
 (measure them)>0 0 0
@group {thirds} dominant animate moview= 1
@vectorlist {theicos} instance= {icosohedron}
@vectorlist {thirds} color=green 
{c} P   0.745, 0.205, 0.668 
{c} L   0.873, 0.413, 0.332 
{c} P   1.000, 0.209, 0.000 
{c} L   1.000, -0.208, 0.000 
{c} P   0.873, -0.413, 0.332 
{c} L   0.745, -0.205, 0.668 

@wordlist {next} master= {words} 
<divide each  
 triangle edge 
 into thirds>0 0 0
@group {hexagon} dominant animate moview= 1
@vectorlist {theicos} instance= {icosohedron}
@vectorlist {hexagon} color=green 
{c} P .873 .413 0.332 {c} 1. .209 0.
{c} 1. -.208 0.
{c} .873 -.413 .332
{c} .745 -.205 .668
{c} .745 .205 .668
{c} .873 .413 .332
@wordlist {next} master= {words} 
<each triangle 
 defines a 
 hexagon>0 -.2 0

@group {pentagon} dominant animate moview= 1
@vectorlist {theicos} instance= {icosohedron}
@vectorlist {pentagon} color=green 
{c} P .668 .745 .205 {c} .873 .413 .332
{c} 1. .209 0.
{c} .873 .413 -.332
{c} .668 .745 -.205
{c} .668 .745 .205
@wordlist {next} master= {words} 
<each vertex 
 defines a 
 pentagon>.016 .01 -.088

@group {pents+hexs} dominant animate moview= 1
@vectorlist {theicos} instance= {icosohedron}
@vectorlist {pentagons} color=green 
{c} P .873 .413 -.332 {c} 1. .209 0.
{c} .873 .413 .332
{c} .668 .745 .205
{c} .668 .745 -.205
{c} .873 .413 -.332
{c} P 1. -.208 0. {c} .873 -.413 .332
{c} .668 -.745 .205
{c} .668 -.745 -.205
{c} .873 -.413 -.332
{c} 1. -.208 0.
{c} P .745 .205 -.668 {c} .745 -.205 -.668
{c} .413 -.332 -.873
{c} .208 0. -1.
{c} .413 .332 -.873
{c} .745 .205 -.668
{c} P .745 .205 .668 {c} .745 -.205 .668
{c} .413 -.332 .873
{c} .208 0. 1.
{c} .413 .332 .873
{c} .745 .205 .668
{c} P .332 .873 .413 {c} .205 .668 .745
{c} -.205 .668 .745
{c} -.332 .873 .413
{c} 0. 1. .208
{c} .332 .873 .413
{c} P .332 .873 -.413 {c} .205 .668 -.745
{c} -.205 .668 -.745
{c} -.332 .873 -.413
{c} 0. 1. -.208
{c} .332 .873 -.413
{c} P .332 -.873 -.413 {c} .205 -.668 -.745
{c} -.205 -.668 -.745
{c} -.332 -.873 -.413
{c} 0. -1. -.208
{c} .332 -.873 -.413
{c} P .332 -.873 .413 {c} 0. -1. .208
{c} -.332 -.873 .413
{c} -.205 -.668 .745
{c} .205 -.668 .745
{c} .332 -.873 .413
{c} P -.208 0. -1. {c} -.413 .332 -.873
{c} -.745 .205 -.668
{c} -.745 -.205 -.668
{c} -.413 -.332 -.873
{c} -.208 0. -1.
{c} P -.873 .413 -.332 {c} -1. .208 0.
{c} -.873 .413 .332
{c} -.668 .745 .205
{c} -.668 .745 -.205
{c} -.873 .413 -.332
{c} P -.208 0. 1. {c} -.413 .332 .873
{c} -.745 .205 .668
{c} -.745 -.205 .668
{c} -.413 -.332 .873
{c} -.208 0. 1.
{c} P -.668 -.745 .205 {c} -.873 -.413 .332
{c} -1. -.208 0.
{c} -.873 -.413 -.332
{c} -.668 -.745 -.205
{c} -.668 -.745 .205
@vectorlist {hexagons} color=green 
{c} P .873 .413 .332 {c} .745 .205 .668
{c} P .745 -.205 .668 {c} .873 -.413 .332
{c} P 1. -.208 0. {c} 1. 0.209 0.
{c} P .873 .413 -.332 {c} .745 .205 -.668
{c} P .745 -.205 -.668 {c} .873 -.413 -.332
{c} P .668 -.745 -.205 {c} .332 -.873 -.413
{c} P .205 -.668 -.745 {c} .413 -.332 -.873
{c} P .413 .332 -.873 {c} .205 .668 -.745
{c} P .208 0. -1. {c} -.208 0. -1.
{c} P -.205 .668 -.745 {c} -.413 .332 -.873
{c} P -.205 -.668 -.745 {c} -.413 -.332 -.873
{c} P -.745 -.205 -.668 {c} -.873 -.413 -.332
{c} P -.332 -.873 -.413 {c} -.668 -.745 -.205
{c} P 0. -1. -.208 {c} 0. -1. .208
{c} P .668 -.745 .205 {c} .332 -.873 .413
{c} P -.332 -.873 .413 {c} -.668 -.745 .205
{c} P .205 -.668 .745 {c} .413 -.332 .873
{c} P -.205 -.668 .745 {c} -.413 -.332 .873
{c} P -.745 -.205 .668 {c} -.873 -.413 .332
{c} P -1. -.208 0. {c} -1. .208 0.
{c} P -.745 .205 -.668 {c} -.873 .413 -.332
{c} P -.208 0. 1. {c} .208 0. 1.
{c} P -.413 .332 .873 {c} -.205 .668 .745
{c} P .205 .668 .745 {c} .413 .332 .873
{c} P -.873 .413 .332 {c} -.745 .205 .668
{c} P -.668 .745 .205 {c} -.332 .873 .413
{c} P .332 .873 .413 {c} .668 .745 .205
{c} P 0. 1. .208 {c} 0. 1. -.208
{c} P -.668 .745 -.205 {c} -.332 .873 -.413
{c} P .332 .873 -.413 {c} .668 .745 -.205
@wordlist {next} master= {words} 
<show all
 pentagons and 
 hexagons>0 0 0
@group {soccer ball} dominant animate moview= 1
@vectorlist {thepents} instance= {pentagons}
@vectorlist {thehexs} instance= {hexagons}
@wordlist {next} master= {words} 
<pentagons and 
 hexagons make 
 a soccer ball!>0 0 0
@group {new pts} dominant animate moview= 1
@vectorlist {thepents} instance= {pentagons}
@vectorlist {thehexs} instance= {hexagons}
@dotlist {hex ctrs} color= green
{c} .954 -.001 .364
{c} .001 .364 .955
{c} .59 -.589 .589
{c} .003 -0.366 .954
{c} .365 -.954 0.
{c} .59 -.589 -.591
{c} .954 .001 -.364
{c} .589 .59 -.589
{c} .364 .955 .001
{c} .589 .591 .59
{c} -.365 .954 0.
{c} -.59 .589 .589
{c} -.955 -.001 .364
{c} -.591 -.59 .589
{c} -.364 -.954 -.001
{c} -.589 -.589 -.59
{c} .001 -.364 -.955
{c} 0. .365 -.954
{c} -.591 .59 -.589
{c} -.955 .001 -.364
@dotlist {pent ctrs} color= green
{c} P .869 .537 0.
{c} P .535 -.001 -.869
{c} P 0. .867 -.538
{c} P .001 .869 .535
{c} P -.868 .537 -.001
{c} P -.536 -.001 -.869
{c} P .001 -.868 -.537
{c} P .869 -.536 .001
{c} P .537 .001 .868
{c} P -.536 .001 .869
{c} P -.869 -.535 .001
{c} P 0. -.867 .538
@wordlist {next} master= {words} 
<new vertex
 centered in
 each face at
 the radius of 
 the soccer ball
 vertices>0 0 0
@group {geodesic} dominant animate moview= 1
@wordlist {next} master= {words}
<connect to
 make ball of
 180 triangles> -.2 -1.11 -.297
@subgroup {geo}
@vectorlist {thepents} instance= {pentagons}
@vectorlist {thehexs} instance= {hexagons}
@vectorlist {hex ribs} color= green 
{c} P .873 -.413 .332 {1st point} .954 -.001 .364
{c} 1. -.208 0.
{c} P 1. .209 0. {1st point} .954 -.001 .364
{c} .873 .413 .332
{c} P .745 .205 .668 {1st point} .954 -.001 .364
{c} .745 -.205 .668
{c} P -.208 0. 1. {c} .001 .364 .955
{c} .208 0. 1.
{c} P .413 .332 .873 {c} .001 .364 .955
{c} .205 .668 .745
{c} P -.205 .668 .745 {c} .001 .364 .955
{c} -.413 .332 .873
{c} P .332 -.873 .413 {c} .59 -.589 .589
{c} .668 -.745 .205
{c} P .873 -.413 .332 {c} .59 -.589 .589
{c} .745 -.205 .668
{c} P .413 -.332 .873 {c} .59 -.589 .589
{c} .205 -.668 .745
{c} P -.205 -.668 .745 {c} .003 -.366 .954
{c} .205 -.668 .745
{c} P .413 -.332 .873 {c} .003 -.366 .954
{c} .208 0. 1.
{c} P -.208 0. 1. {c} .003 -.366 .954
{c} -.413 -.332 .873
{c} P .332 -.873 -.413 {c} .365 -.954 0.
{c} .668 -.745 -.205
{c} P .668 -.745 .205 {c} .365 -.954 0.
{c} .332 -.873 .413
{c} P 0. -1. .208 {c} .365 -.954 0.
{c} 0. -1. -.208
{c} P .205 -.668 -.745 {c} .59 -.589 -.591
{c} .413 -.332 -.873
{c} P .745 -.205 -.668 {c} .59 -.589 -.591
{c} .873 -.413 -.332
{c} P .668 -.745 -.205 {c} .59 -.589 -.591
{c} .332 -.873 -.413
{c} P .745 .205 -.668 {c} .954 .001 -.364
{c} .873 .413 -.332
{c} P 1. .209 0. {c} .954 .001 -.364
{c} 1. -.208 0.
{c} P .873 -.413 -.332 {c} .954 .001 -.364
{c} .745 -.205 -.668
{c} P .413 .332 -.873 {c} .589 .59 -.589
{c} .205 .668 -.745
{c} P .332 .873 -.413 {c} .589 .59 -.589
{c} .668 .745 -.205
{c} P .873 .413 -.332 {c} .589 .59 -.589
{c} .745 .205 -.668
{c} P 0. 1. -.208 {c} .364 .955 .001
{c} 0. 1. .208
{c} P .332 .873 .413 {c} .364 .955 .001
{c} .668 .745 .205
{c} P .668 .745 -.205 {c} .364 .955 .001
{c} .332 .873 -.413
{c} P .668 .745 .205 {c} .589 .591 .59
{c} .332 .873 .413
{c} P .205 .668 .745 {c} .589 .591 .59
{c} .413 .332 .873
{c} P .745 .205 .668 {c} .589 .591 .59
{c} .873 .413 .332
{c} P -.332 .873 -.413 {c} -.365 .954 0.
{c} -.668 .745 -.205
{c} P -.668 .745 .205 {c} -.365 .954 0.
{c} -.332 .873 .413
{c} P 0. 1. .208 {c} -.365 .954 0.
{c} 0. 1. -.208
{c} P -.332 .873 .413 {c} -.59 .589 .589
{c} -.668 .745 .205
{c} P -.873 .413 .332 {c} -.59 .589 .589
{c} -.745 .205 .668
{c} P -.413 .332 .873 {c} -.59 .589 .589
{c} -.205 .668 .745
{c} P -1. .208 0. {c} -.955 -.001 .364
{c} -1. -.208 0.
{c} P -.873 -.413 .332 {c} -.955 -.001 .364
{c} -.745 -.205 .668
{c} P -.745 .205 .668 {c} -.955 -.001 .364
{c} -.873 .413 .332
{c} P -.745 -.205 .668 {c} -.591 -.59 .589
{c} -.873 -.413 .332
{c} P -.668 -.745 .205 {c} -.591 -.59 .589
{c} -.332 -.873 .413
{c} P -.205 -.668 .745 {c} -.591 -.59 .589
{c} -.413 -.332 .873
{c} P -.668 -.745 -.205 {c} -.364 -.954 -.001
{c} -.332 -.873 -.413
{c} P 0. -1. -.208 {c} -.364 -.954 -.001
{c} 0. -1. .208
{c} P -.332 -.873 .413 {c} -.364 -.954 -.001
{c} -.668 -.745 .205
{c} P -.873 -.413 -.332 {c} -.589 -.589 -.59
{c} -.745 -.205 -.668
{c} P -.413 -.332 -.873 {c} -.589 -.589 -.59
{c} -.205 -.668 -.745
{c} P -.332 -.873 -.413 {c} -.589 -.589 -.59
{c} -.668 -.745 -.205
{c} P -.208 0. -1. {c} .001 -.364 -.955
{c} .208 0. -1.
{c} P .413 -.332 -.873 {c} .001 -.364 -.955
{c} .205 -.668 -.745
{c} P -.205 -.668 -.745 {c} .001 -.364 -.955
{c} -.413 -.332 -.873
{c} P -.413 .332 -.873 {c} 0. .365 -.954
{c} -.205 .668 -.745
{c} P .205 .668 -.745 {c} 0. .365 -.954
{c} .413 .332 -.873
{c} P .208 0. -1. {c} 0. .365 -.954
{c} -.208 0. -1.
{c} P -.745 .205 -.668 {c} -.591 .59 -.589
{c} -.873 .413 -.332
{c} P -.668 .745 -.205 {c} -.591 .59 -.589
{c} -.332 .873 -.413
{c} P -.205 .668 -.745 {c} -.591 .59 -.589
{c} -.413 .332 -.873
{c} P -1. -.208 0. {c} -.955 .001 -.364
{c} -1. .208 0.
{c} P -.873 .413 -.332 {c} -.955 .001 -.364
{c} -.745 .205 -.668
{c} P -.745 -.205 -.668 {c} -.955 .001 -.364
{c} -.873 -.413 -.332
@vectorlist {pent ribs} color= green 
{c} P 1. .209 0. {1st point} .869 .537 0.
{c} .873 .413 -.332
{c} P .668 .745 -.205 {1st point} .869 .537 0.
{c} .668 .745 .205
{1st point} P .869 .537 0. {c} .873 .413 .332
{c} P .413 -.332 -.873 {c} .535 -.001 -.869
{c} .208 0. -1.
{c} P .413 .332 -.873 {c} .535 -.001 -.869
{c} .745 .205 -.668
{c} P .535 -.001 -.869 {c} .745 -.205 -.668
{c} P .205 .668 -.745 {c} 0. .867 -.538
{c} -.205 .668 -.745
{c} P -.332 .873 -.413 {c} 0. .867 -.538
{c} 0. 1. -.208
{c} P 0. .867 -.538 {c} .332 .873 -.413
{c} P .332 .873 .413 {c} .001 .869 .535
{c} 0. 1. .208
{c} P -.332 .873 .413 {c} .001 .869 .535
{c} -.205 .668 .745
{c} P .001 .869 .535 {c} .205 .668 .745
{c} P -.668 .745 -.205 {c} -.868 .537 -.001
{c} -.873 .413 -.332
{c} P -1. .208 0. {c} -.868 .537 -.001
{c} -.873 .413 .332
{c} P -.868 .537 -.001 {c} -.668 .745 .205
{c} P -.208 0. -1. {c} -.536 -.001 -.869
{c} -.413 -.332 -.873
{c} P -.745 -.205 -.668 {c} -.536 -.001 -.869
{c} -.745 .205 -.668
{c} P -.536 -.001 -.869 {c} -.413 .332 -.873
{c} P .205 -.668 -.745 {c} .001 -.868 -.537
{c} .332 -.873 -.413
{c} P 0. -1. -.208 {c} .001 -.868 -.537
{c} -.332 -.873 -.413
{c} P .001 -.868 -.537 {c} -.205 -.668 -.745
{c} P 1. -.208 0. {c} .869 -.536 .001
{c} .873 -.413 .332
{c} P .668 -.745 .205 {c} .869 -.536 .001
{c} .668 -.745 -.205
{c} P .869 -.536 .001 {c} .873 -.413 -.332
{c} P .745 .205 .668 {c} .537 .001 .868
{c} .413 .332 .873
{c} P .208 0. 1. {c} .537 .001 .868
{c} .413 -.332 .873
{c} P .537 .001 .868 {c} .745 -.205 .668
{c} P -.208 0. 1. {c} -.536 .001 .869
{c} -.413 .332 .873
{c} P -.745 .205 .668 {c} -.536 .001 .869
{c} -.745 -.205 .668
{c} P -.536 .001 .869 {c} -.413 -.332 .873
{c} P -.873 -.413 .332 {c} -.869 -.535 .001
{c} -1. -.208 0.
{c} P -.873 -.413 -.332 {c} -.869 -.535 .001
{c} -.668 -.745 -.205
{c} P -.869 -.535 .001 {c} -.668 -.745 .205
{c} P .205 -.668 .745 {c} 0. -.867 .538
{c} -.205 -.668 .745
{c} P -.332 -.873 .413 {c} 0. -.867 .538
{c} 0. -1. .208
{c} P 0. -.867 .538 {c} .332 -.873 .413
@group {geo-icoso} dominant animate moview= 2
@vectorlist {theicos} instance= {icosohedron}
@wordlist {next} master= {words}
<show inside
 icosahedron> -.812 -.667 -.434
@subgroup {ball} instance= {geo}
@group {dome-icso} dominant animate moview= 2
@vectorlist {theicos} instance= {icosohedron}
@wordlist {next} master= {words}
<delete parts
 not needed
 for dome> 0 0 0
@subgroup {dome tris}
@vectorlist {Dome pents} color= sea 
{c} P .873 .413 -.332 {c} 1. .209 0.
{c} .873 .413 .332
{c} .668 .745 .205
{c} .668 .745 -.205
{c} .873 .413 -.332
{c} P 1. -.208 0. {c} .873 -.413 .332
{c} .668 -.745 .205
{c} .668 -.745 -.205
{c} .873 -.413 -.332
{c} 1. -.208 0.
{c} P .745 .205 -.668 {c} .745 -.205 -.668
{c} .413 -.332 -.873
{c} .208 0. -1.
{c} .413 .332 -.873
{c} .745 .205 -.668
{c} P .745 .205 .668 {c} .745 -.205 .668
{c} .413 -.332 .873
{c} .208 0. 1.
{c} .413 .332 .873
{c} .745 .205 .668
{c} P .332 .873 .413 {c} .205 .668 .745
{c} -.205 .668 .745
{c} -.332 .873 .413
{c} 0. 1. .208
{c} .332 .873 .413
{c} P .332 .873 -.413 {c} .205 .668 -.745
{c} -.205 .668 -.745
{c} -.332 .873 -.413
{c} 0. 1. -.208
{c} .332 .873 -.413
@vectorlist {Dome hexs} color= sea 
{c} P .873 .413 .332 {c} .745 .205 .668
{c} P .745 -.205 .668 {c} .873 -.413 .332
{c} P 1. -.208 0. {c} 1. .209 0.
{c} P .873 .413 -.332 {c} .745 .205 -.668
{c} P .745 -.205 -.668 {c} .873 -.413 -.332
{c} P .413 .332 -.873 {c} .205 .668 -.745
{c} P .205 .668 .745 {c} .413 .332 .873
{c} P .332 .873 .413 {c} .668 .745 .205
{c} P 0. 1. .208 {c} 0. 1. -.208
{c} P .332 .873 -.413 {c} .668 .745 -.205
@vectorlist {Dome 6 ribs} color= sea 
{1st point} P .954 -.001 .364 {c} .873 -.413 .332
{1st point} P .954 -.001 .364 {c} 1. -.208 0.
{1st point} P .954 -.001 .364 {c} 1. .209 0.
{1st point} P .954 -.001 .364 {c} .873 .413 .332
{1st point} P .954 -.001 .364 {c} .745 .205 .668
{1st point} P .954 -.001 .364 {c} .745 -.205 .668
{c} P .745 .205 -.668 {c} .954 .001 -.364
{c} .873 .413 -.332
{c} P 1. .209 0. {c} .954 .001 -.364
{c} 1. -.208 0.
{c} P .873 -.413 -.332 {c} .954 .001 -.364
{c} .745 -.205 -.668
{c} P .413 .332 -.873 {c} .589 .59 -.589
{c} .205 .668 -.745
{c}P .332 .873 -.413 {c} .589 .59 -.589
{c} .668 .745 -.205
{c} P .873 .413 -.332 {c} .589 .59 -.589
{c} .745 .205 -.668
{c} P 0. 1. -.208 {c} .364 .955 .001
{c} 0. 1. .208
{c} P .332 .873 .413 {c} .364 .955 .001
{c} .668 .745 .205
{c} P .668 .745 -.205 {c} .364 .955 .001
{c} .332 .873 -.413
{c} P .668 .745 .205 {c} .589 .591 .59
{c} .332 .873 .413
{c} P .205 .668 .745 {c} .589 .591 .59
{c} .413 .332 .873
{c} P .745 .205 .668 {c} .589 .591 .59
{c} .873 .413 .332
@vectorlist {Dome 5 ribs} color= sea 
{c} P 1. .209 0. {1st point} .869 .537 0.
{c} .873 .413 -.332
{c} P .668 .745 -.205 {1st point} .869 .537 0.
{c} .668 .745 .205
{1st point} P .869 .537 0. {c} .873 .413 .332
{c} P .413 -.332 -.873 {c} .535 -.001 -.869
{c} .208 0. -1.
{c} P .413 .332 -.873 {c} .535 -.001 -.869
{c} .745 .205 -.668
{c} P .535 -.001 -.869 {c} .745 -.205 -.668
{c} P .205 .668 -.745 {c} 0. .867 -.538
{c} -.205 .668 -.745
{c} P -.332 .873 -.413 {c} 0. .867 -.538
{c} 0. 1. -.208
{c} P 0. .867 -.538 {c} .332 .873 -.413
{c} P .332 .873 .413 {c} .001 .869 .535
{c} 0. 1. .208
{c} P -.332 .873 .413 {c} .001 .869 .535
{c} -.205 .668 .745
{c} P .001 .869 .535 {c} .205 .668 .745
{c} P 1. -.208 0. {c} .869 -.536 .001
{c} .873 -.413 .332
{c} P .668 -.745 .205 {c} .869 -.536 .001
{c} .668 -.745 -.205
{c} P .869 -.536 .001 {c} .873 -.413 -.332
{c} P .745 .205 .668 {c} .537 .001 .868
{c} .413 .332 .873
{c} P .208 0. 1. {c} .537 .001 .868
{c} .413 -.332 .873
{c} P .537 .001 .868 {c} .745 -.205 .668
@group {dome-walls} dominant animate moview= 2
@vectorlist {walls} color= sea 
{c} P -.205 .668 -.745 {c} -.375 .563 -.745
{c} P -.332 .873 -.413 {c} -.502 .768 -.413
{c} P -.332 .873 .413 {c} -.502 .768 .413
{c} P -.205 .668 .745 {c} -.375 .563 .745
{c} P .413 -.332 -.873 {c} .243 -.437 -.873
{c} P .208 0. -1. {c} 0.038 -.105 -1.
{c} P .208 0. 1. {c} 0.038 -.105 1.
{c} P .413 -.332 .873 {c} .243 -.437 .873
{c} P .668 -.745 .205 {c} .498 -.85 .205
{c} P .668 -.745 -.205 {c} .498 -.85 -.205
{c} P .745 -.205 .668 {c} .277 -.494 .668
{c} P .873 -.413 .332 {c} .405 -.702 .332
{c} P 0. 1. -.208 {c} -.468 .711 -.209
{c} P 0. 1. .208 {c} -.468 .711 .207
{c} P .413 .332 -.873 {c} -0.055 0.043 -.873
{c} P .205 .668 -.745 {c} -.263 .379 -.745
{c} P .745 -.205 -.668 {c} .277 -.494 -.668
{c} P .873 -.413 -.332 {c} .405 -.702 -.332
{c} P .413 .332 .873 {c} -0.055 0.043 .873
{c} P .205 .668 .745 {c} -.263 .379 .745
{c} P 0.038 -.105 1. {c} .243 -.437 .873
{c} .277 -.494 .668
{c} .405 -.702 .332
{c} .498 -.85 .205
{c} .498 -.85 -.205
{c} .405 -.702 -.332
{c} .277 -.494 -.668
{c} .243 -.437 -.873
{c} 0.038 -.105 -1.
{c} -0.055 0.043 -.873
{c} -.263 .379 -.745
{c} -.375 .563 -.745
{c} -.502 .768 -.413
{c} -.468 .711 -.209
{c} -.468 .711 .207
{c} -.502 .768 .413
{c} -.375 .563 .745
{c} -.263 .379 .745
{c} -0.055 0.043 .873
{c} 0.038 -.105 1.
@wordlist {house} master= {words}
<build walls> -.177 -.14 -.468
@subgroup {dometri} instance= {dome tris}
@group {dome-all} dominant animate moview= 2
@vectorlist {domewalls} instance= {walls}
@vectorlist {cupola} color= sea 
{c} P .668 .745 .205 {c} .838 .85 .205
{c} P .873 .413 .332 {c} 1.043 .518 .332
{c} P 1. .209 0. {c} 1.17 .314 0.
{c} P .873 .413 -.332 {c} 1.043 .519 -.332
{c} P .668 .745 -.205 {c} .838 .85 -.205
{c} P .869 .537 0. {c} 1.039 .643 0.
{c} P 1.17 .314 0. {c} 1.207 .221 .001
{c} P 1.043 .519 -.332 {c} 1.044 .484 -.426
{c} P .838 .85 -.205 {c} .781 .909 -.263
{c} P .838 .85 .205 {c} .782 .909 .263
{c} P 1.043 .518 .332 {c} 1.044 .483 .426
{c} P .782 .909 .263 {c} 1.044 .483 .426
{c} 1.207 .221 .001
{c} 1.044 .484 -.426
{c} .781 .909 -.263
{c} .782 .909 .263
{c} P 1.039 .643 0. {c} .838 .85 -.205
{c} P 1.039 .643 0. {c} .838 .85 .205
{c} P 1.039 .643 0. {c} 1.043 .518 .332
{c} P 1.039 .643 0. {c} 1.043 .519 -.332
{c} P 1.039 .643 0. {c} 1.17 .314 0.
@wordlist {house} master= {words}
<add cupola> -.177 -.14 -.468
@subgroup {dometri} instance= {dome tris}
@group {The Dome} dominant animate moview= 3
@vectorlist {domewalls} instance= {walls}
@vectorlist {dometop} instance= {cupola}
@wordlist {house} master= {words}
<Now you can
 move in!> -.177 -.14 -.468
@subgroup {dometri} instance= {dome tris}