Angle difference between two bearings: Difference between revisions

m
Line 2,111:
define s1 = 0, s2 = 0
 
dim b1[20, -45, -85, -95, -45, -45, -45, -45, 29.4803, -78.3251]
dim b2[45, 45, 90, 90, 125, 145, 125, 145, -88.6381, -159.036]
 
arraysize s1, b1
Line 2,133:
next i
 
endif</syntaxhighlight>
 
end</syntaxhighlight>
{{out| Output}}
<pre>bearing 1: 20 bearing 2: 45 difference: 25
Line 2,141 ⟶ 2,139:
bearing 1: -85 bearing 2: 90 difference: 175
bearing 1: -95 bearing 2: 90 difference: -175
bearing 1: -45 bearing 2: 125 difference: 170
bearing 1: -45 bearing 2: 145 difference: -170
bearing 1: -45 bearing 2: 125 difference: 170
bearing 1: -45 bearing 2: 145 difference: -170
305

edits