IsVectorParallelTo

Compares two vectors to see if they are parallel.

Rhino.IsVectorParallelTo (arrVector1, arrVector2 [, dlbAngleTolerance])

arrVector1	Required. Array. The 3-D vector.
arrVector2	Required. Array. The 3-D vector to compare to.
dlbAngleTolerance	Optional. Number. The angle tolerance in radians. Of omitted, Rhino's default angle tolerance, PI/180.0, is used.

Number

The result of the comparison if successful. The possible results are as follows:

Value	Description
-1	The vectors are anti-parallel.
0	The vectors are not parallel.
1	The vectors are parallel.

Null

On error.

Dim arrVector1, arrVector2

arrVector1 = Array(1,0,0)

arrVector2 = Array(0,1,0)

MsgBox Rhino.IsVectorParallelTo arrVector1, arrVector2