|
procedure(flux_func_eval), deferred | f (self, psi) |
| Evaluate function.
|
|
procedure | f (self, psi) |
| Needs docs.
|
|
procedure(flux_func_eval), deferred | fp (self, psi) |
| Evaluate first derivative of function.
|
|
procedure | fp (self, psi) |
| Needs docs.
|
|
procedure | fpp (self, psi) |
| Evaluate second derivative of function.
|
|
procedure(flux_cofs_get), deferred | get_cofs (self, c) |
| Get current function parameterization.
|
|
procedure | get_cofs (self, c) |
| Needs docs.
|
|
procedure(flux_cofs_set), deferred | set_cofs (self, c) |
| Update function with new parameterization.
|
|
procedure | set_cofs (self, c) |
| Needs docs.
|
|
procedure(flux_func_update), deferred | update (self, gseq) |
| Update function to match new equilibrium solution.
|
|
procedure | update (self, gseq) |
| Needs docs.
|
|
|
real(8) | c0 = 1.d0 |
| Offset for non-zero edge gradient.
|
|
real(8), dimension(:), pointer | cofs => NULL() |
| Coefficients [deg].
|
|
integer(4) | deg = 0 |
| Degree of polynomial function for F'.
|
|
real(r8) | f_offset = 0.d0 |
| Offset value.
|
|
integer(i4) | ncofs = 0 |
| Number of free coefficients.
|
|
real(r8), dimension(2) | plasma_bounds = [-1.d99,1.d99] |
| Current plasma bounds (for normalization)
|
|
logical | zero_grad = .FALSE. |
| Force zero gradient at boundary.
|
|
◆ f() [1/2]
procedure(flux_func_eval), deferred f |
( |
class(flux_func), intent(inout) |
self, |
|
|
real(r8), intent(in) |
psi |
|
) |
| |
|
pure virtualinherited |
◆ f() [2/2]
procedure f |
( |
class(poly_flux_func), intent(inout) |
self, |
|
|
real(8), intent(in) |
psi |
|
) |
| |
◆ fp() [1/2]
procedure(flux_func_eval), deferred fp |
( |
class(flux_func), intent(inout) |
self, |
|
|
real(r8), intent(in) |
psi |
|
) |
| |
|
pure virtualinherited |
Evaluate first derivative of function.
◆ fp() [2/2]
procedure fp |
( |
class(poly_flux_func), intent(inout) |
self, |
|
|
real(8), intent(in) |
psi |
|
) |
| |
◆ fpp()
procedure fpp |
( |
class(flux_func), intent(inout) |
self, |
|
|
real(r8), intent(in) |
psi |
|
) |
| |
|
inherited |
Evaluate second derivative of function.
◆ get_cofs() [1/2]
procedure(flux_cofs_get), deferred get_cofs |
( |
class(flux_func), intent(inout) |
self, |
|
|
real(r8), dimension(:), intent(out) |
c |
|
) |
| |
|
pure virtualinherited |
Get current function parameterization.
◆ get_cofs() [2/2]
procedure get_cofs |
( |
class(poly_flux_func), intent(inout) |
self, |
|
|
real(8), dimension(:), intent(out) |
c |
|
) |
| |
◆ set_cofs() [1/2]
procedure(flux_cofs_set), deferred set_cofs |
( |
class(flux_func), intent(inout) |
self, |
|
|
real(r8), dimension(:), intent(in) |
c |
|
) |
| |
|
pure virtualinherited |
Update function with new parameterization.
◆ set_cofs() [2/2]
procedure set_cofs |
( |
class(poly_flux_func), intent(inout) |
self, |
|
|
real(8), dimension(:), intent(in) |
c |
|
) |
| |
◆ update() [1/2]
procedure(flux_func_update), deferred update |
( |
class(flux_func), intent(inout) |
self, |
|
|
class(gs_eq), intent(inout) |
gseq |
|
) |
| |
|
pure virtualinherited |
Update function to match new equilibrium solution.
◆ update() [2/2]
procedure update |
( |
class(poly_flux_func), intent(inout) |
self, |
|
|
class(gs_eq), intent(inout) |
gseq |
|
) |
| |
◆ c0
Offset for non-zero edge gradient.
◆ cofs
real(8), dimension(:), pointer cofs => NULL() |
◆ deg
Degree of polynomial function for F'.
◆ f_offset
◆ ncofs
Number of free coefficients.
◆ plasma_bounds
real(r8), dimension(2) plasma_bounds = [-1.d99,1.d99] |
|
inherited |
Current plasma bounds (for normalization)
◆ zero_grad
logical zero_grad = .FALSE. |
Force zero gradient at boundary.
The documentation for this type was generated from the following file: