玫瑰之名：用曲线与切线刻画的几何面积构型

GeoGebra 命令及参数

1. Sequence(Surface[(((1 + (c * (-1)^(i))) * cos((i * π / n) + (u * g(v)))) * f(v)), (((1 + (c * (-1)^(i))) * sin((i * π / n) + (u * g(v)))) * f(v)), (e * sin(v)), u, ((-π)) / n, π / n, v, -1.5708, 1.5708], i, 1, (2 * n)) → liste1
2. Surface((((c + 1.05) * cos(u)) * cos(v)), (((c + 1.05) * sin(u)) * cos(v)), (e * sin(v)), u, -3.14159, 3.141592653589793, v, -1.5708, -0.5) → e_1
3. Sequence(Surface[(((a + (c * (-1)^(i))) * cos(((i * 1.1) * π / n) + (u * g(v)))) * f(v)), (((a + (c * (-1)^(i))) * sin(((i * 1.1) * π / n) + (u * g(v)))) * f(v)), (e * sin(v)) - a / 5, u, ((-π)) / n, π / n, v, -1.5708, 1.5708], i, 1, (2 * n)) → l1
4. Sequence(Surface[(((a + (c * (-1)^(i))) * cos(((i * 1.1) * π / n) + (u * g(v)))) * h(v)), (((a + (c * (-1)^(i))) * sin(((i * 1.1) * π / n) + (u * g(v)))) * h(v)), (e * sin(v)) + a / 5, u, ((-π)) / n, π / n, v, -1.5708, 1.5708], i, 1, (2 * n)) → l2
5. Sequence(Surface[(((a / 2 + (c * (-1)^(i))) * cos(((i * 1.1) * π / n) + (u * g(v)))) * p(v)), (((a / 2 + (c * (-1)^(i))) * sin(((i * 1.1) * π / n) + (u * g(v)))) * p(v)), (e * sin(v)) + a / 1.5, u, ((-π)) / n, π / n, v, -1.5708, 1.5708], i, 1, (2 * n)) → l3
6. Sequence(Surface[(((a / 1.25 + (c * (-1)^(i))) * cos((i * π / n) + (u * g(v)))) * q(v)), (((a / 1.25 + (c * (-1)^(i))) * sin((i * π / n) + (u * g(v)))) * q(v)), (e * sin(v)) + a / 2, u, ((-π)) / n, π / n, v, -1.5708, 1.5708], i, 1, (2 * n)) → l4
7. Surface(x(O) + (((1.2 * j) * sin(i°)) * cos(((0.5 * m) * i°))), y(O) + (((1.2 * j) * cos(i°)) * cos(((0.5 * m) * i°))), z(O) + ((0.5 * (j - 1)) * cos(((0.5 * m) * i°))^(2)) + 0.25, i, 0, 720, j, 0, 1.8) → b
8. Segment(O, O - (0, 0, 5)) → i