BOSS 7.0.9
BESIII Offline Software System
Loading...
Searching...
No Matches
bak-BesEvtGen-00-04-08/src/phokhara/eemmg-lib/ql/qlconstants.h
Go to the documentation of this file.
1 double precision pi,pisq,pisqo6
2 parameter(pi=3.14159265358979d0,pisq=pi*pi,pisqo6=pisq/6d0)
3
4 double precision zip,half,one,two,three,four,eight
5 parameter(zip=0d0,half=0.5d0,one=1d0,two=2d0)
6 parameter(three=3d0,four=4d0,eight=8d0)
7
8 double complex im,impi,czip,chalf,cone,ctwo,c2ipi
9 parameter(im=(0d0,1d0),impi=(0d0,3.14159265358979d0),
10 . czip=(0d0,0d0),chalf=(0.5d0,0d0),cone=(1d0,0d0),ctwo=(2d0,0d0),
11 . c2ipi=2d0*impi)
12
13 DOUBLE COMPLEX nan
14 parameter (nan = (1D123, 1D123))
15
16
double precision pisqo6 parameter(pi=3.14159265358979d0, pisq=pi *pi, pisqo6=pisq/6d0) double precision zip