main.f90.in 129 B

12345
  1. program test
  2. @OpenMP_Fortran_INCLUDE_LINE@
  3. !$ integer :: n
  4. n = omp_get_num_threads()
  5. end program test