XGC1
Data Types | Functions/Subroutines | Variables
ptl_module Module Reference

Data Types

type  ptl_type_aosoa
 
type  ptl_type
 
type  species_type
 
interface  sind
 
interface  aind
 

Functions/Subroutines

subroutine transpose_to_aos (ptl_aosoa, n, ptl_aos)
 
subroutine transpose_from_aos (ptl_aos, n, ptl_aosoa)
 
subroutine all_species_allocate_tr_p_save ()
 
subroutine all_species_deallocate_tr_p_save ()
 

Variables

integer, parameter ptl_nphase =6
 
integer, parameter ptl_nphase2 =12
 
integer, parameter ptl_nconst =3
 
integer ptl_isp
 
integer ptl_nsp =1
 
integer, parameter num_shift_ie_opts = 10
 
integer, parameter index_shift_ie_max_nthreads = 1
 
integer, parameter index_shift_ie_use_alltoall = 2
 
integer, parameter index_shift_ie_use_hs_barrier0 = 3
 
integer, parameter index_shift_ie_large_limit = 4
 
integer, parameter index_shift_ie_handshake = 5
 
integer, parameter index_shift_ie_use_hs_barrier1 = 6
 
integer, parameter index_shift_ie_use_sendrecv = 7
 
integer, parameter index_shift_ie_all_sendrecv = 8
 
integer, parameter index_shift_ie_use_isend = 9
 
integer, parameter index_shift_ie_use_rsend = 10
 
integer, parameter use_def_shift_ie_opt = -2
 
integer, parameter true_shift_ie_opt = 1
 
integer, parameter false_shift_ie_opt = 0
 
real(8), dimension(0:ptl_nsp_max) ptl_mass = 0D0
 
real(8), dimension(0:ptl_nsp_max) ptl_charge = 0D0
 
real(8), dimension(0:ptl_nsp_max) ptl_c_m = 0D0
 
real(8), dimension(0:ptl_nsp_max) ptl_c2_2m = 0D0
 
type(species_type), dimension(0:ptl_nsp_max), target spall_global
 
integer ptl_enum_save
 
integer ptl_tracer_n_save = 0
 
type(ptl_type_aosoa), dimension(:), allocatable ptl_iphase_save
 
integer ptl_inum_save = 0
 
real(8) ptl_special_r = 1.95D0
 Start R for particle in single particle sim. (sml_special==1) More...
 
real(8) ptl_special_z = 0D0
 Start Z for particle in single particle sim. (sml_special==1) More...
 
real(8) ptl_special_phi = 0D0
 Start phi for particles in single particle sim. (sml_special==1 and 4) More...
 
real(8) ptl_special_en_ev = 7205
 Energy of particles with sml_special==(1,4) More...
 
real(8) ptl_special_pitch = 1D0
 Pitch v_parallel/v of particles with sml_special==(1,4) (at B=B_min with sml_special=4) More...
 
real(8) ptl_special_poin_phi = 0D0
 Toroidal angle for Poincare plot (sml_special==4) More...
 
integer ptl_special_npsi = 6
 Number of flux-surfaces on which to load particles (ptl_special==4) More...
 
real(8) ptl_special_psi_min = 0.94D0
 Min. psi of flux-surface on which to load particles (ptl_special==4) More...
 
real(8) ptl_special_psi_max = 0.99D0
 Max. psi of flux-surface on which to load particles (ptl_special==4) More...
 
integer ptl_special_n = 100
 sml_special==3 More...
 
real(8), dimension(0:ptl_nsp_max) ptl_mass_au =2D0
 
real(8), dimension(0:ptl_nsp_max) ptl_charge_eu =1D0
 
integer, parameter pir =1
 
integer, parameter piz =2
 
integer, parameter pip =3
 
integer, parameter pirho =4
 
integer, parameter pim =1
 
integer, parameter piw1 =5
 
integer, parameter piw2 =6
 
integer, parameter piw0 =2
 
integer, parameter pif0 =3
 
integer, parameter pig2 =4
 
character(len=20), dimension(0:ptl_nsp_max) ptl_marker_type
 
character(len=20), dimension(0:ptl_nsp_max) ptl_f_analytic_shape
 
character(len=20), dimension(0:ptl_nsp_max) ptl_weight_evo_eq
 
logical, dimension(0:ptl_nsp_max) ptl_dynamic_f0
 

Function/Subroutine Documentation

◆ all_species_allocate_tr_p_save()

subroutine ptl_module::all_species_allocate_tr_p_save

◆ all_species_deallocate_tr_p_save()

subroutine ptl_module::all_species_deallocate_tr_p_save

◆ transpose_from_aos()

subroutine ptl_module::transpose_from_aos ( type(ptl_type), dimension(:), intent(in)  ptl_aos,
integer, intent(in)  n,
type(ptl_type_aosoa), dimension(:), intent(out)  ptl_aosoa 
)
Here is the caller graph for this function:

◆ transpose_to_aos()

subroutine ptl_module::transpose_to_aos ( type(ptl_type_aosoa), dimension(:), intent(in)  ptl_aosoa,
integer, intent(in)  n,
type(ptl_type), dimension(:), intent(out)  ptl_aos 
)
Here is the caller graph for this function:

Variable Documentation

◆ false_shift_ie_opt

integer, parameter ptl_module::false_shift_ie_opt = 0

◆ index_shift_ie_all_sendrecv

integer, parameter ptl_module::index_shift_ie_all_sendrecv = 8

◆ index_shift_ie_handshake

integer, parameter ptl_module::index_shift_ie_handshake = 5

◆ index_shift_ie_large_limit

