f(x) = x^(2) + 1
A = Point(f)
B = Point(f)
a = Tangent(A, f)
b = Tangent(B, f)
C = Intersect(a, b)
α = Angle(B, C, A)
Dreieck, b_1, a_1, c_1 = Polygon(A, C, B)
Segment = IntegralBetween(((-(x(Line[A, B]) / y(Line[A, B]))) * x) - z(Line[A, B]) / y(Line[A, B]), f, x(A), x(B))
Anteil: Segment / Dreieck
text1: "Segment/Dreieck = " + Anteil + ""