]> git.uio.no Git - u/mrichter/AliRoot.git/blob - PHOS/shaker/shfkao.f
Defaults updated
[u/mrichter/AliRoot.git] / PHOS / shaker / shfkao.f
1 *CMZ :          17/07/98  15.49.05  by  Federico Carminati
2 *-- Author :
3       FUNCTION SHFKAO(X)
4 c       ==================
5
6 c       Kaon pt distributions from Tevatron
7 c       [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