MICROCERN/kerngen/qf_f2c.h

   1 /*
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.1.2.1  2002/07/11 17:14:49  alibrary
   6 * Adding MICROCERN
   7 *
   8 * Revision 1.1.1.1  1999/05/18 15:55:29  fca
   9 * AliRoot sources
  10 *
  11 * Revision 1.1.1.1  1996/02/15 17:49:20  mclareni
  12 * Kernlib
  13 *
  14 *
  15 *  This is a piece of f2c.h file by AT&T
  16 *
  17 * qf_f2c.h
  18 */
  19 typedef long ftnlen;
  20 typedef long int integer;
  21 typedef char *address;
  22 typedef short int shortint;
  23 typedef float real;
  24 typedef double doublereal;
  25
  26 typedef struct { real r, i; } complex;
  27 #ifdef WIN32               /*   V.E.Fine 03.07.93 */
  28 #define _COMPLEX_DEFINED
  29 #endif
  30
  31 typedef struct { doublereal r, i; } doublecomplex;
  32 typedef long int logical;
  33 typedef short int shortlogical;
  34 typedef char logical1;
  35 typedef char integer1;
  36 /* typedef long long longint; */ /* system-dependent */
  37
  38 #define TRUE_ (1)
  39 #define FALSE_ (0)
  40 #define min(a,b) ((a) <= (b) ? (a) : (b))
  41 #define max(a,b) ((a) >= (b) ? (a) : (b))