#include "Rtypes.h"
#include "cfortran.h"
//
// common /parimp/ b1, psib1, rb1, rb2
//
extern "C" {

    typedef struct {
	Double_t b1;
	Double_t psib1;
	Double_t rb1;
	Double_t rb2;
} parimpCommon;
#define PARIMP COMMON_BLOCK(PARIMP,parimp)
COMMON_BLOCK_DEF(parimpCommon,PARIMP);
}