Documentation for module pint_pile

Methods to apply a simple Lagevin thermostat to PI runs. v_new = c1*vold + SQRT(kT/m)*c2*random

source: pint_pile.F
Loading...

public Subroutines/Functions:

...
...
...
...

SUBROUTINEpint_calc_pile_energy(pint_env)

...

Arguments:
POINTER
:: pint_env ...

SUBROUTINEpint_pile_init(pile_therm, pint_env, normalmode_env, section)

...

Arguments:
POINTER
:: pile_therm ...
POINTER
:: pint_env ...
POINTER
:: normalmode_env ...
POINTER
:: section ...

SUBROUTINEpint_pile_release(pile_therm)

...

Arguments:
POINTER
:: pile_therm ...

SUBROUTINEpint_pile_step(vold, vnew, p, ndim, first_mode, masses, pile_therm)

...

Arguments:
REAL(dp),
POINTER
:: vold(:,:) ...
REAL(dp),
POINTER
:: vnew(:,:) ...
INTEGER,
INTENT(in)
:: p ...
INTEGER,
INTENT(in)
:: ndim ...
INTEGER,
INTENT(in)
:: first_mode ...
REAL(dp),
INTENT(in)
:: masses(:,:) ...
POINTER
:: pile_therm ...