oft_tmaker_td_mfop Type Reference

Detailed Description

Needs docs.

Inheritance diagram for oft_tmaker_td_mfop:

Public Member Functions
procedure	add_values (self, i_inds, j_inds, b, n, m, iblock, jblock, loc_cache)
	Add values to a matrix.
procedure(mat_add_values), deferred	add_values (self, i_inds, j_inds, b, n, m, iblock, jblock, loc_cache)
	Add values to the matrix.
generic	apply (self, a, b)
	Compute matrix-vector product.
generic	apply (self, a, b)
	Compute matrix-vector product.
procedure	apply_complex (self, a, b)
	Compute matrix vector product (complex)
procedure	apply_real (self, a, b)
	Apply the matrix to a field.
procedure(mat_apply_vec), deferred	apply_real (self, a, b)
procedure	apply_real (self, a, b)
	Apply operator.
generic	applyt (self, a, b)
	Compute matrix-vector product for matrix transpose.
generic	applyt (self, a, b)
	Compute matrix-vector product for matrix transpose.
procedure	applyt_complex (self, a, b)
	Apply the matrix to a field.
procedure	applyt_complex (self, a, b)
	Apply matrix vector product for matrix transpose (complex vector)
procedure	applyt_real (self, a, b)
	Apply the matrix to a field.
procedure(mat_apply_vec), deferred	applyt_real (self, a, b)
procedure	assemble (self, diag)
	Finish assembly of matrix and optionally extract diagonals.
procedure(mat_assemble), deferred	assemble (self, diag)
	Complete matrix assembly.
procedure	atomic_add_values (self, i_inds, j_inds, b, n, m, iblock, jblock, loc_cache)
	Add values to a matrix.
procedure(mat_add_values), deferred	atomic_add_values (self, i_inds, j_inds, b, n, m, iblock, jblock, loc_cache)
	Add values atomically to the matrix.
procedure	delete (self)
	Delete matrix.
procedure	delete (self)
	Delete matrix.
procedure	delete (self)
	Delete operator, deallocating internal storage.
procedure	set_values (self, i_inds, j_inds, b, n, m, iblock, jblock)
	Set values of a matrix.
procedure(mat_set_values), deferred	set_values (self, i_inds, j_inds, b, n, m, iblock, jblock)
	Set values of the matrix.
procedure	setup (self, eq_in)
	Setup operator, allocating internal storage.
procedure	update (self)
	Update operator with new targets, etc.
procedure	zero (self)
	Zero all entries in matrix.
procedure(mat_zero), deferred	zero (self)
	Zero all elements.
procedure	zero_rows (self, nrows, irows, iblock, keep_diag)
	Zero all entries in the specified rows.
procedure(mat_zero_rows), deferred	zero_rows (self, nrows, irows, iblock, keep_diag)
	Zero all elements in a given row.

Public Attributes
real(8), dimension(:), pointer	curr_reg => NULL()
	Coil current by region.
class(oft_vector), pointer	d => NULL()
	Diagonal entries for scaling.
real(r8)	dt = 1.E-3_r8
	Time step size [s].
real(r8)	estored = 0.d0
	Stored energy at present step.
real(8), dimension(:), pointer	eta_reg => NULL()
	Resistivity by region.
