[Pharo-users] Calculate angle between two vectors (probably @Igor :)
siguctua at gmail.com
Wed Mar 19 09:52:45 EDT 2014
On 16 March 2014 17:01, MartinW <wm at fastmail.fm> wrote:
> i probably made some embarassing mistake, but as i cannot find it, i ask
> to have a look at this method.
> It should calculate the angle between two vectors. And vectors are
> of Point (perhaps here is already a misconception?).
> It is used in my flocking simulation PharoBoids
> Here is my version of the method:
> angleBetween: vector1 and: vector2 onError: aBlock
> | cosinusOfAngle innerProductOfVectors productOfVectorsLengths|
> innerProductOfVectors := (vector1 dotProduct: vector2).
> productOfVectorsLengths := (vector1 r) * (vector2 r).
> productOfVectorsLengths = 0 ifTrue: [ ^ aBlock value ].
> cosinusOfAngle := innerProductOfVectors / productOfVectorsLengths.
> ^ cosinusOfAngle arcCos
> But my Boids behave wrong when i use it. I found another implementation of
> the same problem by Igor Stasenko which works and looks like this:
> angleBetween: p1 and: p2 ifDegenerate: aBlock
> " Calculate an angle (in radians) between two vectors.
> Evaluate a block, in case if calculation not possible because one of the
> vectors has zero length "
> | x1 y1 x2 y2 dot2 n2 |
> x1 := p1 x.
> y1 := p1 y.
> x2 := p2 x.
> y2 := p2 y.
> dot2 := x1 * x2 + (y1 * y2).
> dot2 := dot2 * dot2.
> n2 := (x1*x1 + (y1*y1)) * (x2*x2 + (y2*y2)).
> n2 = 0 ifTrue: [ ^ aBlock value ].
> ^ (dot2 / n2) arcCos
> Can anybody explain the problem of my method? M.
> yours looks correct.
i'm just using squares to avoid taking square roots of vector lengths.
> View this message in context:
> Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
-------------- next part --------------
An HTML attachment was scrubbed...
More information about the Pharo-users