Author: 藍邦偉  老師

f(x) = 2.0 * sin(x) + cos(2.0 * x) + 2.0
A = (0.74, 1.34)
a: y = y(A)
B = Point(a)
b: x = x(A)
c: x = x(B)
C = Point(b)
D: (x(B), y(C))
E = Point(b)
F: (x(B), y(E))
r = Segment(A, E)
d = Circle(A, r)
e = Circle(B, r)
g = Circle(D, r)
h = Circle(C, r)
G = Intersect(d, a, 1.0)
H = Intersect(e, a, 2.0)
I = Intersect(h, b, 1.0)
J = Intersect(g, c, 1.0)
i: y = y(C)
K = Intersect(h, i, 1.0)
L_1 = Intersect(g, i, 2.0)
j = Segment(C, D)
k = Segment(D, B)
l = Segment(B, A)
m = Segment(A, C)
n = Segment(C, I)
p = Segment(C, K)
q = Segment(K, G)
s = Segment(G, A)
t = Segment(B, F)
a_1 = Segment(B, H)
b_1 = Segment(H, L_1)
c_1 = Segment(L_1, D)
d_1 = Segment(D, J)
e_1 = Segment(J, I)
f_1 = Segment(E, F)
α = 2.007128639793479 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
β = 1.7453292519943295 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
O = (9.34, 1.78)
X_0: O + (cos(α), sin(α) * cos(β))
Y_0: O + (-sin(α), cos(α) * cos(β))
Z_0: O + (0.0, sin(β))
u = Vector(O, X_0)
v = Vector(O, Y_0)
w = Vector(O, Z_0)
L = 2.8 (slider from 1 to 5, step 0.1)
M = Dilate(X_0, L, O)
N = Dilate(Y_0, L, O)
P = Dilate(Z_0, L, O)
M' = Mirror(M, O)
P' = Mirror(P, O)
N' = Mirror(N, O)
z = Vector(M', M)
u_1 = Vector(N', N)
v_1 = Vector(P', P)
K_1: O + L * u + L * v
K_2: O - L * u + L * v
K_3: O - L * u - L * v
K_4: O + L * u - L * v
多邊形1, k_1, k_4, k_3, k_2 = Polygon(K_1, K_4, K_3, K_2)