CLHEP/StdHepC++/StdFI.hh

// $Id: StdFI.hh,v 1.1 2000/05/05 19:38:07 garren Exp $
// -*- C++ -*-
//
// ----------------------------------------------------------------------
// StdFI.hh
// ----------------------------------------------------------------------
// 
// This is the Fortran interface to various common blocks
//
#ifndef STDFI_HH
#define STDFI_HH

#include "CLHEP/config/CLHEP.h"

struct hepevt;
struct hepev2;
struct hepev3;

HEP_BEGIN_NAMESPACE(StdHep)

class FIhepevt {

public:

  FIhepevt( hepevt * h) { hptr = h; }

  static hepevt & get( ) { return * FIhepevt::hptr; }

private:

  static hepevt * hptr;
};	// FIhepevt

class FIhepev2 {

public:

  FIhepev2( hepev2 * h) { hptr = h; }

  static hepev2 & get( ) { return * FIhepev2::hptr; }

private:

  static hepev2 * hptr;
};	// FIhepev2

class FIhepev3 {

public:

  FIhepev3( hepev3 * h) { hptr = h; }

  static hepev3 & get( ) { return * FIhepev3::hptr; }

private:

  static hepev3 * hptr;
};	// FIhepev3

HEP_END_NAMESPACE(StdHep)

#endif // STDFI_HH