create_equilibrium Subroutine

public subroutine create_equilibrium(res, identifier, filename, dbgout)

Creates the selected equilibrium specified by identifier

Arguments

Type IntentOptional Attributes Name
class(equilibrium_t), intent(out), allocatable :: res

Created equilibrium type
integer, intent(in) :: identifier

Integer specifying the equilibrium to create (see header)
character(len=*), intent(in), optional :: filename

Parameter file to read properties of the equilibrium from, if no parameter file is provided the equilibrium is initialized to default values. Default initialization is only allowed for CARTHY, CERFONS and CIRCULAR equilibria. The default initialization is suitable for unit testing.
integer, intent(in), optional :: dbgout

Integer specifying what equilibrium information to write to stdout

Calls

proc~~create_equilibrium~~CallsGraph proc~create_equilibrium create_equilibrium debug debug proc~create_equilibrium->debug display display proc~create_equilibrium->display init init proc~create_equilibrium->init proc~handle_error handle_error proc~create_equilibrium->proc~handle_error proc~is_master is_master proc~create_equilibrium->proc~is_master none~handle_error error_handler_t%handle_error proc~handle_error->none~handle_error mpi_comm_rank mpi_comm_rank proc~is_master->mpi_comm_rank

Called by

proc~~create_equilibrium~~CalledByGraph proc~create_equilibrium create_equilibrium program~benchmark_helmholtz_solvers benchmark_helmholtz_solvers program~benchmark_helmholtz_solvers->proc~create_equilibrium program~diagnose_poincare diagnose_poincare program~diagnose_poincare->proc~create_equilibrium program~test_diffusion test_diffusion program~test_diffusion->proc~create_equilibrium