三角形绕边旋转

GeoGebra 命令及参数

1. Vector(B_1, Y) → v
2. Vector(B_1, Z) → w
3. Vector(B_1, X) → u
4. OrthogonalLine(View3D, yAxis) → a
5. OrthogonalLine(View3D, xAxis) → b
6. Sequence((x(O), y(O)) - h / 2.0 * (sin(0.0) * sin(i) * w + cos(0.0) * sin(i) * w - d * cos(i) * v), i, 0.0, 6.283185307179586, 3.141592653589793 / Intensity) → liste1
7. Translate(O, Vector[h / 2.0 * u]) → O'_1
8. Mirror(O'_1, O) → O''
9. Mirror(O, O'_1) → O'_2
10. Mirror(O, O'') → O'
11. Segment(O', O'_2) → i
12. CurveCartesian(x(O - h / 2.0 * (0.0 * sin(i°) * w + sin(i°) * w - d * cos(i°) * v)), y(O - h / 2.0 * (0.0 * sin(i°) * w + sin(i°) * w - d * cos(i°) * v)), i, 0.0, 360.0) → e
13. Point(i) → A
14. Point(i) → C
15. Polygon(B, A, C) → poly1, c_1, b_1, a_1
16. Sequence(Segment[Element[liste1, i], A], i, 1.0, Length[liste1]) → liste2
17. Sequence(Segment[Element[liste1, i], C], i, 1.0, Length[liste1]) → liste3