1C
default logical type assumed below
2C OpenMP Fortran API v3.0
3 include
'omp_lib_kinds.h'
5 parameter ( openmp_version = 200805 )
7 external omp_set_num_threads
8 external omp_get_num_threads
9 integer omp_get_num_threads
10 external omp_get_max_threads
11 integer omp_get_max_threads
12 external omp_get_thread_num
13 integer omp_get_thread_num
14 external omp_get_num_procs
15 integer omp_get_num_procs
16 external omp_in_parallel
17 logical omp_in_parallel
18 external omp_set_dynamic
19 external omp_get_dynamic
20 logical omp_get_dynamic
21 external omp_set_nested
22 external omp_get_nested
23 logical omp_get_nested
24 external omp_set_schedule
25 external omp_get_schedule
26 external omp_get_thread_limit
27 integer omp_get_thread_limit
28 external omp_set_max_active_levels
29 external omp_get_max_active_levels
30 integer omp_get_max_active_levels
31 external omp_get_level
33 external omp_get_ancestor_thread_num
34 integer omp_get_ancestor_thread_num
35 external omp_get_team_size
36 integer omp_get_team_size
37 external omp_get_active_level
38 integer omp_get_active_level
40 external omp_init_lock
41 external omp_destroy_lock
43 external omp_unset_lock
44 external omp_test_lock
47 external omp_init_nest_lock
48 external omp_destroy_nest_lock
49 external omp_set_nest_lock
50 external omp_unset_nest_lock
51 external omp_test_nest_lock
52 integer omp_test_nest_lock
54 external omp_get_wtick
55 double precision omp_get_wtick
56 external omp_get_wtime
57 double precision omp_get_wtime
