BOSS 7.1.2
BESIII Offline Software System
Loading...
Searching...
No Matches
EkharaDef.h File Reference
#include "cfortran/cfortran.h"

Go to the source code of this file.

Classes

struct  CHANNELSEL_DEF
 
struct  SWDIAG_DEF
 
struct  PIONFFSW_DEF
 
struct  TAGGINGMODE_DEF
 
struct  FFPARAMSET_DEF
 
struct  NLOTYPE_DEF
 

Macros

#define CHANNELSEL   COMMON_BLOCK(CHANNELSEL_DEF, channelsel)
 
#define SWDIAG   COMMON_BLOCK(SWDIAG_DEF, swdiag)
 
#define PIONFFSW   COMMON_BLOCK(PIONFFSW_DEF, pionffsw)
 
#define TAGGINGMODE   COMMON_BLOCK(TAGGINGMODE_DEF, taggingmode)
 
#define FFPARAMSET   COMMON_BLOCK(FFPARAMSET,ffparamset)
 
#define NLOTYPE   COMMON_BLOCK(NLOTYPE,nlotype)
 
#define EKHARA(i)
 
#define RUN_EKHARA_WW()
 
#define BOSS_INIT_EKHARA(xpar)
 
#define DIAGNOSE()
 
#define GET_WEIGHT()
 
#define GET_TWOPI_WEIGHTS(weights)
 
#define GET_FOURMOMENTA_LEPTONS(p1, p2, q1, q2)
 
#define GET_FOURMOMENTA_TWOPI(pi1, pi2)
 
#define GET_FOURMOMENTA_PION(qpion)
 
#define GET_FOURMOMENTA_CHICJ(qcj)
 
#define GET_FOURMOMENTA_PHOTON(kphp)
 
#define GET_FINAL_MESON_INFO(i, mfp)
 
#define GET_FINAL_MESON_INFO(i, tnpfinpar)
 
#define GET_FINAL_MESON_1PH_INFO(mfp1ph)
 
#define GET_FINAL_TWOPI_INFO(pipifinpar)
 
#define GET_FINAL_CHICJ_INFO(chicjfinpar)
 

Functions

 COMMON_BLOCK_DEF (CHANNELSEL_DEF, CHANNELSEL)
 
 COMMON_BLOCK_DEF (SWDIAG_DEF, SWDIAG)
 
 COMMON_BLOCK_DEF (PIONFFSW_DEF, PIONFFSW)
 
 COMMON_BLOCK_DEF (TAGGINGMODE_DEF, TAGGINGMODE)
 
 COMMON_BLOCK_DEF (FFPARAMSET_DEF, FFPARAMSET)
 
 COMMON_BLOCK_DEF (NLOTYPE_DEF, NLOTYPE)
 

Macro Definition Documentation

◆ BOSS_INIT_EKHARA

#define BOSS_INIT_EKHARA ( xpar)
Value:
CCALLSFSUB1(BOSS_INIT_EKHARA,boss_init_ekhara,DOUBLEV,xpar)
#define BOSS_INIT_EKHARA(xpar)
Definition EkharaDef.h:75
#define CCALLSFSUB1(UN, LN, T1, A1)
Definition cfortran.h:1106

Definition at line 75 of file EkharaDef.h.

Referenced by Ekhara::initialize().

◆ CHANNELSEL

#define CHANNELSEL   COMMON_BLOCK(CHANNELSEL_DEF, channelsel)

Definition at line 14 of file EkharaDef.h.

Referenced by Ekhara::initialize().

◆ DIAGNOSE

#define DIAGNOSE ( )
Value:
#define DIAGNOSE()
Definition EkharaDef.h:78
#define CCALLSFSUB0(UN, LN)
Definition cfortran.h:1155

Definition at line 78 of file EkharaDef.h.

Referenced by Ekhara::initialize().

◆ EKHARA

#define EKHARA ( i)
Value:
CCALLSFSUB1(EKHARA,ekhara,INT,i)
#define EKHARA(i)
Definition EkharaDef.h:69
  • functions of the FORTRAN code

Definition at line 69 of file EkharaDef.h.

