(root)/
gcc-13.2.0/
libgomp/
testsuite/
libgomp.fortran/
use_intrinsic_1.f90
! { dg-do compile }
!
! PR fortran/55197
!
! Contributed by Erik Toussaint
!

use, intrinsic :: omp_lib, only: omp_get_num_threads
use, intrinsic :: omp_lib_kinds , foo => omp_lock_kind
print *, foo
end