src_module Module Reference

Public Member Functions
subroutine	src_setup

Public Attributes
integer, parameter	src_nmax =4
integer, dimension(0:ptl_nsp_max)	src_narea = 1
integer	src_niter = 10
real(8), dimension(src_nmax, 0:ptl_nsp_max)	src_pin = 0D0
real(8), dimension(src_nmax, 0:ptl_nsp_max)	src_pout = -1D0
real(8), dimension(src_nmax, 0:ptl_nsp_max)	src_decay_width = 0.01
real(8), dimension(src_nmax, 0:ptl_nsp_max)	src_heat_power = 0D0
real(8), dimension(src_nmax, 0:ptl_nsp_max)	src_torque = 0D0
real(8), dimension(src_nmax, 0:ptl_nsp_max)	src_z_begin = 0D0
real(8), dimension(src_nmax, 0:ptl_nsp_max)	src_r_begin = 0D0
integer, dimension(src_nmax, 0:ptl_nsp_max)	src_special_mode = -1
integer, dimension(src_nmax, 0:ptl_nsp_max)	src_ishape = -1
integer	src_period = 10
integer	src_nsubsection = 10
real(8), dimension(0:ptl_nsp_max)	src_pin1 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_pout1 = 0.01
real(8), dimension(0:ptl_nsp_max)	src_decay_width1 = 0.01
real(8), dimension(0:ptl_nsp_max)	src_heat_power1 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_torque1 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_z_begin1 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_r_begin1 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_pin2 = 1.04
real(8), dimension(0:ptl_nsp_max)	src_pout2 = 1.05
real(8), dimension(0:ptl_nsp_max)	src_decay_width2 = 0.01
real(8), dimension(0:ptl_nsp_max)	src_heat_power2 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_torque2 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_z_begin2 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_r_begin2 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_pin3 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_pout3 = -1D0
real(8), dimension(0:ptl_nsp_max)	src_decay_width3 = 0.01
real(8), dimension(0:ptl_nsp_max)	src_heat_power3 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_torque3 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_z_begin3 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_r_begin3 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_pin4 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_pout4 = -1D0
real(8), dimension(0:ptl_nsp_max)	src_decay_width4 = 0.01
real(8), dimension(0:ptl_nsp_max)	src_heat_power4 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_torque4 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_z_begin4 = 0D0
real(8), dimension(0:ptl_nsp_max)	src_r_begin4 = 0D0
integer, dimension(0:ptl_nsp_max)	src_special_mode1 =0
integer, dimension(0:ptl_nsp_max)	src_ishape1 =1
integer, dimension(0:ptl_nsp_max)	src_special_mode2 =0
integer, dimension(0:ptl_nsp_max)	src_ishape2 =1
integer, dimension(0:ptl_nsp_max)	src_special_mode3 =0
integer, dimension(0:ptl_nsp_max)	src_ishape3 =1
integer, dimension(0:ptl_nsp_max)	src_special_mode4 =0
integer, dimension(0:ptl_nsp_max)	src_ishape4 =1
integer	src_narea_e = 0
real(8)	src_pin1_e = 0D0
real(8)	src_pout1_e = 0.01
real(8)	src_decay_width1_e = 0.01
real(8)	src_heat_power1_e = 0D0
real(8)	src_torque1_e = 0D0
real(8)	src_z_begin1_e = 0D0
real(8)	src_r_begin1_e = 0D0
real(8)	src_pin2_e = 1.04
real(8)	src_pout2_e = 1.05
real(8)	src_decay_width2_e = 0.01
real(8)	src_heat_power2_e = 0D0
real(8)	src_torque2_e = 0D0
real(8)	src_z_begin2_e = 0D0
real(8)	src_r_begin2_e = 0D0
real(8)	src_pin3_e = 0D0
real(8)	src_pout3_e = -1D0
real(8)	src_decay_width3_e = 0.01
real(8)	src_heat_power3_e = 0D0
real(8)	src_torque3_e = 0D0
real(8)	src_z_begin3_e = 0D0
real(8)	src_r_begin3_e = 0D0
real(8)	src_pin4_e = 0D0
real(8)	src_pout4_e = -1D0
real(8)	src_decay_width4_e = 0.01
real(8)	src_heat_power4_e = 0D0
real(8)	src_torque4_e = 0D0
real(8)	src_z_begin4_e = 0D0
real(8)	src_r_begin4_e = 0D0
integer	src_special_mode1_e =0
integer	src_ishape1_e =1
integer	src_special_mode2_e =0
integer	src_ishape2_e =1
integer	src_special_mode3_e =0
integer	src_ishape3_e =1
integer	src_special_mode4_e =0
integer	src_ishape4_e =1
logical	src_pellet_on = .false.
	On/off switch for pellet ablation. More...
