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 spaddpn(n, pcode, pener, csys, ldu, uxyz, pwt, irc) c c Adding a set of n primary particles. c c Written by: S. J. Sciutto, La Plata 1999, 2011. c c c Arguments: c ========= c c n............... (input, integer) The number of primary particles c to add. c pcode........... (input, integer, array(n)) Particle codes (AIRES c coding system). c pener........... (input, double precision, array(n)) Particle c kinetic energies (GeV). c csys............ (input, integer) Parameter labelling the c coordinate system used. 0 = AIRES coordinate c system. 1 = Injection point-shower axis system. c ldu............. (input, integer) Leading dimension of array c uxyz. c uxyz............ (input-output, double precision, array(ldu, n)) c Direction of motion of the respective primaries, c with respect to the coordinate system selected c by csys. The vectors uxyz(j, i), j = 1, 2, 3, do c not need to be normalized. This array will c be modified internally (normalization, and c eventually coordinate transformation). c pwt............. (input, double precision) Weight of particles. 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 |