XGC1
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Pages
Functions/Subroutines
tiny_functions.F90 File Reference
#include "petscversion.h"
#include <petsc/finclude/petscsnes.h>
Include dependency graph for tiny_functions.F90:

Functions/Subroutines

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_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)
 
subroutine zero_out_wall_fort (var)
 

Function/Subroutine Documentation

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]gridXGC grid object, type(grid_type)
[in]rCylindrical radial coordinate R, real(8)
[in]zCylindrical radial coordinate Z, real(8)
[in]psiPoloidal flux in Wb, real(8)

Here is the call graph for this function:

Here is the caller graph for this function:

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]gridXGC grid object, type(grid_type)
[in]rCylindrical radial coordinate R, real(8)
[in]zCylindrical radial coordinate Z, real(8)
[in]psiPoloidal flux in Wb, real(8)

Here is the call graph for this function:

Here is the caller graph for this function:

logical function is_nan ( real (8)  a)

Here is the caller graph for this function:

logical function is_nan_or_inf ( real (8)  a)

Here is the caller graph for this function:

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]nNumber of poloidal planes
input]x Input quantity from which to remove its toroidal average

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine set_zero_for_nan ( real (8), intent(inout)  var)

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine zero_out_wall ( type(grid_type), intent(in)  grid,
real (8), dimension(grid%nnode), intent(inout)  var 
)

Here is the caller graph for this function:

subroutine zero_out_wall_fort ( real (8), dimension(grid_global%nnode), intent(inout)  var)

Here is the caller graph for this function: