Adding macros to create Calibration objects
[u/mrichter/AliRoot.git] / HIJING / hijing1_36 / flap2.F
CommitLineData
e74335a4 1* $Id$
2C
3C
4 FUNCTION FLAP2(X)
5#include "pact_hijing.inc"
6 R=SQRT(BB**2+X**2)
7 FLAP2=WDSAX2(R)
8 RETURN
9 END