Rastro

Intervalo

d = 1.5 (slider from -5 to 5, step 0.1)
c0 = 8.6 (slider from -5 to 10, step 0.1)
t = 0.0080 (slider from 0 to 1, step 0.0010)
A = (2.6, 3.68)
f(x) = 1.7 * sin(3.0 * x + 17.2 - 0.7 * 3.141592653589793) + 1.3 * sin(1.5 * x + 8.6 - 0.7 * 3.141592653589793) + 1.25 * sin((3.0 * x + 17.2) / 3.0 - 0.5 * 3.141592653589793)
f'(x) = f'(x)
A0 = Point(xAxis)
b0 = Ray(A0, A0 + (1.0, 0.0))
B0 = (17.42, 0)
C0: (x(B0 - A0) * t + x(A0), f(x(B0 - A0) * t + x(A0)))
B = (5.6, 3.68)
a = Segment(A, B)
C = Point(a)
D: C + (0.0, 1.0)
E: C + (0.0, -1.0)
c = Ray(C, E)
b = Ray(C, D)
F = Intersect(f, c, (3.6229508196721323, 1.5216264061361848))
G = Intersect(f, b, (3.8229508196721316, 2.3497717030499903))
lugar1 = Locus(F, C)
lugar2 = Locus(G, C)
e = Tangent(C0, f)
h = Line(C0, xAxis)
H: C0 + (1.0, 0.0)
i = OrthogonalLine(H, h)
I = Intersect(e, i)
α = Angle(H, C0, I)
H0 = (-3.3000000000000003, 3.46)
nada = -3.1 (slider from -5 to 5, step 0.1)
g = false
CC: C0
j = false
w: sqrt(4.0 * y(H0 - C0)) * cos(α)
dif: x(Corner[4.0] - A0)