表面与棱柱

GeoGebra 命令及参数

1. Point(b) → A
2. Vector((0, 0), (1, 0)) → u
3. Ray(A, u) → c
4. Point(c) → B
5. Vector((0, 0), (0, 1)) → v
6. Point(a) → C
7. Ray(C, v) → d
8. Point(d) → D
9. Segment(D, G) → e
10. Segment(C, E) → g
11. Segment(E, A) → h
12. Segment(F, B) → i
13. Segment(G, H) → j
14. Segment(H, F) → k_1
15. Segment(F, E) → l
16. Segment(E, G) → m
17. Sequence(Segment[(x(E), y(E) + (t * (y(G) - y(E)) / n)), (x(F), y(E) + (t * (y(G) - y(E)) / n))], t, 1, n) → list1
18. Sequence(Segment[(x(E) + (t * (x(F) - x(E)) / n), y(E)), (x(E) + (t * (x(F) - x(E)) / n), y(G))], t, 1, n) → list2
19. Mod(k, n) → jj
20. Polygon(I, (x(I) + (x(F) - x(E)) / n, y(I)), (x(I) + (x(F) - x(E)) / n, y(I) + (y(G) - y(E)) / n), (x(I), y(I) + (y(G) - y(E)) / n)) → poly1, i_1, p, q, r
21. Prism(poly1, f(x(I), y(I))) → o, J, edgeIJ, edge1, edge2, edge3, edgeJK, edgeKL, edgeLM, edgeJM, K, L, M, face1, face3, face4, face2, faceJKLM
22. Sequence(Sequence[Prism[Polygon[(x(E) + (t * (x(F) - x(E)) / n), y(E) + (s * (y(G) - y(E)) / n)), (x(E) + ((t + 1) * (x(F) - x(E)) / n), y(E) + (s * (y(G) - y(E)) / n)), (x(E) + ((t + 1) * (x(F) - x(E)) / n), y(E) + ((s + 1) * (y(G) - y(E)) / n)), (x(E) + (t * (x(F) - x(E)) / n), y(E) + ((s + 1) * (y(G) - y(E)) / n))], f(x(E) + (t * (x(F) - x(E)) / n), y(E) + (s * (y(G) - y(E)) / n))], s, 0, n - 1], t, 0, n - 1) → list3, {{5.040634849275378, 5.222719616182059, 5.535827348675121, 5.979958046754571, 6.555111710420408}, {4.853204377868443, 5.035289144775126, 5.348396877268191, 5.792527575347633, 6.36768123901347}, {4.541488460180978, 4.723573227087656, 5.036680959580726, 5.480811657660173, 6.055965321326014}, {4.105487096212984, 4.287571863119662, 4.600679595612727, 5.0448102936921835, 5.619963957357996}, {3.5452002859644463, 3.727285052871138, 4.0403927853641814, 4.484523483443652, 5.059677147109483}}
23. Surface(u_{1}, v_{1}, f(u_{1}, v_{1}), u_{1}, x(A), x(B), v_{1}, y(C), y(D)) → t
24. Length(list3) → w