oml_mod.F90 File Reference

Go to the source code of this file.

Data Types
interface	oml_mod::oml_num_threads

Modules
module	oml_mod

Functions/Subroutines
subroutine, public	oml_mod::oml_init ()
logical function, public	oml_mod::oml_omp ()
logical function, public	oml_mod::oml_in_parallel ()
logical function, public	oml_mod::oml_test_lock (MYLOCK)
subroutine, public	oml_mod::oml_unset_lock (MYLOCK)
subroutine, public	oml_mod::oml_set_lock (MYLOCK)
subroutine, public	oml_mod::oml_init_lock (MYLOCK)
subroutine, public	oml_mod::oml_destroy_lock (MYLOCK)
logical function, public	oml_mod::oml_test_event (K, MYEVENT)
subroutine, public	oml_mod::oml_wait_event (K, MYEVENT)
subroutine, public	oml_mod::oml_set_event (K, MYEVENT)
subroutine, public	oml_mod::oml_incr_event (K, MYEVENT)
integer(kind=jpim) function, public	oml_mod::oml_my_thread ()
integer(kind=jpim) function, public	oml_mod::oml_max_threads ()
integer(kind=jpim) function, public	oml_mod::oml_get_num_threads ()
integer(kind=jpim) function	oml_mod::oml_num_threads_int (KOMP_SET_THREADS)
integer(kind=jpim) function	oml_mod::oml_num_threads_str (CD_ENV)

Variables
logical, public	oml_mod::oml_debug = .FALSE.
integer(kind=jpim), parameter, public	oml_mod::oml_lock_kind = JPIB
integer(kind=jpim)	oml_mod::m_event = 0
integer(kind=oml_lock_kind), dimension(2)	oml_mod::m_lock = (/-1, -1/)
integer(kind=jpim)	oml_mod::n_oml_max_threads = -1