integer, parameter ptl_module::index_shift_ie_large_limit = 4

◆ index_shift_ie_max_nthreads

integer, parameter ptl_module::index_shift_ie_max_nthreads = 1

◆ index_shift_ie_use_alltoall

integer, parameter ptl_module::index_shift_ie_use_alltoall = 2

◆ index_shift_ie_use_hs_barrier0

integer, parameter ptl_module::index_shift_ie_use_hs_barrier0 = 3

◆ index_shift_ie_use_hs_barrier1

integer, parameter ptl_module::index_shift_ie_use_hs_barrier1 = 6

◆ index_shift_ie_use_isend

integer, parameter ptl_module::index_shift_ie_use_isend = 9

◆ index_shift_ie_use_rsend

integer, parameter ptl_module::index_shift_ie_use_rsend = 10

◆ index_shift_ie_use_sendrecv

integer, parameter ptl_module::index_shift_ie_use_sendrecv = 7

◆ num_shift_ie_opts

integer, parameter ptl_module::num_shift_ie_opts = 10

◆ pif0

integer, parameter ptl_module::pif0 =3

◆ pig2

integer, parameter ptl_module::pig2 =4

◆ pim

integer, parameter ptl_module::pim =1

◆ pip

integer, parameter ptl_module::pip =3

◆ pir

integer, parameter ptl_module::pir =1

◆ pirho

integer, parameter ptl_module::pirho =4

◆ piw0

integer, parameter ptl_module::piw0 =2

◆ piw1

integer, parameter ptl_module::piw1 =5

◆ piw2

integer, parameter ptl_module::piw2 =6

◆ piz

integer, parameter ptl_module::piz =2

◆ ptl_c2_2m

real (8), dimension(0:ptl_nsp_max) ptl_module::ptl_c2_2m = 0D0

◆ ptl_c_m

real (8), dimension(0:ptl_nsp_max) ptl_module::ptl_c_m = 0D0

◆ ptl_charge

real (8), dimension(0:ptl_nsp_max) ptl_module::ptl_charge = 0D0

◆ ptl_charge_eu

real (8), dimension(0:ptl_nsp_max) ptl_module::ptl_charge_eu =1D0

◆ ptl_dynamic_f0

logical, dimension(0:ptl_nsp_max) ptl_module::ptl_dynamic_f0

◆ ptl_enum_save

integer ptl_module::ptl_enum_save

◆ ptl_f_analytic_shape

character (len=20), dimension(0:ptl_nsp_max) ptl_module::ptl_f_analytic_shape

◆ ptl_inum_save

integer ptl_module::ptl_inum_save = 0

◆ ptl_iphase_save

type(ptl_type_aosoa), dimension(:), allocatable ptl_module::ptl_iphase_save

◆ ptl_isp

integer ptl_module::ptl_isp

◆ ptl_marker_type

character (len=20), dimension(0:ptl_nsp_max) ptl_module::ptl_marker_type

◆ ptl_mass

real (8), dimension(0:ptl_nsp_max) ptl_module::ptl_mass = 0D0

◆ ptl_mass_au

real (8), dimension(0:ptl_nsp_max) ptl_module::ptl_mass_au =2D0

◆ ptl_nconst

integer parameter ptl_module::ptl_nconst =3

◆ ptl_nphase

integer, parameter ptl_module::ptl_nphase =6

◆ ptl_nphase2

integer, parameter ptl_module::ptl_nphase2 =12

◆ ptl_nsp

integer ptl_module::ptl_nsp =1

◆ ptl_special_en_ev

real (8) ptl_module::ptl_special_en_ev = 7205

Energy of particles with sml_special==(1,4)

◆ ptl_special_n

integer ptl_module::ptl_special_n = 100

sml_special==3

◆ ptl_special_npsi

integer ptl_module::ptl_special_npsi = 6

Number of flux-surfaces on which to load particles (ptl_special==4)

◆ ptl_special_phi

real (8) ptl_module::ptl_special_phi = 0D0

Start phi for particles in single particle sim. (sml_special==1 and 4)

◆ ptl_special_pitch

real (8) ptl_module::ptl_special_pitch = 1D0

Pitch v_parallel/v of particles with sml_special==(1,4) (at B=B_min with sml_special=4)

◆ ptl_special_poin_phi

real (8) ptl_module::ptl_special_poin_phi = 0D0

Toroidal angle for Poincare plot (sml_special==4)

◆ ptl_special_psi_max

real (8) ptl_module::ptl_special_psi_max = 0.99D0

Max. psi of flux-surface on which to load particles (ptl_special==4)

◆ ptl_special_psi_min

real (8) ptl_module::ptl_special_psi_min = 0.94D0

Min. psi of flux-surface on which to load particles (ptl_special==4)

◆ ptl_special_r

real (8) ptl_module::ptl_special_r = 1.95D0

Start R for particle in single particle sim. (sml_special==1)

◆ ptl_special_z

real (8) ptl_module::ptl_special_z = 0D0

Start Z for particle in single particle sim. (sml_special==1)

◆ ptl_tracer_n_save

integer ptl_module::ptl_tracer_n_save = 0

◆ ptl_weight_evo_eq

character (len=20), dimension(0:ptl_nsp_max) ptl_module::ptl_weight_evo_eq

◆ spall_global

type(species_type), dimension(0:ptl_nsp_max), target ptl_module::spall_global

◆ true_shift_ie_opt

integer, parameter ptl_module::true_shift_ie_opt = 1

◆ use_def_shift_ie_opt

integer, parameter ptl_module::use_def_shift_ie_opt = -2