a = CurveCartesian(4 cos(t) + 2 cos(2 t), 4 sin(t) + 2 sin(2 t), t, 0, 6.283185307179586)
t = 0.4 (slider from 0 to 6.283185307179586, step 0.01)
P: (4 cos(t) + 2 cos(2 t), 4 sin(t) + 2 sin(2 t))
raaklijn = Tangent(P, a)
u = Direction(raaklijn)
B = Translate(P, u)
v = Vector(P, B)
c = OrthogonalLine(B, xAxis)
d = OrthogonalLine(P, yAxis)
A = Intersect(c, d)
x' = Segment(P, A)
y' = Segment(B, A)
O = Intersect(xAxis, yAxis)
w = Vector(O, P)