Increase range of arrays katt[] and patt[] to 200000.
authormorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Wed, 6 Dec 2000 10:05:25 +0000 (10:05 +0000)
committermorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Wed, 6 Dec 2000 10:05:25 +0000 (10:05 +0000)
HIJING/hijing/himain2.inc
THijing/THijing.cxx

index f267a7c..b192860 100644 (file)
@@ -1,4 +1,4 @@
 * $Id$
         REAL PATT
-       COMMON/HIMAIN2/KATT(130000,4),PATT(130000,4)
+       COMMON/HIMAIN2/KATT(200000,4),PATT(200000,4)
        SAVE  /HIMAIN2/
index f8f1b64..f201812 100644 (file)
@@ -242,6 +242,9 @@ Int_t THijing::ImportParticles(TClonesArray *particles, Option_t *option)
   TClonesArray &Particles = *particles;
   Particles.Clear();
   Int_t numpart = HIMAIN1.natt;
+  printf("\n THijing: HIJING stack contains %d particles.", numpart);
+  printf("\n THijing: Total energy:         %f           ", HIMAIN1.eatt);
+  printf("\n THijing: Number of hard scatterings: %d     ", HIMAIN1.jatt);
   Int_t nump = 0;
   if (!strcmp(option,"") || !strcmp(option,"Final")) {
       for (Int_t i = 0; i<=numpart; i++) {
@@ -577,9 +580,9 @@ Float_t  THijing::GetBB() const
 //______________________________________________________________________________
 Int_t THijing::GetKATT(Int_t key1, Int_t key2) const
 {
-   if ( key1<1 || key1>130000 ) {
+   if ( key1<1 || key1>200000 ) {
       printf("ERROR in THijing::GetKATT(key1,key2):\n");
-      printf("      key1=%i is out of range [1..130000]\n",key1);
+      printf("      key1=%i is out of range [1..200000]\n",key1);
       return 0;
    }