vect_prod


Returns the vectorial product of two vectors.


Location in HEALPix directory tree: src/f90/mod/pix_tools.f90


FORMAT

call vect_prod( v1, v2, v3 )


ARGUMENTS

name&dimensionality kind in/out description
       
v1(3) DP IN cartesian vector $ \bf v_{1}^{}$.
v2(3) DP IN cartesian vector $ \bf v_{2}^{}$.
v3(3) DP OUT cartesian vector $ \bf v_{3}^{}$ = $ \bf v_{1}^{}$×$ \bf v_{2}^{}$


EXAMPLE:

use healpix_types
use pix_tools, only : vect_prod
real(DP), dimension(3) :: vec
real(DP) :: one = 1.0_dp
call vect_prod((/2,0,0/)*one, (/0,1,0/)*one, vec)
print*, vec

will return : 0.00E+000 0.00E+000 2.00


RELATED ROUTINES

This section lists the routines related to vect_prod


angdist
computes the angular distance between 2 vectors

Eric Hivon 2003-02-07