Angle difference between two bearings: Difference between revisions

Content added Content deleted
(→‎BQN: add)
(→‎BQN: simplify)
Line 1,735: Line 1,735:


=={{header|BQN}}==
=={{header|BQN}}==
<syntaxhighlight lang="bqn">Adiff ← 180 + ¯360 | 180 + -˜
<syntaxhighlight lang="bqn">Adiff ← 180 + ¯360 | 180 - -


tests ← [20‿45, ¯45 ‿45, ¯85 ‿90, ¯95 ‿90, ¯45 ‿125, ¯45 ‿145
tests ← [20‿45, ¯45 ‿45, ¯85 ‿90, ¯95 ‿90, ¯45 ‿125, ¯45 ‿145