class(flux_func), pointer	f => NULL()
	Flux function for \( F*F' \) term.
real(r8)	f_scale = 1.d0
	Scale factor for \( F*F' \) term.
logical	force_local = .FALSE.
	Do not stitch resulting vector? (Native ONLY)
type(gs_eq), pointer	gs_eq => NULL()
	Equilibrium object.
type(oft_map), dimension(:), pointer	i_map => NULL()
	Row block mapping.
real(r8)	ip = 0.d0
	Plasma current at present step.
real(r8)	ip_ratio_target = -1.d0
	Ip ratio target.
real(r8)	ip_target = -1.d0
	Target plasma current.
type(oft_map), dimension(:), pointer	j_map => NULL()
	Column block mapping.
integer(i4)	nc
	Local number of columns.
integer(i8)	ncg
	Gobal number of columns.
integer(i4)	ncslice = 0
	Number of owned columns.
integer(i4)	ni = 0
	Number of row blocks.
integer(i4)	nj = 0
	Number of column blocks.
integer(i4)	nr
	Local number of rows.
integer(i8)	nrg
	Gobal number of rows.
integer(i4)	nrslice = 0
	Number of owned rows.
class(flux_func), pointer	p => NULL()
	Flux function for \( P' \) term.
real(r8)	p_scale = 1.d0
	Scale factor for \( P' \) term.
class(oft_matrix), pointer	vac_op => NULL()
	Vacuum time-advance operator.

Member Function/Subroutine Documentation

add_values() [1/2]

procedure add_values ( class(oft_noop_matrix), intent(inout)  self, integer(i4), dimension(n), intent(in)  i_inds, integer(i4), dimension(m), intent(in)  j_inds, real(r8), dimension(n,m), intent(in)  b, integer(i4), intent(in)  n, integer(i4), intent(in)  m, integer(i4), intent(in), optional  iblock, integer(i4), intent(in), optional  jblock, integer(i4), dimension(n,m), intent(inout), optional  loc_cache  )

inherited

Add values to a matrix.

Note

This subroutine is a dummy routine used to specify the interface of the member function and catch errors in uninitialized matrices

Parameters

[in]	i_inds	Row indices of entries to add [n]
[in]	j_inds	Column indices of entries to add [m]
[in]	b	Values to set [n,m]
[in]	n	Number of rows in local matrix
[in]	m	Number of columns in local matrix
[in]	iblock	Row block (optional)
[in]	jblock	Column block (optional)
[in,out]	loc_cache	Cache of entry locations

add_values() [2/2]

procedure(mat_add_values), deferred add_values ( class(oft_matrix), intent(inout)  self, integer(i4), dimension(n), intent(in)  i_inds, integer(i4), dimension(m), intent(in)  j_inds, real(r8), dimension(n,m), intent(in)  b, integer(i4), intent(in)  n, integer(i4), intent(in)  m, integer(i4), intent(in), optional  iblock, integer(i4), intent(in), optional  jblock, integer(i4), dimension(n,m), intent(inout), optional  loc_cache  )

pure virtualinherited

Add values to the matrix.

Parameters

[in,out]	self	Matrix object
[in]	i_inds	Row indices of entries to add [n]
[in]	j_inds	Column indices of entries to add [m]
[in]	b	Values to set [n,m]
[in]	n	Number of rows in local matrix
[in]	m	Number of columns in local matrix
[in]	iblock	Row block (optional)
[in]	jblock	Column block (optional)
[in,out]	loc_cache	Cache of entry locations

apply() [1/2]

generic apply ( class(oft_matrix), intent(inout)  self, class(oft_vector), intent(inout), target  a, class(oft_vector), intent(inout)  b  )

inherited

Compute matrix-vector product.

Parameters

[in,out]	self	Matrix object
[in,out]	a	Source vector
[in,out]	b	Result of matrix product

apply() [2/2]

generic apply ( class(oft_matrix), intent(inout)  self, class(oft_cvector), intent(inout), target  a, class(oft_cvector), intent(inout)  b  )

inherited

Compute matrix-vector product.

b = self * a

Parameters

[in,out]	self	Matrix object
[in,out]	a	Vector object
[in,out]	b	Result vector

apply_complex()

procedure apply_complex ( class(oft_matrix), intent(inout)  self, class(oft_cvector), intent(inout), target  a, class(oft_cvector), intent(inout)  b  )

inherited

Compute matrix vector product (complex)

b = self * a

Parameters

[in,out]	self	Matrix object
[in,out]	a	Vector object
[in,out]	b	Result vector

apply_real() [1/3]

procedure apply_real ( class(oft_noop_matrix), intent(inout)  self, class(oft_vector), intent(inout), target  a, class(oft_vector), intent(inout)  b  )

inherited

Apply the matrix to a field.

b = self * a

Note

This subroutine is a dummy routine used to specify the interface of the member function and catch errors in uninitialized matrices

Parameters

[in,out]	a	Source field
[in,out]	b	Result of matrix product

apply_real() [2/3]

procedure(mat_apply_vec), deferred apply_real ( class(oft_matrix), intent(inout)  self, class(oft_vector), intent(inout), target  a, class(oft_vector), intent(inout)  b  )

pure virtualinherited

Parameters

[in,out]	self	Matrix object
[in,out]	a	Source vector
[in,out]	b	Result of matrix product

apply_real() [3/3]

procedure apply_real	(	class(oft_tmaker_td_mfop), intent(inout)	self,
		class(oft_vector), intent(inout), target	a,
		class(oft_vector), intent(inout)	b
	)

Apply operator.

Parameters

[in,out]	self	NL operator object
[in,out]	a	Source field
[in,out]	b	Result of metric function

applyt() [1/2]

generic applyt ( class(oft_matrix), intent(inout)  self, class(oft_cvector), intent(inout), target  a, class(oft_cvector), intent(inout)  b  )

inherited

Compute matrix-vector product for matrix transpose.

b = self^T * a

Parameters

[in,out]	self	Matrix object
[in,out]	a	Vector object
[in,out]	b	Result vector

applyt() [2/2]

generic applyt ( class(oft_matrix), intent(inout)  self, class(oft_vector), intent(inout), target  a, class(oft_vector), intent(inout)  b  )

inherited

Compute matrix-vector product for matrix transpose.

Parameters

[in,out]	self	Matrix object
[in,out]	a	Source vector
[in,out]	b	Result of matrix product

applyt_complex() [1/2]

procedure applyt_complex ( class(oft_noop_matrix), intent(inout)  self, class(oft_cvector), intent(inout), target  a, class(oft_cvector), intent(inout)  b  )

inherited

Apply the matrix to a field.

b = self * a

Note

This subroutine is a dummy routine used to specify the interface of the member function and catch errors in uninitialized matrices

Parameters

[in,out]	a	Source field
[in,out]	b	Result of matrix product

applyt_complex() [2/2]

procedure applyt_complex ( class(oft_matrix), intent(inout)  self, class(oft_cvector), intent(inout), target  a, class(oft_cvector), intent(inout)  b  )

inherited

Apply matrix vector product for matrix transpose (complex vector)

b = self^T * a

Parameters

[in,out]	self	Matrix object
[in,out]	a	Vector object
[in,out]	b	Result vector

applyt_real() [1/2]

procedure applyt_real ( class(oft_noop_matrix), intent(inout)  self, class(oft_vector), intent(inout), target  a, class(oft_vector), intent(inout)  b  )

inherited

Apply the matrix to a field.

b = self * a

Note

This subroutine is a dummy routine used to specify the interface of the member function and catch errors in uninitialized matrices

Parameters

[in,out]	a	Source field
[in,out]	b	Result of matrix product

applyt_real() [2/2]

procedure(mat_apply_vec), deferred applyt_real ( class(oft_matrix), intent(inout)  self, class(oft_vector), intent(inout), target  a, class(oft_vector), intent(inout)  b  )

pure virtualinherited

Parameters

[in,out]	self	Matrix object
[in,out]	a	Source vector
[in,out]	b	Result of matrix product

assemble() [1/2]

procedure assemble ( class(oft_noop_matrix), intent(inout)  self, class(oft_vector), intent(inout), optional, target  diag  )

inherited

Finish assembly of matrix and optionally extract diagonals.

Note

This subroutine is a dummy routine used to specify the interface of the member function and catch errors in uninitialized matrices

Parameters

[in,out]

diag

Diagonal entries of matrix [nr] (optional)

assemble() [2/2]

procedure(mat_assemble), deferred assemble ( class(oft_matrix), intent(inout)  self, class(oft_vector), intent(inout), optional, target  diag  )

pure virtualinherited

Complete matrix assembly.

Parameters

[in,out]	self	Matrix object
[in,out]	diag	Diagonal entries of matrix [nr] (optional)

atomic_add_values() [1/2]

procedure atomic_add_values ( class(oft_noop_matrix), intent(inout)  self, integer(i4), dimension(n), intent(in)  i_inds, integer(i4), dimension(m), intent(in)  j_inds, real(r8), dimension(n,m), intent(in)  b, integer(i4), intent(in)  n, integer(i4), intent(in)  m, integer(i4), intent(in), optional  iblock, integer(i4), intent(in), optional  jblock, integer(i4), dimension(n,m), intent(inout), optional  loc_cache  )

inherited

Add values to a matrix.

Note

This subroutine is a dummy routine used to specify the interface of the member function and catch errors in uninitialized matrices

Parameters

[in]	i_inds	Row indices of entries to add [n]
[in]	j_inds	Column indices of entries to add [m]
[in]	b	Values to set [n,m]
[in]	n	Number of rows in local matrix
[in]	m	Number of columns in local matrix
[in]	iblock	Row block (optional)
[in]	jblock	Column block (optional)
[in,out]	loc_cache	Cache of entry locations

atomic_add_values() [2/2]

procedure(mat_add_values), deferred atomic_add_values ( class(oft_matrix), intent(inout)  self, integer(i4), dimension(n), intent(in)  i_inds, integer(i4), dimension(m), intent(in)  j_inds, real(r8), dimension(n,m), intent(in)  b, integer(i4), intent(in)  n, integer(i4), intent(in)  m, integer(i4), intent(in), optional  iblock, integer(i4), intent(in), optional  jblock, integer(i4), dimension(n,m), intent(inout), optional  loc_cache  )

pure virtualinherited

Add values atomically to the matrix.

Parameters

[in,out]	self	Matrix object
[in]	i_inds	Row indices of entries to add [n]
[in]	j_inds	Column indices of entries to add [m]
[in]	b	Values to set [n,m]
[in]	n	Number of rows in local matrix
[in]	m	Number of columns in local matrix
[in]	iblock	Row block (optional)
[in]	jblock	Column block (optional)
[in,out]	loc_cache	Cache of entry locations

delete() [1/3]

procedure delete ( class(oft_noop_matrix), intent(inout)  self )

inherited

Delete matrix.

Note

This subroutine is a dummy routine used to specify the interface of the member function and catch errors in uninitialized matrices.

delete() [2/3]

procedure delete ( class(oft_matrix), intent(inout)  self )

inherited

Delete matrix.

Note

This subroutine is a dummy routine used to specify the interface of the member function and catch errors in uninitialized matrices.

delete() [3/3]

procedure delete

(

class(oft_tmaker_td_mfop), intent(inout)

self

)

Delete operator, deallocating internal storage.

Parameters

[in,out]

self

NL operator object

set_values() [1/2]

procedure set_values ( class(oft_noop_matrix), intent(inout)  self, integer(i4), dimension(n), intent(in)  i_inds, integer(i4), dimension(m), intent(in)  j_inds, real(r8), dimension(n,m), intent(in)  b, integer(i4), intent(in)  n, integer(i4), intent(in)  m, integer(i4), intent(in), optional  iblock, integer(i4), intent(in), optional  jblock  )

inherited

Set values of a matrix.

Note

This subroutine is a dummy routine used to specify the interface of the member function and catch errors in uninitialized matrices

Parameters

[in]	i_inds	Row indices of entries to set [n]
[in]	j_inds	Column indices of entries to set [m]
[in]	b	Values to set [n,m]
[in]	n	Number of rows in local matrix
[in]	m	Number of columns in local matrix
[in]	iblock	Row block (optional)
[in]	jblock	Column block (optional)

set_values() [2/2]

procedure(mat_set_values), deferred set_values ( class(oft_matrix), intent(inout)  self, integer(i4), dimension(n), intent(in)  i_inds, integer(i4), dimension(m), intent(in)  j_inds, real(r8), dimension(n,m), intent(in)  b, integer(i4), intent(in)  n, integer(i4), intent(in)  m, integer(i4), intent(in), optional  iblock, integer(i4), intent(in), optional  jblock  )

pure virtualinherited

Set values of the matrix.

Parameters

[in,out]	self	Matrix object
[in]	i_inds	Row indices of entries to set [n]
[in]	j_inds	Column indices of entries to set [m]
[in]	b	Values to set [n,m]
[in]	n	Number of rows in local matrix
[in]	m	Number of columns in local matrix
[in]	iblock	Row block (optional)
[in]	jblock	Column block (optional)

setup()

procedure setup	(	class(oft_tmaker_td_mfop), intent(inout)	self,
		type(gs_eq), intent(inout), target	eq_in
	)

Setup operator, allocating internal storage.

Parameters

[in,out]

self

NL operator object

update()

procedure update

(

class(oft_tmaker_td_mfop), intent(inout)

self

)

Update operator with new targets, etc.

Parameters

[in,out]

self

NL operator object

zero() [1/2]

procedure zero ( class(oft_noop_matrix), intent(inout)  self )

inherited

Zero all entries in matrix.

Note

This subroutine is a dummy routine used to specify the interface of the member function and catch errors in uninitialized matrices

zero() [2/2]

procedure(mat_zero), deferred zero ( class(oft_matrix), intent(inout)  self )

pure virtualinherited

Zero all elements.

Parameters

[in,out]

self

Matrix object

zero_rows() [1/2]

procedure zero_rows ( class(oft_noop_matrix), intent(inout)  self, integer(i4), intent(in)  nrows, integer(i4), dimension(nrows), intent(in)  irows, integer(i4), intent(in), optional  iblock, logical, intent(in), optional  keep_diag  )

inherited

Zero all entries in the specified rows.

Note

This subroutine is a dummy routine used to specify the interface of the member function and catch errors in uninitialized matrices

Parameters

[in]	nrows	Number of rows to zero
[in]	irows	Indices of rows to zero [nrows]
[in]	iblock	Row block (optional)
[in]	keep_diag	Keep diagonal entries

zero_rows() [2/2]

procedure(mat_zero_rows), deferred zero_rows ( class(oft_matrix), intent(inout)  self, integer(i4), intent(in)  nrows, integer(i4), dimension(nrows), intent(in)  irows, integer(i4), intent(in), optional  iblock, logical, intent(in), optional  keep_diag  )

pure virtualinherited

Zero all elements in a given row.

Parameters

[in,out]	self	Matrix object
[in]	nrows	Number of rows to zero
[in]	irows	Indices of rows to zero [nrows]
[in]	iblock	Row block (optional)
[in]	keep_diag	Keep diagonal entries

Member Data Documentation

curr_reg

real(8), dimension(:), pointer curr_reg => NULL()

Coil current by region.

d

class(oft_vector), pointer d => NULL()

inherited

Diagonal entries for scaling.

dt

real(r8) dt = 1.E-3_r8

Time step size [s].

estored

real(r8) estored = 0.d0

Stored energy at present step.

eta_reg

real(8), dimension(:), pointer eta_reg => NULL()

Resistivity by region.

f

class(flux_func), pointer f => NULL()

Flux function for \( F*F' \) term.

f_scale

real(r8) f_scale = 1.d0

Scale factor for \( F*F' \) term.

force_local

logical force_local = .FALSE.

inherited

Do not stitch resulting vector? (Native ONLY)

gs_eq

type(gs_eq), pointer gs_eq => NULL()

Equilibrium object.

i_map

type(oft_map), dimension(:), pointer i_map => NULL()

inherited

Row block mapping.

ip

real(r8) ip = 0.d0

Plasma current at present step.

ip_ratio_target

real(r8) ip_ratio_target = -1.d0

Ip ratio target.

ip_target

real(r8) ip_target = -1.d0

Target plasma current.

j_map

type(oft_map), dimension(:), pointer j_map => NULL()

inherited

Column block mapping.

nc

integer(i4) nc

inherited

Local number of columns.

ncg

integer(i8) ncg

inherited

Gobal number of columns.

ncslice

integer(i4) ncslice = 0

inherited

Number of owned columns.

ni

integer(i4) ni = 0

inherited

Number of row blocks.

nj

integer(i4) nj = 0

inherited

Number of column blocks.

nr

integer(i4) nr

inherited

Local number of rows.

nrg

integer(i8) nrg

inherited

Gobal number of rows.

nrslice

integer(i4) nrslice = 0

inherited

Number of owned rows.

p

class(flux_func), pointer p => NULL()

Flux function for \( P' \) term.

p_scale

real(r8) p_scale = 1.d0

Scale factor for \( P' \) term.

vac_op

class(oft_matrix), pointer vac_op => NULL()

Vacuum time-advance operator.

---

The documentation for this type was generated from the following file:

• /home/runner/work/OpenFUSIONToolkit/OpenFUSIONToolkit/src/physics/grad_shaf_td.F90