[u/mrichter/AliRoot.git] / MICROCERN / gen / imp128.inc

*
* $Id$
*
* $Log$
* Revision 1.1.2.1  2002/07/11 17:14:49  alibrary
* Adding MICROCERN
*
* Revision 1.1.1.1  1999/05/18 15:55:36  fca
* AliRoot sources
*
* Revision 1.1.1.1  1996/04/01 15:02:59  mclareni
* Mathlib gen
*
*
* imp128.inc
*
#if (!defined(CERNLIB_F90))&&(defined(CERNLIB_NOQUAD)||!defined(CERNLIB_DOUBLE))
      IMPLICIT DOUBLE PRECISION (A-H,O-Z)

#elif (defined(CERNLIB_F90))&&(!defined(CERNLIB_DOUBLE))
      IMPLICIT REAL(2) (A-H,O-Z)

#elif (defined(CERNLIB_F90))&&(defined(CERNLIB_DOUBLE))
      IMPLICIT REAL(4) (A-H,O-Z)

#elif 1
      IMPLICIT REAL*16 (A-H,O-Z)

#endif
Commit	Line	Data
fe4da5cc	1	*
	2	* $Id$
	3	*
	4	* $Log$
b9d0a01d	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:36 fca
	9	* AliRoot sources
	10	*
fe4da5cc	11	* Revision 1.1.1.1 1996/04/01 15:02:59 mclareni
	12	* Mathlib gen
	13	*
	14	*
	15	* imp128.inc
	16	*
	17	#if (!defined(CERNLIB_F90))&&(defined(CERNLIB_NOQUAD)\|\|!defined(CERNLIB_DOUBLE))
	18	IMPLICIT DOUBLE PRECISION (A-H,O-Z)
	19
	20	#elif (defined(CERNLIB_F90))&&(!defined(CERNLIB_DOUBLE))
	21	IMPLICIT REAL(2) (A-H,O-Z)
	22
	23	#elif (defined(CERNLIB_F90))&&(defined(CERNLIB_DOUBLE))
	24	IMPLICIT REAL(4) (A-H,O-Z)
	25
	26	#elif 1
	27	IMPLICIT REAL*16 (A-H,O-Z)
	28
	29	#endif