TABLE OF CONTENTS
- 1. /annihilation_channels
- 1.1. annihilation_channels/anni_channel
- 1.2. annihilation_channels/pbarp_channels_atRest
- 1.3. annihilation_channels/pbarp_channels_eDep
- 1.4. annihilation_channels/pbarn_channels_atRest
- 1.5. annihilation_channels/pbarn_channels_eDep
- 1.6. annihilation_channels/choose_channel
- 1.7. annihilation_channels/generate_table
- 1.8. annihilation_channels/readInput
- 1.9. annihilation_channels/decode_to_GiBUU
/annihilation_channels [ Modules ]
NAME
module annihilation_channels
PURPOSE
Includes the routines for selecting annihilation channel.
annihilation_channels/anni_channel [ Types ]
[ Top ] [ annihilation_channels ] [ Types ]
SOURCE
type anni_channel
integer,dimension(1:6) :: id=0 ! Id's of the final state particles
integer,dimension(1:6) :: charge=0 ! charges of the final state particles
real :: probability=0. ! channel probability
end type anni_channel
annihilation_channels/pbarp_channels_atRest [ Global module-variables ]
[ Top ] [ annihilation_channels ] [ Global module-variables ]
SOURCE
type(anni_channel), Allocatable, dimension(:), save, target :: pbarp_channels_atRest
PURPOSE
Stores the information for all possible channels of antiproton-proton annihilation at rest.
annihilation_channels/pbarp_channels_eDep [ Global module-variables ]
[ Top ] [ annihilation_channels ] [ Global module-variables ]
SOURCE
type(anni_channel), Allocatable, dimension(:), save, target :: pbarp_channels_eDep
PURPOSE
Stores the information for all possible channels of antiproton-proton annihilation at the given beam energy.
annihilation_channels/pbarn_channels_atRest [ Global module-variables ]
[ Top ] [ annihilation_channels ] [ Global module-variables ]
SOURCE
type(anni_channel), Allocatable, dimension(:), save, target :: pbarn_channels_atRest
PURPOSE
Stores the information for all possible channels of antiproton-neutron annihilation at rest.
annihilation_channels/pbarn_channels_eDep [ Global module-variables ]
[ Top ] [ annihilation_channels ] [ Global module-variables ]
SOURCE
type(anni_channel), Allocatable, dimension(:), save, target :: pbarn_channels_eDep
PURPOSE
Stores the information for all possible channels of antiproton-neutron annihilation at the given beam energy.
annihilation_channels/choose_channel [ Subroutines ]
[ Top ] [ annihilation_channels ] [ Subroutines ]
NAME
subroutine choose_channel(srts,antibar,bar,time,finalState,success)
PURPOSE
Selects randomly the outgoing channel (id's and charges only) for a given antibaryon-baryon annihilating pair.
INPUTS
- real :: srts --- inv. energy
- type(particle) :: antibar --- antibaryon particle
- type(particle) :: bar --- baryon particle
- real :: time --- current time step (fm/c)
OUTPUT
- type(particle), dimension(:) :: finalState --- final state particles (only id's and charges are determined)
- logical :: success --- .true. if the channel choice was successfull
NOTES
- this code relies on a size of finalState of (at least) 6
annihilation_channels/generate_table [ Subroutines ]
[ Top ] [ annihilation_channels ] [ Subroutines ]
NAME
subroutine generate_table(srts)
PURPOSE
Interface subroutine to Igor Pshenichnov code which generates the tables of outgoing channels for PbarP and PbarN annihilation.
INPUTS
- real, intent(in) :: srts --- inv. energy
annihilation_channels/readInput [ Subroutines ]
[ Top ] [ annihilation_channels ] [ Subroutines ]
NAME
subroutine readInput
PURPOSE
Initializes the tables of outgoing channels for PbarP and PbarN annihilation at rest according to I.A. Pshenichnov (private communication, see also E.S. Golubeva et al., NPA 537, 393 (1992))
annihilation_channels/decode_to_GiBUU [ Subroutines ]
[ Top ] [ annihilation_channels ] [ Subroutines ]
NAME
subroutine decode_to_GiBUU(id_input,id,iz)
PURPOSE
Transform the internal particle coding of Igor Pshenichnov's annihilation code to GiBUU coding.
INPUTS
- integer, intent(in) :: id_input --- Id in Pshenichnov's coding
OUTPUT
NOTES
- Only mesons are considered.
- An implementation as lookup table could be faster