Sourceval norm_angle : float -> float Sourceval within : float -> float -> float -> bool Sourcetype curve = | Segment of pt * pt| Circle of pt * float| Arc of pt * float * float * float
Sourceval arc_ends : pt -> float -> float -> float -> pt * pt