Fluxicube Animation
Loading the math board and drawing, please wait…
This example demonstrates the dynamic folding process of the paper model 'Fluxicube' from the book 'Action Modular Origami'. It involves core mathematical concepts like vectors, geometric transformations, solid geometry, and parametric animations. GeoGebra commands and objects such as If, Vector, Point, Translate, Line, Cube, Rotate, Plane, Angle, OrthogonalLine, Intersect, PointIn, Polygon, Circle, Center, Mirror, Midpoint, Segment, and Dilate are used in the construction. Suitable for high school students and math enthusiasts studying spatial geometry and dynamic transformations.
GeoGebra Commands & Parameters
If(clock0 ≥ 1 ∧ clock0 < 2 ∨ clock0 ≥ 3 ∧ clock0 < 5, 1 - fractionalPart(clock0), fractionalPart(clock0)) → clockIf(clock ≤ 1, 1, If[clock > 1 ∧ clock ≤ 2, 1 - (clock - 1) / 2, If[clock > 2 ∧ clock ≤ 3, 0.5, 0.5]]) → clock3_1Vector((cos((180° * clock3_1)), 0, 0)) → vShiftIf(clock ≤ 1, clock, 1) → clock1_1Vector((0, 0, clock1_1)) → vLiftIf(clock ≤ 1, 0, If[clock > 1 ∧ clock ≤ 3, (clock - 1) / 2, 1]) → clock3If(clock ≤ 1, 90° + (30° * (1 - clock)^(0.29)), 120°) → γPoint(yAxis) → ATranslate(A, vLift) → A'Point(Circle[B, Distance[A, B], Segment[A, B]]) → CTranslate(C, vShift) → C'Line(C', ZZZ) → g_1Cube(A, B, C) → a, D, faceCDHG, faceEFGH, edgeAD, edgeAB, edgeBC, edgeCD, edgeAE, edgeDH, edgeEH, edgeEF, E, edgeBF, edgeFG, edgeCG, edgeGH, F, G, H, faceABCD, faceADHE, faceABFE, faceBCGFLine(A, D) → gRotate(Translate[C, vLift], (-α), g) → C''Line(C, D) → fPlane(C, G, H) → bTranslate(Rotate[Mirror[F, b], asin(clock1_1), f], vLift) → JTranslate(Rotate[Mirror[B, b], asin(clock1_1), f], vLift) → KLine(K, J) → hTranslate(Rotate[Mirror[A, b], asin(clock1_1), f], vLift) → MAngle(A, M, A') → δRotate(M, (-γ), h) → M'Line(K, M) → rRotate(M', (-δ), r) → M''OrthogonalLine(M'', xOyPlane) → h_1Plane(M'', b) → oIntersect(g_1, o) → WOrthogonalLine(W, h_1, o) → i_1Intersect(h_1, i_1) → A_1Angle(M'', W, A_1, o) → ηRotate(Rotate[Rotate[Translate[F, vLift], (-α), g], (-δ), r], η, g_1) → Z_1Rotate(Rotate[Rotate[Translate[B, vLift], (-α), g], (-δ), r], η, g_1) → N_1Line(Z_1, N_1) → b_1Rotate(Rotate[C'', (-δ), r], η, g_1) → K_1Plane(K_1, xOyPlane) → a_1PointIn(a_1) → I_2Intersect(b_1, a_1) → C_2Polygon(K_1, C_2, 3, a_1) → poly5, l_2, m_2, n_2, E_2Polygon(K_1, E_2, 3, a_1) → poly6, p_2, q_2, r_2, F_2Circle(K_1, F_2, E_2) → c_2Center(c_2) → G_2Rotate(Translate[D, vLift], (-α), g) → D''Rotate(Rotate[D'', (-δ), r], η, g_1) → L_1OrthogonalLine(L_1, xOyPlane) → t_1Intersect(t_1, xOyPlane) → B_2Circle(F_1, H_1, G_1) → e_1Point(e_1) → A_2Rotate(Rotate[Rotate[Translate[A, vLift], (-α), g], (-δ), r], η, g_1) → M_1OrthogonalLine(K_1, xOyPlane) → n_1Intersect(n_1, xOyPlane) → P_1OrthogonalLine(N_1, xOyPlane) → m_1Intersect(m_1, xOyPlane) → O_1Vector(O_1, P_1) → u_1Translate(P_1, u_1) → R_1Polygon(R_1, O_1, 3, xOyPlane) → poly3, p_1, q_1, r_1, S_1Circle(R_1, O_1, S_1) → s_1Center(s_1) → T_1Translate(Rotate[Mirror[H, b], asin(clock1_1), f], vLift) → LRotate(L, (-γ) - 90°, h) → L'_1Translate(Rotate[Mirror[E, b], asin(clock1_1), f], vLift) → E'''Rotate(E''', (-γ), h) → NVector(N, P) → uTranslate(L'_1, u) → QVector(N, L'_1) → vTranslate(K, v) → K'OrthogonalLine(K', xOyPlane) → j_1Intersect(j_1, xOyPlane) → B_1Translate(F, vLift) → F'Translate(B, vLift) → B'Plane(F', B', Q) → iMirror(C'', i) → C'''OrthogonalLine(C''', xOyPlane) → k_1Intersect(k_1, xOyPlane) → C_1Circle(B_1, C, C_1) → d_1Center(d_1) → OOORotate(OOO, η, g_1) → OOO'OrthogonalLine(OOO', xOyPlane) → l_1Intersect(l_1, xOyPlane) → E_1If(clock < 3, 0, clock - 3) → clock4Vector((0, 0, (2 * clock4))) → vLift4Translate({faceABCD, faceABFE, faceADHE, faceBCGF, faceCDHG, faceEFGH}, Vector[(0, 0, 0)]) → listCube1Mirror(listCube1, b) → listCube2'Translate(Rotate[listCube2', asin(clock1_1), f], vLift) → listCube2''Translate(listCube1, vLift) → listCube1'_1Translate(g, vLift) → g'Rotate(g', (-α), g) → g''Translate(f, vLift) → f'Rotate(f', (-α), g) → f''Translate(f'', vLift4) → f'''If(x(C'') > x(D''), x(C''), x(D'')) → xMaxPlane(E, A, H) → cMidpoint(E, H) → IPlane(I, b) → dTranslate(D, vLift) → D'Translate(E, vLift) → E'Translate(G, vLift) → G'Translate(H, vLift) → H'Translate(I, vLift) → I'Plane(E''', J, K) → eMirror(listCube2'', e) → listCube2'''Rotate(listCube2''', (-γ), h) → listCube3Translate(Rotate[Mirror[G, b], asin(clock1_1), f], vLift) → OTranslate(J, v) → J'Mirror(listCube1'_1, i) → list1Mirror(listCube2'', i) → listCube2'''_1Mirror(listCube3, i) → listCube3'Plane(A', M, M') → jPlane(Q, M', N) → kVector(ZZZ) → vShift4Translate(j, vShift4) → j'OrthogonalLine(A', j) → lOrthogonalLine(D'', j) → mIntersect(m, j) → RIntersect(l, xOyPlane) → SIntersect(m, xOyPlane) → TOrthogonalLine(M', xOyPlane) → nIntersect(n, xOyPlane) → USegment(M', S) → pSegment(A', M) → qRotate({list1, listCube1'_1, listCube2'', listCube2'''_1, listCube3, listCube3'}, (-δ), r) → listAllCubesPolygon(K, B, 3, xOyPlane) → poly1, s, t, f_1, VAngle(A', V, A) → εAngle(C', Q, C'') → ζIntersect(h_1, xAxis) → ZRotate(listAllCubes, η, g_1) → listAllCubes'Circle(J, V, B) → c_1Vector(B_2, A_2) → wIntersect(l_1, xOyPlane) → D_1Polygon(F_1, G_1, H_1) → poly2, h_2, f_2, g_2Center(e_1) → I_1Rotate(poly2, 180°, A) → poly2'Rotate(Rotate[A, (-δ), r], η, g_1) → J_1Dilate(N_1, 2, K_1) → Q_1Rotate(Rotate[Rotate[Translate[E, vLift], (-α), g], (-δ), r], η, g_1) → U_1Rotate(Rotate[Rotate[Translate[H, vLift], (-α), g], (-δ), r], η, g_1) → V_1Rotate(Rotate[Rotate[Translate[G, vLift], (-α), g], (-δ), r], η, g_1) → W_1Polygon(K_1, N_1, 3, a_1) → poly4, i_2, j_2, k_2, D_2OrthogonalLine(M_1, xOyPlane) → s_2Intersect(s_2, a_1) → H_2Vector(G_2, I_2) → v_1Translate(listAllCubes', v_1) → pos3OrthogonalLine(I_2, xOyPlane) → t_2Rotate(pos3, 180°, t_2) → pos1Plane(W_1, xOyPlane) → o_1OrthogonalLine(W_1, o_1) → a_2Intersect(a_2, xOyPlane) → J_2Midpoint(W_1, J_2) → K_2Plane(K_2, xOyPlane) → w_1Rotate(Mirror[pos1, w_1], 180°, t_2) → pos2Rotate(Mirror[pos3, w_1], 180°, t_2) → pos4
AI Drawing Prompt Reference
Create an animation of a modular origami cube folding dynamically. Start with a cube whose vertices lift and shift horizontally over time. One face is mirrored and rotated to create folding triangular panels, with auxiliary lines, planes, and circles for positioning. The final view shows multiple rotated polygonal faces and a circle, illustrating spatial transformations and parametric motion.
The prompt above was compiled from the original drawing commands and is for reference only.