Referenced by Ekhara::execute(), and Ekhara::finalize().

◆ FFPARAMSET

#define FFPARAMSET   COMMON_BLOCK(FFPARAMSET,ffparamset)

Definition at line 50 of file EkharaDef.h.

Referenced by Ekhara::initialize().

◆ GET_FINAL_CHICJ_INFO

#define GET_FINAL_CHICJ_INFO ( chicjfinpar)
Value:
CCALLSFSUB1(GET_FINAL_CHICJ_INFO,get_final_chicj_info,DOUBLEV,chicjfinpar)
#define GET_FINAL_CHICJ_INFO(chicjfinpar)
Definition EkharaDef.h:112

Definition at line 112 of file EkharaDef.h.

Referenced by Ekhara::finalize().

◆ GET_FINAL_MESON_1PH_INFO

#define GET_FINAL_MESON_1PH_INFO ( mfp1ph)
Value:
CCALLSFSUB1(GET_FINAL_MESON_1PH_INFO,get_final_meson_1ph_info,DOUBLEV,mfp1ph)
#define GET_FINAL_MESON_1PH_INFO(mfp1ph)
Definition EkharaDef.h:106

Definition at line 106 of file EkharaDef.h.

◆ GET_FINAL_MESON_INFO [1/2]

#define GET_FINAL_MESON_INFO ( i,
mfp )
Value:
CCALLSFSUB2(GET_FINAL_MESON_INFO,get_final_meson_info,INT,DOUBLEV,i,mfp)
#define GET_FINAL_MESON_INFO(i, mfp)
Definition EkharaDef.h:102
#define CCALLSFSUB2(UN, LN, T1, T2, A1, A2)
Definition cfortran.h:1108

Definition at line 102 of file EkharaDef.h.

Referenced by Ekhara::finalize().

◆ GET_FINAL_MESON_INFO [2/2]

#define GET_FINAL_MESON_INFO ( i,
tnpfinpar )
Value:
CCALLSFSUB2(GET_FINAL_MESON_INFO,get_final_meson_info,INT,DOUBLEV,i,tnpfinpar)

Definition at line 102 of file EkharaDef.h.

◆ GET_FINAL_TWOPI_INFO

#define GET_FINAL_TWOPI_INFO ( pipifinpar)
Value:
CCALLSFSUB1(GET_FINAL_TWOPI_INFO,get_final_twopi_info,DOUBLEV,pipifinpar)
#define GET_FINAL_TWOPI_INFO(pipifinpar)
Definition EkharaDef.h:109

Definition at line 109 of file EkharaDef.h.

Referenced by Ekhara::finalize().

◆ GET_FOURMOMENTA_CHICJ

#define GET_FOURMOMENTA_CHICJ ( qcj)
Value:
CCALLSFSUB1(GET_FOURMOMENTA_CHICJ,get_fourmomenta_chicj,DOUBLEV,qcj)
#define GET_FOURMOMENTA_CHICJ(qcj)
Definition EkharaDef.h:96

Definition at line 96 of file EkharaDef.h.

Referenced by Ekhara::execute().

◆ GET_FOURMOMENTA_LEPTONS

#define GET_FOURMOMENTA_LEPTONS ( p1,
p2,
q1,
q2 )
Value:
CCALLSFSUB4(GET_FOURMOMENTA_LEPTONS,get_fourmomenta_leptons,DOUBLEV,DOUBLEV,DOUBLEV,DOUBLEV,p1,p2,q1,q2)
double p1[4]
double p2[4]
#define GET_FOURMOMENTA_LEPTONS(p1, p2, q1, q2)
Definition EkharaDef.h:87
#define CCALLSFSUB4(UN, LN, T1, T2, T3, T4, A1, A2, A3, A4)
Definition cfortran.h:1112

Definition at line 87 of file EkharaDef.h.

Referenced by Ekhara::execute().

◆ GET_FOURMOMENTA_PHOTON

#define GET_FOURMOMENTA_PHOTON ( kphp)
Value:
CCALLSFSUB1(GET_FOURMOMENTA_PHOTON,get_fourmomenta_photon,DOUBLEV,kphp)
#define GET_FOURMOMENTA_PHOTON(kphp)
Definition EkharaDef.h:99

