gibuu is hosted by Hepforge, IPPP Durham
GiBUU

TABLE OF CONTENTS


/JPsiNucleon [ Modules ]

[ Top ] [ Modules ]

NAME

module JPsiNucleon

PURPOSE

Includes the cross sections for J/Psi-nucleon elastic scattering and J/Psi dissociation

Public routines:


JPsiNucleon/JPsiNuc [ Subroutines ]

[ Top ] [ JPsiNucleon ] [ Subroutines ]

NAME

subroutine JPsiNuc(srts,teilchenIN,teilchenOUT,sigmaTot,sigmaElast,plotFlag)

PURPOSE

Evaluates the cross sections for * J N -> J N, * J N -> Lambda_c Dbar, * J N -> Lambda_c D*bar , * J N -> N D Dbar and returns also a "preevent":

  • type(preEvent),dimension(1:3), intent(out) :: teilchenOut ! outgoing particles

The cross sections are based on calculations of A. Sibirtsev (parameterized by A.L.).

INPUTS

  • real, intent(in) :: srts ! sqrt(s) in the process
  • type(particle),dimension(1:2), intent(in) :: teilchenIn ! colliding particles

Debugging:

  • logical, intent(in),optional :: plotFlag ! Switch on plotting of the Xsections

OUTPUT

  • real, intent(out) :: sigmaTot ! total Xsection
  • real, intent(out) :: sigmaElast ! elastic Xsection


JPsiNuc/evaluateXsections [ Subroutines ]

[ Top ] [ JPsiNuc ] [ Subroutines ]

NAME

subroutine evaluateXsections

PURPOSE

Evaluates J N -> J N, J N -> Lambda_c Dbar, J N -> Lambda_c D*bar and J N -> N D Dbar cross sections

NOTES

There are no resonance contributions to JPsi N scattering.


JPsiNuc/makeDecision [ Subroutines ]

[ Top ] [ JPsiNuc ] [ Subroutines ]

NAME

subroutine makeDecision

PURPOSE

Chooses randomly one of possible outgoing channels in JPsi-nucleon collision. Also the charges of outgoing particles are selected.


JPsiNuc/makeOutput [ Subroutines ]

[ Top ] [ JPsiNuc ] [ Subroutines ]

NAME

subroutine makeOutput

PURPOSE

Writes all cross sections to file as function of srts and plab [GeV] Filenames:

  • 'JPsiN_sigTotElast.dat' : sigmaTot, sigmaElast
  • 'JPsiN_diss.dat' : outgoing channels with JPsi dissociation