TABLE OF CONTENTS
- 1. /master_3Body
- 1.1. master_3Body/NNPION_NN_maxSrts
- 1.2. master_3Body/positionNNPi
- 1.3. master_3Body/radiusNukSearch
- 1.4. master_3Body/debug
- 1.5. master_3Body/correctEnergy
- 1.6. master_3Body/pionThreeBody
- 1.7. master_3Body/deltaThreeBody
- 1.8. master_3Body/GetRadiusNukSearch
- 1.9. master_3Body/readInput
- 1.10. master_3Body/master_3body
- 1.11. master_3Body/setKinematics
- 1.12. master_3Body/nukSearch
/master_3Body [ Modules ]
NAME
module master_3Body
PURPOSE
Includes all 3->X processes.
master_3Body/NNPION_NN_maxSrts [ Global module-variables ]
[ Top ] [ master_3Body ] [ Global module-variables ]
PURPOSE
maximal sqrt(s) in [GeV]such that an NN Pion-> NN event takes place
SOURCE
real, save ::NNPION_NN_maxSrts=4.0
master_3Body/positionNNPi [ Global module-variables ]
[ Top ] [ master_3Body ] [ Global module-variables ]
PURPOSE
.true.=NN final state is initialized at pion position, .false. =default= in the middle of NNPi
SOURCE
logical, save ::positionNNPi=.false.
master_3Body/radiusNukSearch [ Global module-variables ]
[ Top ] [ master_3Body ] [ Global module-variables ]
PURPOSE
Radius for the search of nucleons.
SOURCE
real, save :: radiusNukSearch=2.9 ! radius in which at rho_0 nucleons shall be searched for.
master_3Body/debug [ Global module-variables ]
[ Top ] [ master_3Body ] [ Global module-variables ]
SOURCE
logical,save :: debug=.false.
PURPOSE
Switch for debug information
master_3Body/correctEnergy [ Global module-variables ]
[ Top ] [ master_3Body ] [ Global module-variables ]
PURPOSE
Scale final state momenta to fulfill energy and momentum conservation. If .false. energy conservation is violated
SOURCE
logical,save :: correctEnergy=.true.
master_3Body/pionThreeBody [ Global module-variables ]
[ Top ] [ master_3Body ] [ Global module-variables ]
PURPOSE
Switch for the NNPion -> NN processes. .false.=OFF
SOURCE
logical, save :: pionThreeBody=.true.
master_3Body/deltaThreeBody [ Global module-variables ]
[ Top ] [ master_3Body ] [ Global module-variables ]
PURPOSE
Switch for the NNdelta -> NN processes. .false.=OFF
SOURCE
logical, save :: deltaThreeBody=.true.
master_3Body/GetRadiusNukSearch [ Functions ]
[ Top ] [ master_3Body ] [ Functions ]
NAME
real function GetRadiusNukSearch()
PURPOSE
return the value of the variable "radiusNukSearch" if module was not initailzed before, this is done now.
master_3Body/readInput [ Subroutines ]
[ Top ] [ master_3Body ] [ Subroutines ]
NAME
subroutine readInput
PURPOSE
Reads input in jobcard out of namelist "master_3body".
master_3Body/master_3body [ Namelists ]
[ Top ] [ master_3Body ] [ Namelists ]
NAME
NAMELIST /master_3body/
PURPOSE
Includes the switches:
master_3Body/setKinematics [ Subroutines ]
[ Top ] [ master_3Body ] [ Subroutines ]
NAME
subroutine setKinematics(srts,momentum_calc, betaToLRF,betaToCM,medium_AtCollision, finalState)
PURPOSE
Evaluates the kinematics for the "finalState" particles assuming vacuum kinematics (-> no potentials).
INPUTS
- real , intent(in) :: srts ! SQRT(s)
- real, intent(in),dimension(0:3) :: momentum_calc ! total momentum in calculation frame
- real, dimension(1:3),intent(in) :: betaToLRF ! beta of calculation frame to LRF frame
- real, dimension(1:3),intent(in) :: betaToCM ! beta of calculation frame to CM frame
- type(medium),intent(in) :: mediumAtCollision ! medium information
OUTPUT
- type(particle), dimension(:),intent(inOut) :: finalState
NOTES
It's important that the Id's and charges of the "finalState" particles are already set when calling this subroutine. Only kinematics including masses of this finalState will be set.
master_3Body/nukSearch [ Subroutines ]
[ Top ] [ master_3Body ] [ Subroutines ]
PURPOSE