f2c.h

a software code for computing selected eigenvalues of large sparse symmetric matrices

/* Fortran to C header file */

#ifndef __F2C__
#define __F2C__

#include "long_integer.h"

#define logical                     integer
#define ftnlen                      integer
#define real                        float
#define doubleprecision             double
#define character                   char
typedef struct { real r, i; } complex;
typedef struct { doubleprecision r, i; } doublecomplex;

#endif /* __F2C__ */