Warning, /pythia6/pythiaeRHIC/include/density.inc is written in an unsupported language. File is not indexed.
0001 integer nt
0002 integer ntdis,ntpho
0003 integer ntx,nty
0004 parameter(ntdis=35)
0005 parameter(ntpho=44)
0006 parameter(nt=ntpho)
0007
0008 real*4 denstk,width
0009 real*4 densdis,widdis
0010 real*4 denspho,widpho
0011 * make these arrays large enough for all cases
0012 common/density/ntx,nty,denstk(nt,nt,245,3),width(nt,nt,7,3)
0013 & ,densdis(ntdis,ntdis,245,3),widdis(ntdis,ntdis,7,3)
0014 & ,denspho(ntpho,ntpho,245,3),widpho(ntpho,ntpho,7,3)
