[u/mrichter/AliRoot.git] / HIJING / hijing1_36 / fnkick.F

* $Id$
C
C
C
	FUNCTION FNKICK(X)
#include "hiparnt.inc"
	FNKICK=1.0/(X+HIPR1(19)**2)/(X+HIPR1(20)**2)
     &		/(1+EXP((SQRT(X)-HIPR1(20))/0.4))
	RETURN
	END
Commit	Line	Data
e74335a4	1	* $Id$
	2	C
	3	C
	4	C
	5	FUNCTION FNKICK(X)
	6	#include "hiparnt.inc"
	7	FNKICK=1.0/(X+HIPR1(19)2)/(X+HIPR1(20)2)
	8	& /(1+EXP((SQRT(X)-HIPR1(20))/0.4))
	9	RETURN
	10	END