12

11

10

9

1

2

3

4

5

6

7

8

EL RELOJ





NUEVO TIEMPO

m = 2 (slider from 1 to 9, step 1)
A15 = Random(0, 43200 + 0 * m)
A16: floor(A15 / 3600)
B16: floor((A15 - A16 * 3600) / 60)
C16: A15 - A16 * 3600 - B16 * 60
B17: (B16 * 6 + C16 / 10)°
A = (10.33495334494696, -1.1376122107295306)
D: A + (0, 4)
C: A + (0, 3.2)
C17: (C16 / 60 * 360)°
A17: (A16 * 30 + B16 / 2 + C16 / 60)°
B: A + (0, 2.7)
α: A17
β: B17
γ: C17
r6 = Circle(A, 0.05)
C' = Rotate(C, -C17, A)
t7, t1 = Tangent(C', r6)
Z = Intersect(r6, t7)
F = Dilate(Z, 1.15, C')
X = Intersect(r6, t1)
E = Dilate(X, 1.15, C')
r7 = Circle(A, 0.15)
D' = Rotate(D, -B17, A)
t3, t6 = Tangent(D', r7)
J = Intersect(r7, t3)
M = Dilate(J, 1.1, D')
H = Intersect(r7, t6)
N = Dilate(H, 1.1, D')
r1 = Circle(A, 5)
r2 = Circle(A, 4.3)
Li2 = Sequence(Rotate[D, 6° * i, A], i, 1, 59)
tg1, d10, d11, d13 = Polygon(F, E, C')
tg2, d4, d6, d3 = Polygon(D', N, M)
r8 = Circle(A, 0.2)
B' = Rotate(B, -A17, A)
t8, t2 = Tangent(B', r8)
K = Intersect(r8, t8)
L = Intersect(r8, t2)
G = Dilate(K, 1.12, B')
I = Dilate(L, 1.12, B')
tg3, d7, d2, d1 = Polygon(I, G, B')
DA = Rotate(D, 30*°, A)
DB = Rotate(DA, 30*°, A)
DC = Rotate(DB, 30*°, A)
DD = Rotate(DC, 30*°, A)
DE = Rotate(DD, 30*°, A)
DF = Rotate(DE, 30*°, A)
DG = Rotate(DF, 30*°, A)
DH = Rotate(DG, 30*°, A)
DI = Rotate(DH, 30*°, A)
DJ = Rotate(DI, 30*°, A)
DK = Rotate(DJ, 30*°, A)
r3 = Circle(A, 5.1)
z1 = Semicircle(I, G)
z2 = Semicircle(I, G)
O = Intersect(r3, r2)
t4 = Line(D, DF)
P, Q = Intersect(r3, t4)
t5 = OrthogonalLine(Q, t4)
R: Q + (-3, 0)
S: Q + (3, 0)
T: Q + (-3, -1.5)
U: Q + (3, -1.5)
V = Midpoint(T, R)
W = Midpoint(U, S)
r4 = Circle(V, R)
r5 = Circle(W, S)
tg4, d9, d5, d8, d12 = Polygon(T, R, S, U)
z3 = Semicircle(T, R)
z4 = Semicircle(S, U)
A18 = If(A16 < 10, "0" + A16, "" + A16)
B18 = If(B16 < 10, "0" + B16, "" + B16)
C18 = If(C16 < 10, "0" + C16, "" + C16)
vbc: "$\doublebox{" + (LaTeX[A18]) + " :" + (LaTeX[B18]) + " :" + (LaTeX[C18]) + "} $"
a: α ≟ A17
b: β ≟ B17
c: γ ≟ C17
c2 = true