"Glass" Geometry

xxxxxxxxxx

 

1

def v(k): 

2

    v=[[[k,k,k],[k,k,k-1],[k-1,k,k],[k,k-1,k]],

3

      [[k-1,k-1,k],[k-1,k-1,k-1],[k-1,k,k],[k,k-1,k]],

4

      [[k,k,-k],[k,k,-k+1],[k-1,k,-k],[k,k-1,-k]],

5

      [[k-1,k-1,-k],[k-1,k-1,-k+1],[k-1,k,-k],[k,k-1,-k]]]

6

    return v

7

def col(i,cm): return colormaps[cm](55*i)[:3]

8

p=sum([Polyhedron(vertices=v(1)[i]).render_solid(opacity=.5,

9

       color=col(i,'hsv')) for i in [0..3]])

10

c1=cube((.5,.5,0),.5,opacity=.5,color=col(4,'hsv'))

11

c2=cube((.5,.5,0),2,opacity=.1,color=col(2,'hsv'))

12

(p+c1+c2).show(frame=False)

Language: Sage Gap GP HTML Macaulay2 Maxima Octave Python R Singular

---

Messages