real(kind=8)	src_pellet_r = 1.0D0
	Position of the pellet, R-coordinate in m. More...
real(kind=8)	src_pellet_z = 0.0D0
	Position of the pellet, Z-coordinate in m. More...
real(kind=8)	src_pellet_cloud_a = 1.0D-1
	Semi-major axis of the neutral gas cloud around the pellet in m. More...
real(kind=8)	src_pellet_cloud_b = 1.0D-1
	Semi-minor axis of the neutral gas cloud around the pellet in m. More...
real(kind=8)	src_pellet_cloud_angle = 0D0
	Angle of the semi-major axis wrt the horizontal plane. More...
real(kind=8)	src_pellet_rad = 1.0D-3
	Radius of the pellet in m. More...
real(kind=8)	src_pellet_etemp = 5.0D0
	Electron temperature of the pellet cloud in eV. More...
real(kind=8)	src_pellet_itemp = 5.0D0
	Ion temperature of the pellet cloud in eV. More...
integer	src_pellet_start_time = 1
	Start time step of the pellet ablation. More...
integer	src_pellet_stop_time = -1
	End time step of the pellet ablation; if <0, no stop time. More...
real(kind=8)	src_pellet_n_atoms = 1.0D21
	Total number of atoms in the pellet; ablation stops after the pellet is spent. More...
integer	src_pellet_ion_species = MAIN_ION_TYPE
	Index of the ion species in the pellet; default is a main ion pellet. More...

Member Function/Subroutine Documentation

subroutine src_module::src_setup

(

)

Here is the call graph for this function:

Here is the caller graph for this function:

Member Data Documentation

real (8), dimension(src_nmax,0:ptl_nsp_max) src_module::src_decay_width = 0.01

real (8), dimension(0:ptl_nsp_max) src_module::src_decay_width1 = 0.01

real (8) src_module::src_decay_width1_e = 0.01

real (8), dimension(0:ptl_nsp_max) src_module::src_decay_width2 = 0.01

real (8) src_module::src_decay_width2_e = 0.01

real (8), dimension(0:ptl_nsp_max) src_module::src_decay_width3 = 0.01

real (8) src_module::src_decay_width3_e = 0.01

real (8), dimension(0:ptl_nsp_max) src_module::src_decay_width4 = 0.01

real (8) src_module::src_decay_width4_e = 0.01

real (8), dimension(src_nmax,0:ptl_nsp_max) src_module::src_heat_power = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_heat_power1 = 0D0

real (8) src_module::src_heat_power1_e = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_heat_power2 = 0D0

real (8) src_module::src_heat_power2_e = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_heat_power3 = 0D0

real (8) src_module::src_heat_power3_e = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_heat_power4 = 0D0

real (8) src_module::src_heat_power4_e = 0D0

integer, dimension(src_nmax,0:ptl_nsp_max) src_module::src_ishape = -1

integer, dimension(0:ptl_nsp_max) src_module::src_ishape1 =1

integer src_module::src_ishape1_e =1

integer, dimension(0:ptl_nsp_max) src_module::src_ishape2 =1

integer src_module::src_ishape2_e =1

integer, dimension(0:ptl_nsp_max) src_module::src_ishape3 =1

integer src_module::src_ishape3_e =1

integer, dimension(0:ptl_nsp_max) src_module::src_ishape4 =1

integer src_module::src_ishape4_e =1

integer, dimension(0:ptl_nsp_max) src_module::src_narea = 1

integer src_module::src_narea_e = 0

integer src_module::src_niter = 10

integer, parameter src_module::src_nmax =4

integer src_module::src_nsubsection = 10

real (kind=8) src_module::src_pellet_cloud_a = 1.0D-1

Semi-major axis of the neutral gas cloud around the pellet in m.

real (kind=8) src_module::src_pellet_cloud_angle = 0D0

Angle of the semi-major axis wrt the horizontal plane.

real (kind=8) src_module::src_pellet_cloud_b = 1.0D-1

Semi-minor axis of the neutral gas cloud around the pellet in m.

