gibuu is hosted by Hepforge, IPPP Durham
GiBUU

TABLE OF CONTENTS

/Electron_origin [ Modules ]

[ Top ] [ Modules ]

NAME

module Electron_origin

PURPOSE

Stores & returns the type of event for electron nucleon scattering according to %firstEvent

The numbering scheme is:

  • -3000 : BaB
  • -2000 : Manni
  • -1000 : Elastic
  • 0xxx : Low Energy
  • 1000 : Fritiof
  • 2xxx : Pythia

The "Low Energy" Subtopics (0xxx) are:

  • 00xx : gamma N -> xx with xx = resonance ID
  • 010V : gamma N -> V N ! == Nucleon
  • 011V : gamma N -> V N pi
  • 020V : gamma N -> V Delta ! == Delta
  • 021V : gamma N -> V Delta pi
  • 0310 : gamma N -> Lambda K ! == Strangeness
  • 0320 : gamma N -> Sigma K
  • 0330 : gamma N -> K+ K- N
  • 0410 : gamma N -> pi0 eta ...! == explicit channels
  • ... (free entries)
  • 0510 : gamma N N -> N N ! == 2p2h
  • 0520 : gamma N N -> N Delta
  • ... (free entries)
  • 0810 : gamma N -> pi N ! == Background
  • 0820 : gamma N -> pi pi N
  • 082V : gamma N -> pi pi N via V N
  • 0829 : gamma N -> pi pi N via pi Delta

The vector meson "V" is given by:

  • 1 : rho
  • 2 : omega
  • 3 : phi
  • 4 : J/psi

The "Pythia" Subtopics (2xxx) are (cf. MSTI(9) ):

  • 2001 : VMD
  • 2002 : direct
  • 2003 : anomalous
  • 2004 : DIS

Electron_origin/origin_XXX [ Global module-variables ]

[ Top ] [ Electron_origin ] [ Global module-variables ]

PURPOSE

Constants defined for ease of coding

SOURCE

  integer, parameter :: origin_singlePi    =  810 ! gamma N -> pi N
  integer, parameter :: origin_doublePi    =  820 ! gamma N -> pi pi N
  integer, parameter :: origin_DIS         = 2004 ! DIS
  integer, parameter :: origin_vecmes      =  100 ! gamma N -> V N
  integer, parameter :: origin_vecmes_rho  =  101 !
  integer, parameter :: origin_vecmes_omega=  102 !
  integer, parameter :: origin_vecmes_phi  =  103 !
  integer, parameter :: origin_vecmes_Delta=  200 ! gamma N -> V Delta
  integer, parameter :: origin_pi0eta      =  410 ! gamma N -> pi0 eta ...
  integer, parameter :: origin_2p2hQE      =  510 ! gamma N N -> N N
  integer, parameter :: origin_2p2hDelta   =  520 ! gamma N N -> N Delta
  integer, parameter :: origin_fritiof     = 1000 ! gamma N -> X (via FRITIOF)

Electron_origin/le_whichOrigin [ Subroutines ]

[ Top ] [ Electron_origin ] [ Subroutines ]

NAME

subroutine le_whichOrigin(Switch,index,info)

PURPOSE

Stores & returns the type of event according to %firstEvent

INPUTS

  • integer :: index
  • integer,optional :: info
  • integer :: switch

USAGE

If switch= ... :

  • 0 -- initialize the subroutine
  • 1 -- store the information ("info") of the type of event for firstEvent=index
  • 2 -- return the information ("info") of the type of event for firstEvent=index

NOTES

does a reallocation of the arry, if index is out of bounds for switch==1.

Electron_origin/le_isResEvent [ Subroutines ]

[ Top ] [ Electron_origin ] [ Subroutines ]

NAME

logical function le_isResEvent(firstEvent)

PURPOSE

Returns .true. if the event with %firstEvent=firstEvent was a resonance event, else .false. .

INPUTS

integer, intent(in) :: firstEvent

Electron_origin/le_isPi0EtaEvent [ Subroutines ]

[ Top ] [ Electron_origin ] [ Subroutines ]

NAME

logical function le_isPi0EtaEvent(firstEvent)

PURPOSE

Returns .true. if the event with %firstEvent=firstEvent was a pi^0 eta production event, else .false. .

INPUTS

integer, intent(in) :: firstEvent

Electron_origin/le_isPiPiEvent [ Subroutines ]

[ Top ] [ Electron_origin ] [ Subroutines ]

NAME

logical function le_isPiPiEvent(firstEvent)

PURPOSE

Returns .true. if the event with %firstEvent=firstEvent was a 2pi production event, else .false. .

INPUTS

integer, intent(in) :: firstEvent

Electron_origin/le_isOmegaEvent [ Subroutines ]

[ Top ] [ Electron_origin ] [ Subroutines ]

NAME

logical function le_isOmegaEvent(firstEvent)

PURPOSE

Returns .true. if the event with %firstEvent=firstEvent was a omega production event, else .false. .

INPUTS

integer, intent(in) :: firstEvent

Electron_origin/le_isphiEvent [ Subroutines ]

[ Top ] [ Electron_origin ] [ Subroutines ]

NAME

logical function le_isPhiEvent(firstEvent)

PURPOSE

Returns .true. if the event with %firstEvent=firstEvent was a phi production event, else .false. .

INPUTS

integer, intent(in) :: firstEvent

Electron_origin/le_isDISEvent [ Subroutines ]

[ Top ] [ Electron_origin ] [ Subroutines ]

NAME

logical function le_isDISEvent(firstEvent)

PURPOSE

Returns .true. if the event with %firstEvent=firstEvent was a DIS event, else .false. .

INPUTS

integer, intent(in) :: firstEvent

Electron_origin/le_isRhoEvent [ Subroutines ]

[ Top ] [ Electron_origin ] [ Subroutines ]

NAME

logical function le_isRhoEvent(firstEvent)

PURPOSE

Returns .true. if the event with %firstEvent=firstEvent was a rho production event, else .false. .

INPUTS

integer, intent(in) :: firstEvent