| e74335a4 |
1 | * $Id$ |
| 2 | C |
| 3 | C |
| 4 | C*************************************************************** |
| 5 | |
| 6 | BLOCK DATA HIDATA |
| 7 | #include "bveg1_hijing.inc" |
| 8 | #include "hiparnt.inc" |
| 9 | #include "himain1.inc" |
| 10 | #include "himain2.inc" |
| 11 | #include "histrng.inc" |
| 12 | #include "hijcrdn.inc" |
| 13 | #include "hijjet1.inc" |
| 14 | #include "hijjet2.inc" |
| 15 | #include "hijdat.inc" |
| 16 | #include "hipyint.inc" |
| 17 | DATA XL/10*0.D0/,XU/10*1.D0/ |
| 18 | DATA NCALL/1000/ITMX/100/ACC/0.01/NPRN/0/ |
| 19 | C...give all the switchs and parameters the default values |
| 20 | DATA HIPR1/ |
| 21 | & 1.5, 0.35, 0.5, 0.9, 2.0, 0.1, 1.5, 2.0, -1.0, -2.25, |
| 22 | & 2.0, 0.5, 1.0, 2.0, 0.2, 2.0, 2.5, 0.3, 0.1, 1.4, |
| 23 | & 1.6, 1.0, 2.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.4, 57.0, |
| 24 | & 28.5, 3.9, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, |
| 25 | & 3.141592654, |
| 26 | & 0.0, 0.4, 0.1, 1.5, 0.1, 0.25, 0.0, 0.5, 0.0, 0.0, |
| 27 | & 50*0.0/ |
| 28 | |
| 29 | DATA IHPR2/ |
| 30 | & 1, 3, 0, 1, 1, 1, 1, 10, 0, 0, |
| 31 | & 1, 1, 1, 1, 0, 0, 1, 0, 0, 1, |
| 32 | & 30*0/ |
| 33 | |
| 34 | DATA HINT1/100*0/ |
| 35 | DATA IHNT2/50*0/ |
| 36 | |
| 37 | C...initialize all the data common blocks |
| 38 | DATA NATT/0/EATT/0.0/JATT/0/NT/0/NP/0/N0/0/N01/0/N10/0/N11/0/ |
| e1dec796 |
39 | DATA KATT/800000*0/PATT/800000*0.0/ |
| e74335a4 |
40 | |
| 41 | DATA NFP/4500*0/PP/4500*0.0/NFT/4500*0/PT/4500*0.0/ |
| 42 | |
| 43 | DATA YP/900*0.0/YT/900*0.0/ |
| 44 | |
| 45 | DATA NPJ/300*0/KFPJ/150000*0/PJPX/150000*0.0/PJPY/150000*0.0/ |
| 46 | & PJPZ/150000*0.0/PJPE/150000*0.0/PJPM/150000*0.0/ |
| 47 | DATA NTJ/300*0/KFTJ/150000*0/PJTX/150000*0.0/PJTY/150000*0.0/ |
| 48 | & PJTZ/150000*0.0/PJTE/150000*0.0/PJTM/150000*0.0/ |
| 49 | |
| 50 | DATA NSG/0/NJSG/900*0/IASG/2700*0/K1SG/90000*0/K2SG/90000*0/ |
| 51 | & PXSG/90000*0.0/PYSG/90000*0.0/PZSG/90000*0.0/PESG/90000*0.0/ |
| 52 | & PMSG/90000*0.0/ |
| 53 | DATA MINT4/0/MINT5/0/ATCO/4000*0.0/ATXS/201*0.0/ |
| 54 | DATA (HIDAT0(1,I),I=1,10)/0.0,0.0,0.0,0.0,0.0,0.0,2.25, |
| 55 | & 2.5,4.0,4.1/ |
| 56 | DATA (HIDAT0(2,I),I=1,10)/2.0,3.0,5.0,6.0,7.0,8.0,8.0,10.0, |
| 57 | & 10.0,10.0/ |
| 58 | DATA (HIDAT0(3,I),I=1,10)/1.0,0.8,0.8,0.7,0.45,0.215, |
| 59 | & 0.21,0.19,0.19,0.19/ |
| 60 | DATA (HIDAT0(4,I),I=1,10)/0.35,0.35,0.3,0.3,0.3,0.3, |
| 61 | & 0.5,0.6,0.6,0.6/ |
| 62 | DATA (HIDAT0(5,I),I=1,10)/23.8,24.0,26.0,26.2,27.0,28.5,28.5, |
| 63 | & 28.5,28.5,28.5/ |
| 64 | DATA ((HIDAT0(J,I),I=1,10),J=6,9)/40*0.0/ |
| 65 | DATA (HIDAT0(10,I),I=1,10)/5.0,20.0,53.0,62.0,100.0,200.0, |
| 66 | & 546.0,900.0,1800.0,4000.0/ |
| 67 | DATA HIDAT/10*0.0/ |
| 68 | END |
git://git.uio.no / u / mrichter / AliRoot.git / blame