Angle difference between two bearings: Difference between revisions
Content added Content deleted
(Angle difference between two bearings in PureBasic) |
|||
Line 1,694: | Line 1,694: | ||
---------- ANGLE DIFFERENCE BETWEEN TWO BEARINGS --------- |
---------- ANGLE DIFFERENCE BETWEEN TWO BEARINGS --------- |
||
⚫ | |||
angleBetweenDegrees = degrees . bearingDelta . join bimap radians |
|||
bearingDelta :: (Radians, Radians) -> Radians |
bearingDelta :: (Radians, Radians) -> Radians |
||
Line 1,709: | Line 1,706: | ||
| otherwise = -1 |
| otherwise = -1 |
||
⚫ | |||
angleBetweenDegrees = |
|||
degrees |
|||
. bearingDelta |
|||
. join bimap radians |
|||
--------------------------- TEST ------------------------- |
--------------------------- TEST ------------------------- |