MODgvec_rProfile_poly Module

Module polyProfile

Defines a 1-D profile in rho^2 via a power polynomial.

Uses

- MODgvec_Globals
- MODgvec_rProfile_base
Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Used by

Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Interfaces

public interface t_rProfile_poly

public function polyProfile_new(coefs) result(sf)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	coefs(:)	B-Spline coefficients

Return Value type(t_rProfile_poly)

Derived Types

type, public, extends(c_rProfile) :: t_rProfile_poly

Components

Type	Visibility	Attributes		Name		Initial
integer,	public		::	n_coefs
real(kind=wp),	public,	ALLOCATABLE	::	coefs(:)
integer,	public		::	deg	=	0

Constructor

public function polyProfile_new (coefs)

Finalizations Procedures

final :: polyProfile_free

Type-Bound Procedures

procedure, public :: eval_at_rho => rProfile_eval_at_rho
procedure, public :: rProfile_drho2
procedure, public :: rProfile_drho3
procedure, public :: rProfile_drho4
procedure, public :: eval_at_rho2 => polyProfile_eval_at_rho2
procedure, public :: antiderivative => polyProfile_antiderivative

Functions

public function polyProfile_new(coefs) result(sf)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	coefs(:)	B-Spline coefficients

Return Value type(t_rProfile_poly)

public function polyProfile_eval_at_rho2(sf, rho2, deriv) result(profile_prime_value)

evaluate the n-th derivative of a power polynomial

Arguments

Type	Intent	Optional	Attributes		Name
class(t_rProfile_poly),	intent(in)			::	sf	self
real(kind=wp),	intent(in)			::	rho2	evaluation point in the toroidal flux coordinate (rho2=phi/phi_edge= spos^2)
integer,	intent(in),	optional		::	deriv

Return Value real(kind=wp)

public function polyProfile_antiderivative(sf) result(antideriv)

get the exact polynomial antiderivative, with respect to rho2

Arguments

Type	Intent	Optional	Attributes		Name
class(t_rProfile_poly),	intent(in)			::	sf	self

Return Value class(c_rProfile), ALLOCATABLE

Subroutines

public subroutine polyProfile_free(sf)

finalize the type rProfile

Arguments

Type	Intent	Optional	Attributes		Name
type(t_rProfile_poly),	intent(inout)			::	sf	self