1! PR fortran/92756
2
3program pr92756
4  integer :: i
5  !$omp teams distribute parallel do
6  do i = 1, 64
7  end do
8end
9