Definition at line 99 of file EkharaDef.h.

Referenced by Ekhara::execute().

◆ GET_FOURMOMENTA_PION

#define GET_FOURMOMENTA_PION ( qpion)
Value:
CCALLSFSUB1(GET_FOURMOMENTA_PION,get_fourmomenta_pion,DOUBLEV,qpion)
#define GET_FOURMOMENTA_PION(qpion)
Definition EkharaDef.h:93

Definition at line 93 of file EkharaDef.h.

Referenced by Ekhara::execute().

◆ GET_FOURMOMENTA_TWOPI

#define GET_FOURMOMENTA_TWOPI ( pi1,
pi2 )
Value:
CCALLSFSUB2(GET_FOURMOMENTA_TWOPI,get_fourmomenta_twopi,DOUBLEV,DOUBLEV,pi1,pi2)
#define GET_FOURMOMENTA_TWOPI(pi1, pi2)
Definition EkharaDef.h:90
character *LEPTONflag integer iresonances real pi2

Definition at line 90 of file EkharaDef.h.

Referenced by Ekhara::execute().

◆ GET_TWOPI_WEIGHTS

#define GET_TWOPI_WEIGHTS ( weights)
Value:
CCALLSFSUB1(GET_TWOPI_WEIGHTS,get_twopi_weights,DOUBLEV,weights)
#define GET_TWOPI_WEIGHTS(weights)
Definition EkharaDef.h:84

Definition at line 84 of file EkharaDef.h.

Referenced by Ekhara::execute().

◆ GET_WEIGHT

#define GET_WEIGHT ( )
Value:
#define GET_WEIGHT()
Definition EkharaDef.h:81
#define CCALLSFFUN0(UN, LN)
Definition cfortran.h:1775

Definition at line 81 of file EkharaDef.h.

Referenced by Ekhara::execute().

◆ NLOTYPE

#define NLOTYPE   COMMON_BLOCK(NLOTYPE,nlotype)

Definition at line 59 of file EkharaDef.h.

Referenced by Ekhara::execute(), and Ekhara::initialize().

◆ PIONFFSW

#define PIONFFSW   COMMON_BLOCK(PIONFFSW_DEF, pionffsw)

Definition at line 32 of file EkharaDef.h.

Referenced by Ekhara::initialize().

◆ RUN_EKHARA_WW

#define RUN_EKHARA_WW ( )
Value:
CCALLSFSUB0(RUN_EKHARA_WW,run_ekhara_ww)
#define RUN_EKHARA_WW()
Definition EkharaDef.h:72

Definition at line 72 of file EkharaDef.h.

◆ SWDIAG

#define SWDIAG   COMMON_BLOCK(SWDIAG_DEF, swdiag)

Definition at line 23 of file EkharaDef.h.

Referenced by Ekhara::initialize().

◆ TAGGINGMODE

#define TAGGINGMODE   COMMON_BLOCK(TAGGINGMODE_DEF, taggingmode)

Definition at line 41 of file EkharaDef.h.

Referenced by Ekhara::initialize().

Function Documentation

◆ COMMON_BLOCK_DEF() [1/6]

COMMON_BLOCK_DEF ( CHANNELSEL_DEF ,
CHANNELSEL  )

◆ COMMON_BLOCK_DEF() [2/6]

COMMON_BLOCK_DEF ( FFPARAMSET_DEF ,
FFPARAMSET  )

◆ COMMON_BLOCK_DEF() [3/6]

COMMON_BLOCK_DEF ( NLOTYPE_DEF ,
NLOTYPE  )

◆ COMMON_BLOCK_DEF() [4/6]

COMMON_BLOCK_DEF ( PIONFFSW_DEF ,
PIONFFSW  )

◆ COMMON_BLOCK_DEF() [5/6]

COMMON_BLOCK_DEF ( SWDIAG_DEF ,
SWDIAG  )

◆ COMMON_BLOCK_DEF() [6/6]

COMMON_BLOCK_DEF ( TAGGINGMODE_DEF ,
TAGGINGMODE  )