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