/home/bes3soft/bes3soft/Boss/7.0.2/dist/7.0.2/Generator/Bhlumi/Bhlumi-00-00-12/src/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
Defines
#define	MOMSET   COMMON_BLOCK(MOMSET_DEF, momset)
#define	GLIMIT(LENMX)   CCALLSFSUB1(GLIMIT,glimit,INT,LENMX)
#define	DUMPS(NOUT)   CCALLSFSUB1(DUMPS,dumps,INT,NOUT)
#define	BHLUMI(MODE, XPAR, NPAR)   CCALLSFSUB3(BHLUMI,bhlumi,INT,DOUBLEV,INTV,MODE,XPAR,NPAR)
#define	MARINI(IJKLIN, NTOTIN, NTOT2N)   CCALLSFSUB3(MARINI, marini, INT, INT, INT, 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)

---

Define Documentation

#define BHLUMI	(	MODE,
		XPAR,
		NPAR		)	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().

#define DUMPS

(

NOUT

)

CCALLSFSUB1(DUMPS,dumps,INT,NOUT)

Definition at line 58 of file Bhlumi.cxx.

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

#define GLIMIT

(

LENMX

)

CCALLSFSUB1(GLIMIT,glimit,INT,LENMX)

Definition at line 55 of file Bhlumi.cxx.

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

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

Definition at line 64 of file Bhlumi.cxx.

#define MOMSET   COMMON_BLOCK(MOMSET_DEF, momset)

Definition at line 48 of file Bhlumi.cxx.

---

Function Documentation

void carran_	(	double *	rvec,
		int *	nma
	)

Definition at line 87 of file Bhlumi.cxx.

References BhlumiRandom::FlatArray(), and genRecEmupikp::i.

{
  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	(	MOMSET_DEF	,
		MOMSET
	)

void ecuran_	(	double *	rvec,
		int *	nma
	)

Definition at line 96 of file Bhlumi.cxx.

References BhlumiRandom::FlatArray(), and genRecEmupikp::i.

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

void marran_	(	float *	rvec,
		int *	nma
	)

Definition at line 78 of file Bhlumi.cxx.

References BhlumiRandom::FlatArray(), and genRecEmupikp::i.

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

double ranmarr_

(

)

Definition at line 73 of file Bhlumi.cxx.

References BhlumiRandom::random().

{
  return BhlumiRandom::random();
}

---