Bhlumi.cxx File Reference

#include "Bhlumi/Bhlumi.h"
#include "Bhlumi/BhlumiRandom.h"
#include "HepMC/GenEvent.h"
#include "HepMC/GenVertex.h"
#include "HepMC/GenParticle.h"
#include "CLHEP/Vector/LorentzVector.h"
#include "GaudiKernel/MsgStream.h"
#include "GaudiKernel/ISvcLocator.h"
#include "GaudiKernel/AlgFactory.h"
#include "GaudiKernel/DataSvc.h"
#include "GaudiKernel/SmartDataPtr.h"
#include "GeneratorObject/McGenEvent.h"
#include "BesKernel/IBesRndmGenSvc.h"
#include "cfortran/cfortran.h"
#include <stdlib.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	BHLUMI(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

BHLUMI

#define BHLUMI	(		MODE,
			XPAR,
			NPAR )

Value:

CCALLSFSUB3(BHLUMI,bhlumi,INT,DOUBLEV,INTV,MODE,XPAR,NPAR)

Definition at line 61 of file Bhlumi.cxx.

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

DUMPS

#define DUMPS

(

NOUT

)

Value:

CCALLSFSUB1(DUMPS,dumps,INT,NOUT)

Definition at line 58 of file Bhlumi.cxx.

Referenced by Bhlumi::execute(), and Bhwide::execute().

GLIMIT

#define GLIMIT

(

LENMX

)

Value:

CCALLSFSUB1(GLIMIT,glimit,INT,LENMX)

Definition at line 55 of file Bhlumi.cxx.

Referenced by Bhlumi::initialize(), and Bhwide::initialize().

MARINI

#define MARINI	(		IJKLIN,
			NTOTIN,
			NTOT2N )

Value:

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

Definition at line 64 of file Bhlumi.cxx.

MOMSET

#define MOMSET   COMMON_BLOCK(MOMSET_DEF, momset)

Definition at line 48 of file Bhlumi.cxx.

Function Documentation

carran_()

void carran_ ( double * rvec, int * nma )

extern

Definition at line 87 of file Bhlumi.cxx.

{
  int nmax = *nma;
  assert(nmax<100);
  double rvecd[100];
  BhlumiRandom::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 96 of file Bhlumi.cxx.

{ 
  int nmax = *nma;
  assert(nmax<100);
  double rvecd[100];
  BhlumiRandom::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 78 of file Bhlumi.cxx.

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

ranmarr_()

double ranmarr_ ( )

extern

Definition at line 73 of file Bhlumi.cxx.

{
  return BhlumiRandom::random();
}