TABLE OF CONTENTS
- 1. /initElementary
- 1.1. initElementary/initElementaryCollision
- 1.1.1. initElementaryCollision/initInput
- 1.1.2. initElementaryCollision/setKinematics
- 1.1.3. initElementaryCollision/setPosition
- 1.2. initElementary/elementary
- 1.2.1. elementary/impactParameter
- 1.2.2. elementary/particleId
- 1.2.3. elementary/particleAnti
- 1.2.4. elementary/particleCharge
- 1.2.5. elementary/particleMass
- 1.2.6. elementary/srtsRaiseFlag
- 1.2.7. elementary/ekin_lab
- 1.2.8. elementary/delta_ekin_lab
- 1.2.9. elementary/srts
- 1.2.10. elementary/delta_srts
- 1.2.11. elementary/debug
/initElementary [ Modules ]
NAME
module initElementary
PURPOSE
Implement the init routines for collisions of "elementary" (non-perturbative) particles.
elementary/impactParameter [ Global module-variables ]
[ Top ] [ elementary ] [ Global module-variables ]
SOURCE
real, save :: impactParameter = -1. ! [fm]
PURPOSE
- >=0: this is the actual impact parameter
- <0 : Impact parameter integration up to an automatically determined b_max. The actual impact parameter is randomly sampled in the interval [0.,b_max] with a proper geometrical weight.
elementary/particleId [ Global module-variables ]
[ Top ] [ elementary ] [ Global module-variables ]
SOURCE
integer,dimension(2), save :: particleId=(/1,1/)
PURPOSE
Id of particles
elementary/particleAnti [ Global module-variables ]
[ Top ] [ elementary ] [ Global module-variables ]
SOURCE
logical,dimension(2), save :: particleAnti=(/.false.,.false./)
PURPOSE
if .true. then particles are antiparticles
elementary/particleCharge [ Global module-variables ]
[ Top ] [ elementary ] [ Global module-variables ]
SOURCE
integer,dimension(2), save :: particleCharge=(/0,0/)
PURPOSE
Charge of the particles
elementary/particleMass [ Global module-variables ]
[ Top ] [ elementary ] [ Global module-variables ]
SOURCE
real, dimension(2), save :: particleMass=(/-1.0,-1.0/)
PURPOSE
Mass of particles (if <0, then mass is set to default values)
elementary/srtsRaiseFlag [ Global module-variables ]
[ Top ] [ elementary ] [ Global module-variables ]
SOURCE
logical, save :: srtsRaiseFlag=.false.
PURPOSE
elementary/ekin_lab [ Global module-variables ]
[ Top ] [ elementary ] [ Global module-variables ]
SOURCE
real, save :: ekin_lab=1. ! [GeV]
PURPOSE
kin. energy of first particle in the rest frame of second particle (starting value for the energy scan: the number of different energies is set by parameter num_Energies in the namelist "input")
elementary/delta_ekin_lab [ Global module-variables ]
[ Top ] [ elementary ] [ Global module-variables ]
SOURCE
real, save :: delta_ekin_lab=0.03 ! [GeV]
PURPOSE
kin. energy step for energy scan
elementary/srts [ Global module-variables ]
[ Top ] [ elementary ] [ Global module-variables ]
SOURCE
real, save :: srts=3. ! [GeV]
PURPOSE
invariant energy (starting value for the energy scan)
elementary/delta_srts [ Global module-variables ]
[ Top ] [ elementary ] [ Global module-variables ]
SOURCE
real, save :: delta_srts=1. ! [GeV]
PURPOSE
elementary/debug [ Global module-variables ]
[ Top ] [ elementary ] [ Global module-variables ]
SOURCE
logical, parameter :: debug=.false.
PURPOSE
if .true., additional printouts are done for debugging
initElementary/initElementaryCollision [ Subroutines ]
[ Top ] [ initElementary ] [ Subroutines ]
NAME
subroutine initElementaryCollision(teilchen,energyRaiseFlag)
PURPOSE
Provides initial conditions for the collision of two elementary particles.
INPUTS
- type(particle),dimension(:,:),intent(inout) :: teilchen -- array of particles to store the two colliding elementary particles.
- logical, intent(in) :: energyRaiseFlag -- if .true., then the lab. energy of the first particle is increased by delta_ekin_lab.
NOTES
The user has to provide the namelist 'elementary', which contains the impact parameter and lab. energy of the projectile and id's of colliding particles. If the input impact parameter is negative, then the actual impact parameter is chosen by Monte-Carlo between 0 and abs(input impact parameter).
initElementaryCollision/initInput [ Subroutines ]
[ Top ] [ initElementaryCollision ] [ Subroutines ]
NAME
subroutine initInput
PURPOSE
Reads input out of jobcard. Namelist 'elementary'.
initElementary/elementary [ Namelists ]
[ Top ] [ initElementary ] [ Namelists ]
NAME
NAMELIST /elementary/
PURPOSE
Includes parameters for initialization of a collision between two elementary particles:
- impactParameter
- particleId
- particleAnti
- particleCharge
- srtsRaiseFlag
- ekin_lab
- delta_ekin_lab
- srts
- delta_srts
initElementaryCollision/setKinematics [ Subroutines ]
[ Top ] [ initElementaryCollision ] [ Subroutines ]
NAME
subroutine setKinematics
PURPOSE
Sets basic kinematics of the elmentary particle collision.
initElementaryCollision/setPosition [ Subroutines ]
[ Top ] [ initElementaryCollision ] [ Subroutines ]
NAME
subroutine setPosition
PURPOSE
Sets positions of the elementary particles.
NOTES
- If impactParameter is choosen to be less than zero, then the impact parameter is choosen by a Monte-Carlo decision.
- The second particle is always initialized at zero (already done by subroutine setToDefault called in setKinematics).