XGCa
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros Pages
Data Types | Macros | Functions/Subroutines
f0module.F90 File Reference
#include "adios_macro.h"
Include dependency graph for f0module.F90:

Data Types

module  f0_module
 

Macros

#define OMP_ATOMIC   !$omp atomic
 

Functions/Subroutines

subroutine add_f0_analytic (stype)
 
subroutine add_f0_analytic_elec (grid, psn)
 
subroutine f_source_allocate
 Allocates arrays used in f_source: f0_f, f0_df0g, f0_n, f0_n_re, f0_n_im, f0_df0g3, df0g_tmp. More...
 
subroutine f0_remove_negative (f0)
 
subroutine f_heat_torque_org (grid, sp, t_ev, narea)
 
subroutine get_radial_factor (psi, dz, pi, po, bdi, bdo, over_w, special_mode, ishape, factor)
 sub-subroutine to get radial (psi) factor trapezoid or gaussian More...
 
subroutine df0g_nan_remove (df0g)
 
subroutine df0g_near_wall_remove (grid)
 
logical function is_near_wall (grid, inode)
 
subroutine pre_distribute_f0g (sp_type, dist_df0g, dist_n, iw0, niw)
 
subroutine post_distribute_f0g (sp_type, dist_df0g, dist_df0g_delete)
 
subroutine set_gvid0_pid_from_f0 (nnode)
 
subroutine symmetric_f (f, flag)
 
subroutine f_fourier (f, grid, op_mode, f_3d_re, f_3d_im)
 Reduces the input function to the toroidal average. More...
 
subroutine f_fourier_restore (f, f_3d_re, f_3d_im)
 Restores the 3D Fourier components that were removed from f with the subroutine f_fourier. More...
 
subroutine f_radiation (grid)
 
subroutine power_loss (E_change)
 
subroutine f_shift_from_f_heat_torque
 
subroutine rad_emissivity2 (node, Lz_out, avgZ_out, avgZ2_out, tval_eV_in, eden)
 Calculate emissivity from ADAS data file. More...
 
subroutine init_radiation
 
subroutine f0_nan_check (str)
 
real(kind=8) function my_sinc (n)
 

Macro Definition Documentation

#define OMP_ATOMIC   !$omp atomic

Function/Subroutine Documentation

subroutine add_f0_analytic ( integer, intent(in)  stype)

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine add_f0_analytic_elec ( type(grid_type)  grid,
type(psn_type)  psn 
)

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine df0g_nan_remove ( real (8), dimension(-f0_nvp:f0_nvp, f0_inode1:f0_inode2, f0_imu1:f0_imu2, ptl_isp:ptl_nsp), intent(inout)  df0g)

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine df0g_near_wall_remove ( type(grid_type), intent(in)  grid)

Here is the call graph for this function:

subroutine f0_nan_check ( character (len=*)  str)

Here is the call graph for this function:

subroutine f0_remove_negative ( real (8), dimension(-f0_nvp:f0_nvp, f0_inode1:f0_inode2, f0_imu1:f0_imu2, ptl_isp:ptl_nsp), intent(inout)  f0)

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine f_fourier ( real (8), dimension(-f0_nvp:f0_nvp,f0_inode1:f0_inode2,f0_imu1:f0_imu2,ptl_isp:ptl_nsp), intent(inout)  f,
type(grid_type), intent(in)  grid,
integer, intent(in)  op_mode,
real (8), dimension(-f0_nvp:f0_nvp,f0_inode1:f0_inode2,f0_imu1:f0_imu2,ptb_3db_num_ntor,ptl_isp:ptl_nsp), intent(out), optional  f_3d_re,
real (8), dimension(-f0_nvp:f0_nvp,f0_inode1:f0_inode2,f0_imu1:f0_imu2,ptb_3db_num_ntor,ptl_isp:ptl_nsp), intent(out), optional  f_3d_im 
)

