2007 Carlos Giménez Esteban

resultant

eix_y = 10 (slider from -10 to 10, step 0.1)
eix_z = 10 (slider from -10 to 10, step 0.1)
eix_x = 10 (slider from -10 to 10, step 0.1)
A = (0, 0)
B = (0, 10)
C = (10, 0)
D = Rotate(C, 45.0°, A)
d = Line(B, A)
e = Line(C, A)
f = Line(D, A)
E: (eix_y, 0.0)
F: (0.0, eix_z)
G: (-1.0 * 1.0 * eix_x * cos(45.0 * °), -1.0 * 1.0 * eix_x * sin(45.0 * °))
u: Vector[A, E] + Vector[A, G]
H = Translate(A, u)
poly1, g, h, i, j = Polygon(A, G, H, E)
v: u + Vector[A, F]
I = Translate(A, v)
poly2, a_1, h_1, i_1, f_1 = Polygon(A, H, I, F)
k = Ray(A, E)
l = Ray(A, F)
m = Ray(A, G)
T6: "\vec{z}\,\,(0, 0, " + eix_z + ")"
w = Vector(A, E)
z = Vector(A, G)
J = Translate(F, w)
n = Vector(F, J)
K = Translate(F, z)
p = Vector(F, K)
L = Translate(K, n)
q = Vector(K, L)
M = Translate(J, p)
r = Vector(J, M)
s = Segment(G, K)
t = Segment(E, J)
a1 = Segment(J, L)
b1 = Segment(J, F)
c1 = Segment(F, K)
d1 = Segment(K, L)
u1 = Vector(A, F)
o = true
T3: "\vec{x}\,\,(" + eix_x + ",0,0)"
T1: "\vec{y}\,\,(0, " + eix_y + " ,0)"
T7: "\vec{r}\,\,(" + eix_x + "," + eix_y + "," + eix_z + ")"