Length of an arc between two angles
sub arc ( \r, \a1, \a2 ) { r × (τ - abs(a2 - a1)) }
sub postfix:<°> (\d) { d × τ / 360 }
say arc(10, 10°, 120°), ' engineering units';
Output:
43.63323129985824 engineering units
sub arc ( \r, \a1, \a2 ) { r × (τ - abs(a2 - a1)) }
sub postfix:<°> (\d) { d × τ / 360 }
say arc(10, 10°, 120°), ' engineering units';
43.63323129985824 engineering units