Subroutine rigidbodymodel

Next: Subroutine rigidbodymodel_finalise Up: Module rigidbody_module Previous: Interface print Contents Index

Subroutine `rigidbodymodel_initialise`

$\begin{boxedminipage}{\textwidth} \begin{verbatim}call rigidbodymodel_initialise(this,at)\end{verbatim} \end{boxedminipage}$

Initialise a RigidBodyModel:

Calculates total mass.
Shifts the centre of mass to the origin.
Calculates moments of inertia and rotates the atoms so that the principal axes. lie along cartesian directions.
Finds two reference directions which are not (anti)parallel.

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

at -- type(Atoms), intent(in)

rigidbodymodel_finalise subroutine

gabor 2009-06-30