Reduces the input function to the toroidal average.

  • the Fourier components needed for RMP If op_mode==0, the output f will have the toroidal average and the RMP Fourier components. However, the Fourier components are suppressed with mask_3d in the private flux region and SOL close to the divertor plates. op_mode==1: Like op_mode==0, but the suppressed information is stored as Fourier components in f_3d_re and f_3d_im for later restoration. If op_mode==2, the output f will have only the toroidal average. The RMP Fourier components will be stored in f_3d_re and f_3d_im.
    Parameters
    [in,out]fInput distribution function and filtered output
    [in]gridGrid data
    [out]f_3d_reOptional output variable for separate Fourier modes
    [out]f_3d_imOptional output variable for separate Fourier modes

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine f_fourier_restore ( real (8), dimension(-f0_nvp:f0_nvp,f0_inode1:f0_inode2,f0_imu1:f0_imu2,ptl_isp:ptl_nsp), intent(inout)  f,
real (8), dimension(-f0_nvp:f0_nvp,f0_inode1:f0_inode2,f0_imu1:f0_imu2,ptb_3db_num_ntor,ptl_isp:ptl_nsp), intent(in)  f_3d_re,
real (8), dimension(-f0_nvp:f0_nvp,f0_inode1:f0_inode2,f0_imu1:f0_imu2,ptb_3db_num_ntor,ptl_isp:ptl_nsp), intent(in)  f_3d_im 
)

Restores the 3D Fourier components that were removed from f with the subroutine f_fourier.

Parameters
[in,out]fInput distribution function and filtered output
[out]f_3d_reInput variable for separate Fourier modes
[out]f_3d_reInput variable for separate Fourier modes

Here is the caller graph for this function:

subroutine f_heat_torque_org ( type(grid_type), intent(in)  grid,
type(species_type)  sp,
real(8), dimension(grid%nnode), intent(in)  t_ev,
integer, intent(in)  narea 
)

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine f_radiation ( type(grid_type)  grid)

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine f_radiation::f_shift_from_f_heat_torque ( )

Here is the caller graph for this function:

subroutine f_source_allocate ( )

Allocates arrays used in f_source: f0_f, f0_df0g, f0_n, f0_n_re, f0_n_im, f0_df0g3, df0g_tmp.

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine get_radial_factor ( real (8), intent(in)  psi,
real (8), intent(in)  dz,
real (8), intent(in)  pi,
real (8), intent(in)  po,
real (8), intent(in)  bdi,
real (8), intent(in)  bdo,
real (8), intent(in)  over_w,
integer, intent(in)  special_mode,
integer, intent(in)  ishape,
real (8), intent(out)  factor 
)

sub-subroutine to get radial (psi) factor trapezoid or gaussian

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine init_radiation ( )

Here is the caller graph for this function:

logical function is_near_wall ( type(grid_type), intent(in)  grid,
integer  inode 
)

Here is the caller graph for this function:

real (kind=8) function my_sinc ( real (kind=8), intent(in)  n)

Here is the call graph for this function:

subroutine post_distribute_f0g ( integer  sp_type,
real(8), dimension(-f0_nvp:f0_nvp,f0_inode1:f0_inode2,0:f0_nmu,2), intent(inout)  dist_df0g,
real(8), dimension(-f0_nvp:f0_nvp,f0_inode1:f0_inode2,0:f0_nmu), intent(inout)  dist_df0g_delete 
)

Here is the caller graph for this function:

subroutine f_radiation::power_loss ( real (8)  E_change)

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine pre_distribute_f0g ( integer  sp_type,
real(8), dimension(-f0_nvp:f0_nvp,f0_inode1:f0_inode2,0:f0_nmu,2), intent(inout)  dist_df0g,
real(8), dimension(-f0_nvp:f0_nvp,f0_inode1:f0_inode2,0:f0_nmu,2), intent(inout)  dist_n,
integer, intent(out)  iw0,
integer, intent(out)  niw 
)

Here is the caller graph for this function:

subroutine rad_emissivity2 ( integer, intent(in)  node,
real (kind=8), intent(out)  Lz_out,
real (kind=8), intent(out)  avgZ_out,
real (kind=8), intent(out)  avgZ2_out,
real (kind=8), intent(in)  tval_eV_in,
real (kind=8), intent(in)  eden 
)

Calculate emissivity from ADAS data file.

Parameters
[in]nodeNode index of the grid, integer
[in]tval_eV_inInput temperature, real(8)
[in]edenInput electron density, real(8)
[out]Lz_outEmissivity, real(8)
[out]avgZ_outAverage Z_eff, real(8)
[out]avgZ2_outAverage Z_eff^2, real(8)

Here is the caller graph for this function:

subroutine set_gvid0_pid_from_f0 ( integer, intent(in)  nnode)

Here is the caller graph for this function:

subroutine symmetric_f ( real (8), dimension(-f0_nvp:f0_nvp,f0_inode1:f0_inode2,f0_imu1:f0_imu2,ptl_isp:ptl_nsp), intent(inout)  f,
integer, intent(in)  flag 
)

Here is the caller graph for this function: