Lines Matching refs:concurrent
41 do concurrent (j=1:1, impure(j) /= 0) ! C1121
46 do concurrent (k=impure(1):1); end do
48 do concurrent (k=1:impure(1)); end do
50 do concurrent (k=1:1:impure(1)); end do
57 do concurrent (j=1:1)
59 do concurrent (k=impure(1):1); end do
61 do concurrent (k=1:impure(1)); end do
63 do concurrent (k=1:1:impure(1)); end do
105 do concurrent (j=1:1, x%tbp_pure(j) /= 0) ! ok
109 do concurrent (j=1:1, x%tbp_impure(j) /= 0) ! C1121
137 do concurrent (j=1:1)