ω = Circle((0, 0), 1)
A = PointIn(Circle[(0, 0), 1])
B = PointIn(Circle[(0, 0), 1])
a = Line((0, 0), A)
b = Line((0, 0), B)
p1 = OrthogonalLine(A, Line[(0, 0), A])
p2 = OrthogonalLine(B, Line[(0, 0), B])
O3 = Intersect(p1, p2)
Ideál = Circle(O3, A)