Sign in
android
/
toolchain
/
gcc
/
donut
/
.
/
gcc-4.4.0
/
libgomp
/
testsuite
/
libgomp.fortran
/
appendix-a
/
a.5.1.f90
blob: 13e451e506a7dcd48062669f1884289bbc768d82 [
file
] [
log
] [
blame
]
!
{
dg
-
do
run
}
PROGRAM A5
INCLUDE
"omp_lib.h"
!
or
USE OMP_LIB
CALL OMP_SET_DYNAMIC
(.
TRUE
.)
!
$OMP PARALLEL NUM_THREADS
(
10
)
!
do
work here
!
$OMP
END
PARALLEL
END
PROGRAM A5