yomoml.F90 File Reference

Go to the source code of this file.

Modules
module	yomoml

Functions/Subroutines
logical function, public	yomoml::oml_omp ()
logical function, public	yomoml::oml_in_parallel ()
logical function, public	yomoml::oml_test_lock (MYLOCK)
subroutine, public	yomoml::oml_unset_lock (MYLOCK)
subroutine, public	yomoml::oml_set_lock (MYLOCK)
subroutine, public	yomoml::oml_init_lock (MYLOCK)
subroutine, public	yomoml::oml_destroy_lock (MYLOCK)
logical function, public	yomoml::oml_test_event (K, MYEVENT)
subroutine, public	yomoml::oml_wait_event (K, MYEVENT)
subroutine, public	yomoml::oml_set_event (K, MYEVENT)
subroutine, public	yomoml::oml_incr_event (K, MYEVENT)
integer(kind=jpim) function, public	yomoml::oml_my_thread ()
integer(kind=jpim) function, public	yomoml::oml_max_threads ()

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