#if 0 * This pilot for Windows NT for Microsoft Powersation Fortran v.4.0 #endif #ifdef CERNLIB_WINNT #ifndef CERNLIB_QS_WNT #define CERNLIB_QS_WNT #endif #endif #ifndef CERNLIB_QS_DOS #define CERNLIB_QS_DOS #endif #ifndef CERNLIB_QMDOS #define CERNLIB_QMDOS #endif #ifndef CERNLIB_QIEEE #define CERNLIB_QIEEE #endif #ifndef CERNLIB_QISASTD #define CERNLIB_QISASTD #endif #ifndef CERNLIB_QMILSTD #define CERNLIB_QMILSTD #endif #ifdef CERNLIB_QORTHOLL #undef CERNLIB_QORTHOLL #endif #ifndef CERNLIB_F77TRARG #define CERNLIB_F77TRARG #endif #ifndef CERNLIB_QCFIO #define CERNLIB_QCFIO #endif #ifndef CERNLIB_QGETCWD #define CERNLIB_QGETCWD #endif #ifndef CERNLIB_QINTCOPY #define CERNLIB_QINTCOPY #endif #ifndef CERNLIB_QINTZERO #define CERNLIB_QINTZERO #endif #include "fortranc.h"