neoclassical_terms Module

Uses

- debug_flags

Variables

Type	Visibility	Attributes		Name		Initial
logical,	public		::	include_neoclassical_terms
integer,	private		::	nradii
real,	private		::	drho
integer,	private		::	neo_option_switch
integer,	private,	parameter	::	neo_option_sfincs	=	1
real,	public,	dimension(:, :, :), allocatable	::	dfneo_dzed
real,	public,	dimension(:, :, :), allocatable	::	dfneo_dvpa
real,	public,	dimension(:, :, :), allocatable	::	dfneo_drho
real,	public,	dimension(:, :, :), allocatable	::	dfneo_dalpha
real,	public,	dimension(:, :), allocatable	::	dphineo_dzed
real,	public,	dimension(:, :), allocatable	::	dphineo_drho
real,	public,	dimension(:, :), allocatable	::	dphineo_dalpha
logical,	private		::	neoinit	=	.false.

Subroutines

public subroutine init_neoclassical_terms()

Arguments

None

private subroutine read_parameters()

Arguments

None

private subroutine distribute_vmus_over_procs(local, distributed)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		dimension(:, :, :)	::	local
real,	intent(out),		dimension(vmu_lo%llim_proc:)	::	distributed

private subroutine get_dfneo_dvpa(fneo, dfneo)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		dimension(:, -nzgrid:, :, :, :)	::	fneo
real,	intent(out),		dimension(:, -nzgrid:, vmu_lo%llim_proc:)	::	dfneo

private subroutine get_dfneo_dzed(fneo, dfneo)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		dimension(:, -nzgrid:, :, :, :)	::	fneo
real,	intent(out),		dimension(:, -nzgrid:, vmu_lo%llim_proc:)	::	dfneo

private subroutine get_dfneo_drho(fneo, dfneo)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		dimension(:, -nzgrid:, :, :, :, -nradii/2:)	::	fneo
real,	intent(out),		dimension(:, -nzgrid:, vmu_lo%llim_proc:)	::	dfneo

private subroutine get_dphineo_dzed(phineo, dphineo)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		dimension(:, -nzgrid:)	::	phineo
real,	intent(out),		dimension(:, -nzgrid:)	::	dphineo

private subroutine get_dphineo_drho(phineo, dphineo)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		dimension(:, -nzgrid:, -nradii/2:)	::	phineo
real,	intent(out),		dimension(:, -nzgrid:)	::	dphineo

private subroutine write_neoclassical(fnc, phinc)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		dimension(:, -nzgrid:, :, :, :, -nradii/2:)	::	fnc
real,	intent(in),		dimension(:, -nzgrid:, -nradii/2:)	::	phinc

public subroutine finish_neoclassical_terms()

Arguments

None