Coefficient  \space de\space réduction  \space : \frac{1}{_}

Prisme droit réduit

Prisme rempli

Sélectionner le niveau :

Sélectionner le niveau :

A = (-4.4505587186368185, -3.929824096793258, 0)
L: A + (0, 1, 0)
m = Line(A, L)
B = Point(m)
a = Line(A, B)
b = OrthogonalPlane(A, a)
d = IntersectPath(b, c)
C = Point(d)
e = OrthogonalLine(A, xOyPlane)
D = Point(e)
f = Line(B, d)
g = Line(C, a)
E = Intersect(f, g)
h, F, G, H, faceABEC, faceACFD, faceCEGF, faceBEGH, faceABHD, faceDFGH, arêteAC, arêteCE, arêteBE, arêteAB, arêteAD, arêteCF, arêteEG, arêteBH, arêteDF, arêteFG, arêteGH, arêteDH = Prism(A, C, E, B, D)
r = 2
ChampTexte1 = Textfield(r)
h' = Dilate(h, 1 / r, A)
o = false
Li = Distance(A, C)
hi = Distance(D, A)
li = Distance(A, B)
oo = false
u = 2 (slider from 1 to r, step 1)
ChampTexte2 = Textfield(u)
i = 2
j = 2
k = 2
liste2 = Sequence(Sequence[Sequence[Prism[Polygon[A + ((Li / r * i), (li / r * j), (hi / r * k)), A + ((Li / r * (i + 1)), (li / r * j), (hi / r * k)), A + ((Li / r * (i + 1)), (li / r * (j + 1)), (hi / r * k)), A + ((Li / r * i), (li / r * (j + 1)), (hi / r * k))], A + ((Li / r * i), (li / r * j), (hi / r * (k + 1)))], i, 0, r - 1], j, 0, r - 1], k, 0, r - 1)
liste1 = Element(liste2, u)
l = false