octaèdre

Lfaces=
[[[0,0,1],[1,0,0],[0,1,0]],[[0,0,-1],[0,1,0],[1,0,0]],[[0,0,1],[0,-1,0],[1,0,0]],[[0,0,-1],[1,0,0],[0,-1,0]],[[0,0,1],[0,1,0],[-1,0,0]],[[0,0,-1],[-1,0,0],[0,1,0]],[[0,0,1],[-1,0,0],[0,-1,0]],[[0,0,-1],[0,-1,0],[-1,0,0]]]

LfacesPOL(K)=
[[[[0,0,1],[1/2*sqrt(2)*K,0,1/2*sqrt(2)*K],[-(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8)],[0,1/2*sqrt(2)*K,1/2*sqrt(2)*K]],[[1,0,0],[1/2*sqrt(2)*K,0,1/2*sqrt(2)*K],[-(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8)],[1/2*sqrt(2)*K,1/2*sqrt(2)*K,0]],[[0,1,0],[1/2*sqrt(2)*K,1/2*sqrt(2)*K,0],[-(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8)],[0,1/2*sqrt(2)*K,1/2*sqrt(2)*K]]],[[[0,0,-1],[0,1/2*sqrt(2)*K,-1/2*sqrt(2)*K],[-(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8)],[1/2*sqrt(2)*K,0,-1/2*sqrt(2)*K]],[[0,1,0],[0,1/2*sqrt(2)*K,-1/2*sqrt(2)*K],[-(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8)],[1/2*sqrt(2)*K,1/2*sqrt(2)*K,0]],[[1,0,0],[1/2*sqrt(2)*K,1/2*sqrt(2)*K,0],[-(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8)],[1/2*sqrt(2)*K,0,-1/2*sqrt(2)*K]]],[[[0,0,1],[0,-1/2*sqrt(2)*K,1/2*sqrt(2)*K],[-(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8)],[1/2*sqrt(2)*K,0,1/2*sqrt(2)*K]],[[0,-1,0],[0,-1/2*sqrt(2)*K,1/2*sqrt(2)*K],[-(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8)],[1/2*sqrt(2)*K,-1/2*sqrt(2)*K,0]],[[1,0,0],[1/2*sqrt(2)*K,-1/2*sqrt(2)*K,0],[-(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8)],[1/2*sqrt(2)*K,0,1/2*sqrt(2)*K]]],[[[0,0,-1],[1/2*sqrt(2)*K,0,-1/2*sqrt(2)*K],[-(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8)],[0,-1/2*sqrt(2)*K,-1/2*sqrt(2)*K]],[[1,0,0],[1/2*sqrt(2)*K,0,-1/2*sqrt(2)*K],[-(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8)],[1/2*sqrt(2)*K,-1/2*sqrt(2)*K,0]],[[0,-1,0],[1/2*sqrt(2)*K,-1/2*sqrt(2)*K,0],[-(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8)],[0,-1/2*sqrt(2)*K,-1/2*sqrt(2)*K]]],[[[0,0,1],[0,1/2*sqrt(2)*K,1/2*sqrt(2)*K],[(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8)],[-1/2*sqrt(2)*K,0,1/2*sqrt(2)*K]],[[0,1,0],[0,1/2*sqrt(2)*K,1/2*sqrt(2)*K],[(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8)],[-1/2*sqrt(2)*K,1/2*sqrt(2)*K,0]],[[-1,0,0],[-1/2*sqrt(2)*K,1/2*sqrt(2)*K,0],[(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8)],[-1/2*sqrt(2)*K,0,1/2*sqrt(2)*K]]],[[[0,0,-1],[-1/2*sqrt(2)*K,0,-1/2*sqrt(2)*K],[(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8)],[0,1/2*sqrt(2)*K,-1/2*sqrt(2)*K]],[[-1,0,0],[-1/2*sqrt(2)*K,0,-1/2*sqrt(2)*K],[(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8)],[-1/2*sqrt(2)*K,1/2*sqrt(2)*K,0]],[[0,1,0],[-1/2*sqrt(2)*K,1/2*sqrt(2)*K,0],[(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8)],[0,1/2*sqrt(2)*K,-1/2*sqrt(2)*K]]],[[[0,0,1],[-1/2*sqrt(2)*K,0,1/2*sqrt(2)*K],[(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8)],[0,-1/2*sqrt(2)*K,1/2*sqrt(2)*K]],[[-1,0,0],[-1/2*sqrt(2)*K,0,1/2*sqrt(2)*K],[(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8)],[-1/2*sqrt(2)*K,-1/2*sqrt(2)*K,0]],[[0,-1,0],[-1/2*sqrt(2)*K,-1/2*sqrt(2)*K,0],[(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8),-(K+2*sqrt(2))*K/(K^2-8)],[0,-1/2*sqrt(2)*K,1/2*sqrt(2)*K]]],[[[0,0,-1],[0,-1/2*sqrt(2)*K,-1/2*sqrt(2)*K],[(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8)],[-1/2*sqrt(2)*K,0,-1/2*sqrt(2)*K]],[[0,-1,0],[0,-1/2*sqrt(2)*K,-1/2*sqrt(2)*K],[(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8)],[-1/2*sqrt(2)*K,-1/2*sqrt(2)*K,0]],[[-1,0,0],[-1/2*sqrt(2)*K,-1/2*sqrt(2)*K,0],[(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8),(K+2*sqrt(2))*K/(K^2-8)],[-1/2*sqrt(2)*K,0,-1/2*sqrt(2)*K]]]](K);