Ha 2016

A = (-5, 1)
B = (-3, 5)
C: (2, 2)
u = Vector(A, B)
v = Vector(B, C)
t = 0.4 (slider from 0 to 1, step 0.1)
f = Segment(A, B)
g = Segment(B, C)
c = Circle(A, (t * f))
d = Circle(B, (t * g))
D = Intersect(c, f)
E = Intersect(d, g)
w = Vector(D, E)
h = Segment(D, E)
e = Circle(D, (t * h))
P = Intersect(e, h)
b_2(x) = x^(2)
b_0(x) = (1 - x)^(2)
b_1(x) = ((2 * x) * (1 - x))
F = Intersect(b_0, yAxis, 1)
G = Point(b_2)
H = Intersect(b_0, b_1, 2)
I = Intersect(b_2, b_1, 1)
Vieleck1, i, h_1, g_1, f_1 = Polygon(I, H, G, F)
Bezier = CurveCartesian((b_0(t) * x(A)) + (b_1(t) * x(B)) + (b_2(t) * x(C)), (b_0(t) * y(A)) + (b_1(t) * y(B)) + (b_2(t) * y(C)), t, 0, 1)
bezierOrt = Locus(P, t)