Analysis Software
Documentation for sPHENIX simulation software
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Groups Pages
radgen.inc
Go to the documentation of this file. Or view the newest version in sPHENIX GitHub for file radgen.inc
1  real radgen_xmin, radgen_xmax, radgen_ymin, radgen_ymax
2 
3  parameter (radgen_xmin=1.0e-09)
4  parameter (radgen_xmax=0.99)
5  parameter (radgen_ymin=0.005)
6  parameter (radgen_ymax=0.95)
7 
8  double precision sigrad,tine,tnuc,tpro,tbor,demin,phipoi
9  + ,sig1g,sigcor,vac,vertex,small,redfac
10  + ,dsts,dcts
11  + ,taout,rrout,dsitkm,dcvtkm,ddetkm,dsigmr,drcurr,ddeler
12 
13  integer ntk,nrr,itkcur,iphi,ndxtkm
14 
15  real sigradu, sigradp, sig1gu, sig1gp
16 
17  common /rgencom/sigrad,tine,tnuc,tpro,tbor,demin
18  + ,sig1g,sigcor,vac,vertex,small,redfac
19  + ,dsts,dcts
20  + ,phipoi,taout,rrout
21  + ,dsitkm(400,3),dcvtkm(400,3),ddetkm(400,3)
22  + ,dsigmr(200,400),drcurr(200,400),ddeler(200,400)
23  + ,ntk,nrr ,itkcur,iphi,ndxtkm(3)
24  + ,sigradu, sigradp, sig1gu, sig1gp
25 
26