TABLE OF CONTENTS
- 1. /etaDelta_resonance
- 1.1. etaDelta_resonance/etaDelta
- 1.1.1. etaDelta/evaluateXsections
- 1.1.2. etaDelta/makeOutput
/etaDelta_resonance [ Modules ]
NAME
module etaDelta_resonance
PURPOSE
Includes the cross sections for eta-delta scattering in the resonance regime
Public routines:
etaDelta_resonance/etaDelta [ Subroutines ]
[ Top ] [ etaDelta_resonance ] [ Subroutines ]
NAME
subroutine etaDelta (srts, teilchenIn, teilchenOut, sigmaTot, sigmaElast, plotFlag)
PURPOSE
Evaluates eta Delta_resonance -> 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
Debugging:
- logical, intent(in),optional :: plotFlag ! Switch on plotting of the Xsections
RESULT
- 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
NOTES
Possible final states are :
- 2-particle : pi N
etaDelta/evaluateXsections [ Subroutines ]
[ Top ] [ etaDelta ] [ Subroutines ]
NAME
subroutine evaluateXsections
PURPOSE
Evaluates eta Delta_resonance -> anything cross sections
NOTES
There are no resonance contributions to eta Delta scattering.
etaDelta/makeOutput [ Subroutines ]
[ Top ] [ etaDelta ] [ Subroutines ]
NAME
subroutine makeOutput
PURPOSE
Writes all cross sections to file as function of srts and plab [GeV] . Filenames:
- 'etaDelta_sigTotElast.dat' : sigmaTot, sigmaElast
- 'etaDelta_nonStrange_nuk.dat' : non-strange meson with nucleon in final state