r = 6.3 (slider from 0 to 10, step 0.1)
v = 4.9 (slider from 0 to 10, step 0.1)
M = Intersect(xAxis, yAxis)
c = Circle(M, r)
P = Point(c)
C = Point(c)
α = Angle(C, M, P)
B: (r; α)
d = Circle(B, ((cos(α) * v)^(2.0))^(1.0 / 2.0))
a = OrthogonalLine(B, yAxis)
A = Intersect(a, yAxis)
A' = Rotate(A, 90.0*°, B)
β = Angle(A, B, A')
b = Segment(B, A')
D = Intersect(d, b, 1.0)
V_s = Vector(B, D)
e = Circle(B, v)
f = Segment(B, M)
g = OrthogonalLine(B, f)
E = Intersect(e, g, 2.0)
V = Vector(B, E)
V_w = Vector(D, E)