A = Intersect(xAxis, yAxis)
B = (0, 1)
c = Circle(A, B)
a = Segment(A, B)
n = 12 (slider from 1 to 24, step 1)
cuts = Sequence(Segment[A, Rotate[B, ((i * 360) * ° / n), A]], i, 1, n - 1)