c
c Routine directly callable from C/C++ (it could be necessary to
c append an underscore, "_", to its name depending on the C/C++
c compiler used).
c
c
subroutine spaddp0(pcode, pener, csys, ux, uy, uz, pwt, irc)
c
c Adding a single primary particle.
c
c Written by: S. J. Sciutto, La Plata 1999.
c
c
c Arguments:
c =========
c
c pcode........... (input, integer) Particle code (AIRES coding
c system).
c pener........... (input, double precision) Particle kinetic
c energy (GeV).
c csys............ (input, integer) Parameter labelling the
c coordinate system used. 0 = AIRES coordinate
c system. 1 = Injection point-shower axis system.
c ux, uy, uz...... (input, double precision) Direction of motion,
c with respect to the coordinate system selected
c by csys. The vector (ux, uy, uz) does not need
c to be normalized.
c pwt............. (input, double precision) Particle weight.
c Must be equal or greater than one.
c irc............. (output, integer) Return code. 0 means normal
c return.
c
c
c<--->
|
These pages are maintained by Sergio J. Sciutto |
Back to AIRES library index |
| Back to AIRES home |