MICROCERN/gen/imp128.inc

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.2.4.1  2002/11/26 16:50:55  hristov
   6 * Merging NewIO with v3-09-04
   7 *
   8 * Revision 1.2  2002/10/14 14:57:11  hristov
   9 * Merging the VirtualMC branch to the main development branch (HEAD)
  10 *
  11 * Revision 1.1.2.1  2002/07/11 17:14:49  alibrary
  12 * Adding MICROCERN
  13 *
  14 * Revision 1.1.1.1  1999/05/18 15:55:36  fca
  15 * AliRoot sources
  16 *
  17 * Revision 1.1.1.1  1996/04/01 15:02:59  mclareni
  18 * Mathlib gen
  19 *
  20 *
  21 * imp128.inc
  22 *
  23 #if (!defined(CERNLIB_F90))&&(defined(CERNLIB_NOQUAD)||!defined(CERNLIB_DOUBLE))
  24       IMPLICIT DOUBLE PRECISION (A-H,O-Z)
  25
  26 #elif (defined(CERNLIB_F90))&&(!defined(CERNLIB_DOUBLE))
  27       IMPLICIT REAL(2) (A-H,O-Z)
  28
  29 #elif (defined(CERNLIB_F90))&&(defined(CERNLIB_DOUBLE))
  30       IMPLICIT REAL(4) (A-H,O-Z)
  31
  32 #elif 1
  33       IMPLICIT REAL*16 (A-H,O-Z)
  34
  35 #endif