TABLE OF CONTENTS
/neutrinoInfoStorage [ Modules ]
NAME
module neutrinoInfoStorage
PURPOSE
This module stores information about the initial neutrino event. (structure taken from EventInfo_HiLep)
neutrinoInfoStorage/tneutrinoInfoStorage [ Types ]
[ Top ] [ neutrinoInfoStorage ] [ Types ]
SOURCE
type tneutrinoInfoStorage
logical :: flagOK=.False.
real :: value=0.
real :: value_rec=0.
real :: value_rec_2=0.
end type tneutrinoInfoStorage
PURPOSE
This holds all information we want to store connected to neutrino induced reactions.
neutrinoInfoStorage/neutrinoInfoStorage_Init [ Subroutines ]
[ Top ] [ neutrinoInfoStorage ] [ Subroutines ]
NAME
subroutine neutrinoInfoStorage_Init(NumInitialEvents)
PURPOSE
allocate memory and reset the corresponding arrays.
INPUTS
- integer :: NumInitialEvents -- number of possible initial events
OUTPUT
---
neutrinoInfoStorage/neutrinoInfoStorage_clear [ Subroutines ]
[ Top ] [ neutrinoInfoStorage ] [ Subroutines ]
NAME
subroutine neutrinoInfoStorage_clear
PURPOSE
if necessary clear allocated memory.
OUTPUT
---
neutrinoInfoStorage/neutrinoInfoStorage_Store [ Subroutines ]
[ Top ] [ neutrinoInfoStorage ] [ Subroutines ]
NAME
subroutine neutrinoInfoStorage_Store(i,value,value_rec)
PURPOSE
Store the event info connected with number "i":
INPUTS
- integer :: i -- actual number of event
- real :: value -- neutrino kinematic variables
- real :: value_rec, value_rec_2 -- reconstructed variables
OUTPUT
---
neutrinoInfoStorage/neutrinoInfoStorage_Get [ Functions ]
[ Top ] [ neutrinoInfoStorage ] [ Functions ]
NAME
logical function neutrinoInfoStorage_Get(i,value,value_rec)
PURPOSE
Get the event info stored connected with number "i".
INPUTS
- integer :: i -- actual number of event
OUTPUT
- real :: value -- neutrino kinematic variables
- real :: value_rec -- reconstructed variables