Adding macros to create Calibration objects
[u/mrichter/AliRoot.git] / HIJING / hijing1_36 / subcrs5.F
CommitLineData
e74335a4 1* $Id$
2C
3C
4C
5 FUNCTION SUBCRS5(T,U)
6 IMPLICIT REAL*8(A-H,O-Z)
7 SUBCRS5=3.D0/8.D0*(T**2+U**2)*(4.D0/9.D0/T/U-1.D0)
8 RETURN
9 END