![]() |
ORB5
v4.9.4
|
Data Types | |
type | moments_3d_class |
interface | omp_reduce_diag |
type | pointer_markers |
type | pointer_markers_i8 |
type | pointer_markers_logic |
type | pointer_markers_r4 |
type | pointer_quadtree |
Enumerations | |
enum | { p_parallel , v_parallel , mixed } |
Functions/Subroutines | |
subroutine, public | init_particles |
subroutine | construct_moments_3d (this, id, label, description) |
subroutine | initpic |
Allocate and initialize particle arrays. More... | |
subroutine | check_allocation (istat, locatn, varname) |
subroutine | allocate_work_rev |
subroutine | deallocate_work_rev |
subroutine, public | load_particles |
Initialize markers. More... | |
subroutine, public | init_test_particles |
subroutine, public | load_test_particles |
real function | toroidal_momentum (isp, st, chit, tsubB, ut, mut, psi_correction) |
Function wrapper for toroidal momentum calculation. More... | |
subroutine | get_toroidal_momentum (isp, st, chit, ut, mut, psi_correction, tsubB, psit_prof, psit_pot, fvpllb_out, dfvpllb_den_out, dfvpllb_dpsi_out) |
real function, public | b_star (st, chit, b, ut, tprime, addpBst, isp) |
Calculate the parallel component of b_star. More... | |
subroutine | get_dist_derivs (f0, ut, mut, b, epsilon_hat, ze, zvth2, nval, Epsi, psit, ngrad, tgrad, vpval, vpgrad, isp, df0_dek, df0_du, df0_dpsi_prof, df0_dchi_prof, df0_dpsi_pot, zecor, pot_equil, pot_equil0, chit) |
subroutine, public | bcpart_disp (run_on_device) |
Impose particle boundary conditions in phi and s (dispatcher). More... | |
subroutine | bcpart (pic1_loc, npart_loc, isp, run_on_device) |
Boundary Conditions at s=sfmax (and s=sfmin if needed) and periodicity at phi=2pi. More... | |
subroutine, public | print_test_particles (step) |
subroutine | printip (isp, step, ntest_loc, pion_1_loc) |
subroutine, public | pullback |
subroutine | weight_mixed2sympl (pic1_loc, pic2_loc, npart_loc, isp) |
subroutine | coords_mixed2sympl (pic1_loc, pic2_loc, npart_loc, isp) |
subroutine, public | parmove (iter, run_on_device, work1flag, work2flag, work3flag, work5flag, work6flag, work7flag, work8flag, work9flag) |
subroutine, public | parmove_sp (iter, isp, run_on_device, work1flag, work2flag, work3flag, work5flag, work6flag, work7flag, work8flag, work9flag) |
subroutine, public | get_larmor_indices_disp (initflag_in, adapt_only_in) |
subroutine | get_larmor_indices (isp, pic1_loc, pic2_loc, npart_loc, initflag) |
Compute the Larmor radius and number of gyropoints, and store then in work_temp. More... | |
subroutine, public | compute_all_larmor_positions_disp (comp_dk) |
subroutine | compute_all_larmor_positions (isp, pic1_loc, pic2_loc, npart_loc) |
subroutine | compute_deposition_attributes_dk (u, w, uw, n) |
Compute drift-kinetic species marker attributes to be deposited. More... | |
subroutine, public | compute_reduced_weights_disp (isp, nsel_att) |
subroutine | compute_reduced_weights (isp, pic1_loc, pic2_loc, pic3_loc, npart_loc, nsel_att) |
subroutine, public | sort_gc_2d_disp |
Sort guiding centers of all species in the s-chi plane (so-called "cache sort") More... | |
subroutine, public | sort_gc_2d (isp) |
Sort guiding centers of one species in the s-chi plane. More... | |
subroutine, public | sort_gc_3d_disp |
Sort drift-kinetic species in 3D. More... | |
subroutine, public | unsort_gc_3d_disp |
Sort drift-kinetic species in 3D. More... | |
logical function | convert_need_field_to_logical (need_field, istep, nl_main_substep) |
Convert integer convention for when field is needed to logical. More... | |
subroutine, public | get_field_disp (field, istep, nl_main_substep, i_att) |
Evaluate field at marker positions for each species. More... | |
subroutine | get_field_disp_lvl2 (field_bspl, markers, markers_field, np, x_att, y_att, z_att, field_att, grad_field_att, need_field, need_grad_field, istep, nl_main_substep, displs, atts_offset) |
Evaluate field at marker positions for a given species and a given set of markers (guiding centers or Larmor points, sorted or not) More... | |
subroutine | change_grad_coord (np, dfield_dx, dfield_dy, gxx, gxy, gyx, gyy) |
Change coordinate of field gradient. More... | |
subroutine | gyroaverage_field (pic1_loc, work_temp_loc, npart_loc, gyro_field_att, gyro_grad_field_att, larmor_loc, need_gyro_field, need_gyro_grad_field, istep, nl_main_substep, atts_offset) |
Gyro-average field. More... | |
subroutine, public | push_disp (iter) |
subroutine | push (pic1_loc, pic2_loc, pic3_loc, work1_loc, npart_loc, isp, iter) |
Pushes the particles according to the fields. More... | |
subroutine | diagnostics_after_loop (isp) |
subroutine | polarisation_fieldcalc (isp) |
subroutine | diagnostics_in_loop (ip, isp, sigmat, chit, chit_cos, chit_sin, phit, wt, dPsidt0, dPsidt1, zf0, psi0t, ze, pot_equil, tval, zvth2, rt, hh, vpt2, ut, ut2, w3t, pt, pvolgc, df0_dpsi_prof, df0_dchi_prof, dpsi_prof_dt, dchi_prof_dt, vpar, genelec, bstar_inv, bgrb, rhs, tempd, vgc, dvpadt1, dvpadt0, vgb, vpressure, veb_f, vexb, expt_back, eypt_back, b, exh, vecrossb_f2, dpotdpsi, vdr, pvol, ksieta, is_trapped, mut, umin_bin, du_flux_inv, dmu_flux_inv, gyroapar, nval, ithread) |
subroutine | test_particle_output (isp, ip, psi0t, ze, pot_equil, wt, zvth2, nval, pvol, zf0) |
subroutine | clear_diagnostics (isp) |
Clean diagnostics by re-initializing data array to zero. More... | |
subroutine, public | update_ffinit_or_pvol |
subroutine, public | trap_detrap_disp |
subroutine | trap_detrap (pic1_loc, pic3_loc, npart_loc, isp) |
Determines whether trapped particles are now free and vice versa. More... | |
subroutine | str_diagnostic_start |
subroutine, public | init_push_diagnostics |
subroutine | get_vdr (isp, sigmat, chit, b_inv, tprime, ut, bstar_inv, toB, dvpadt1, vgc, vgb, vexb, bgrb, genelec, vapar, rhs_type, vdr, dPsidt0, dPsidt1, vdchi) |
subroutine | get_rhs (ip, isp, pvol, vdr, vdchi, vgc, vin, vpval, genelec, dvpadt0, dvpadt1, gyroapar, ze, zecor, dH0_dt_correction, pot_equil, pot_equil0, distribution, ut, mut, b, zvth2, nval, Epsi, psi0t, ngrad, tgrad, vpgrad, dfvpllb_dpsi, dfvpllb_den, rhs, dpotdpsi, omegasq_corr, df0_dpsi_prof, df0_dchi_prof, dpsi_prof_dt, dchi_prof_dt, rhs_type, mgradphi, vgb, vpressure, mgradapar, hh_sympl, chit, dchi_dt1, iter, ffinit, dPsidt0) |
subroutine | get_vexbn (sigmat, chit, zvth2, rt2, hy, hz, genelec, grsigma2, grchi2, grsigmagrchi, vexbn) |
subroutine | strong_diagnostic_output (isp, ip, psi0t, temp2, ze, vecrossb_f2, pot_equil, zf0, zvth2_inv, dpotdpsi, vdr, rhs) |
subroutine | sum_of_weights_and_energy_transfer (isp, wt, w3t, pt, pvolgc, ze, zf0, sigmat, q_vgc_dot_genelec, q_dvpadt0_dot_gyroapar, ithread) |
subroutine | add_to_0d (diag, i, to_add_list, ithread) |
subroutine | max_of_0d (diag, i, to_add_list, ithread) |
subroutine | add_to_1d (diag, diag_index, i, to_add_list, ithread) |
subroutine | add_to_2d (diag, diag_index, diag_index2, i, to_add_list, ithread) |
subroutine | add_to_3d (diag, diag_index, diag_index2, diag_index3, i, to_add_list, ithread) |
subroutine | omp_reduce_diag0d (diagnostic, nl_max_) |
subroutine | omp_reduce_diag1d (diagnostic, nl_max_) |
subroutine | omp_reduce_diag2d (diagnostic, nl_max_) |
subroutine | omp_reduce_diag3d (diagnostic, nl_max_) |
subroutine | strong_flow_terms (isp, sigmat, chit, bstar_inv, genelec, pztomobstar, bgrb, addp, expt_back, eypt_back, exh, ut, mut, hh, dvpadt1_str, dvpadt0_str, vgc) |
subroutine | diagnose_sampling (isp, s, en, pvol, w, zf0, ithread) |
Diagnose the velocity space sampling. More... | |
subroutine | diagnose_phasespace (isp, s, vpar, mu, B, pvol, w, zf0, ithread) |
Diagnose phase space properties. More... | |
subroutine | helical_flux_label (sigmat, xiang, irloc, dr_flux_inv, ipol) |
subroutine | jdote (isp, ut2, vpt2, vpar, genelec, elec_par, wt, bstar_inv, bgrb, vgb, vpressure, veb_f, vexb, expt_back, eypt_back, dvpadt0, gyroapar, jdote_tot, ithread) |
subroutine | mpr_es_calc (isp, ithread, iuloc, imuloc, sigmat, thetat, wt, ut2, vpt2, bstar_inv, vpar, genelec, bgrb, vgb, vpressure, veb_f) |
subroutine | sum_moment2d (isp, irloc, ithetaloc, wt, ffinit_tmp1, ffinit_tmp2, ffinit_tmp3, ffinit_tmp4, ithread) |
subroutine | sum_particles_in_poloidal_bins (isp, ithetaloc, wt, ffinit_tmp1, ffinit_tmp2, ffinit_tmp3, ffinit_tmp4, wt_tmp1, wt_tmp2, wt_tmp3, ithread) |
subroutine | sum_particles_in_radial_bins (isp, ip, irloc, zf0, dPsidt1, dPsidt0, ze, wt, ut, rt2, vpar, zf0_tmp1, zf0_tmp2, zf0_tmp3, sigmat, zf0_local, grsigma2, grsigmagrchi, b, exh, wt_tmp1, wt_tmp2, wt_tmp3, vexb, ffinit_tmp1, ffinit_tmp2, ffinit_tmp3, ffinit_tmp4, ffinit_tmp5, jdote_tot, ithread) |
subroutine | sum_in_radial_bins_island (isp, irloc, ipol, ut, gradpsi0, htildex, htildey, ze, zf0, wt, dPsidt1, ffinit_tmp1, ffinit_tmp2, ffinit_tmp3, ffinit_tmp4, ithread) |
subroutine | push_displacements (isp, ksieta, vexb, chit_cos, chit_sin, sigmat, tempd, vgc, dvpadt1, dvpadt0, rhs, ithread) |
subroutine | electron_fluxes_moments (isp, irloc, zf0, dPsidt1, dPsidt0, ze, wt, ffinit_tmp1, ffinit_tmp2, ffinit_tmp3, ffinit_tmp4, is_trapped, ithread) |
subroutine | sum_fluid_moments (isp, sigmat, chit, phit, wt, ut, ut2, vpt2, ithread) |
subroutine | sum_entropy_fluctuation (isp, wt, zf0, q_vgc_dot_genelec, zvth2_inv, df0_dpsi_prof, df0_dchi_prof, dpsi_prof_dt, ithread) |
subroutine | sum_velocities (isp, iuloc, imuloc, wt, zf0, pvol, ithread) |
subroutine, public | get_pos (isp, nsel_gyr_local, alp, rhog, sigma, chi, lnaveg, chit, sigmat, chi_sigma_gradients) |
subroutine | get_n_larmor_pts (isp, nsel_gyr_local, rhog, lnaveg) |
Choice of the gyro-average algorithm. More... | |
subroutine, public | calc_dist (isp, sigmat, chit, ut, mu, psi0_corr, distribution, bst, dist_coeff, diff_t_vpll) |
real function | ze_correction (ut, vpval) |
real function, dimension(3) | cross_product (a, b) |
subroutine, public | read_write_particle_data (flag, datn) |
real function | get_fvpllb (psi, mu, en, v_pll, isp) |
real function | vpaob_ba (psi, mu_scaled, vpll_sign) |
real function, public | get_vpaob_ba (psi, mu, en, v_pll, isp) |
subroutine | build_vpaob |
subroutine | init_vpa_quants |
subroutine | vpa_quants (psi, mu, en_star, v_pll, fvpllb, dfvpllb_den, dfvpllb_dpsi, isp) |
subroutine, public | get_properties (ip, isp, sigmat, chit, en, b, psi0can, f0, zf0, f0_max, T, en_hamilt) |
Get species properties. More... | |
real function, public | q_of_s (zs) |
subroutine, public | quadtree_smoothing_disp () |
subroutine | quadtree_smoothing_interface (pic1_loc, pic2_loc, indx, ipos, p_start, p_end, work, quadtree_array_all, npart_loc, isp, diagnose_) |
Dispatcher for the quadtree_smoothing algorithm. More... | |
subroutine | postpush_fullf (pic1_loc, pic2_loc, npart_loc, isp) |
subroutine, public | postpush_disp |
subroutine, public | set_weights_to_zero_at_t0 |
subroutine, public | compute_psi0_corr_disp (run_on_device) |
subroutine, public | compute_psi0_corr (pic1_loc, pic2_loc, npart_loc, isp, run_on_device) |
real function, public | compute_psi0_corr_one_particle (isp, st, chit, mut, ut) |
Compute the the correction term for the corrected canonical Maxwellian. More... | |
real function | bmaxi (psit) |
Approximate B(psi0,pi) by B(abs(psi0),0) if psi0 is negative. More... | |
subroutine | perp_curl_ue (s, chi, smodstar, chimodstar, phimodstar) |
subroutine, public | diagnose_particles |
subroutine, public | grid_pic (isp, nsel_att, reduce_flag, lb, ub, assign1, i_att) |
Charge or current deposition on grid. More... | |
subroutine, public | charge_deposition_passing_electrons_disp (isp, lb, ub, rho_passing) |
Deposit the charge of passing electrons in a separate array for new hybrid electron model. More... | |
subroutine | charge_deposition_passing_electrons (x, y, w, nl_trapped, np, lb, ub, rho_passing) |
Charge deposition routine for passing electrons. More... | |
subroutine | l5_auto_init (isp, l5_s_array) |
subroutine | gauss_list_init (isp, pert_table, nperts) |
subroutine, public | grid_pic_diagnostic (isp, nsel_att, lb, ub, assign1) |
Charge or current deposition on grid. More... | |
subroutine | pszs_setboundaries (pic1_loc, pic2_loc, npart_loc, isp, lb, ub) |
subroutine, public | pszs_calc |
subroutine | deposit_bsplines (pszs_, isp, npart_loc, pic1_loc, pic2_loc) |
Variables | |
integer, save, public | max_work |
integer, save, public | max_work_fields |
integer, save, public | max_pic2 |
integer, save | nlarm_pic2 |
integer, save | max_work_rev |
integer, save, public | max_pic5 |
integer, dimension(:), allocatable, save, public | npart |
integer, dimension(:), allocatable, save, public | npmx |
real, dimension(:), allocatable, save, public | total_weight |
real, dimension(:), allocatable, save, public | dens0 |
real, save | ftrap |
integer, save | ntrap |
integer, dimension(:), allocatable, save, public | ntest |
type(pointer_markers), dimension(:), allocatable, save, public | pic1 |
type(pointer_markers), dimension(:), allocatable, save, public | pic2 |
type(pointer_markers), dimension(:), allocatable, save, public | work1 |
type(pointer_markers), dimension(:), allocatable, save, public | work2 |
type(pointer_markers), dimension(:), allocatable, save, public | work_temp |
type(pointer_markers), dimension(:), allocatable, save | work_rev |
type(pointer_markers), dimension(:), allocatable, save | pion_1 |
integer, parameter | tpnprop =17 |
type(pointer_markers), dimension(:), allocatable, save, public | work3 |
type(pointer_markers), dimension(:), allocatable, save, public | work5 |
type(pointer_markers), dimension(:), allocatable, save, public | work6 |
type(pointer_markers), dimension(:), allocatable, save, public | work7 |
type(pointer_markers), dimension(:), allocatable, save, public | work8 |
type(pointer_markers), dimension(:), allocatable, save, public | work9 |
type(pointer_markers_logic), dimension(:), allocatable, save, public | pic3 |
type(pointer_markers_i8), dimension(:), allocatable, save, public | pic4 |
type(pointer_markers_r4), dimension(:), allocatable, save, public | pic5 |
real, dimension(:,:), allocatable, save | n_vel_1d |
real, dimension(:,:), allocatable, save | n_vel_trap_1d |
real, save | dr_flux_inv |
real, save | dth_inv |
real, save | psi0_inv |
integer, save | irloc_in |
real, dimension(:), allocatable, save | ppsum_buff_real |
real, save | psi_max =1.0 |
real, save | psi_min =0.0 |
real, save | mu_max |
real, save | mu_min |
real, dimension(:,:), allocatable, save | vpll_momentum_bins |
real, dimension(:,:), allocatable, save | vpbi |
integer, save | nbin_mu_f0 |
real, save | dpsi_bin |
real, save | dmu_bin |
real, save | dmu_bin_2 |
real, dimension(:), allocatable, save | bin_surf_inv |
real, dimension(:), allocatable, save | bin_vol_inv |
type(pointer_quadtree), dimension(:), allocatable, save | qtree |
integer, save | num_mesh |
integer, save | qt_num_s |
integer, save | qt_num_chi |
integer, parameter | qt_num_s_per_ns = 2 |
logical, dimension(:), allocatable, save | qt_toggle_flag |
complex, dimension(:,:,:), allocatable, save, public | cfield_out_3d |
complex, dimension(:,:,:), allocatable, save, public | cfield_out_3d_fft |
type(sorting_class), dimension(:), allocatable, save | sortings |
integer, save | lb_wx |
integer, save | ub_wx |
Non-null splines over interval i are [i+lb_wx,i+ub_wx]. More... | |
real, dimension(:,:,:), allocatable | rho_passing_omp |
OpenMP working array for deposition for passing electrons (field replicated among OpenMP threads) More... | |
type(moments_3d_class), dimension(moments_3d_size), public | moments_3d |
real, dimension(:), allocatable | nptot_inv |
|
private |
|
private |
|
private |
|
private |
|
private |
real function, public part::b_star | ( | real, intent(in) | st, |
real, intent(in) | chit, | ||
real, intent(in) | b, | ||
real, intent(in) | ut, | ||
real, intent(in) | tprime, | ||
real, intent(in) | addpBst, | ||
integer, intent(in) | isp | ||
) |
Calculate the parallel component of b_star.
|
private |
Boundary Conditions at s=sfmax (and s=sfmin if needed) and periodicity at phi=2pi.
[in] | run_on_device | Run kernel on the accelerator |
subroutine, public part::bcpart_disp | ( | logical, intent(in) | run_on_device | ) |
Impose particle boundary conditions in phi and s (dispatcher).
[in] | run_on_device | Run kernel on the accelerator |
real function part::bmaxi | ( | real, intent(in) | psit | ) |
Approximate B(psi0,pi) by B(abs(psi0),0) if psi0 is negative.
subroutine part::build_vpaob |
subroutine, public part::calc_dist | ( | integer, intent(in) | isp, |
real, intent(in) | sigmat, | ||
real, intent(in) | chit, | ||
real, intent(in) | ut, | ||
real, intent(in) | mu, | ||
real, intent(in) | psi0_corr, | ||
real, intent(out) | distribution, | ||
real, intent(out), optional | bst, | ||
real, intent(out), optional | dist_coeff, | ||
real, intent(out), optional | diff_t_vpll | ||
) |
subroutine part::change_grad_coord | ( | integer, intent(in) | np, |
real, dimension(np), intent(inout) | dfield_dx, | ||
real, dimension(np), intent(inout) | dfield_dy, | ||
real, dimension(np), intent(in) | gxx, | ||
real, dimension(np), intent(in) | gxy, | ||
real, dimension(np), intent(in) | gyx, | ||
real, dimension(np), intent(in) | gyy | ||
) |
Change coordinate of field gradient.
[in] | np | Number of markers |
[in,out] | dfield_dx | Radial derivative of field |
[in,out] | dfield_dy | Poloidal derivative of field |
[in] | gxx | Markers' |grad x|^2 |
[in] | gxy | Markers' (grad x \cdot \nabla y) |
[in] | gyx | Markers' (grad y \cdot \nabla x) |
[in] | gyy | Markers' |grad y|^2 |
subroutine part::charge_deposition_passing_electrons | ( | real, dimension(np), intent(in) | x, |
real, dimension(np), intent(in) | y, | ||
real, dimension(np), intent(in) | w, | ||
logical, dimension(np), intent(in) | nl_trapped, | ||
integer, intent(in) | np, | ||
integer, dimension(4), intent(in) | lb, | ||
integer, dimension(4), intent(in) | ub, | ||
real, dimension(lb(1):ub(1),lb(2):ub(2)), intent(out) | rho_passing | ||
) |
Charge deposition routine for passing electrons.
[in] | x | Marker radial positions |
[in] | y | Marker poloidal positions |
[in] | w | Marker weights |
[in] | nl_trapped | Are markers trapped? |
[in] | np | Number of markers |
[in] | lb | Lower indices of the deposition arrays |
[in] | ub | Upper indices of the deposition arrays |
[out] | rho_passing | Array containing the deposited charge |
subroutine, public part::charge_deposition_passing_electrons_disp | ( | integer, intent(in) | isp, |
integer, dimension(4), intent(in) | lb, | ||
integer, dimension(4), intent(in) | ub, | ||
real, dimension(lb(1):ub(1),lb(2):ub(2)), intent(out) | rho_passing | ||
) |
Deposit the charge of passing electrons in a separate array for new hybrid electron model.
[in] | isp | Species under consideration |
[in] | lb | Lower indices of the deposition arrays |
[in] | ub | Upper indices of the deposition arrays |
[out] | rho_passing | Returned array with the passing charge |
subroutine part::check_allocation | ( | integer, intent(in) | istat, |
character(len=*), intent(in) | locatn, | ||
character(len=*), intent(in) | varname | ||
) |
|
private |
Clean diagnostics by re-initializing data array to zero.
subroutine part::compute_all_larmor_positions | ( | integer, intent(in) | isp, |
real, dimension(:,:), intent(in) | pic1_loc, | ||
real, dimension(:,:), intent(in) | pic2_loc, | ||
integer, intent(in) | npart_loc | ||
) |
[in] | isp | Species under consideration |
[in] | npart_loc | Local number of particles |
[in] | pic1_loc | Marker attributes (non constant in time) |
[in] | pic2_loc | Marker attributes (constant in time) |
subroutine, public part::compute_all_larmor_positions_disp | ( | logical, intent(in) | comp_dk | ) |
subroutine part::compute_deposition_attributes_dk | ( | real, dimension(n), intent(in) | u, |
real, dimension(n), intent(in) | w, | ||
real, dimension(n), intent(out) | uw, | ||
integer, intent(in) | n | ||
) |
Compute drift-kinetic species marker attributes to be deposited.
[in] | u | Marker parallel momenta |
[in] | w | Marker weights |
[out] | uw | Product of u and w |
[in] | n | Number of markers |
subroutine, public part::compute_psi0_corr | ( | real, dimension(:,:), intent(in) | pic1_loc, |
real, dimension(:,:), intent(inout) | pic2_loc, | ||
integer, intent(in) | npart_loc, | ||
integer, intent(in) | isp, | ||
logical, intent(in) | run_on_device | ||
) |
[in] | run_on_device | Run kernel on the accelerator |
subroutine, public part::compute_psi0_corr_disp | ( | logical, intent(in) | run_on_device | ) |
[in] | run_on_device | Run kernel on the accelerator |
real function, public part::compute_psi0_corr_one_particle | ( | integer, intent(in) | isp, |
real, intent(in) | st, | ||
real, intent(in) | chit, | ||
real, intent(in) | mut, | ||
real, intent(in) | ut | ||
) |
Compute the the correction term for the corrected canonical Maxwellian.
Corresponds to Eq. (7) from Angelino, PoP 13, 2006.
|
private |
[in] | npart_loc | Local number of particles |
[in] | pic1_loc | Marker attributes (non constant in time) |
[in] | pic2_loc | Marker attributes (constant in time) |
[in] | nsel_att | Which attribute to be deposited |
subroutine, public part::compute_reduced_weights_disp | ( | integer, intent(in) | isp, |
integer, intent(in) | nsel_att | ||
) |
[in] | isp | Species under consideration |
[in] | nsel_att | Which attribute to be deposited |
|
private |
|
private |
Convert integer convention for when field is needed to logical.
[in] | need_field | -1: field never needed, 0: field needed every substep, n>0: field needed every n time step |
[in] | istep | Time loop iteration number |
[in] | nl_main_substep | Is it the main time integrator substep? |
subroutine part::coords_mixed2sympl | ( | real, dimension(:,:), intent(inout) | pic1_loc, |
real, dimension(:,:), intent(in) | pic2_loc, | ||
integer, intent(in) | npart_loc, | ||
integer, intent(in) | isp | ||
) |
|
private |
|
private |
|
private |
subroutine, public part::diagnose_particles |
|
private |
Diagnose phase space properties.
[in] | isp | Current species |
[in] | s | Radial position in s coordinate |
[in] | vpar | Marker parallel velocity |
[in] | mu | Marker magnetic moment |
[in] | b | Magnetic field intensity at marker position |
[in] | pvol | Marker phase space volume |
[in] | w | Marker weight |
[in] | zf0 | Marker p weight |
[in] | ithread | Current OpenMP thread |
subroutine part::diagnose_sampling | ( | integer, intent(in) | isp, |
real, intent(in) | s, | ||
real, intent(in) | en, | ||
real, intent(in) | pvol, | ||
real, intent(in) | w, | ||
real, intent(in) | zf0, | ||
integer, intent(in) | ithread | ||
) |
Diagnose the velocity space sampling.
[in] | isp | Current species |
[in] | s | Radial position in s coordinate |
[in] | en | Marker kinetic energy |
[in] | pvol | Marker phase space volume |
[in] | w | Marker weight |
[in] | zf0 | Marker p weight |
[in] | ithread | Current OpenMP thread |
subroutine part::diagnostics_after_loop | ( | integer, intent(in) | isp | ) |
subroutine part::diagnostics_in_loop | ( | integer, intent(in) | ip, |
integer, intent(in) | isp, | ||
real, intent(in) | sigmat, | ||
real, intent(in) | chit, | ||
real, intent(in) | chit_cos, | ||
real, intent(in) | chit_sin, | ||
real, intent(in) | phit, | ||
real, intent(in) | wt, | ||
real, intent(in) | dPsidt0, | ||
real, intent(in) | dPsidt1, | ||
real, intent(in) | zf0, | ||
real, intent(in) | psi0t, | ||
real, intent(in) | ze, | ||
real, intent(in) | pot_equil, | ||
real, intent(in) | tval, | ||
real, intent(in) | zvth2, | ||
real, intent(in) | rt, | ||
real, dimension(3), intent(in) | hh, | ||
real, intent(in) | vpt2, | ||
real, intent(in) | ut, | ||
real, intent(in) | ut2, | ||
real, intent(in) | w3t, | ||
real, intent(in) | pt, | ||
real, intent(in) | pvolgc, | ||
real, intent(in) | df0_dpsi_prof, | ||
real, intent(in) | df0_dchi_prof, | ||
real, intent(in) | dpsi_prof_dt, | ||
real, intent(in) | dchi_prof_dt, | ||
real, dimension(3), intent(in) | vpar, | ||
real, dimension(3), intent(in) | genelec, | ||
real, intent(in) | bstar_inv, | ||
real, dimension(3), intent(in) | bgrb, | ||
real, intent(in) | rhs, | ||
real, dimension(3), intent(in) | tempd, | ||
real, dimension(3), intent(in) | vgc, | ||
real, intent(in) | dvpadt1, | ||
real, intent(in) | dvpadt0, | ||
real, dimension(3), intent(in) | vgb, | ||
real, dimension(3), intent(in) | vpressure, | ||
real, dimension(3), intent(in) | veb_f, | ||
real, dimension(3), intent(in) | vexb, | ||
real, intent(in) | expt_back, | ||
real, intent(in) | eypt_back, | ||
real, intent(in) | b, | ||
real, dimension(3), intent(in) | exh, | ||
real, intent(in) | vecrossb_f2, | ||
real, intent(in) | dpotdpsi, | ||
real, intent(in) | vdr, | ||
real, intent(in) | pvol, | ||
logical, intent(in) | ksieta, | ||
logical, intent(in) | is_trapped, | ||
real, intent(in) | mut, | ||
real, intent(in) | umin_bin, | ||
real, intent(in) | du_flux_inv, | ||
real, intent(in) | dmu_flux_inv, | ||
real, intent(in) | gyroapar, | ||
real, intent(in) | nval, | ||
integer, intent(in) | ithread | ||
) |
|
private |
subroutine part::gauss_list_init | ( | integer, intent(in) | isp, |
real, dimension(:,:), intent(inout), allocatable | pert_table, | ||
integer, intent(out) | nperts | ||
) |
subroutine part::get_dist_derivs | ( | real, intent(in) | f0, |
real, intent(in) | ut, | ||
real, intent(in) | mut, | ||
real, intent(in) | b, | ||
real, intent(in) | epsilon_hat, | ||
real, intent(in) | ze, | ||
real, intent(in) | zvth2, | ||
real, intent(in) | nval, | ||
real, intent(in) | Epsi, | ||
real, intent(in) | psit, | ||
real, intent(in) | ngrad, | ||
real, intent(in) | tgrad, | ||
real, intent(in) | vpval, | ||
real, intent(in) | vpgrad, | ||
integer, intent(in) | isp, | ||
real, intent(out) | df0_dek, | ||
real, intent(out) | df0_du, | ||
real, intent(out) | df0_dpsi_prof, | ||
real, intent(out) | df0_dchi_prof, | ||
real, intent(out) | df0_dpsi_pot, | ||
real, intent(in) | zecor, | ||
real, intent(in) | pot_equil, | ||
real, intent(in) | pot_equil0, | ||
real, intent(in) | chit | ||
) |
subroutine, public part::get_field_disp | ( | type(field_type), intent(in) | field, |
integer, intent(in) | istep, | ||
logical, intent(in) | nl_main_substep, | ||
integer, intent(in) | i_att | ||
) |
Evaluate field at marker positions for each species.
[in] | field | Field to be evaluated |
[in] | istep | Time loop iteration number |
[in] | nl_main_substep | Is it the main time integrator substep? |
[in] | i_att | iteration over natt buffers |
subroutine part::get_field_disp_lvl2 | ( | real, dimension(:,:,:), intent(in) | field_bspl, |
real, dimension(:,:), intent(in) | markers, | ||
real, dimension(:,:), intent(out) | markers_field, | ||
integer, intent(in) | np, | ||
integer, intent(in) | x_att, | ||
integer, intent(in) | y_att, | ||
integer, intent(in) | z_att, | ||
integer, intent(in) | field_att, | ||
integer, intent(in) | grad_field_att, | ||
integer, intent(in) | need_field, | ||
integer, intent(in) | need_grad_field, | ||
integer, intent(in) | istep, | ||
logical, intent(in) | nl_main_substep, | ||
integer, dimension(:), intent(in), optional | displs, | ||
integer, intent(in), optional | atts_offset | ||
) |
Evaluate field at marker positions for a given species and a given set of markers (guiding centers or Larmor points, sorted or not)
[in] | field_bspl | Field B-spline coefficients |
[in] | markers | Markers with position attributes |
[out] | markers_field | Markers with field attributes |
[in] | np | Number of markers |
[in] | x_att | Radial attribute index in markers |
[in] | y_att | Poloidal attribute index in markers |
[in] | z_att | Toroidal attribute index in markers |
[in] | field_att | Field attribute index in markers_field |
[in] | grad_field_att | Field gradient attribute index in markers_field |
[in] | need_field | Evaluate field at marker positions |
[in] | need_grad_field | Evaluate field gradient at marker positions |
[in] | istep | Time loop iteration number |
[in] | nl_main_substep | Is it the main time integrator substep? |
[in] | atts_offset | Particle offset for atts buffers |
[in] | displs | Displacements to access markers in specific bin |
real function part::get_fvpllb | ( | real, intent(in) | psi, |
real, intent(in) | mu, | ||
real, intent(in) | en, | ||
real, intent(in) | v_pll, | ||
integer, intent(in) | isp | ||
) |
subroutine part::get_larmor_indices | ( | integer, intent(in) | isp, |
real, dimension(:,:), intent(in) | pic1_loc, | ||
real, dimension(:,:), intent(inout) | pic2_loc, | ||
integer, intent(in) | npart_loc, | ||
logical, intent(in) | initflag | ||
) |
Compute the Larmor radius and number of gyropoints, and store then in work_temp.
[in] | isp | Species under consideration |
[in] | npart_loc | Local number of particles |
[in] | pic1_loc | Marker attributes (non constant in time) |
[in,out] | pic2_loc | Marker attributes (constant in time) |
[in] | initflag | Used in initialization to set larmor_max |
subroutine, public part::get_larmor_indices_disp | ( | logical, intent(in), optional | initflag_in, |
logical, intent(in), optional | adapt_only_in | ||
) |
subroutine part::get_n_larmor_pts | ( | integer, intent(in) | isp, |
integer, intent(in) | nsel_gyr_local, | ||
real, intent(in) | rhog, | ||
integer, intent(out) | lnaveg | ||
) |
Choice of the gyro-average algorithm.
Selects the number of gyro-points based on the input parameter nsel_gyr.
[in] | isp | Species under consideration |
[in] | nsel_gyr_local | Flag for the method to use to compute the gyropoints |
[in] | rhog | Larmor radius |
[out] | lnaveg | Number of gyro-points |
subroutine, public part::get_pos | ( | integer, intent(in) | isp, |
integer, intent(in) | nsel_gyr_local, | ||
real, intent(in) | alp, | ||
real, intent(in) | rhog, | ||
real, intent(in) | sigma, | ||
real, intent(in) | chi, | ||
integer, intent(out) | lnaveg, | ||
real, dimension(basic%navg_max), intent(out) | chit, | ||
real, dimension(basic%navg_max), intent(out) | sigmat, | ||
real, dimension(4,basic%navg_max), intent(out), optional | chi_sigma_gradients | ||
) |
subroutine, public part::get_properties | ( | integer, intent(in) | ip, |
integer, intent(in) | isp, | ||
real, intent(out) | sigmat, | ||
real, intent(out) | chit, | ||
real, intent(out), optional | en, | ||
real, intent(out), optional | b, | ||
real, intent(out), optional | psi0can, | ||
real, intent(out), optional | f0, | ||
real, intent(out), optional | zf0, | ||
real, intent(out), optional | f0_max, | ||
real, intent(out), optional | T, | ||
real, intent(out), optional | en_hamilt | ||
) |
Get species properties.
[in] | isp | Species under consideration |
[in] | ip | Particle under consideration |
[out] | sigmat | Radial position of the marker |
[out] | chit | Poloidal position of the marker [0,2*PI] |
[out] | en | Kinetic energy of the particle |
[out] | b | Equilibrium magnetic field at particle position |
[out] | zf0 | f0 weights of pic |
subroutine part::get_rhs | ( | integer, intent(in) | ip, |
integer, intent(in) | isp, | ||
real, intent(in) | pvol, | ||
real, intent(in) | vdr, | ||
real, intent(in) | vdchi, | ||
real, dimension(3), intent(in) | vgc, | ||
real, dimension(3), intent(in) | vin, | ||
real, intent(in) | vpval, | ||
real, dimension(3), intent(in) | genelec, | ||
real, intent(in) | dvpadt0, | ||
real, intent(in) | dvpadt1, | ||
real, intent(in) | gyroapar, | ||
real, intent(in) | ze, | ||
real, intent(in) | zecor, | ||
real, intent(in) | dH0_dt_correction, | ||
real, intent(in) | pot_equil, | ||
real, intent(in) | pot_equil0, | ||
real, intent(in) | distribution, | ||
real, intent(in) | ut, | ||
real, intent(in) | mut, | ||
real, intent(in) | b, | ||
real, intent(in) | zvth2, | ||
real, intent(in) | nval, | ||
real, intent(in) | Epsi, | ||
real, intent(in) | psi0t, | ||
real, intent(in) | ngrad, | ||
real, intent(in) | tgrad, | ||
real, intent(in) | vpgrad, | ||
real, intent(in) | dfvpllb_dpsi, | ||
real, intent(in) | dfvpllb_den, | ||
real, intent(out) | rhs, | ||
real, intent(out) | dpotdpsi, | ||
real, intent(out) | omegasq_corr, | ||
real, intent(out) | df0_dpsi_prof, | ||
real, intent(out) | df0_dchi_prof, | ||
real, intent(out) | dpsi_prof_dt, | ||
real, intent(out) | dchi_prof_dt, | ||
integer, intent(in) | rhs_type, | ||
real, dimension(3), intent(in) | mgradphi, | ||
real, dimension(3), intent(in) | vgb, | ||
real, dimension(3), intent(in) | vpressure, | ||
real, dimension(3), intent(in) | mgradapar, | ||
real, dimension(3), intent(in) | hh_sympl, | ||
real, intent(in) | chit, | ||
real, intent(in) | dchi_dt1, | ||
integer, intent(in) | iter, | ||
real, intent(in) | ffinit, | ||
real, intent(in) | dPsidt0 | ||
) |
|
private |
subroutine part::get_vdr | ( | integer, intent(in) | isp, |
real, intent(in) | sigmat, | ||
real, intent(in) | chit, | ||
real, intent(in) | b_inv, | ||
real, intent(in) | tprime, | ||
real, intent(in) | ut, | ||
real, intent(in) | bstar_inv, | ||
real, intent(in) | toB, | ||
real, intent(in) | dvpadt1, | ||
real, dimension(3), intent(in) | vgc, | ||
real, dimension(3), intent(in) | vgb, | ||
real, dimension(3), intent(in) | vexb, | ||
real, dimension(3), intent(in) | bgrb, | ||
real, dimension(3), intent(in) | genelec, | ||
real, dimension(3), intent(in) | vapar, | ||
integer, intent(in) | rhs_type, | ||
real, intent(out) | vdr, | ||
real, intent(out) | dPsidt0, | ||
real, intent(out) | dPsidt1, | ||
real, intent(out) | vdchi | ||
) |
|
private |
real function, public part::get_vpaob_ba | ( | real, intent(in) | psi, |
real, intent(in) | mu, | ||
real, intent(in) | en, | ||
real, intent(in) | v_pll, | ||
integer, intent(in) | isp | ||
) |
subroutine, public part::grid_pic | ( | integer, intent(in) | isp, |
integer, intent(in) | nsel_att, | ||
logical, intent(in) | reduce_flag, | ||
integer, dimension(4), intent(in) | lb, | ||
integer, dimension(4), intent(in) | ub, | ||
real, dimension(lb(1):ub(1),lb(2):ub(2),lb(3):ub(3)), intent(out) | assign1, | ||
integer, intent(in) | i_att | ||
) |
Charge or current deposition on grid.
[in] | isp | Species under consideration |
[in] | nsel_att | Which attribute to be deposited |
[in] | reduce_flag | Reduce the weights by the adiabatic density/current |
[in] | i_att | Iteration over atts arrays |
[in] | lb | Lower indices of the deposition arrays |
[in] | ub | Upper indices of the deposition arrays |
subroutine, public part::grid_pic_diagnostic | ( | integer, intent(in) | isp, |
integer, intent(in) | nsel_att, | ||
integer, dimension(4), intent(in) | lb, | ||
integer, dimension(4), intent(in) | ub, | ||
real, dimension(lb(1):ub(1),lb(2):ub(2),lb(3):ub(3)), intent(out) | assign1 | ||
) |
Charge or current deposition on grid.
[in] | isp | Species under consideration |
[in] | nsel_att | Which attribute to be deposited |
[in] | lb | Lower indices of the deposition arrays |
[in] | ub | Upper indices of the deposition arrays |
|
private |
Gyro-average field.
[in] | pic1_loc | Guiding center attributes |
[in,out] | work_temp_loc | Guiding center attributes |
[in] | npart_loc | Number of guiding centers |
[in] | gyro_field_att | Field attribute index |
[in] | gyro_grad_field_att | Field gradient attribute index |
[in] | larmor_loc | Larmor attributes |
[in] | need_gyro_field | Gyro-average field |
[in] | need_gyro_grad_field | Gyro-average field gradient |
[in] | istep | Time loop iteration number |
[in] | nl_main_substep | Is it the main time integrator substep? |
[in] | atts_offset | Particle offset for reusing atts buffers |
|
private |
subroutine, public part::init_particles |
subroutine, public part::init_push_diagnostics |
subroutine, public part::init_test_particles |
subroutine part::init_vpa_quants |
|
private |
Allocate and initialize particle arrays.
subroutine part::jdote | ( | integer, intent(in) | isp, |
real, intent(in) | ut2, | ||
real, intent(in) | vpt2, | ||
real, dimension(3), intent(in) | vpar, | ||
real, dimension(3), intent(in) | genelec, | ||
real, dimension(3), intent(in) | elec_par, | ||
real, intent(in) | wt, | ||
real, intent(in) | bstar_inv, | ||
real, dimension(3), intent(in) | bgrb, | ||
real, dimension(3), intent(in) | vgb, | ||
real, dimension(3), intent(in) | vpressure, | ||
real, dimension(3), intent(in) | veb_f, | ||
real, dimension(3), intent(in) | vexb, | ||
real, intent(in) | expt_back, | ||
real, intent(in) | eypt_back, | ||
real, intent(in) | dvpadt0, | ||
real, intent(in) | gyroapar, | ||
real, intent(out) | jdote_tot, | ||
integer, intent(in) | ithread | ||
) |
|
private |
subroutine, public part::load_particles |
Initialize markers.
subroutine, public part::load_test_particles |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
subroutine, public part::parmove | ( | integer, intent(in) | iter, |
logical, intent(in) | run_on_device, | ||
logical, intent(in) | work1flag, | ||
logical, intent(in) | work2flag, | ||
logical, intent(in), optional | work3flag, | ||
logical, intent(in), optional | work5flag, | ||
logical, intent(in), optional | work6flag, | ||
logical, intent(in), optional | work7flag, | ||
logical, intent(in), optional | work8flag, | ||
logical, intent(in), optional | work9flag | ||
) |
[in] | iter | Time integrator iteration |
[in] | run_on_device | Run kernels on the accelerator |
subroutine, public part::parmove_sp | ( | integer, intent(in) | iter, |
integer, intent(in) | isp, | ||
logical, intent(in) | run_on_device, | ||
logical, intent(in) | work1flag, | ||
logical, intent(in) | work2flag, | ||
logical, intent(in), optional | work3flag, | ||
logical, intent(in), optional | work5flag, | ||
logical, intent(in), optional | work6flag, | ||
logical, intent(in), optional | work7flag, | ||
logical, intent(in), optional | work8flag, | ||
logical, intent(in), optional | work9flag | ||
) |
[in] | iter | Time integrator iteration |
[in] | isp | Species index |
[in] | run_on_device | Run kernels on the accelerator |
subroutine part::perp_curl_ue | ( | real, intent(in) | s, |
real, intent(in) | chi, | ||
real, intent(out) | smodstar, | ||
real, intent(out) | chimodstar, | ||
real, intent(out) | phimodstar | ||
) |
subroutine part::polarisation_fieldcalc | ( | integer, intent(in) | isp | ) |
subroutine, public part::postpush_disp |
subroutine part::postpush_fullf | ( | real, dimension(:,:), intent(inout) | pic1_loc, |
real, dimension(:,:), intent(inout) | pic2_loc, | ||
integer, intent(in) | npart_loc, | ||
integer, intent(in) | isp | ||
) |
subroutine, public part::print_test_particles | ( | integer, intent(in) | step | ) |
|
private |
subroutine, public part::pszs_calc |
subroutine part::pszs_setboundaries | ( | real, dimension(:,:), intent(in) | pic1_loc, |
real, dimension(:,:), intent(in) | pic2_loc, | ||
integer, intent(in) | npart_loc, | ||
integer, intent(in) | isp, | ||
real, dimension(3), intent(inout) | lb, | ||
real, dimension(3), intent(inout) | ub | ||
) |
subroutine, public part::pullback |
|
private |
Pushes the particles according to the fields.
[in] | npart_loc | number of markers |
[in] | pic1_loc | Array for non constant particle attributes |
[in] | pic2_loc | Array for constant particle attributes |
[in] | pic3_loc | Array for constant particle attributes |
[in,out] | work1_loc | Workspace array |
[in] | isp | Species under consideration |
[in] | iter | RK sub-step |
subroutine, public part::push_disp | ( | integer, intent(in) | iter | ) |
|
private |
real function, public part::q_of_s | ( | real, intent(in) | zs | ) |
subroutine, public part::quadtree_smoothing_disp |
|
private |
Dispatcher for the quadtree_smoothing algorithm.
subroutine, public part::read_write_particle_data | ( | integer, intent(in) | flag, |
integer, intent(in) | datn | ||
) |
subroutine, public part::set_weights_to_zero_at_t0 |
subroutine, public part::sort_gc_2d | ( | integer | isp | ) |
Sort guiding centers of one species in the s-chi plane.
subroutine, public part::sort_gc_2d_disp |
Sort guiding centers of all species in the s-chi plane (so-called "cache sort")
subroutine, public part::sort_gc_3d_disp |
Sort drift-kinetic species in 3D.
subroutine part::str_diagnostic_start |
subroutine part::strong_diagnostic_output | ( | integer, intent(in) | isp, |
integer, intent(in) | ip, | ||
real, intent(in) | psi0t, | ||
real, intent(in) | temp2, | ||
real, intent(in) | ze, | ||
real, intent(in) | vecrossb_f2, | ||
real, intent(in) | pot_equil, | ||
real, intent(in) | zf0, | ||
real, intent(in) | zvth2_inv, | ||
real, intent(in) | dpotdpsi, | ||
real, intent(in) | vdr, | ||
real, intent(in) | rhs | ||
) |
|
private |
|
private |
|
private |
subroutine part::sum_in_radial_bins_island | ( | integer, intent(in) | isp, |
integer, intent(in) | irloc, | ||
integer, intent(in) | ipol, | ||
real, intent(in) | ut, | ||
real, dimension(2), intent(in) | gradpsi0, | ||
real, intent(in) | htildex, | ||
real, intent(in) | htildey, | ||
real, intent(in) | ze, | ||
real, intent(in) | zf0, | ||
real, intent(in) | wt, | ||
real, intent(in) | dPsidt1, | ||
real, intent(in) | ffinit_tmp1, | ||
real, intent(in) | ffinit_tmp2, | ||
real, intent(in) | ffinit_tmp3, | ||
real, intent(in) | ffinit_tmp4, | ||
integer, intent(in) | ithread | ||
) |
|
private |
subroutine part::sum_of_weights_and_energy_transfer | ( | integer, intent(in) | isp, |
real, intent(in) | wt, | ||
real, intent(in) | w3t, | ||
real, intent(in) | pt, | ||
real, intent(in) | pvolgc, | ||
real, intent(in) | ze, | ||
real, intent(in) | zf0, | ||
real, intent(in) | sigmat, | ||
real, intent(in) | q_vgc_dot_genelec, | ||
real, intent(in) | q_dvpadt0_dot_gyroapar, | ||
integer, intent(in) | ithread | ||
) |
|
private |
|
private |
|
private |
subroutine part::test_particle_output | ( | integer, intent(in) | isp, |
integer, intent(in) | ip, | ||
real, intent(in) | psi0t, | ||
real, intent(in) | ze, | ||
real, intent(in) | pot_equil, | ||
real, intent(in) | wt, | ||
real, intent(in) | zvth2, | ||
real, intent(in) | nval, | ||
real, intent(in) | pvol, | ||
real, intent(in) | zf0 | ||
) |
real function part::toroidal_momentum | ( | integer, intent(in) | isp, |
real, intent(in) | st, | ||
real, intent(in) | chit, | ||
real, intent(in) | tsubB, | ||
real, intent(in) | ut, | ||
real, intent(in) | mut, | ||
real, intent(in) | psi_correction | ||
) |
Function wrapper for toroidal momentum calculation.
|
private |
Determines whether trapped particles are now free and vice versa.
[in] | npart_loc | number of markers |
[in] | isp | Scpecies under consideration |
subroutine, public part::trap_detrap_disp |
subroutine, public part::unsort_gc_3d_disp |
Sort drift-kinetic species in 3D.
subroutine, public part::update_ffinit_or_pvol |
subroutine part::vpa_quants | ( | real, intent(in) | psi, |
real, intent(in) | mu, | ||
real, intent(in) | en_star, | ||
real, intent(in) | v_pll, | ||
real, intent(out) | fvpllb, | ||
real, intent(out) | dfvpllb_den, | ||
real, intent(out) | dfvpllb_dpsi, | ||
integer, intent(in) | isp | ||
) |
real function part::vpaob_ba | ( | real, intent(in) | psi, |
real, intent(in) | mu_scaled, | ||
integer, intent(in) | vpll_sign | ||
) |
|
private |
real function part::ze_correction | ( | real, intent(in) | ut, |
real, intent(in) | vpval | ||
) |
|
private |
|
private |
complex, dimension(:,:,:), allocatable, save, public part::cfield_out_3d |
complex, dimension(:,:,:), allocatable, save, public part::cfield_out_3d_fft |
real, dimension(:), allocatable, save, public part::dens0 |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
integer, save, public part::max_pic2 |
integer, save, public part::max_pic5 |
integer, save, public part::max_work |
integer, save, public part::max_work_fields |
|
private |
type(moments_3d_class), dimension(moments_3d_size), public part::moments_3d |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
integer, dimension(:), allocatable, save, public part::npart |
integer, dimension(:), allocatable, save, public part::npmx |
|
private |
integer, dimension(:), allocatable, save, public part::ntest |
|
private |
|
private |
type(pointer_markers), dimension(:), allocatable, save, public part::pic1 |
type(pointer_markers), dimension(:), allocatable, save, public part::pic2 |
type(pointer_markers_logic), dimension(:), allocatable, save, public part::pic3 |
type(pointer_markers_i8), dimension(:), allocatable, save, public part::pic4 |
type(pointer_markers_r4), dimension(:), allocatable, save, public part::pic5 |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
OpenMP working array for deposition for passing electrons (field replicated among OpenMP threads)
|
private |
real, dimension(:), allocatable, save, public part::total_weight |
|
private |
|
private |
Non-null splines over interval i are [i+lb_wx,i+ub_wx].
|
private |
|
private |
type(pointer_markers), dimension(:), allocatable, save, public part::work1 |
type(pointer_markers), dimension(:), allocatable, save, public part::work2 |
type(pointer_markers), dimension(:), allocatable, save, public part::work3 |
type(pointer_markers), dimension(:), allocatable, save, public part::work5 |
type(pointer_markers), dimension(:), allocatable, save, public part::work6 |
type(pointer_markers), dimension(:), allocatable, save, public part::work7 |
type(pointer_markers), dimension(:), allocatable, save, public part::work8 |
type(pointer_markers), dimension(:), allocatable, save, public part::work9 |
|
private |
type(pointer_markers), dimension(:), allocatable, save, public part::work_temp |