Subroutine cross

Next: Subroutine assign_atom_pairs Up: Module Ewald_module Previous: Subroutine add_dmadelung_matrix_dr Contents Index

Subroutine `cross_3`

$\begin{boxedminipage}{\textwidth} \begin{verbatim}call cross_3(a,b,c)\end{verbatim} \end{boxedminipage}$

Calculate cross product of 2 3-vectors. a(3), b(3): vectors to be crossed, c(3): cross product.

a -- real(dp), dimension(3)

b -- real(dp), dimension(3)

c -- real(dp), dimension(3)

assign_atom_pairs subroutine

gabor 2009-06-30