set_equilibrium_pointer Subroutine

private subroutine set_equilibrium_pointer(settings)

Selects the submodule based on the specified equilibrium in the parfile. Works on a case-select basis.

Warning

Throws an error if the equilibrium type is not recognised.

Arguments

Type	Intent	Optional	Attributes		Name
type(settings_t),	intent(in)			::	settings

Contents

None