coefficients Module


Uses

  • module~~coefficients~~UsesGraph module~coefficients coefficients ieee_arithmetic ieee_arithmetic module~coefficients->ieee_arithmetic module~constants constants module~coefficients->module~constants module~fieldline_mod fieldline_mod module~coefficients->module~fieldline_mod module~fieldline_mod->module~constants

Used by

  • module~~coefficients~~UsedByGraph module~coefficients coefficients program~main main program~main->module~coefficients

Functions

public function calc_finite_boundary_layer_correction(flock, field, R, dr_dAtheta) result(Lambda_S)

Finite boundary layer correction Lambda_S to the bootstrap current.

Read more…

Arguments

Type IntentOptional Attributes Name
type(flock_of_fieldlines_t), intent(in) :: flock
class(field_t), intent(in) :: field
real(kind=dp), intent(in) :: R

major radius in metres

real(kind=dp), intent(in) :: dr_dAtheta

e.g. from calc_gradient_scaling_factor_r_eff

Return Value real(kind=dp)

public function calc_gradient_scaling_factor_r_eff(flock, psi_tor_edge, sign_sqrtg) result(dr_dAtheta)

Scaling factor dr/dA_theta for choice of effective radius

Read more…

Arguments

Type IntentOptional Attributes Name
type(flock_of_fieldlines_t), intent(in) :: flock
real(kind=dp), intent(in) :: psi_tor_edge

total toroidal flux at the plasma edge in Weber

integer, intent(in) :: sign_sqrtg

sign of the Boozer Jacobian: +1 or -1

Return Value real(kind=dp)

public function calc_nu_star_crit(flock, R) result(nu_star_crit)

Critical collisionality marking the lower limit of validity for the asymptotic model. Collisionality is defined by major radius R.

Arguments

Type IntentOptional Attributes Name
type(flock_of_fieldlines_t), intent(in) :: flock
real(kind=dp), intent(in) :: R

major radius in metres

Return Value real(kind=dp)


Subroutines

public subroutine calc_offset_coefficients(flock, R, dr_dAtheta, Lambda_A, Lambda_B)

Compute offset coefficients Lambda_A and Lambda_B.

Read more…

Arguments

Type IntentOptional Attributes Name
type(flock_of_fieldlines_t), intent(in) :: flock
real(kind=dp), intent(in) :: R

major radius in metres

real(kind=dp), intent(in) :: dr_dAtheta

defining the surface label r

real(kind=dp), intent(out) :: Lambda_A
real(kind=dp), intent(out) :: Lambda_B