real (kind=8) src_module::src_pellet_etemp = 5.0D0

Electron temperature of the pellet cloud in eV.

integer src_module::src_pellet_ion_species = MAIN_ION_TYPE

Index of the ion species in the pellet; default is a main ion pellet.

real (kind=8) src_module::src_pellet_itemp = 5.0D0

Ion temperature of the pellet cloud in eV.

real (kind=8) src_module::src_pellet_n_atoms = 1.0D21

Total number of atoms in the pellet; ablation stops after the pellet is spent.

logical src_module::src_pellet_on = .false.

On/off switch for pellet ablation.

real (kind=8) src_module::src_pellet_r = 1.0D0

Position of the pellet, R-coordinate in m.

real (kind=8) src_module::src_pellet_rad = 1.0D-3

Radius of the pellet in m.

integer src_module::src_pellet_start_time = 1

Start time step of the pellet ablation.

integer src_module::src_pellet_stop_time = -1

End time step of the pellet ablation; if <0, no stop time.

real (kind=8) src_module::src_pellet_z = 0.0D0

Position of the pellet, Z-coordinate in m.

integer src_module::src_period = 10

real (8), dimension(src_nmax,0:ptl_nsp_max) src_module::src_pin = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_pin1 = 0D0

real (8) src_module::src_pin1_e = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_pin2 = 1.04

real (8) src_module::src_pin2_e = 1.04

real (8), dimension(0:ptl_nsp_max) src_module::src_pin3 = 0D0

real (8) src_module::src_pin3_e = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_pin4 = 0D0

real (8) src_module::src_pin4_e = 0D0

real (8), dimension(src_nmax,0:ptl_nsp_max) src_module::src_pout = -1D0

real (8), dimension(0:ptl_nsp_max) src_module::src_pout1 = 0.01

real (8) src_module::src_pout1_e = 0.01

real (8), dimension(0:ptl_nsp_max) src_module::src_pout2 = 1.05

real (8) src_module::src_pout2_e = 1.05

real (8), dimension(0:ptl_nsp_max) src_module::src_pout3 = -1D0

real (8) src_module::src_pout3_e = -1D0

real (8), dimension(0:ptl_nsp_max) src_module::src_pout4 = -1D0

real (8) src_module::src_pout4_e = -1D0

real (8), dimension(src_nmax,0:ptl_nsp_max) src_module::src_r_begin = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_r_begin1 = 0D0

real (8) src_module::src_r_begin1_e = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_r_begin2 = 0D0

real (8) src_module::src_r_begin2_e = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_r_begin3 = 0D0

real (8) src_module::src_r_begin3_e = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_r_begin4 = 0D0

real (8) src_module::src_r_begin4_e = 0D0

integer, dimension(src_nmax,0:ptl_nsp_max) src_module::src_special_mode = -1

integer, dimension(0:ptl_nsp_max) src_module::src_special_mode1 =0

integer src_module::src_special_mode1_e =0

integer, dimension(0:ptl_nsp_max) src_module::src_special_mode2 =0

integer src_module::src_special_mode2_e =0

integer, dimension(0:ptl_nsp_max) src_module::src_special_mode3 =0

integer src_module::src_special_mode3_e =0

integer, dimension(0:ptl_nsp_max) src_module::src_special_mode4 =0

integer src_module::src_special_mode4_e =0

real (8), dimension(src_nmax,0:ptl_nsp_max) src_module::src_torque = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_torque1 = 0D0

real (8) src_module::src_torque1_e = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_torque2 = 0D0

real (8) src_module::src_torque2_e = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_torque3 = 0D0

real (8) src_module::src_torque3_e = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_torque4 = 0D0

real (8) src_module::src_torque4_e = 0D0

real (8), dimension(src_nmax,0:ptl_nsp_max) src_module::src_z_begin = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_z_begin1 = 0D0

real (8) src_module::src_z_begin1_e = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_z_begin2 = 0D0

real (8) src_module::src_z_begin2_e = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_z_begin3 = 0D0

real (8) src_module::src_z_begin3_e = 0D0

real (8), dimension(0:ptl_nsp_max) src_module::src_z_begin4 = 0D0

real (8) src_module::src_z_begin4_e = 0D0

---

The documentation for this module was generated from the following file:

• /u/gitlab-xgc/builds/YGMz2TJ8/0/xgc/XGC-Devel/XGC_core/module.F90