### TABLE OF CONTENTS

- 1. /dimi
- 1.1. dimi/massNN_NDelta
- 1.2. dimi/dimiSigma
- 1.3. dimi/dimiIntegrated
- 1.4. dimi/setMaxSqrts
- 1.5. dimi/dimidm
- 1.6. dimi/mnnnd2

## /dimi [ Modules ]

NAME

module **dimi**

PURPOSE

Includes the N N <-> Delta N cross sections according to the OPE model by Dmitriev et al. See:

- Diploma Thesis Effenberger, chapter 3.3.1
- Dmitriev/Sushkov/Gaarde, Nucl. Phys. A 459 (1986) 503-524

## dimi/massNN_NDelta [ Functions ]

[ Top ] [ dimi ] [ Functions ]

NAME

function **massNN_NDelta** (srts) result (massDelta)

PURPOSE

Evaluates masses in N N -> N Delta process using dimidm. This is done by a Monte-Carlo process utilizing dsigma/dm.

## dimi/dimiSigma [ Functions ]

[ Top ] [ dimi ] [ Functions ]

NAME

function **dimiSigma** (srts, massDelta) result (sigma)

PURPOSE

Returns the cross section for Delta++ n -> pp scattering.

## dimi/dimiIntegrated [ Functions ]

[ Top ] [ dimi ] [ Functions ]

NAME

function **dimiIntegrated** (srts) result (dsdm_Integrated)

PURPOSE

Returns the cross section for p p -> Delta++ n scattering, integrated over the Delta mass.

## dimi/setMaxSqrts [ Subroutines ]

[ Top ] [ dimi ] [ Subroutines ]

NAME

subroutine **setMaxSqrts**(srtsMax)

PURPOSE

set the upper bound of the tabulation

## dimi/dimidm [ Subroutines ]

[ Top ] [ dimi ] [ Subroutines ]

NAME

subroutine **dimidm** (dsdm, dsdmIntegrated, sigma, srts, mdel)

PURPOSE

this subroutine calculates the cross sections for p p <-> Delta++ n Stores cross sections at first call to a field and then it only returns those field values.

INPUTS

OUTPUT

- real :: sigma -- total cross section (for reaction with incoming delta)
- real :: dsdm -- mass differential cross section as function of mdel and srts (for reaction with outgoing delta)
- real :: dsdm_Integrated -- mass differential cross section integrated over mass as function of srts (for reaction with outgoing delta)

## dimi/mnnnd2 [ Functions ]

[ Top ] [ dimi ] [ Functions ]

NAME

real function **mnnnd2**(t,u,mdel)

PURPOSE

return Matrix element squared and averaged over initial and summed over final spins for p_1 p_2 -> n_3 delta_4^++ (within Dmitriev and Sushkov model with effective nucleon and delta masses).

INPUTS