+#ifndef FFINUC
+#define FFINUC_H 1
+
+#include "Rtypes.h"
+#include "cfortran.h"
+
+#include "Fdimpar.h"
extern "C" {
//*$ create finuc.add
//*copy finuc
//* *
//*----------------------------------------------------------------------*
//*
-const Int_t mxp = 999;
+const Int_t mxp = mxpscs;
//*
typedef struct {
#define FINUC COMMON_BLOCK(FINUC,finuc)
COMMON_BLOCK_DEF(finucCommon,FINUC);
}
+#endif