MathPlotAI Logo MathPlotAI

Concha (Bellerophina) Shell Curve Geometric Construction

Concha (Bellerophina) Shell Curve Geometric Construction
Loading the math board and drawing, please wait…
2023-03-15 19:22
CircleSequenceParametric EquationGeometric Construction
In collections geometriadinamica.es
① This example demonstrates how to construct a beautiful shell-like curve resembling the Bellerophina concha through a series of geometric constructions and parametric equations. ② Core mathematical concepts include parametric curves, intersections of ellipses and circles, orthogonal lines, angle measurement, and sequence generation, incorporating combinatorial percentages and arithmetic operations, reflecting the fusion of geometry and algebra. ③ Construction highlights: From the construction summary, commands such as Segment, Point, OrthogonalLine, Circle, Intersect, Ellipse, Angle, CurveCartesian, and Sequence are used. Multiple auxiliary points (e.g., P1-P4, Q1-Q4) and lines are defined to progressively establish the parametric relationships, finally plotting the curve with CurveCartesian and generating dynamic sequences with Sequence. ④ Suitable for high school or early college students, this example is ideal for exploring parametric curves, geometric construction, and mathematical aesthetics, serving as a mathematical experiment or art-mathematics lesson to understand how parametric equations can be derived from geometric constraints.

GeoGebra Commands & Parameters

  1. Segment(Q3, Q4) → p2
  2. Point(p2) → P3
  3. Segment(P3, Q4) → p4
  4. Point(p4) → P4
  5. Segment(Q1, Q2) → p1
  6. Point(p1) → P1
  7. Segment(P1, Q2) → p3
  8. Point(p3) → P2
  9. OrthogonalLine(C, yAxis) → zz1
  10. Circle(C, 0.62) → zz0
  11. Intersect(zz0, zz1, 1) → ZZ1
  12. Intersect(zz0, zz1, 2) → ZZ2
  13. Ellipse(ZZ1, ZZ2, 0.65) → zElipse1
  14. Intersect(zElipse1, zz1) → ZZ5, ZZ6
  15. Point(zElipse1) → XY
  16. Angle(ZZ6, C, XY) → zAngRot
  17. OrthogonalLine(C, xAxis) → zz2
  18. Intersect(zz0, zz2, 2) → ZZ3
  19. Intersect(zz0, zz2, 1) → ZZ4
  20. Ellipse(ZZ3, ZZ4, 0.65) → zElipse2
  21. Intersect(zElipse2, zz2) → ZZ7, ZZ8
  22. Point(zElipse2) → Z
  23. Angle(ZZ8, C, Z) → zAngInc
  24. Segment(Q5, Q6) → p5
  25. Point(p5) → P5
  26. Segment(ZZ5, ZZ6) → zz4
  27. Segment(ZZ7, ZZ8) → zz3
  28. Intersect(zElipse2, zElipse1, 1) → zPunto1
  29. Intersect(zElipse2, zElipse1, 4) → zPunto2
  30. Segment(zPunto1, zPunto2) → zSeg2
  31. CurveCartesian((r * ((((exp((f * u)) * (d + (a * cos(α)))) * cos((c * u))) * sin(zAngRot)) + (((exp((f * u)) * (d + (a * cos(α)))) * sin((c * u))) * cos(zAngRot)))), (r * ((((((-exp((f * u))) * (d + (a * cos(α)))) * cos((c * u))) * cos(zAngRot)) * sin(zAngInc)) + ((((exp((f * u)) * (d + (a * cos(α)))) * sin((c * u))) * sin(zAngRot)) * sin(zAngInc)) + ((exp((f * u)) * ((-1.4 * e) + (b * sin(α)))) * cos(zAngInc)))), u, u1, u2) → curva2
  32. CurveCartesian((r * ((((exp((f * β)) * (d + (a * cos(v)))) * cos((c * β))) * sin(zAngRot)) + (((exp((f * β)) * (d + (a * cos(v)))) * sin((c * β))) * cos(zAngRot)))), (r * ((((((-exp((f * β))) * (d + (a * cos(v)))) * cos((c * β))) * cos(zAngRot)) * sin(zAngInc)) + ((((exp((f * β)) * (d + (a * cos(v)))) * sin((c * β))) * sin(zAngRot)) * sin(zAngInc)) + ((exp((f * β)) * ((-1.4 * e) + (b * sin(v)))) * cos(zAngInc)))), v, v1, v2) → a1
  33. CurveCartesian((r * ((((exp((f * max)) * (d + (a * cos(v)))) * cos((c * max))) * sin(zAngRot)) + (((exp((f * max)) * (d + (a * cos(v)))) * sin((c * max))) * cos(zAngRot)))), (r * ((((((-exp((f * max))) * (d + (a * cos(v)))) * cos((c * max))) * cos(zAngRot)) * sin(zAngInc)) + ((((exp((f * max)) * (d + (a * cos(v)))) * sin((c * max))) * sin(zAngRot)) * sin(zAngInc)) + ((exp((f * max)) * ((-1.4 * e) + (b * sin(v)))) * cos(zAngInc)))), v, v1, v2) → curva1
  34. Sequence(CurveCartesian[(r * ((((exp((f * u)) * (d + (a * cos(v)))) * cos((c * u))) * sin(zAngRot)) + (((exp((f * u)) * (d + (a * cos(v)))) * sin((c * u))) * cos(zAngRot)))), (r * ((((((-exp((f * u))) * (d + (a * cos(v)))) * cos((c * u))) * cos(zAngRot)) * sin(zAngInc)) + ((((exp((f * u)) * (d + (a * cos(v)))) * sin((c * u))) * sin(zAngRot)) * sin(zAngInc)) + ((exp((f * u)) * ((-1.4 * e) + (b * sin(v)))) * cos(zAngInc)))), v, v1, v2], u, u1, u2, paso) → list2
  35. Sequence(CurveCartesian[(r * ((((exp((f * u)) * (d + (a * cos(v)))) * cos((c * u))) * sin(zAngRot)) + (((exp((f * u)) * (d + (a * cos(v)))) * sin((c * u))) * cos(zAngRot)))), (r * ((((((-exp((f * u))) * (d + (a * cos(v)))) * cos((c * u))) * cos(zAngRot)) * sin(zAngInc)) + ((((exp((f * u)) * (d + (a * cos(v)))) * sin((c * u))) * sin(zAngRot)) * sin(zAngInc)) + ((exp((f * u)) * ((-1.4 * e) + (b * sin(v)))) * cos(zAngInc)))), u, u1, u2], v, v1, v2, paso) → list1

AI Drawing Prompt Reference

Draw a shell-like curve resembling a Bellerophina concha. The curve is generated from intersections of ellipses and circles. Auxiliary points, circles, and ellipses are constructed to determine rotation angles. The parametric equation combines exponential functions, trigonometric functions, and angle parameters to produce a dynamic, shell-shaped figure. The construction order: first establish auxiliary points and circles to obtain intersection points; then construct ellipses and find their intersections; measure angles; finally plot the curve using parametric equations and generate a sequence. This geometric construction merges algebra and geometry to create an aesthetically pleasing parametric curve.
The prompt above was compiled from the original drawing commands and is for reference only.