BOSS 7.1.0
BESIII Offline Software System
Loading...
Searching...
No Matches
FoamB.h
Go to the documentation of this file.
1*///////////////////////////////////////////////////////////////////////////////////////
2*// //
3*// Pseudoclass FoamB //
4*// //
5*///////////////////////////////////////////////////////////////////////////////////////
6*
7*
8 INTEGER m_nBinMax
9 PARAMETER ( m_nBinMax =256 )
10 INTEGER m_NdiMax
11 PARAMETER ( m_NdiMax = 5 ) ! maximum dimension for siplices
12 INTEGER m_KdiMax
13 PARAMETER ( m_KdiMax = 15 ) ! maximum dimension for hypercubics
14 INTEGER m_DimMax
15 PARAMETER ( m_DimMax = m_NdiMax+ m_KdiMax ) ! maximum total dimension
16 INTEGER m_nBufMax
17 PARAMETER ( m_nBufMax = 10000 ) ! maximum buffer length for all cells
18 INTEGER m_vMax
19 PARAMETER ( m_vMax = 10000 ) ! maximum number of vertices
21 PARAMETER ( m_cMax = 10000 ) ! maximum number of (active) Cells
22 INTEGER m_sMax
23 PARAMETER ( m_sMax = 5 ) ! statistics of the weight
24 INTEGER m_NpairMax
25 PARAMETER ( m_NpairMax = m_NdiMax*(m_NdiMax+1)/2 ) ! no. of pairs of vertices
26 INTEGER m_NdiviMax
27 PARAMETER ( m_NdiviMax = m_NpairMax+m_KdiMax ) ! Total no. of division samplings
28*
29 INTEGER m_CeStat, m_CePare, m_CeDau1, m_CeDau2, m_CeSamp, m_CeVert, m_CeBest !
30 DOUBLE PRECISION m_CeIntg, m_CeSum, m_CeDriv, m_CePrim, m_CePrCu, m_CeXave, m_CeVolu !
31 INTEGER m_LastCe, m_LastAc, m_nBuf, m_nBin, m_LastVe !
32 INTEGER m_ActC
33 DOUBLE PRECISION m_VerX, m_VolTot !
34 INTEGER m_Ndim, m_Kdim, m_Dimen
36 INTEGER m_OptPeek, m_OptDrive, m_OptEdge, m_OptOrd, m_EvPerBin, m_OptRanIni, m_OptRanLux!
37 DOUBLE PRECISION m_Drive, m_SumWt, m_SumWt2, m_NevGen, m_WtMax, m_WtMin !
38 DOUBLE PRECISION m_MCresult, m_MCerror, m_MCwt, m_MCvector !
39 DOUBLE PRECISION m_CeVer1, m_CeVer2
40 INTEGER m_Ltx, m_MagicInit
41*
42 COMMON /c_FoamB/
43 $ m_CeStat(m_nBufMax), ! Cell member: status=0 inactive, =1 active
44 $ m_CePare(m_nBufMax), ! Cell member: parent cell pointer
45 $ m_CeDau1(m_nBufMax), ! Cell member: daughter1 cell pointer
46 $ m_CeDau2(m_nBufMax), ! Cell member: daughter2 cell pointer
47 $ m_CeSamp(m_nBufMax), ! Cell member: No of MC events in exploration
48 $ m_CeVert(m_nBufMax,m_NdiMax+1),! Cell member: simplex vertex pointers
49 $ m_CeVer1(m_nBufMax,m_KdiMax), ! Cell member: hypercubic vertex position
50 $ m_CeVer2(m_nBufMax,m_KdiMax), ! Cell member: hypercubic vertex size
51 $ m_CeIntg(m_nBufMax), ! Cell member: integral estimator
52 $ m_CeDriv(m_nBufMax), ! Cell member: Drive integral estimate, from build-up
53 $ m_CePrim(m_nBufMax), ! Cell member: Primary integral estimate, MC generation
54 $ m_CePrCu(0:m_nBufMax), ! Cell member: Cumulative Primary
55 $ m_CeVolu(m_nBufMax), ! Cell member: Cartesian volume
56 $ m_CeXave(m_nBufMax), ! Cell member: Average best X
57 $ m_CeBest(m_nBufMax), ! Cell member: Best pair of vertices, pointer
58 $ m_CeSum( m_nBufMax,m_sMax), ! Cell member: weight summaries
59 $ m_VerX( m_vMax, m_NdiMax), ! List of all VERTEX positions
60 $ m_ActC(m_cMax), ! List of all pointers to ACTIVE cells
61 $ m_VolTot, ! Estimate of Volume total, without error
62 $ m_Drive, ! M.C. generation Drive value of integral
63 $ m_SumWt, ! M.C. generation sum of Wt
64 $ m_SumWt2, ! M.C. generation sum of Wt**2
65 $ m_NevGen, ! M.C. generation sum of 1d0
66 $ m_WtMax, ! M.C. generation maximum wt
67 $ m_WtMin, ! M.C. generation minimum wt
68 $ m_MCresult, ! M.C. generation Final value of INTEGRAL
69 $ m_MCerror, ! M.C. generation Final walue of ERROR
70 $ m_MCwt, ! M.C. generation current event weight
71 $ m_MCvector(m_DimMax),! M.C. generated vector, dimension=m_NdiMax+ m_KdiMax
72 $ m_Ndim, ! dimension of the siplices
73 $ m_Kdim, ! dimension of the hypercubics
74 $ m_Dimen, ! total dimension of the problem =m_Ndim+m_Kdim
75 $ m_nBuf, ! Actual dynamic lenth of the buffer m_nBuf<m_nBufMax
76 $ m_nBin, ! No of bins in histogram for cell exploration/division
77 $ m_LastVe, ! Last vertex
78 $ m_LastAc, ! Last active cell
79 $ m_LastCe, ! Last cell in buffer
80 $ m_nSampl, ! No. of sampling when dividing cell
81 $ m_Ncalls, ! No. of function calls, total
82 $ m_OptPeek, ! Flag for random ceel choice: Peek =0,1 for maximum,
83 $ m_OptDrive, ! Flag for type of Drive =0,1,2 for TrueVol,Sigma,WtMax
84 $ m_OptEdge, ! Flag which decides whether vertices are included in the sampling
85 $ m_OptOrd, ! Flag =0 default, entire domain is hyp-cubic, =1 it is simplex
86 $ m_EvPerBin, ! Maximum effective eevents per bin, saves CPU, =0 inactive
87 $ m_OptRanIni, ! Flag =0 default, =1 r.n. generator not initialized in PianA
88 $ m_OptRanLux, ! Flag =-1,0,1,2,3,4 r.n. generator level
89 $ m_Chat, ! Flag for chat level in output, Chat=1 normal level
90 $ m_Ltx, ! Latex Output unit, for debug
91 $ m_Out, ! Output unit
92 $ m_MagicInit ! Magic cookie of initialization (global variable)
93*
94 SAVE /c_FoamB/
95*//////////////////////////////////////////////////////////////////////////////////////
96*// //
97*//////////////////////////////////////////////////////////////////////////////////////
const int no
const Int_t n
#define PRECISION
int bins[20]
@ ERROR
Definition: EvtReport.hh:49
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel for maximum
Definition: FoamB.h:82
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ m_LastCe
Definition: FoamB.h:79
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ m_nSampl
Definition: FoamB.h:80
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ m_Ncalls
Definition: FoamB.h:81
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel for $ !Flag for type of for WtMax $ !Flag which decides whether vertices are included in the sampling $ entire domain is hyp !Maximum effective eevents per saves CPU
Definition: FoamB.h:86
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel choice
Definition: FoamB.h:82
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel for $ !Flag for type of for WtMax $ !Flag which decides whether vertices are included in the sampling $ entire domain is hyp !Maximum effective eevents per saves r n generator level $ !Flag for chat level in output
Definition: FoamB.h:89
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ m_OptPeek
Definition: FoamB.h:82
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel for $ !Flag for type of for TrueVol
Definition: FoamB.h:83
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel for $ !Flag for type of for WtMax $ !Flag which decides whether vertices are included in the sampling $ entire domain is hyp !Maximum effective eevents per saves r n generator level $ !Flag for chat level in !Latex Output for debug $ m_Out
Definition: FoamB.h:91
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel for $ !Flag for type of for WtMax $ !Flag which decides whether vertices are included in the sampling $ m_OptOrd
Definition: FoamB.h:85
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel for $ !Flag for type of for WtMax $ m_OptEdge
Definition: FoamB.h:84
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel for $ !Flag for type of for WtMax $ !Flag which decides whether vertices are included in the sampling $ entire domain is hyp !Maximum effective eevents per bin
Definition: FoamB.h:85
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ m_LastVe
Definition: FoamB.h:77
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel for $ !Flag for type of for WtMax $ !Flag which decides whether vertices are included in the sampling $ entire domain is hyp cubic
Definition: FoamB.h:85
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function calls
Definition: FoamB.h:81
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ m_LastAc
Definition: FoamB.h:78
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel for $ !Flag for type of for Sigma
Definition: FoamB.h:83
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel for $ !Flag for type of Drive
Definition: FoamB.h:83
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel for $ !Flag for type of for WtMax $ !Flag which decides whether vertices are included in the sampling $ entire domain is hyp !Maximum effective eevents per saves r n generator level $ m_Chat
Definition: FoamB.h:88
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel for $ !Flag for type of for WtMax $ !Flag which decides whether vertices are included in the sampling $ entire domain is hyp !Maximum effective eevents per saves r n generator level $ !Flag for chat level in Chat
Definition: FoamB.h:89
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel for $ !Flag for type of for WtMax $ !Flag which decides whether vertices are included in the sampling $ entire domain is hyp !Maximum effective eevents per saves r n generator level $ !Flag for chat level in !Latex Output unit
Definition: FoamB.h:90
*******INTEGER m_nBinMax INTEGER m_NdiMax PARAMETER(m_NdiMax=5) ! maximum dimension for siplices INTEGER m_KdiMax PARAMETER(m_KdiMax
*******INTEGER m_nBinMax INTEGER m_NdiMax !No of bins in histogram for cell exploration division $ !Last vertex $ !Last active cell $ !Last cell in buffer $ !No of sampling when dividing cell $ !No of function total $ !Flag for random ceel for $ m_OptDrive
Definition: FoamB.h:83
************Class m_ypar INTEGER m_KeyWgt INTEGER m_KeyIHVP INTEGER m_KeyGPS INTEGER m_IsBeamPolarized INTEGER m_EvtGenInterface DOUBLE PRECISION m_Emin DOUBLE PRECISION m_sphot DOUBLE PRECISION m_Xenph DOUBLE PRECISION m_q2 DOUBLE PRECISION m_PolBeam2 DOUBLE PRECISION m_xErrPb *COMMON c_KK2f $ !CMS energy average $ !Spin Polarization vector first beam $ !Spin Polarization vector second beam $ !Beam energy spread[GeV] $ !minimum hadronization energy[GeV] $ !input READ never touch them !$ !debug facility $ !maximum weight $ !inverse alfaQED $ !minimum real photon IR regulator $ !ficticious photon IR regulator $ !Enhancement factor for Crude photon multiplicity $ !technical cut on E Ebeam for non IR real contributions $ !output cross section available through getter $ !output crossxsection available through getter *EVENT $ !e beam $ !e beam $ !final fermion $ !final anti fermion $ !photon momenta $ !MAIN weight of KK2f $ !crude distr from ISR and FSR $ !complete list of weights $ !complete list of weights $ !crude in nanobarns $ !Crude Born $ for fsr $ !photon for
Definition: KK2f.h:69
****INTEGER imax DOUBLE PRECISION m_pi *DOUBLE PRECISION m_amfin DOUBLE PRECISION m_Chfin DOUBLE PRECISION m_Xenph DOUBLE PRECISION m_sinw2 DOUBLE PRECISION m_GFermi DOUBLE PRECISION m_cMax
Definition: KKsem.h:15
*********Class see also m_nmax DOUBLE PRECISION m_MasPhot DOUBLE PRECISION m_phsu DOUBLE PRECISION m_Xenph DOUBLE PRECISION m_r2 DOUBLE PRECISION m_WtMass INTEGER m_nmax INTEGER m_Nevgen INTEGER m_IsFSR INTEGER m_MarTot *COMMON c_KarFin $ !Output file $ !Event serial number $ !alpha QED at Thomson limit $ !minimum energy at CMS for remooval $ !infrared dimensionless $ !dummy photon IR regulator $ !crude photon multiplicity enhancement factor *EVENT $ !MC crude volume of PhhSpace *Sfactors $ !YFS formfactor IR part only $ !YFS formfactor non IR finite part $ !mass weight
Definition: KarFin.h:34
*********Class see also m_nmax DOUBLE PRECISION m_MasPhot DOUBLE PRECISION m_phsu DOUBLE PRECISION m_Xenph DOUBLE PRECISION m_r2 DOUBLE PRECISION m_WtMass INTEGER m_nmax INTEGER m_Nevgen INTEGER m_IsFSR INTEGER m_MarTot *COMMON c_KarFin $ !Output file $ m_NevGen
Definition: KarFin.h:24
***************************************************************************************Pseudo Class RRes *****************************************************************************************Parameters and physical constants **Maarten sept ************************************************************************DOUBLE PRECISION xsmu **************************************************************************PARTICLE DATA all others are from PDG *Only resonances with known widths into electron pairs are sept ************************************************************************C Declarations C
Definition: RRes.h:29
***************************************************************************************Pseudo Class RRes *****************************************************************************************Parameters and physical constants **Maarten sept ************************************************************************DOUBLE PRECISION xsmu **************************************************************************PARTICLE DATA all others are from PDG *Only resonances with known widths into electron pairs are * included(others are taken out by setting zero width into electrons). **Maarten Boonekamp
IMPLICIT REAL *A O Z IMPLICIT INTEGER(I-N) C.... COMMONBALOCKS FOR MODE COMMON/MODEXS/ICH common/bornXS/xborn REAL *8 USER_XX(1000)