]> git.uio.no Git - u/mrichter/AliRoot.git/blame - PHOS/shaker/shfkao.f
Syntax problems on HP-UX corrected
[u/mrichter/AliRoot.git] / PHOS / shaker / shfkao.f
CommitLineData
fe4da5cc 1*CMZ : 17/07/98 15.49.05 by Federico Carminati
2*-- Author :
3 FUNCTION SHFKAO(X)
4c ==================
5
6c Kaon pt distributions from Tevatron
7c [T.Alexopoulos et al.: Phys. Rev. Lett. 64 (1990), 991]
8
9 A = 3.69
10
11 SHFKAO = X*EXP(-A*X)
12
13 RETURN
14 END