Bhwide.cxx File Reference

#include "Bhwide.h"
#include "BhwideRandom.h"
#include "CLHEP/Vector/LorentzVector.h"
#include "HepMC/GenEvent.h"
#include "HepMC/GenParticle.h"
#include "HepMC/GenVertex.h"
#include "GaudiKernel/ISvcLocator.h"
#include "GaudiKernel/MsgStream.h"
#include "GaudiKernel/SmartDataPtr.h"
#include "BesRndmGenSvc/IBesRndmGenSvc.h"
#include "GeneratorObject/McGenEvent.h"
#include "cfortran/cfortran.h"

Go to the source code of this file.

Classes
struct	MOMSET_DEF

Macros
#define	MOMSET   COMMON_BLOCK( MOMSET_DEF, momset )
#define	GLIMIT(LENMX)
#define	DUMPS(NOUT)
#define	BHWIDE(MODE, XPAR, NPAR)
#define	MARINI(IJKLIN, NTOTIN, NTOT2N)

Functions
	COMMON_BLOCK_DEF (MOMSET_DEF, MOMSET)
double	ranmarr_ ()
void	marran_ (float *rvec, int *nma)
void	ecuran_ (double *rvec, int *nma)
void	carran_ (double *rvec, int *nma)

Macro Definition Documentation

BHWIDE

#define BHWIDE	(		MODE,
			XPAR,
			NPAR )

Value:

CCALLSFSUB3( BHWIDE, bhwide, INT, DOUBLEV, INTV, MODE, XPAR, NPAR )

Definition at line 56 of file Bhwide.cxx.

#define BHWIDE( MODE, XPAR, NPAR )                                                            \
  CCALLSFSUB3( BHWIDE, bhwide, INT, DOUBLEV, INTV, MODE, XPAR, NPAR )

Referenced by Bhwide::execute(), Bhwide::finalize(), and Bhwide::initialize().

DUMPS

#define DUMPS

(

NOUT

)

Value:

CCALLSFSUB1( DUMPS, dumps, INT, NOUT )

Definition at line 53 of file Bhwide.cxx.

GLIMIT

#define GLIMIT

(

LENMX

)

Value:

CCALLSFSUB1( GLIMIT, glimit, INT, LENMX )

Definition at line 50 of file Bhwide.cxx.

MARINI

#define MARINI	(		IJKLIN,
			NTOTIN,
			NTOT2N )

Value:

CCALLSFSUB3( MARINI, marini, INT, INT, INT, IJKLIN, NTOTIN, NTOT2N )

Definition at line 60 of file Bhwide.cxx.

#define MARINI( IJKLIN, NTOTIN, NTOT2N )                                                      \
  CCALLSFSUB3( MARINI, marini, INT, INT, INT, IJKLIN, NTOTIN, NTOT2N )

MOMSET

#define MOMSET   COMMON_BLOCK( MOMSET_DEF, momset )

Definition at line 43 of file Bhwide.cxx.

Function Documentation

carran_()

void carran_ ( double * rvec, int * nma )

extern

Definition at line 80 of file Bhwide.cxx.

                                       {
  int nmax = *nma;
  assert( nmax < 100 );
  double rvecd[100];
  BhwideRandom::FlatArray( rvecd, nmax );
  for ( int i = 0; i < nmax; i++ ) rvec[i] = rvecd[i];
}

COMMON_BLOCK_DEF()

COMMON_BLOCK_DEF	(	MOMSET_DEF	,
		MOMSET	)

ecuran_()

void ecuran_ ( double * rvec, int * nma )

extern

Definition at line 88 of file Bhwide.cxx.

                                       {
  int nmax = *nma;
  assert( nmax < 100 );
  double rvecd[100];
  BhwideRandom::FlatArray( rvecd, nmax );
  for ( int i = 0; i < nmax; i++ ) rvec[i] = rvecd[i];
}

marran_()

void marran_ ( float * rvec, int * nma )

extern

Definition at line 72 of file Bhwide.cxx.

                                      {
  int nmax = *nma;
  assert( nmax < 100 );
  double rvecd[100];
  BhwideRandom::FlatArray( rvecd, nmax );
  for ( int i = 0; i < nmax; i++ ) rvec[i] = rvecd[i];
}

ranmarr_()

double ranmarr_ ( )

extern

Definition at line 70 of file Bhwide.cxx.

{ return BhwideRandom::random(); }