r: 3
cordaPosAng: ((π * 2)) / 3
δ: π / 12
βV = 0 (slider from 0 to (2 * π) - δ, step δ)
C = Intersect(xAxis, yAxis)
crc = Circle(C, r)
CX: (0, r)
Vertice = Rotate(CX, βV, C)
CordaB = Rotate(CX, (-cordaPosAng), C)
CordaA = Rotate(CX, cordaPosAng, C)
cordaSeg = Segment(CordaA, CordaB)
rettaA = Rotate(Line[CordaA, CX], βV / 2, CordaA)
rettaB = Rotate(Line[CordaB, CX], βV / 2, CordaB)