TABLE OF CONTENTS
- 1. /radiativeDeltaDecay
- 1.1. radiativeDeltaDecay/Enable
- 1.2. radiativeDeltaDecay/readInput
- 1.3. radiativeDeltaDecay/DoRadiativeDeltaDecay
- 2. /radiativeDeltaStorage
/radiativeDeltaStorage [ Modules ]
NAME
module radiativeDeltaStorage
PURPOSE
This module stores information about the initial Delta needed for the analysis of the radiative Delta decay.
radiativeDeltaStorage/tradiativeDeltaStorage [ Types ]
[ Top ] [ radiativeDeltaStorage ] [ Types ]
SOURCE
type tradiativeDeltaStorage logical :: flagOK=.False. real :: radius=0. real :: absthreemomentum=0. real :: mass=0. integer :: charge=0 end type tradiativeDeltaStorage
PURPOSE
This holds all information we want to store about the intial Delta.
radiativeDeltaStorage/radiativeDeltaStorage_Init [ Subroutines ]
[ Top ] [ radiativeDeltaStorage ] [ Subroutines ]
NAME
subroutine radiativeDeltaStorage_Init(NumInitialEvents)
PURPOSE
Allocate memory and reset the corresponding arrays.
INPUTS
- integer :: NumInitialEvents -- number of possible initial events
radiativeDeltaStorage/radiativeDeltaStorage_clear [ Subroutines ]
[ Top ] [ radiativeDeltaStorage ] [ Subroutines ]
NAME
subroutine radiativeDeltaStorage_clear
PURPOSE
If necessary clear allocated memory.
radiativeDeltaStorage/radiativeDeltaStorage_Store [ Subroutines ]
[ Top ] [ radiativeDeltaStorage ] [ Subroutines ]
NAME
subroutine radiativeDeltaStorage_Store(i,value,value_rec)
PURPOSE
Store the event info connected with number "i".
radiativeDeltaStorage/radiativeDeltaStorage_Get [ Functions ]
[ Top ] [ radiativeDeltaStorage ] [ Functions ]
NAME
logical function radiativeDeltaStorage_Get(i,value,value_rec)
PURPOSE
Get the event info stored connected with number "i".
INPUTS
- integer :: i -- actual number of event
OUTPUT
stored values
/radiativeDeltaDecay [ Modules ]
NAME
module radiativeDeltaDecay
PURPOSE
Calculate cross sections for radiative Delta decay.
radiativeDeltaDecay/Enable [ Global module-variables ]
[ Top ] [ radiativeDeltaDecay ] [ Global module-variables ]
NAME
Enable
PURPOSE
If .true. the dilepton analysis will be performed, otherwise not.
SOURCE
logical, save :: Enable=.false.
radiativeDeltaDecay/readInput [ Subroutines ]
[ Top ] [ radiativeDeltaDecay ] [ Subroutines ]
NAME
subroutine readInput
PURPOSE
Reads input in jobcard out of namelist "radiative_DeltaDecay". Possible Input:
radiativeDeltaDecay/DoRadiativeDeltaDecay [ Functions ]
[ Top ] [ radiativeDeltaDecay ] [ Functions ]
NAME
subroutine DoRadiativeDeltaDecay(nt,pertPart)
PURPOSE
INPUTS
- integer nt - time step number
- type(particle) pertPart(:,:) - list of perturbative particles