kisslinger_t Derived Type

type, public :: kisslinger_t

Finalization Procedures

final :: destructor

private subroutine destructor(self)

Destructor

Arguments

Type	Intent	Optional	Attributes		Name
type(kisslinger_t),	intent(inout)			::	self	Instance of type

Type-Bound Procedures

procedure, public :: init => init_kisslinger

private subroutine init_kisslinger(self, filename, axis_r, axis_z, symm)

Initialises boundary data

Arguments

Type	Intent	Optional	Attributes		Name
class(kisslinger_t),	intent(inout)			::	self	Instance of type
character(len=*),	intent(in)			::	filename	Filename where data is read from
real(kind=FP),	intent(in)			::	axis_r	R-location of magnetic axis used for normalisation
real(kind=FP),	intent(in)			::	axis_z	Z-location of magnetic axis used for normalisation
integer,	intent(in)			::	symm	Type of symmetry to be applied to data - NO_SYMMETRY (default) - TILT_SYMMETRY (x -> x, phi -> -phi, y -> -y)

procedure, public :: polygon_at_tor_xsection

private subroutine polygon_at_tor_xsection(self, phi_xsec, ni, xi, yi)

Returns polygon at toroidal cross section, via interpolation along phi

Arguments

Type	Intent	Optional	Attributes		Name
class(kisslinger_t),	intent(in)			::	self	Instance of type
real(kind=FP),	intent(in)			::	phi_xsec	Toroidal angle where polygon is requested
integer,	intent(out)			::	ni	Number of polygon points at requested cross section
real(kind=FP),	intent(out),		allocatable, dimension(:)	::	xi	x-coordinates of polygon interpolated to cross section at phi_xsec
real(kind=FP),	intent(out),		allocatable, dimension(:)	::	yi	y-coordinates of polygon interpolated to cross section at phi_xsec

procedure, public :: display

private subroutine display(self)

Writes basic information to stdout

Arguments

Type	Intent	Optional	Attributes		Name
class(kisslinger_t),	intent(in)			::	self	Instance of type