6 lines
129 B
Fortran
6 lines
129 B
Fortran
program test
|
|
@OpenMP_Fortran_INCLUDE_LINE@
|
|
!$ integer :: n
|
|
n = omp_get_num_threads()
|
|
end program test
|