COSMOS v7.655  COSMOSv7655
(AirShowerMC)
test.f
Go to the documentation of this file.
1  real*8 x(4,3,4)
2  data x(1,1,:)/-1.,2.,-3.,4/
3  do i =1, 4
4  write(0,*) x(1,1,i)
5  enddo
6  end
nodes i
! structure defining a particle at production ! Basic idea of what is to be contained in ! the particle structue is that dynamical ones should be included those derivable from the particle code ! is not included ******************************************************type fmom momentum sequence union map real e endmap map real * x
Definition: Zptcl.h:21