;+ ; NAME: ; angle_get.pro ; ; ; ; PURPOSE: ; return the angle between two vectors ; ; ; ; INPUTS: ; a: first vector ; b: second vector ; ; ; ; OUTPUTS: ; the angle in radians ; ; ; ; EXAMPLE: ; ans = angle_get([1,1,1],[2,2,2]) ; ; ; MODIFICATION HISTORY: ; ; Mon Jul 8 11:43:31 2002, Brian Larsen ; ; Started and written ; ;- FUNCTION angle_get, a, b compile_opt strictarr return, (acos(dot(a,b)/(mag(a)*mag(b)))); END