Back to home page

EIC code displayed by LXR

 
 

    


Warning, /include/zebra/q_not.inc is written in an unsupported language. File is not indexed.

0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1  1996/04/18 16:15:12  mclareni
0006 * Incorporate changes from J.Zoll for version 3.77
0007 *
0008 *
0009 *
0010 #ifndef CERNLIB_ZEBRA_Q_NOT_INC
0011 #define CERNLIB_ZEBRA_Q_NOT_INC
0012 *
0013 * q_not.inc
0014 *
0015 #if defined(CERNLIB_APOLLO)
0016 *    NOT  is standard on APOLLO
0017 
0018 #elif defined(CERNLIB_CDC)
0019       NOT (IZW)      = .NOT. IZW
0020 
0021 #elif defined(CERNLIB_MSDOS)&&defined(CERNLIB_QF_F2C)
0022 
0023 #elif defined(CERNLIB_QMIBMSI)
0024       NOT (IZW)      = LCOMPL (IZW)
0025 
0026 #elif defined(CERNLIB_LNX)
0027 
0028 #elif defined(CERNLIB_SUN)
0029 *    NOT  is standard on SUN
0030  
0031 #elif 1
0032 
0033 #endif
0034 
0035 #endif