TABLE OF CONTENTS
- 1. /phiNucleon
- 1.1. phiNucleon/phiNuc
- 1.1.1. phiNuc/evaluateXsections
- 1.1.2. phiNuc/makeOutput
/phiNucleon [ Modules ]
NAME
module phiNucleon
PURPOSE
Includes the cross sections for phi-nucleon scattering in the resonance regime. Public routines:
phiNucleon/phiNuc [ Subroutines ]
[ Top ] [ phiNucleon ] [ Subroutines ]
NAME
subroutine phiNuc (srts,teilchenIN,mediumATcollision,teilchenOUT,sigmaTot,sigmaElast,useHiEnergy,HiEnergySchwelle,plotFlag)
PURPOSE
Evaluates phi Nucleon -> anything cross sections and returns also a "preevent"
INPUTS
- real, intent(in) :: srts ! sqrt(s) in the process
- type(particle),dimension(1:2), intent(in) :: teilchenIn ! colliding particles
- type(medium), intent(in) :: mediumATcollision ! Medium informations at the position of the collision
High energy matching:
- logical,intent(in) :: useHiEnergy
- .true. if High-Energy cross sections are given by paramBarMesHE
- real,intent(in) :: HiEnergySchwelle
- threshold sqrt(s) for paramBarMesHE, i.e. at which energy the cross sections of paramBarMesHE are used
Debugging:
- logical, intent(in),optional :: plotFlag ! Switch on plotting of the Xsections
OUTPUT
- real, intent(out) :: sigmaTot ! total Xsection
- real, intent(out) :: sigmaElast ! elastic Xsection
This routine does a Monte-Carlo-decision according to the partial cross sections to decide on a final state with maximal 3 final state particles. These are returned in the vector teilchenOut. The kinematics of these teilchen is only fixed in the case of a single produced resonance. Otherwise the kinematics still need to be established. The result is:
- type(preEvent),dimension(1:3), intent(out) :: teilchenOut ! colliding particles
The cross sections are based upon a parametrization by Golubeva. See routine golub_phi in parametrizationBarMes.
NOTES
Possible final states are :
phiNuc/evaluateXsections [ Subroutines ]
[ Top ] [ phiNuc ] [ Subroutines ]
NAME
subroutine evaluateXsections
PURPOSE
Evaluates phi Nucleon -> anything cross sections
NOTES
There are no resonance contributions to phi N scattering. The contributions are given by Golubeva (see golub_phi).
phiNuc/makeOutput [ Subroutines ]
[ Top ] [ phiNuc ] [ Subroutines ]
NAME
subroutine makeOutput
PURPOSE
Writes all cross sections to file as function of srts and plab [GeV]. Filenames:
- 'phiN_sigTotElast.dat' : sigmaTot, sigmaElast
- 'phiN_nonStrange_nuk.dat' : non-strange meson with nucleon in final state