Zissoide anzeigen

M = Point(xAxis)
r = Length(Vector[Vector[(0.0, 0.0), M]])
c = Circle(M, r)
a: 1.0 x = 2.0 * r
A = Point(a)
b = Line((0.0, 0.0), A)
S, K = Intersect(c, b)
l = Length(Vector[Vector[(0.0, 0.0), K]])
d = Circle(A, l)
P, E = Intersect(d, b)
e = CurveCartesian(2.0 * r * t^(2.0) / (1.0 + t^(2.0)), 2.0 * r * t^(3.0) / (1.0 + t^(2.0)), t, -5.0, 5.0)
f = true