Re: Fw: Distance between 2 points
- Posted by Hawke <mdeland at NWINFO.NET> Sep 30, 1998
- 563 views
Ralf Nieuwenhuijsen wrote: > >Hello, > >Does any1 know how to calulate the distance and angle from > >point A to point B given their coordinates. > >Thanks > function sum (object x) > integer result > if sequence (x) then > result = 0 > for index = 1 to length(x) do > result = result + sum (x[index]) > end for > return result > else return x > end for > end function > function distance (sequence a, sequence b) > return sqrt(sum(power(a - b,2))) > end function try this instead. 1 function call vs 3, should be worlds faster for atoms and sequences both, i think... function distance(object a, object b) return sqrt( (a*a)+(b*b) ) end function and something that should be benchmarked against the above 2 distance() functions as well should be: function distance(object a, object b) return power( (a*a)+(b*b),0.5 ) end function to see if power is faster than sqrt. will work on angle later... --Hawke' p.s. see carl? i learning :>