Lines Matching refs:subroutine

118     subroutine omp_set_num_threads(nthreads) bind(c)
121     end subroutine omp_set_num_threads
148     subroutine omp_set_dynamic(enable) bind(c)
151     end subroutine omp_set_dynamic
163     subroutine omp_set_nested(enable) bind(c)
166     end subroutine omp_set_nested
173     subroutine omp_set_schedule(kind, modifier) bind(c)
176     end subroutine omp_set_schedule
178     subroutine omp_get_schedule(kind, modifier) bind(c)
181     end subroutine omp_get_schedule
193     subroutine omp_set_max_active_levels(max_levels) bind(c)
196     end subroutine omp_set_max_active_levels
246     subroutine omp_get_place_proc_ids(place_num, ids) bind(c)
250     end subroutine omp_get_place_proc_ids
262     subroutine omp_get_partition_place_nums(place_nums) bind(c)
265     end subroutine omp_get_partition_place_nums
267     subroutine omp_set_affinity_format(format)
270     end subroutine omp_set_affinity_format
278     subroutine omp_display_affinity(format)
281     end subroutine omp_display_affinity
290     subroutine omp_set_default_device(device_num) bind(c)
293     end subroutine omp_set_default_device
349     subroutine omp_init_lock(lockvar) bind(c, name="omp_init_lock_")
352     end subroutine omp_init_lock
354     subroutine omp_init_lock_with_hint(lockvar, hint) bind(c, name="omp_init_lock_with_hint_")
358     end subroutine omp_init_lock_with_hint
360     subroutine omp_destroy_lock(lockvar) bind(c, name="omp_destroy_lock_")
363     end subroutine omp_destroy_lock
365     subroutine omp_set_lock(lockvar) bind(c, name="omp_set_lock_")
368     end subroutine omp_set_lock
370     subroutine omp_unset_lock(lockvar) bind(c, name="omp_unset_lock_")
373     end subroutine omp_unset_lock
381     subroutine omp_init_nest_lock(lockvar) bind(c, name="omp_init_nest_lock_")
384     end subroutine omp_init_nest_lock
386 …subroutine omp_init_nest_lock_with_hint(lockvar, hint) bind(c, name="omp_init_nest_lock_with_hint_…
390     end subroutine omp_init_nest_lock_with_hint
392     subroutine omp_destroy_nest_lock(lockvar) bind(c, name="omp_destroy_nest_lock_")
395     end subroutine omp_destroy_nest_lock
397     subroutine omp_set_nest_lock(lockvar) bind(c, name="omp_set_nest_lock_")
400     end subroutine omp_set_nest_lock
402     subroutine omp_unset_nest_lock(lockvar) bind(c, name="omp_unset_nest_lock_")
405     end subroutine omp_unset_nest_lock
423     subroutine omp_fullfill_event(event) bind(c) ! TODO: is this the correct spelling?
426     end subroutine omp_fullfill_event
439     subroutine omp_destroy_allocator(allocator) bind(c)
442     end subroutine omp_destroy_allocator
444     subroutine omp_set_default_allocator(allocator) bind(c)
447     end subroutine omp_set_default_allocator