In[]:=
PorismoDePoncelet3Dv6::usage="Una elipsoide circunscribe a un políedro de 5 lados. Una esfera está inscrita al poliedro. Referencia: Personal. ";
Out[]=
​
Porismo de Poncelet 3D:
Valor (k1)