Skip to content

Commit bcc0cfe

Browse files
authored
Update openmp_sample.f90 (#2371)
1 parent 6310039 commit bcc0cfe

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

DirectProgramming/Fortran/CombinationalLogic/openmp-primes/src/openmp_sample.f90

+2-2
Original file line numberDiff line numberDiff line change
@@ -61,8 +61,8 @@ program ompPrime
6161
!$omp end single
6262

6363
!$omp do private(factor, limit, prime) &
64-
schedule(dynamic,10) &
65-
reduction(+:number_of_primes,number_of_41primes,number_of_43primes)
64+
!$omp& schedule(dynamic,10) &
65+
!$omp& reduction(+:number_of_primes,number_of_41primes,number_of_43primes)
6666

6767
do index = start, end, 2 ! workshared loop
6868

0 commit comments

Comments
 (0)