g(x) = cos(x) + 2
P = Point(g)
hellinggrafiek = Derivative(g)
raaklijn = Tangent(P, g)
m = Slope(raaklijn)
b = OrthogonalLine(P, xAxis)
B = Intersect(xAxis, b)
C = Intersect(hellinggrafiek, b, (0.6599999999999997, -0.6131168519734336))