Changed omp_info.f90