Defines a fast-ion
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| logical, | public | :: | cross_grid | = | .False. | Indicates whether the fast-ion crosses the beam_grid |
|
| real(kind=Float64), | public | :: | r | = | 0.d0 | Radial position of fast-ion [cm] |
|
| real(kind=Float64), | public | :: | z | = | 0.d0 | Vertical position of fast-ion [cm] |
|
| real(kind=Float64), | public | :: | phi_enter | = | 0.d0 | Torodial/phi position where fast-ion enters the beam_grid [radians] |
|
| real(kind=Float64), | public | :: | delta_phi | = | 2*pi | Angle subtended by the beam_grid at (r,z) |
|
| real(kind=Float64), | public | :: | energy | = | 0.d0 | Energy [keV] |
|
| real(kind=Float64), | public | :: | pitch | = | 0.d0 | Pitch w.r.t. the magnetic field |
|
| real(kind=Float64), | public | :: | vabs | = | 0.d0 | Speed [cm/s] |
|
| real(kind=Float64), | public | :: | vr | = | 0.d0 | Radial velocity [cm/s] |
|
| real(kind=Float64), | public | :: | vt | = | 0.d0 | Torodial velocity [cm/s] |
|
| real(kind=Float64), | public | :: | vz | = | 0.d0 | Z velocity [cm/s] |
|
| real(kind=Float64), | public | :: | weight | = | 0.d0 | Particle weight: How many fast-ions does particle represent. |
|
| integer(kind=Int32), | public | :: | class | = | 0 | Orbit class id |
type FastIon
!+ Defines a fast-ion
logical :: cross_grid = .False.
!+ Indicates whether the fast-ion crosses the [[libfida:beam_grid]]
real(Float64) :: r = 0.d0
!+ Radial position of fast-ion [cm]
real(Float64) :: z = 0.d0
!+ Vertical position of fast-ion [cm]
real(Float64) :: phi_enter = 0.d0
!+ Torodial/phi position where fast-ion enters the [[libfida:beam_grid]] [radians]
real(Float64) :: delta_phi = 2*pi
!+ Angle subtended by the [[libfida:beam_grid]] at (r,z)
real(Float64) :: energy = 0.d0
!+ Energy [keV]
real(Float64) :: pitch = 0.d0
!+ Pitch w.r.t. the magnetic field
real(Float64) :: vabs = 0.d0
!+ Speed [cm/s]
real(Float64) :: vr = 0.d0
!+ Radial velocity [cm/s]
real(Float64) :: vt = 0.d0
!+ Torodial velocity [cm/s]
real(Float64) :: vz = 0.d0
!+ Z velocity [cm/s]
real(Float64) :: weight = 0.d0
!+ Particle weight: How many fast-ions does particle represent.
integer(Int32) :: class = 0
!+ Orbit class id
end type FastIon