Hello,

   I've been looking for the planes that define a rhombic triacontahedron.  So
far I've found the below.  Does anyone have a similiar declaration for a rhombic
triacontahedron?

http://mathworld.wolfram.com/RhombicTriacontahedron.html

   I want the planes of the rhombic triacontahedron to match the edges of the
dodecahedron defined below as I'm wanting to animate an edge twist dodecahedron
like those seen here:

http://users.skynet.be/gelatinbrain/Applets/Magic%20Polyhedra/

Thanks,
Carl


#declare Dodecahedron =
 intersection
  {plane {-z, 1 rotate <-26.56505117708,    0, 0>}
   plane {-z, 1 rotate <-26.56505117708,  -72, 0>}
   plane {-z, 1 rotate <-26.56505117708, -144, 0>}
   plane {-z, 1 rotate <-26.56505117708, -216, 0>}
   plane {-z, 1 rotate <-26.56505117708, -288, 0>}

   plane {-z, 1 rotate <26.56505117708,  -36, 0>}
   plane {-z, 1 rotate <26.56505117708, -108, 0>}
   plane {-z, 1 rotate <26.56505117708, -180, 0>}
   plane {-z, 1 rotate <26.56505117708, -252, 0>}
   plane {-z, 1 rotate <26.56505117708, -324, 0>}

   plane { y, 1}
   plane {-y, 1}
   bounded_by {sphere {0, 1.2585}}
  }


#declare RhombicDodecahedron =
intersection
  {
 plane { z, 1 rotate <  0,  45,  45>}
 plane { z, 1 rotate <  0,  45, -45>}
 plane { z, 1 rotate <  0, -45,  45>}
 plane { z, 1 rotate <  0, -45, -45>}

 plane {-z, 1 rotate <  0,  45,  45>}
 plane {-z, 1 rotate <  0,  45, -45>}
 plane {-z, 1 rotate <  0, -45,  45>}
 plane {-z, 1 rotate <  0, -45, -45>}

 plane {-x, 1 }
 plane { x, 1 }

 plane { y, 1}
 plane {-y, 1}
  }

Post a reply to this message