NB. Socccer Ball
NB.
NB. constructed as a bucky ball (see bucky demo)

0!:0 <GLDEMOPATH,'bucky.ijs'

CLEARCOLOR=: BLUE
PENCOLOR=: BLACK
HEXCOLOR=: WHITE
LINECOLOR=: GRAY
VIEWXYZ=: 0 0 4

NB. =========================================================
demo=: 3 : 0
bucky''
stdlist ''
hex=. ; ,each HEX

startlist SPHERE
drawpolygon PEN;'';PENCOLOR
drawpolygon hex;'';HEXCOLOR
drawlines hex;2;LINECOLOR
endlist''

startlist HALF
SPHERE make_vertices ICOSA
endlist''

HALF make_halves makenewlist 0 1
)
