#include "t_coeff_mod_macro.h"
|
subroutine | restrict_weight (w, f0) |
|
subroutine | chargee_background (grid, psn, spall) |
|
subroutine | chargee_background_monte (grid, psn) |
|
subroutine | smooth_r_init2 (smooth_r, grid) |
|
subroutine | smooth_r (in, out, smoothr, grid) |
|
subroutine | smooth_r_wrap (in, out) |
|
real(8) function | get_f0_ion (grid, ptli, itr, p, sp_type) |
|
subroutine | for_debugging |
|
real(8) function | get_f0_elec (grid, psn, ptli, itr, p) |
|
subroutine | rad_smooth (var, ns, n) |
|
real(kind=8) function | sigmoid8 (x, w) |
|
subroutine | enforce_modeled_charge (grid, psn) |
|
subroutine chargee_background |
( |
type(grid_type) |
grid, |
|
|
type(psn_type) |
psn, |
|
|
type(species_type), dimension(0:ptl_nsp_max) |
spall |
|
) |
| |
subroutine chargee_background_monte |
( |
type(grid_type) |
grid, |
|
|
type(psn_type) |
psn |
|
) |
| |
subroutine enforce_modeled_charge |
( |
type(grid_type) |
grid, |
|
|
type(psn_type) |
psn |
|
) |
| |
subroutine get_f0_ion::for_debugging |
( |
| ) |
|
real (8) function get_f0_elec |
( |
type(grid_type) |
grid, |
|
|
type(psn_type) |
psn, |
|
|
type(ptl_type) |
ptli, |
|
|
integer, intent(in) |
itr, |
|
|
real(8), dimension(3), intent(in) |
p |
|
) |
| |
real (8) function get_f0_ion |
( |
type(grid_type) |
grid, |
|
|
type(ptl_type) |
ptli, |
|
|
integer, intent(in) |
itr, |
|
|
real(8), dimension(3), intent(in) |
p, |
|
|
integer, intent(in) |
sp_type |
|
) |
| |
subroutine rad_smooth |
( |
real (8), dimension(ns), intent(inout) |
var, |
|
|
integer, intent(in) |
ns, |
|
|
integer, intent(in) |
n |
|
) |
| |
subroutine restrict_weight |
( |
real (8), dimension(2) |
w, |
|
|
real (8) |
f0 |
|
) |
| |
real (kind=8) function sigmoid8 |
( |
real (8) |
x, |
|
|
real (8) |
w |
|
) |
| |
subroutine smooth_r |
( |
real (kind=8), dimension(grid%nnode) |
in, |
|
|
real (kind=8), dimension(grid%nnode) |
out, |
|
|
type(smooth_r_type) |
smoothr, |
|
|
type(grid_type) |
grid |
|
) |
| |
subroutine smooth_r_init2 |
( |
type(smooth_r_type) |
smooth_r, |
|
|
type(grid_type) |
grid |
|
) |
| |
subroutine smooth_r_wrap |
( |
real (kind=8), dimension(grid_global%nnode) |
in, |
|
|
real (kind=8), dimension(grid_global%nnode) |
out |
|
) |
| |