]> git.uio.no Git - u/mrichter/AliRoot.git/blame - HIJING/hijing1_36/hijflv.F
Additional protection (Alpha)
[u/mrichter/AliRoot.git] / HIJING / hijing1_36 / hijflv.F
CommitLineData
e74335a4 1* $Id$
2C
3C
4C***************************************
5 SUBROUTINE HIJFLV(ID)
6 ID=1
7 RNID=RLU_HIJING(0)
8 IF(RNID.GT.0.43478) THEN
9 ID=2
10 IF(RNID.GT.0.86956) ID=3
11 ENDIF
12 RETURN
13 END