TABLE OF CONTENTS
- 1. /NbarN_to_NbarDelta
- 1.1. NbarN_to_NbarDelta/initNbarN_to_NbarDelta
- 1.2. NbarN_to_NbarDelta/delta_mass
- 1.3. NbarN_to_NbarDelta/maxPoints_mass
- 1.4. NbarN_to_NbarDelta/delta_srts
- 1.5. NbarN_to_NbarDelta/maxPoints_srts
- 1.6. NbarN_to_NbarDelta/init
- 1.7. NbarN_to_NbarDelta/massNbarN_NbarDelta
- 1.8. NbarN_to_NbarDelta/NbarN_to_NbarDelta_Integrated
- 1.9. NbarN_to_NbarDelta/NbarDelta_to_NbarN
- 1.10. NbarN_to_NbarDelta/NbarN_to_NbarDelta_dm
- 1.11. NbarN_to_NbarDelta/calculate
- 1.12. NbarN_to_NbarDelta/calculate1
- 1.13. NbarN_to_NbarDelta/mNbarN_to_NbarD2
/NbarN_to_NbarDelta [ Modules ]
NAME
module NbarN_to_NbarDelta
PURPOSE
Includes the Nbar N <-> Nbar Delta cross sections according to the one-pion exchange model. NOTES: This module has a similar structure as the module dimi. AUTHOR: Alexei Larionov, 04.2008
NbarN_to_NbarDelta/initNbarN_to_NbarDelta [ Namelists ]
[ Top ] [ NbarN_to_NbarDelta ] [ Namelists ]
NAME
NAMELIST initNbarN_to_NbarDelta Includes the input variables:
NbarN_to_NbarDelta/delta_mass [ Global module-variables ]
[ Top ] [ NbarN_to_NbarDelta ] [ Global module-variables ]
SOURCE
real, save :: delta_mass=0.01
PURPOSE
NbarN_to_NbarDelta/maxPoints_mass [ Global module-variables ]
[ Top ] [ NbarN_to_NbarDelta ] [ Global module-variables ]
SOURCE
integer, save :: maxPoints_mass=150
PURPOSE
NbarN_to_NbarDelta/delta_srts [ Global module-variables ]
[ Top ] [ NbarN_to_NbarDelta ] [ Global module-variables ]
SOURCE
real, save :: delta_srts=0.01
PURPOSE
- grid step on an invariant energy (GeV)
NbarN_to_NbarDelta/maxPoints_srts [ Global module-variables ]
[ Top ] [ NbarN_to_NbarDelta ] [ Global module-variables ]
SOURCE
integer, save :: maxPoints_srts=100
PURPOSE
- number of the grid points on the invariant energy
NbarN_to_NbarDelta/init [ Subroutines ]
[ Top ] [ NbarN_to_NbarDelta ] [ Subroutines ]
NAME
subroutine init
PURPOSE
Reads data out of namelist 'initNbarN_to_NbarDelta'
NbarN_to_NbarDelta/massNbarN_NbarDelta [ Functions ]
[ Top ] [ NbarN_to_NbarDelta ] [ Functions ]
NAME
function massNbarN_NbarDelta(srts) result(massDelta)
PURPOSE
Evaluates masses in Nbar N -> Nbar Delta process using NbarN_to_NbarDelta_dm This is done by a Monte-Carlo process utilizing dsigma/dm.
NOTES
NbarN_to_NbarDelta/NbarN_to_NbarDelta_Integrated [ Subroutines ]
[ Top ] [ NbarN_to_NbarDelta ] [ Subroutines ]
NAME
subroutine NbarN_to_NbarDelta_Integrated(dsdm_Integrated,srts)
PURPOSE
Returns the cross section for pbar n --> nbar delta^- scattering, integrated over the Delta mass.
NbarN_to_NbarDelta/NbarDelta_to_NbarN [ Subroutines ]
[ Top ] [ NbarN_to_NbarDelta ] [ Subroutines ]
NAME
subroutine NbarDelta_to_NbarN(sigma,srts,mdel)
PURPOSE
Returns the cross section for nbar delta^- --> pbar n scattering.
NbarN_to_NbarDelta/NbarN_to_NbarDelta_dm [ Subroutines ]
[ Top ] [ NbarN_to_NbarDelta ] [ Subroutines ]
NAME
subroutine NbarN_to_NbarDelta_dm(dsdm,dsdm_Integrated,sigma,srts,mdel)
PURPOSE
this subroutine calculates the cross sections for pbar n <--> nbar delta^- Stores cross sections at first call to a field and then it only returns those field values.
INPUTS
real srts =sqrt(s) in the process real mdel= mass of delta
RESULT
real :: sigma= total cross section (for reaction with incoming delta) real :: dsdm= mass differential cross section as function of mdel and srts
(for reaction with outgoing delta)
real :: dsdm_Integrated= mass differential cross section integrated over mass as function
of srts (for reaction with outgoing delta)
NOTES
Actual cross section is computed by subroutine calculate below.
NbarN_to_NbarDelta/calculate [ Subroutines ]
[ Top ] [ NbarN_to_NbarDelta ] [ Subroutines ]
NAME
subroutine calculate(dsdm,sigma,srts,mdel)
PURPOSE
Calculate the cross sections for pbar n <--> nbar delta^-
INPUTS
real srts =sqrt(s) in the process real mdel= mass of delta
RESULT
real :: sigma= total cross section (for reaction with incoming delta) real :: dsdm= mass differential cross section as function of mdel and srts
(for reaction with outgoing delta)
NbarN_to_NbarDelta/calculate1 [ Subroutines ]
[ Top ] [ NbarN_to_NbarDelta ] [ Subroutines ]
NAME
subroutine calculate1(s,t,dsigdt,mass_min,mass_max)
PURPOSE
Compute d sigma(pbar_1 n_2 -> nbar_3 delta_4^-) / d t (mb/GeV^2) integrated over mass of delta.
INPUTS
- s=(p1+p2)^2
- t=(p1-p3)^2=(p4-p2)^2 --- Mandelstam variables (GeV^2)
RESULT
- dsigdt = d sigma(pbar_1 n_2 -> nbar_3 delta_4^-)
- mass_min,mass_max --- delta mass integration limits (GeV)
NbarN_to_NbarDelta/mNbarN_to_NbarD2 [ Subroutines ]
[ Top ] [ NbarN_to_NbarDelta ] [ Subroutines ]
NAME
real function mNbarN_to_NbarD2 (t, m_1, m_2, m_3, m_4)
PURPOSE
Matrix element squared and averaged over initial and summed over final spins for pbar_1 n_2 -> nbar_3 delta_4^- within OPEM with effective nucleon and delta masses.
INPUTS
- t=(p1-p3)^2 -- Mandelstam variable (GeV^2)
- m_1,m_2,m_3,m_4 -- effective masses of particles (GeV)