Bhwide.cxx File Reference

#include "Bhwide/Bhwide.h"
#include "Bhwide/BhwideRandom.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)   CCALLSFSUB1(GLIMIT,glimit,INT,LENMX)
#define	DUMPS(NOUT)   CCALLSFSUB1(DUMPS,dumps,INT,NOUT)
#define	BHWIDE(MODE, XPAR, NPAR)   CCALLSFSUB3(BHWIDE,bhwide,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)

Macro Definition Documentation

BHWIDE

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

Definition at line 59 of file Bhwide.cxx.

DUMPS

#define DUMPS

(

NOUT

)

CCALLSFSUB1(DUMPS,dumps,INT,NOUT)

Definition at line 56 of file Bhwide.cxx.

GLIMIT

#define GLIMIT

(

LENMX

)

CCALLSFSUB1(GLIMIT,glimit,INT,LENMX)

Definition at line 53 of file Bhwide.cxx.

MARINI

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

Definition at line 62 of file Bhwide.cxx.

MOMSET

#define MOMSET   COMMON_BLOCK(MOMSET_DEF, momset)

Definition at line 46 of file Bhwide.cxx.

Function Documentation

carran_()

void carran_	(	double *	rvec,
		int *	nma
	)

Definition at line 85 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
	)

Definition at line 94 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
	)

Definition at line 76 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_

(

)

Definition at line 71 of file Bhwide.cxx.

{
  return BhwideRandom::random();
}