circular_equilibrium_m Module

Definition of circular equilibrium, based on prescribed q-profile N.b. this equilibrium is axisymmetric - phi, when required, is not used


Uses

  • module~~circular_equilibrium_m~~UsesGraph module~circular_equilibrium_m circular_equilibrium_m module~constants_m constants_m module~circular_equilibrium_m->module~constants_m module~descriptors_m descriptors_m module~circular_equilibrium_m->module~descriptors_m module~elementary_functions_m elementary_functions_m module~circular_equilibrium_m->module~elementary_functions_m module~equilibrium_m equilibrium_m module~circular_equilibrium_m->module~equilibrium_m module~error_handling_m error_handling_m module~circular_equilibrium_m->module~error_handling_m module~params_equi_circular_m params_equi_circular_m module~circular_equilibrium_m->module~params_equi_circular_m module~precision_m precision_m module~circular_equilibrium_m->module~precision_m module~screen_io_m screen_io_m module~circular_equilibrium_m->module~screen_io_m module~status_codes_m status_codes_m module~circular_equilibrium_m->module~status_codes_m module~constants_m->module~precision_m module~descriptors_m->module~screen_io_m module~elementary_functions_m->module~precision_m module~equilibrium_m->module~precision_m module~error_handling_m->module~precision_m module~error_handling_m->module~screen_io_m module~error_handling_m->module~status_codes_m module~comm_handling_m comm_handling_m module~error_handling_m->module~comm_handling_m mpi mpi module~error_handling_m->mpi netcdf netcdf module~error_handling_m->netcdf module~params_equi_circular_m->module~error_handling_m module~params_equi_circular_m->module~precision_m module~params_equi_circular_m->module~screen_io_m module~params_equi_circular_m->module~status_codes_m iso_fortran_env iso_fortran_env module~params_equi_circular_m->iso_fortran_env iso_c_binding iso_c_binding module~precision_m->iso_c_binding module~precision_m->iso_fortran_env module~precision_m->mpi module~precision_m->netcdf module~screen_io_m->module~precision_m module~screen_io_m->iso_fortran_env module~screen_io_m->netcdf module~comm_handling_m->mpi

Used by

  • module~~circular_equilibrium_m~~UsedByGraph module~circular_equilibrium_m circular_equilibrium_m module~equilibrium_factory_m equilibrium_factory_m module~equilibrium_factory_m->module~circular_equilibrium_m module~polar_grid_m polar_grid_m module~polar_grid_m->module~circular_equilibrium_m module~testfunctions_m testfunctions_m module~testfunctions_m->module~circular_equilibrium_m module~polar_grid_s polar_grid_s module~polar_grid_s->module~polar_grid_m module~polar_map_factory_m polar_map_factory_m module~polar_map_factory_m->module~polar_grid_m module~zonal_averages_factory_m zonal_averages_factory_m module~zonal_averages_factory_m->module~polar_grid_m program~benchmark_helmholtz_solvers benchmark_helmholtz_solvers program~benchmark_helmholtz_solvers->module~equilibrium_factory_m program~benchmark_helmholtz_solvers->module~testfunctions_m program~diagnose_poincare diagnose_poincare program~diagnose_poincare->module~equilibrium_factory_m program~test_diffusion test_diffusion program~test_diffusion->module~equilibrium_factory_m

Derived Types

type, public, extends(equilibrium_t) ::  circular_t

Components

Type Visibility Attributes Name Initial
logical, public :: initialized = .false.
real(kind=FP), public :: x0

Magnetic axis x = R/R0 (in normalised units)

real(kind=FP), public :: y0

Magnetic axis y = Z/R0 (in normalised units)

real(kind=FP), public :: phi0 = 0.0_FP

Magnetic axis phi

real(kind=FP), public :: xmin

Box limits

real(kind=FP), public :: xmax

Box limits

real(kind=FP), public :: ymin

Box limits

real(kind=FP), public :: ymax

Box limits

real(kind=FP), public :: rhomax

Global limits for rho (rho = normalised psi, n.b. there may also be region-specific limits defined in equi)

real(kind=FP), public :: rhomin

Global limits for rho (rho = normalised psi, n.b. there may also be region-specific limits defined in equi)

real(kind=FP), public :: rho_limiter

Type-Bound Procedures

procedure, public, pass(self) :: absb
procedure, public, pass(self) :: bpol
procedure, public :: init
procedure, public :: display
procedure, public :: debug
procedure, public :: is_axisymmetric
procedure, public :: rho
procedure, public :: bx
procedure, public :: by
procedure, public :: btor
procedure, public :: jacobian
procedure, public :: epol
procedure, public :: erad
procedure, public :: district
procedure, public :: in_vessel
procedure, public :: mag_axis_loc
procedure, public :: qval
procedure, public, nopass :: theta