]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - PDF/spdf/bxqbar.F
Removing obsolete module PDF
[u/mrichter/AliRoot.git] / PDF / spdf / bxqbar.F
diff --git a/PDF/spdf/bxqbar.F b/PDF/spdf/bxqbar.F
deleted file mode 100644 (file)
index 7ec11d0..0000000
+++ /dev/null
@@ -1,28 +0,0 @@
-*
-* $Id$
-*
-* $Log$
-* Revision 1.1.1.2  1996/10/30 08:27:41  cernlib
-* Version 7.04
-*
-* Revision 1.1.1.1  1996/04/12 15:29:05  plothow
-* Version 7.01
-*
-*
-#include "pdf/pilot.h"
-      SUBROUTINE BXQBAR (X,QQ,XQBAR)
-C.......................................................................
-C.
-C.    SEA
-C.
-C.......................................................................
-#include "pdf/impdp.inc"
-      DATA XLAM /0.47D00/, Q02/5.D0/
-      DATA ONED/1.D0/, FIVED2/5.2D0/
-C
-      S = LOG( LOG( MAX( FIVED2,QQ)/XLAM**2)/ LOG( Q02/XLAM**2))
-      AA=0.99D00+0.72D00*S+0.96D00*S*S
-      PP=8.10D00-1.49D00*S+5.10D00*S*S
-      XQBAR=AA*(ONED-X)**PP
-      RETURN
-      END