rotation

dimensions pièce
longueur, largeur, hauteur

Pour placer un point dont les coordonnées spatiales sont (x, y ,z)
écrivez dans la barre de saisie l'expression placer[theta,phi,x,y,z]

H = 4.5 (slider from 1 to 10, step 0.5)
phi = 0.5585053606381855 rad (slider from 0 to 1.5707963267948966, step 0.017453292519943295)
theta = 0.4188790204786391 rad (slider from 0 to 1.5707963267948966, step 0.017453292519943295)
L = 8.5 (slider from 1 to 20, step 0.5)
l = 8.5 (slider from 1 to 20, step 0.5)
O = Intersect(xAxis, yAxis)
B = Point(xAxis)
i = Vector(O, B)
C = Point(yAxis)
j = Vector(O, C)
u: cos(phi) * i - sin(theta) * sin(phi) * j
w: -1 * sin(phi) * i - sin(theta) * cos(phi) * j
v': -1 * sin(theta) * j
v: cos(theta) * j
liste1 = Sequence(placer[theta, phi, i, 0, 0], i, 1, l)
liste2 = Sequence(placer[theta, phi, 0, i, 0], i, 1, L)
liste3 = Sequence(placer[theta, phi, 0, 0, i], i, 1, H)
liste4 = Sequence(placer[theta, phi, i, L, 0], i, 1, l)
liste5 = Sequence(placer[theta, phi, i, 0, H], i, 1, l)
liste6 = Sequence(placer[theta, phi, l, i, 0], i, 1, L)
liste7 = Sequence(placer[theta, phi, 0, i, H], i, 1, L)
liste8 = Sequence(placer[theta, phi, l, 0, i], i, 1, H)
liste9 = Sequence(placer[theta, phi, 0, L, i], i, 1, H)
A = (-6.4910416666666615, 6.338958333333334)
D = (-6.4910416666666615, 3.038958333333333)
E = (-4.0310416666666615, 3.018958333333333)
F = (-4.0310416666666615, 6.358958333333334)
liste11 = Sequence(Segment[Element[liste1, i], Element[liste5, i]], i, 1, l)
liste12 = Sequence(Segment[Element[liste2, i], Element[liste6, i]], i, 1, L)
liste10 = Sequence(Segment[Element[liste1, i], Element[liste4, i]], i, 1, l)
liste13 = Sequence(Segment[Element[liste2, i], Element[liste7, i]], i, 1, L)
liste14 = Sequence(Segment[Element[liste3, i], Element[liste8, i]], i, 1, H)
liste15 = Sequence(Segment[Element[liste3, i], Element[liste9, i]], i, 1, H)
a = Segment(O, placer[theta, phi, l, 0, 0])
b = Segment(O, placer[theta, phi, 0, L, 0])
c = Segment(O, placer[theta, phi, 0, 0, H])

Tool: point3D (command placer)
placer[theta,phi,x,y,z]
Input: theta, phi, a, b, c
Output: D

D: (-1 * a * sin(phi) + b * cos(phi), -1 * a * sin(theta) * cos(phi) - b * sin(theta) * sin(phi) + c * cos(theta))