Graphics3D[{Polygon[{{0, 0, 1.7321}, {1.633, 0, -0.57735}, {-0.8165, 1.4142, -0.57735}}], Polygon[{{0, 0, 1.7321}, {-0.8165, 1.4142, -0.57735}, {-0.8165, -1.4142, -0.57735}}], Polygon[{{0, 0, 1.7321}, {-0.8165, -1.4142, -0.57735}, {1.633, 0, -0.57735}}], Polygon[{{1.633, 0, -0.57735}, {-0.8165, -1.4142, -0.57735}, {-0.8165, 1.4142, -0.57735}}]}, {LightSources -> {{{1., 0., 1.}, RGBColor[1., 0, 0]}, {{1., 1., 1.}, RGBColor[0, 1., 0]}, {{0., 1., 1.}, RGBColor[0, 0, 1.]}, {{-1., -1., -1.}, RGBColor[0.5, 0.5, 0.5]}}, Boxed -> False, DisplayFunction -> Identity, PlotRange -> {{-1.6942, 1.6942}, {-1.4849, 1.4849}, {-1.7898, 1.7898}}}]