Segmento col raggio come parametro.
Il primo estremo funziona da centro, attorno a cui 
ruota il secondo.
Per simulare il pendolo: muovere l'estremo ruotante.

L = 3.5 (slider from 0 to 10, step 0.1)
A = (0.24, 3.18)
B = Point(Circle[A, L])
a = Segment(A, B)