TABLE OF CONTENTS
- 1. /NNPION_NN
/NNPION_NN [ Modules ]
NAME
module NNPION_NN
PURPOSE
Implements the Matrix elements for N N Pion -> N N.
NNPION_NN/gamma_NNPion [ Functions ]
[ Top ] [ NNPION_NN ] [ Functions ]
NAME
function gamma_NNPion_NN(srts,Epion,Enucleon,rhoProton,rhoNeutron, chargePion,chargeNucleon,s_wave_abs,OutPutFlag) Result(gamma)
PURPOSE
Evaluates Gammas for pion absorption on a pair of nucleons. There exist the following possible channels:
- 1: p p pi^0-> p p ; which is equivalent to n n -> n n pi^0
- 2: n n pi^+-> n p ; which is equivalent to p n -> p p pi^-
- 3: p n pi^0-> p n ;
- 4: p n pi^+-> p p ; which is equivalent to n n -> p n pi^-
OUTPUT
INPUTS
- real, intent(in) :: srts -- SQRT(s)
- real, intent(in) :: Epion -- Energy of pion
- real, intent(in),dimension(1:2) :: Enucleon -- Energies of nucleons
- real, intent(in) :: rhoProton
- real, intent(in) :: rhoNeutron
- integer, intent(in) :: chargePion
- integer, dimension(1:2), intent(in) :: chargeNucleon
- logical, intent(in) :: s_wave_abs
- logical, optional, intent(in) :: outputFlag
NNPION_NN/matrix_NN_NNPion [ Functions ]
[ Top ] [ NNPION_NN ] [ Functions ]
NAME
function matrix_NN_NNPion(srts,outputFlag) result (matrixElements)
PURPOSE
Implements the Matrix elements for N N Pion -> N N in units of "GeV**2 * mB" for the channels:
- 1: p p -> p p pi^0 ; which is equivalent to n n -> n n pi^0
- 2: p n -> n n pi^+ ; which is equivalent to p n -> p p pi^-
- 3: p n -> p n pi^0 ;
- 4: p p -> p n pi^+ ; which is equivalent to n n -> p n pi^-
INPUTS
- real :: srts
- logical,optional :: outputFlag
OUTPUT
- real, dimension(1:4), intent(out) :: matrixElements