korc_binning_diagnostic Module

Uses

Contents

Variables

binning_params

Interfaces

save_snapshot_var

Derived Types

BINNING

Functions

cross clockwise_rotation anticlockwise_rotation

Subroutines

initialize_binning_diagnostic bin_variables save_binning_diagnostic_params save_snapshot_var_1d save_snapshot_var_2d save_snapshot_var_3d save_snapshot_var_4d binning_diagnostic

Variables

Type	Visibility	Attributes		Name		Initial
type(BINNING),	private		::	binning_params

Interfaces

public interface save_snapshot_var

private subroutine save_snapshot_var_1d(params, var, var_name)

Arguments

Type	Intent	Optional	Attributes		Name
type(KORC_PARAMS),	intent(in)			::	params
real(kind=rp),	intent(in),		DIMENSION(:), ALLOCATABLE	::	var
character(len=MAX_STRING_LENGTH),	intent(in)			::	var_name

private subroutine save_snapshot_var_2d(params, var, var_name)

Arguments

Type	Intent	Optional	Attributes		Name
type(KORC_PARAMS),	intent(in)			::	params
real(kind=rp),	intent(in),		DIMENSION(:,:), ALLOCATABLE	::	var
character(len=MAX_STRING_LENGTH),	intent(in)			::	var_name

private subroutine save_snapshot_var_3d(params, var, var_name)

Arguments

Type	Intent	Optional	Attributes		Name
type(KORC_PARAMS),	intent(in)			::	params
real(kind=rp),	intent(in),		DIMENSION(:,:,:), ALLOCATABLE	::	var
character(len=MAX_STRING_LENGTH),	intent(in)			::	var_name

private subroutine save_snapshot_var_4d(params, var, var_name)

Arguments

Type	Intent	Optional	Attributes		Name
type(KORC_PARAMS),	intent(in)			::	params
real(kind=rp),	intent(in),		DIMENSION(:,:,:,:), ALLOCATABLE	::	var
character(len=MAX_STRING_LENGTH),	intent(in)			::	var_name

Derived Types

type, private :: BINNING

Components

Type	Visibility	Attributes		Name		Initial
logical,	public		::	diagnostic_on
real(kind=rp),	public		::	start_at
integer,	public,	DIMENSION(2)	::	num_bins
real(kind=rp),	public,	DIMENSION(2)	::	rlim
real(kind=rp),	public,	DIMENSION(2)	::	zlim
real(kind=rp),	public		::	rmin
real(kind=rp),	public		::	rmax
real(kind=rp),	public		::	zmin
real(kind=rp),	public		::	zmax
real(kind=rp),	public		::	dr
real(kind=rp),	public		::	dz
real(kind=rp),	public,	DIMENSION(:), ALLOCATABLE	::	rnodes
real(kind=rp),	public,	DIMENSION(:), ALLOCATABLE	::	znodes
logical,	public		::	toroidal_sections
integer(kind=idef),	public		::	ntor_sections

Functions

private function cross(a, b)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rp),	intent(in),		DIMENSION(3)	::	a
real(kind=rp),	intent(in),		DIMENSION(3)	::	b

Return Value real(kind=rp), DIMENSION(3)

private function clockwise_rotation(x, t)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rp),	intent(in),		DIMENSION(2)	::	x
real(kind=rp),	intent(in)			::	t

Return Value real(kind=rp), DIMENSION(2)

private function anticlockwise_rotation(x, t)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rp),	intent(in),		DIMENSION(2)	::	x
real(kind=rp),	intent(in)			::	t

Return Value real(kind=rp), DIMENSION(2)

Subroutines

public subroutine initialize_binning_diagnostic(params)

Arguments

Type	Intent	Optional	Attributes		Name
type(KORC_PARAMS),	intent(in)			::	params

public subroutine bin_variables(params, spp)

Arguments

Type	Intent	Optional	Attributes		Name
type(KORC_PARAMS),	intent(in)			::	params
type(SPECIES),	intent(in),		DIMENSION(:), ALLOCATABLE	::	spp

private subroutine save_binning_diagnostic_params(params)

Arguments

Type	Intent	Optional	Attributes		Name
type(KORC_PARAMS),	intent(in)			::	params

private subroutine save_snapshot_var_1d(params, var, var_name)

Arguments

Type	Intent	Optional	Attributes		Name
type(KORC_PARAMS),	intent(in)			::	params
real(kind=rp),	intent(in),		DIMENSION(:), ALLOCATABLE	::	var
character(len=MAX_STRING_LENGTH),	intent(in)			::	var_name

private subroutine save_snapshot_var_2d(params, var, var_name)

Arguments

Type	Intent	Optional	Attributes		Name
type(KORC_PARAMS),	intent(in)			::	params
real(kind=rp),	intent(in),		DIMENSION(:,:), ALLOCATABLE	::	var
character(len=MAX_STRING_LENGTH),	intent(in)			::	var_name

private subroutine save_snapshot_var_3d(params, var, var_name)

Arguments

Type	Intent	Optional	Attributes		Name
type(KORC_PARAMS),	intent(in)			::	params
real(kind=rp),	intent(in),		DIMENSION(:,:,:), ALLOCATABLE	::	var
character(len=MAX_STRING_LENGTH),	intent(in)			::	var_name

private subroutine save_snapshot_var_4d(params, var, var_name)

Arguments

Type	Intent	Optional	Attributes		Name
type(KORC_PARAMS),	intent(in)			::	params
real(kind=rp),	intent(in),		DIMENSION(:,:,:,:), ALLOCATABLE	::	var
character(len=MAX_STRING_LENGTH),	intent(in)			::	var_name

public subroutine binning_diagnostic(params, spp)

Arguments

Type	Intent	Optional	Attributes		Name
type(KORC_PARAMS),	intent(in)			::	params
type(SPECIES),	intent(in),		DIMENSION(:), ALLOCATABLE	::	spp