/*
	Dodecahedron
	Divide by factor of 2 for unit dodecahedron.
*/

#declare phi = (1 + sqrt(5)) / 2;
#declare b = 1 / phi;
#declare c = 1 / (phi * phi);

union {
polygon {5,
 < c,  0,  1>,  <-c,  0,  1>,  <-b,  b,  b>,  < 0,  1,  c>,  < b,  b,  b> }
polygon {5,
 <-c,  0,  1>,  < c,  0,  1>,  < b, -b,  b>,  < 0, -1,  c>,  <-b, -b,  b> }
polygon {5,
 < c,  0, -1>,  <-c,  0, -1>,  <-b, -b, -b>,  < 0, -1, -c>,  < b, -b, -b> }
polygon {5,
 <-c,  0, -1>,  < c,  0, -1>,  < b,  b, -b>,  < 0,  1, -c>,  <-b,  b, -b> }
polygon {5,
 < 0,  1, -c>,  < 0,  1,  c>,  < b,  b,  b>,  < 1,  c,  0>,  < b,  b, -b> }
polygon {5,
 < 0,  1,  c>,  < 0,  1, -c>,  <-b,  b, -b>,  <-1,  c,  0>,  <-b,  b,  b> } 
polygon {5,
 < 0, -1, -c>,  < 0, -1,  c>,  <-b, -b,  b>,  <-1, -c,  0>,  <-b, -b, -b> }
polygon {5,
 < 0, -1,  c>,  < 0, -1, -c>,  < b, -b, -b>,  < 1, -c,  0>,  < b, -b,  b> }
polygon {5,
 < 1,  c,  0>,  < 1, -c,  0>,  < b, -b,  b>,  < c,  0,  1>,  < b,  b,  b> }
polygon {5,
 < 1, -c,  0>,  < 1,  c,  0>,  < b,  b, -b>,  < c,  0, -1>,  < b, -b, -b> }
polygon {5,
 <-1,  c,  0>,  <-1, -c,  0>,  <-b, -b, -b>,  <-c,  0, -1>,  <-b,  b, -b> }
polygon {5,
 <-1, -c,  0>,  <-1,  c,  0>,  <-b,  b,  b>,  <-c,  0,  1>,  <-b, -b,  b> }
}