Tuuline

Tuulevaikne

A = Point(yAxis)
B = Point(xAxis)
c = Circle(A, B)
C = (2.54, -0.28)
d = Circle(A, C)
D = Point(d)
E = Intersect(c, yAxis, 1)
G = Intersect(c, yAxis, 2)
I = Intersect(c, xAxis, 2)
K = Point(c)
t1, k, a, d_1 = Polygon(A, D, K)
L = (0, 0)
M = Point(Circle[L, Segment[A, D]])
N: L + Rotate[K - A, arg(M - L) - arg(D - A)]
t2, n, l, m = Polygon(L, M, N)
O = (0, 0)
P = Point(Circle[O, Segment[A, D]])
Q: O + Rotate[K - A, arg(P - O) - arg(D - A)]
t3, q, o, p = Polygon(O, P, Q)
R = (0, 0)
S = Point(Circle[R, Segment[A, D]])
T: R + Rotate[K - A, arg(S - R) - arg(D - A)]
t4, t, r, s = Polygon(R, S, T)
U = (0, 0)
V = Point(Circle[U, Segment[A, D]])
W: U + Rotate[K - A, arg(V - U) - arg(D - A)]
t5, w, u, v = Polygon(U, V, W)
F = Point(yAxis)
f = Segment(A, F)