#define HISTRNG COMMON_BLOCK(HISTRNG,histrng)
COMMON_BLOCK_DEF(HistrngCommon,HISTRNG);
+
+
+/*************************************************************************/
+/* D E S C R I P T I O N : */
+/*-----------------------------------------------------------------------*/
+/* The following common block is added to record the number of elastic*/
+/* (NELT, NELP) and inelastic (NINT, NINP) participants */
+/* */
+/*=======================================================================*/
+/* COMMON/HIJGLBR/NELT,NINT,NELP,NINP */
+/* SAVE /HIJGLBR/ */
+/*=======================================================================*/
+typedef struct {
+ Int_t nelt;
+ Int_t nint;
+ Int_t nelp;
+ Int_t ninp;
+ Int_t npspecp;
+ Int_t nnspecp;
+ Int_t npspect;
+ Int_t nnspect;
+} HijglbrCommon;
+
+#define HIJGLBR COMMON_BLOCK(HIJGLBR,hijglbr)
+COMMON_BLOCK_DEF(HijglbrCommon,HIJGLBR);
+
+
/*************************************************************************/
/* D E S C R I P T I O N : */
/*-----------------------------------------------------------------------*/
COMMON_BLOCK_DEF(Ludat1_HijingCommon,LUDAT1_HIJING);
}
+//COMMON/LUDAT3_HIJING/MDCY(500, 3),MDME(2000, 2),BRAT(2000),KFDP(2000, 5)
+ typedef struct {
+ Int_t mdcy[3][500];
+ Int_t mdme[2][2000];
+ Float_t brat[2000];
+ Float_t kfdp[5][2000];
+} Ludat3_HijingCommon;
+
+#define LUDAT3_HIJING COMMON_BLOCK(LUDAT3_HIJING,ludat3_hijing)
+COMMON_BLOCK_DEF(Ludat3_HijingCommon,LUDAT3_HIJING);
+
#endif