1

A Unit edge Mathematica icosahedron is truncated with hexagon central arc length $ h= 0.3667612 $ that I calculated using spherical trig. How can we take two adjoining points say

aa = {(1 + Sqrt[5])/(2 Sqrt[10 - 2 Sqrt[5]]), 1/2, 
   1/Sqrt[10 - 2 Sqrt[5]]};
bb = {Sqrt[2/(5 - Sqrt[5])], 0, -(1/Sqrt[10 - 2 Sqrt[5]])};
Norm[N[aa - bb]]

enter image description here

and on the circumscribed sphere demarcate the white portions by drawing lines with above $h$ divisions, color the pentagons black and start (mouse) playing with standard soccer ball for fun?

Narasimham
  • 3,160
  • 13
  • 26

0 Answers0