5 * Revision 1.4 2000/09/18 10:02:35 hristov
6 * Makefile added to PDF8
8 * Revision 1.1.1.2 1996/10/30 08:28:35 cernlib
11 * Revision 1.1.1.1 1996/04/12 15:29:22 plothow
15 #include "pdf/pilot.h"
17 *...NLO PARAMETRIZATION (MS(BAR)) :
19 SUBROUTINE GRV94HO (ZX,ZQ,ZUV,ZDV,ZUB,ZDB,ZSB,ZCB,ZBB,ZTB,ZGL)
22 #if defined(CERNLIB_DOUBLE)
25 #if defined(CERNLIB_SINGLE)
28 + ZX,ZQ,ZUV,ZDV,ZDEL,ZUDB,ZUB,ZDB,ZSB,ZCB,ZBB,ZTB,ZGL
35 ARG1 = MAX(MU2,Q2)/LAM2
37 S = LOG ( LOG( ARG1 ) / LOG( ARG2 ))
42 NU = 1.304 + 0.863 * S
43 AKU = 0.558 - 0.020 * S
45 AU = -0.113 + 0.283 * S - 0.321 * S2
46 BU = 6.843 - 5.089 * S + 2.647 * S2 - 0.527 * S3
47 CU = 7.771 - 10.09 * S + 2.630 * S2
48 DU = 3.315 + 1.145 * S - 0.583 * S2 + 0.154 * S3
49 UV = GR94FV (X, NU, AKU, BKU, AU, BU, CU, DU)
52 ND = 0.102 - 0.017 * S + 0.005 * S2
53 AKD = 0.270 - 0.019 * S
55 AD = 2.393 + 6.228 * S - 0.881 * S2
56 BD = 46.06 + 4.673 * S - 14.98 * S2 + 1.331 * S3
57 CD = 17.83 - 53.47 * S + 21.24 * S2
58 DD = 4.081 + 0.976 * S - 0.485 * S2 + 0.152 * S3
59 DV = GR94FV (X, ND, AKD, BKD, AD, BD, CD, DD)
62 NE = 0.070 + 0.042 * S - 0.011 * S2 + 0.004 * S3
63 AKE = 0.409 - 0.007 * S
64 BKE = 0.782 + 0.082 * S
65 AE = -29.65 + 26.49 * S + 5.429 * S2
66 BE = 90.20 - 74.97 * S + 4.526 * S2
68 DE = 8.122 + 2.120 * S - 1.088 * S2 + 0.231 * S3
69 DEL = GR94FV (X, NE, AKE, BKE, AE, BE, CE, DE)
77 BGX = 3.210 - 1.866 * S
79 DX = 9.010 + 0.896 * DS + 0.222 * S2
80 EX = 3.077 + 1.446 * S
81 ESX = 3.173 - 2.445 * DS + 2.207 * S
82 UDB = GR94FW(X, S, ALX, BEX, AKX, BKX, AGX, BGX, CX, DX, EX, ESX)
85 ZUB = (ZUDB - ZDEL)/2.D0
87 ZDB = (ZUDB + ZDEL)/2.D0
91 AKS = 1.690 + 0.650 * DS - 0.922 * S
92 AS = -4.329 + 1.131 * S
93 BS = 9.568 - 1.744 * S
94 DST = 9.377 + 1.088 * DS - 1.320 * S + 0.130 * S2
95 EST = 3.031 + 1.639 * S
96 ESS = 5.837 + 0.815 * S
97 SB = GR94FWS (X, S, ALS, BES, AKS, AS, BS, DST, EST, ESS)
102 AKG = 1.724 + 0.157 * S
103 BKG = 0.800 + 1.016 * S
104 AG = 7.517 - 2.547 * S
105 BG = 34.09 - 52.21 * DS + 17.47 * S
106 CG = 4.039 + 1.491 * S
107 DG = 3.404 + 0.830 * S
108 EG = -1.112 + 3.438 * S - 0.302 * S2
109 ESG = 3.256 - 0.436 * S
110 GL = GR94FW (X, S, ALG, BEG, AKG, BKG, AG, BG, CG, DG, EG, ESG)