From Philippe & Laurent: new variant of MUON visualization.

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

* $Id$
C
C
	FUNCTION FNSTRUS(X)
#include "hiparnt.inc"
	FNSTRUS=(1.0-X)**HIPR1(47)/
     &		(X**2+HIPR1(45)**2/HINT1(1)**2)**HIPR1(48)
	RETURN
	END