geo-024-punto-3d-2d

x

y

z

a = 6.5 (slider from -5 to 10, step 0.1)
b = 7.4 (slider from -3 to 10, step 0.1)
c = 4.3 (slider from -3 to 10, step 0.1)
P: (a, b, c)
PX: (a, 0, 0)
PY: (0, b, 0)
PZ: (0, 0, c)
PXY: (a, b, 0)
d = Segment(PY, PXY)
e = Segment(PXY, PX)
PZY: (0, b, c)
PZX: (a, 0, c)
f = Segment(PZ, PZX)
g = Segment(PZX, PX)
h = Segment(PZ, PZY)
i = Segment(PZY, P)
j = Segment(P, PZX)
k = Segment(P, PXY)
l = Segment(PZY, PY)
texto1: "P=" + (LaTeX[P]) + ""
polígono1, pzy, p, pxy, py = Polygon(PZY, P, PXY, PY)
polígono2, pzy_1, pz, pzx, p_1 = Polygon(PZY, PZ, PZX, P)
polígono3, pzx_1, px, pxy_1, p_2 = Polygon(PZX, PX, PXY, P)
A = Intersect(xAxis, zAxis)
polígono4, pzy_2, pz_1, a_1, py_1 = Polygon(PZY, PZ, A, PY)
polígono5, pzx_2, pz_2, a_2, px_1 = Polygon(PZX, PZ, A, PX)
polígono6, px_2, a_3, py_2, pxy_2 = Polygon(PX, A, PY, PXY)
m = Segment(PX, A)
n = Segment(PY, A)