next up previous contents index
Next: Subroutine zero_angular_momentum Up: Module dynamicalsystem_module Previous: Subroutine reinitialise_velo_normal   Contents   Index

Subroutine zero_momentum


\begin{boxedminipage}{\textwidth}
\begin{verbatim}call zero_momentum(this[,indices])\end{verbatim}
\end{boxedminipage}

Change velocities to those that the system would have in the zero momentum frame. Optionalally zero the total momentum of a subset of atoms, specified by indices.

this -- type(DynamicalSystem), intent(inout)

indices -- integer, optional, dimension(:), intent(in)

zero_angular_momentum subroutine

gabor 2009-06-30