#include "petscversion.h"
#include <petsc/finclude/petscsnes.h>
|
logical function | is_nan (a) |
|
logical function | is_nan_or_inf (a) |
|
subroutine | set_zero_for_nan (var) |
|
real(8) function | max_mem_use () |
|
subroutine | remove_toroidal_average (n, x) |
| Removes the toroidal average of a quantity of type real(8) that is global on a poloidal plane but local in the toroidal direction. More...
|
|
logical function | is_em_fluxavg (grid, r, z, psi) |
| Determines whether a point is in an electromagnetic region for flux-surface averaged modes. This is now hardcoded such that zonal (00) electromagnetic modes are allowed only in the main plasma volume. More...
|
|
logical function | is_em_axisym (grid, r, z, psi) |
| Determines whether a point is in an electromagnetic region for axisymmetric modes. More...
|
|
logical function | is_em_turb (grid, r, z, psi) |
| Determines whether a point is in an electromagnetic region for non-axisymmetric modes. More...
|
|
subroutine | zero_out_wall (grid, var) |
|
logical function is_em_axisym |
( |
type(grid_type), intent(in) |
grid, |
|
|
real (8), intent(in) |
r, |
|
|
real (8), intent(in) |
z, |
|
|
real (8), intent(in) |
psi |
|
) |
| |
Determines whether a point is in an electromagnetic region for axisymmetric modes.
- Parameters
-
[in] | grid | XGC grid object, type(grid_type) |
[in] | r | Cylindrical radial coordinate R, real(8) |
[in] | z | Cylindrical radial coordinate Z, real(8) |
[in] | psi | Poloidal flux in Wb, real(8) |
logical function is_em_fluxavg |
( |
type(grid_type), intent(in) |
grid, |
|
|
real (8), intent(in) |
r, |
|
|
real (8), intent(in) |
z, |
|
|
real (8), intent(in) |
psi |
|
) |
| |
Determines whether a point is in an electromagnetic region for flux-surface averaged modes. This is now hardcoded such that zonal (00) electromagnetic modes are allowed only in the main plasma volume.
- Parameters
-
[in] | grid | XGC grid object, type(grid_type) |
[in] | r | Cylindrical radial coordinate R, real(8) |
[in] | z | Cylindrical radial coordinate Z, real(8) |
[in] | psi | Poloidal flux in Wb, real(8) |
logical function is_em_turb |
( |
type(grid_type), intent(in) |
grid, |
|
|
real (8), intent(in) |
r, |
|
|
real (8), intent(in) |
z, |
|
|
real (8), intent(in) |
psi |
|
) |
| |
Determines whether a point is in an electromagnetic region for non-axisymmetric modes.
- Parameters
-
[in] | grid | XGC grid object, type(grid_type) |
[in] | r | Cylindrical radial coordinate R, real(8) |
[in] | z | Cylindrical radial coordinate Z, real(8) |
[in] | psi | Poloidal flux in Wb, real(8) |
logical function is_nan |
( |
real (8) |
a | ) |
|
logical function is_nan_or_inf |
( |
real (8) |
a | ) |
|
real(8) function max_mem_use |
( |
| ) |
|
subroutine remove_toroidal_average |
( |
integer, intent(in) |
n, |
|
|
real (kind=8), dimension(n), intent(out) |
x |
|
) |
| |
Removes the toroidal average of a quantity of type real(8) that is global on a poloidal plane but local in the toroidal direction.
- Parameters
-
[in] | n | Number of poloidal planes |
| input] | x Input quantity from which to remove its toroidal average |
subroutine set_zero_for_nan |
( |
real (8), intent(inout) |
var | ) |
|
subroutine zero_out_wall |
( |
type(grid_type), intent(in) |
grid, |
|
|
real (8), dimension(grid%nnode), intent(inout) |
var |
|
) |
| |