#include "adios_macro.h"
#include "t_coeff_mod_macro.h"
|
subroutine | set_loading_factors (ptl_total) |
|
subroutine | load () |
|
subroutine | maxwell_v_dist (grid, spall) |
|
subroutine | load_flat_v_single (t_ev, up, b, mass, charge, rho, mu, w0_adjust) |
|
subroutine | get_v_and_dist |
|
subroutine | load_v_single (t_ev, up, b, mass, charge, rho, mu, w0_adjust) |
|
subroutine | shift_check (grid, sp) |
|
subroutine | adjust_n_ptl_for_core_ptl (n_ptl) |
|
subroutine | uniform_space_dist (grid, psn, spall) |
|
subroutine | loading_factor (grid, r, z, psi, itr, p, lfac) |
|
subroutine | maxwell_dist (ti_ev, b, rho, mu, mass, charge, maxe) |
|
subroutine | get_volume (grid, psn, spall) |
|
subroutine | load_single () |
|
subroutine | load_special4 () |
| Special loading routine for the generation of Poincare plots of perturbed magnetic fields. Used with sml_special==4. All particles on the same MPI process are spread evenly across all poloidal angles on the same flux-surface. The number of flux-surfaces is determined by ptl_special_npsi. More...
|
|
subroutine | rho_mu_to_ev_pitch2 (rho, mu, b, ev, pitch, sp_type) |
|
subroutine | ev_pitch_to_rho_mu2 (ev, pitch, b, rho, mu, sp_type) |
|
subroutine adjust_n_ptl_for_core_ptl |
( |
integer(c_int) |
n_ptl | ) |
|
subroutine ev_pitch_to_rho_mu2 |
( |
real (kind=8), intent(in) |
ev, |
|
|
real (kind=8), intent(in) |
pitch, |
|
|
real (kind=8), intent(in) |
b, |
|
|
real (kind=8), intent(out) |
rho, |
|
|
real (kind=8), intent(out) |
mu, |
|
|
integer |
sp_type |
|
) |
| |
subroutine load_flat_v_single::get_v_and_dist |
( |
| ) |
|
subroutine get_volume |
( |
type(grid_type) |
grid, |
|
|
type(psn_type) |
psn, |
|
|
type(species_type), dimension(0:ptl_nsp_max) |
spall |
|
) |
| |
subroutine load_flat_v_single |
( |
real (8), intent(in) |
t_ev, |
|
|
real (8), intent(in) |
up, |
|
|
real (8), intent(in) |
b, |
|
|
real (8), intent(in) |
mass, |
|
|
real (8), intent(in) |
charge, |
|
|
real (8), intent(out) |
rho, |
|
|
real (8), intent(out) |
mu, |
|
|
real (8), intent(out) |
w0_adjust |
|
) |
| |
subroutine load_single |
( |
| ) |
|
subroutine load_special4 |
( |
| ) |
|
Special loading routine for the generation of Poincare plots of perturbed magnetic fields. Used with sml_special==4. All particles on the same MPI process are spread evenly across all poloidal angles on the same flux-surface. The number of flux-surfaces is determined by ptl_special_npsi.
subroutine load_v_single |
( |
real (8), intent(in) |
t_ev, |
|
|
real (8), intent(in) |
up, |
|
|
real (8), intent(in) |
b, |
|
|
real (8), intent(in) |
mass, |
|
|
real (8), intent(in) |
charge, |
|
|
real (8), intent(out) |
rho, |
|
|
real (8), intent(out) |
mu, |
|
|
real (8), intent(out) |
w0_adjust |
|
) |
| |
subroutine loading_factor |
( |
type(grid_type), intent(in) |
grid, |
|
|
real (kind=8), intent(in) |
r, |
|
|
real (kind=8), intent(in) |
z, |
|
|
real (kind=8), intent(in) |
psi, |
|
|
integer |
itr, |
|
|
real (kind=8), dimension(3) |
p, |
|
|
real (kind=8), intent(out) |
lfac |
|
) |
| |
subroutine maxwell_dist |
( |
real (kind=8), intent(in) |
ti_ev, |
|
|
real (kind=8), intent(in) |
b, |
|
|
real (kind=8), intent(out) |
rho, |
|
|
real (kind=8), intent(out) |
mu, |
|
|
real (kind=8), intent(in) |
mass, |
|
|
real (kind=8), intent(in) |
charge, |
|
|
real (kind=8), intent(in) |
maxe |
|
) |
| |
subroutine maxwell_v_dist |
( |
type(grid_type), intent(in) |
grid, |
|
|
type(species_type), dimension(0:ptl_nsp_max) |
spall |
|
) |
| |
subroutine rho_mu_to_ev_pitch2 |
( |
real (kind=8), intent(inout) |
rho, |
|
|
real (kind=8), intent(inout) |
mu, |
|
|
real (kind=8), intent(inout) |
b, |
|
|
real (kind=8), intent(out) |
ev, |
|
|
real (kind=8), intent(out) |
pitch, |
|
|
integer |
sp_type |
|
) |
| |
subroutine set_loading_factors |
( |
integer(8), intent(in) |
ptl_total | ) |
|
subroutine shift_check |
( |
type(grid_type) |
grid, |
|
|
type(species_type) |
sp |
|
) |
| |
subroutine uniform_space_dist |
( |
type(grid_type), intent(in) |
grid, |
|
|
type(psn_type) |
psn, |
|
|
type(species_type), dimension(0:ptl_nsp_max) |
spall |
|
) |
| |