[u/mrichter/AliRoot.git] / EPOS / epos167 / epos.incico

c-------------------------------------------------------------------------
c               initial conditions for hydro
c-------------------------------------------------------------------------

      real xminico,xmaxico,yminico,ymaxico,zminico,zmaxico
      integer nxico,nyico,nzico
      real IcoE, IcoV, IcoF

      parameter (xminico=-10.25,xmaxico=10.25)       !x range
      parameter (yminico=-10.25,ymaxico=10.25)       !y range
      parameter (zminico= -6.25,zmaxico= 6.25)       !eta range

      parameter (nxico=41,nyico=41,nzico=25) !number of bins (uneven!!!)

      !---------------------------------------------------------------------
      !  We think in terms of bins:
      !    xminico, yminico,zminico: lower end of 1st bin
      !    xmaxico,ymaxico,zmaxico: upper end of last bin 
      !  Concerning the mean value for the bins number "i":
      !   x_i=xminico+(i-0.5)*(xmaxico-xminico)/nxico
      !   y_j=xminico+(j-0.5)*(ymaxico-yminico)/nyico
      !   z_k=xminico+(k-0.5)*(zmaxico-zminico)/nzico
      !---------------------------------------------------------------------

      common /Ico3/ IcoE(nxico,nyico,nzico)
      common /Ico4/ IcoV(3,nxico,nyico,nzico)
      common /Ico5/ IcoF(3,nxico,nyico,nzico)

      !---------------------------------------------------------------------
      !/Ico3/  IcoE(ix,iy,iz)         energy-density 
      !
      !/Ico4/  IcoV(1,ix,iy,iz)       x-velocity 
      !        IcoV(2,ix,iy,iz)       y-velocity 
      !        IcoV(3,ix,iy,iz)       z-velocity 
      !
      !/Ico5 / IcoF(1,ix,iy,iz)       net flavor density of up
      !        IcoF(2,ix,iy,iz)       net flavor density of down
      !        IcoF(3,ix,iy,iz)       net flavor density of strange
      !--------------------------------------------------------------------
      !   ix,iy,iz ....... transverse coordinates + pseudo-rapidity eta
      !--------------------------------------------------------------------

      real tauico
      common/ctauico/tauico
Commit	Line	Data
9ef1c2d9	1	c-------------------------------------------------------------------------
	2	c initial conditions for hydro
	3	c-------------------------------------------------------------------------
	4
	5	real xminico,xmaxico,yminico,ymaxico,zminico,zmaxico
	6	integer nxico,nyico,nzico
	7	real IcoE, IcoV, IcoF
	8
	9	parameter (xminico=-10.25,xmaxico=10.25) !x range
	10	parameter (yminico=-10.25,ymaxico=10.25) !y range
	11	parameter (zminico= -6.25,zmaxico= 6.25) !eta range
	12
	13	parameter (nxico=41,nyico=41,nzico=25) !number of bins (uneven!!!)
	14
	15	!---------------------------------------------------------------------
	16	! We think in terms of bins:
	17	! xminico, yminico,zminico: lower end of 1st bin
	18	! xmaxico,ymaxico,zmaxico: upper end of last bin
	19	! Concerning the mean value for the bins number "i":
	20	! x_i=xminico+(i-0.5)*(xmaxico-xminico)/nxico
	21	! y_j=xminico+(j-0.5)*(ymaxico-yminico)/nyico
	22	! z_k=xminico+(k-0.5)*(zmaxico-zminico)/nzico
	23	!---------------------------------------------------------------------
	24
	25	common /Ico3/ IcoE(nxico,nyico,nzico)
	26	common /Ico4/ IcoV(3,nxico,nyico,nzico)
	27	common /Ico5/ IcoF(3,nxico,nyico,nzico)
	28
	29	!---------------------------------------------------------------------
	30	!/Ico3/ IcoE(ix,iy,iz) energy-density
	31	!
	32	!/Ico4/ IcoV(1,ix,iy,iz) x-velocity
	33	! IcoV(2,ix,iy,iz) y-velocity
	34	! IcoV(3,ix,iy,iz) z-velocity
	35	!
	36	!/Ico5 / IcoF(1,ix,iy,iz) net flavor density of up
	37	! IcoF(2,ix,iy,iz) net flavor density of down
	38	! IcoF(3,ix,iy,iz) net flavor density of strange
	39	!--------------------------------------------------------------------
	40	! ix,iy,iz ....... transverse coordinates + pseudo-rapidity eta
	41	!--------------------------------------------------------------------
	42
	43	real tauico
	44	common/ctauico/tauico