The constraints can be used to pack multiple spheres in the tetrahedron.
why not using this?
reg = Tetrahedron[]; Graphics3D[{Opacity[.5], Insphere[reg], reg}]
