2.0 Testing if the conditional compilation is supported or not. Yi Wen at 05032004: Do we want to write two versions of has_omp? both C23456789 and #ifdef formats are supposed to work. At least Sun's compiler cannot deal with the second format (#ifdef) INTEGER FUNCTION has_openmp() = 0 !version 1. !C23456789 !$ = 1 ! version 2. !#ifdef _OPENMP = 1 !#endif END FUNCTION