First commit of the MeVSim Fortran code.
[u/mrichter/AliRoot.git] / MEVSIM / common_facfac.inc
CommitLineData
c28b8f8d 1CCC Common FACFAC for Factorials
2
3 integer factorial_max
4 parameter (factorial_max = 10000) ! max # multiplicity per event;
5CCC ! for any specific particle ID;
6CCC ! also used for log(n!).
7 Common/FACFAC/ FACLOG(factorial_max)
8 real*4 FACLOG
9