BOSS 7.1.2
BESIII Offline Software System
Loading...
Searching...
No Matches
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)
 
#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)
#define BHWIDE(MODE, XPAR, NPAR)
Definition Bhwide.cxx:59
#define CCALLSFSUB3(UN, LN, T1, T2, T3, A1, A2, A3)
Definition cfortran.h:1110

Definition at line 59 of file Bhwide.cxx.

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

◆ DUMPS

#define DUMPS ( NOUT)
Value:
CCALLSFSUB1(DUMPS,dumps,INT,NOUT)
#define DUMPS(NOUT)
Definition Bhwide.cxx:56
#define CCALLSFSUB1(UN, LN, T1, A1)
Definition cfortran.h:1106

Definition at line 56 of file Bhwide.cxx.

◆ GLIMIT

#define GLIMIT ( LENMX)
Value:
CCALLSFSUB1(GLIMIT,glimit,INT,LENMX)
#define GLIMIT(LENMX)
Definition Bhwide.cxx:53

Definition at line 53 of file Bhwide.cxx.

◆ MARINI

#define MARINI ( IJKLIN,
NTOTIN,
NTOT2N )
Value:
CCALLSFSUB3(MARINI, marini, INT, INT, INT, IJKLIN, NTOTIN, NTOT2N)
#define MARINI(IJKLIN, NTOTIN, NTOT2N)
Definition Bhwide.cxx:62

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 )
extern

Definition at line 85 of file Bhwide.cxx.

86{
87 int nmax = *nma;
88 assert(nmax<100);
89 double rvecd[100];
90 BhwideRandom::FlatArray(rvecd, nmax);
91 for(int i=0; i<nmax; i++) rvec[i]=rvecd[i];
92}
static void FlatArray(double *vect, const int size)

◆ COMMON_BLOCK_DEF()

COMMON_BLOCK_DEF ( MOMSET_DEF ,
MOMSET  )

◆ ecuran_()

void ecuran_ ( double * rvec,
int * nma )
extern

Definition at line 94 of file Bhwide.cxx.

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

◆ marran_()

void marran_ ( float * rvec,
int * nma )
extern

Definition at line 76 of file Bhwide.cxx.

77{
78 int nmax = *nma;
79 assert(nmax<100);
80 double rvecd[100];
81 BhwideRandom::FlatArray(rvecd, nmax);
82 for(int i=0; i<nmax; i++) rvec[i]=rvecd[i];
83}

◆ ranmarr_()

double ranmarr_ ( )
extern

Definition at line 71 of file Bhwide.cxx.

72{
73 return BhwideRandom::random();
74}
static double random()