Functions/Subroutines
logical function, public	oml_omp ()

logical function, public	oml_in_parallel ()

logical function, public	oml_test_lock (MYLOCK)

subroutine, public	oml_unset_lock (MYLOCK)

subroutine, public	oml_set_lock (MYLOCK)

subroutine, public	oml_init_lock (MYLOCK)

subroutine, public	oml_destroy_lock (MYLOCK)

logical function, public	oml_test_event (K, MYEVENT)

subroutine, public	oml_wait_event (K, MYEVENT)

subroutine, public	oml_set_event (K, MYEVENT)

subroutine, public	oml_incr_event (K, MYEVENT)

integer(kind=jpim) function, public	oml_my_thread ()

integer(kind=jpim) function, public	oml_max_threads ()

Variables
logical, public	oml_debug = .FALSE.

integer(kind=jpim), parameter, public	oml_lock_kind = JPIB

integer(kind=jpim)	m_event = 0

integer(kind=oml_lock_kind), dimension(2)	m_lock = (/-1, -1/)

Function/Subroutine Documentation

subroutine, public yomoml::oml_destroy_lock ( integer(kind=oml_lock_kind), intent(inout), optional MYLOCK )

Definition at line 139 of file yomoml.F90.

logical function, public yomoml::oml_in_parallel ( )

Definition at line 80 of file yomoml.F90.

subroutine, public yomoml::oml_incr_event	(	integer(kind=jpim)	K,
		integer(kind=jpim), intent(inout), optional	MYEVENT
	)

Definition at line 182 of file yomoml.F90.

subroutine, public yomoml::oml_init_lock ( integer(kind=oml_lock_kind), intent(inout), optional MYLOCK )

Definition at line 127 of file yomoml.F90.

integer(kind=jpim) function, public yomoml::oml_max_threads ( )

Definition at line 199 of file yomoml.F90.

Here is the caller graph for this function:

integer(kind=jpim) function, public yomoml::oml_my_thread ( )

Definition at line 192 of file yomoml.F90.

Here is the caller graph for this function:

logical function, public yomoml::oml_omp ( )

Definition at line 74 of file yomoml.F90.

subroutine, public yomoml::oml_set_event	(	integer(kind=jpim), intent(in)	K,
		integer(kind=jpim), intent(out), optional	MYEVENT
	)

Definition at line 172 of file yomoml.F90.

subroutine, public yomoml::oml_set_lock ( integer(kind=oml_lock_kind), intent(inout), optional MYLOCK )

Definition at line 115 of file yomoml.F90.

logical function, public yomoml::oml_test_event	(	integer(kind=jpim), intent(in)	K,
		integer(kind=jpim), intent(in)	MYEVENT
	)

Definition at line 148 of file yomoml.F90.

Here is the caller graph for this function:

logical function, public yomoml::oml_test_lock ( integer(kind=oml_lock_kind), intent(inout), optional MYLOCK )

Definition at line 88 of file yomoml.F90.

subroutine, public yomoml::oml_unset_lock ( integer(kind=oml_lock_kind), intent(inout), optional MYLOCK )

Definition at line 103 of file yomoml.F90.

subroutine, public yomoml::oml_wait_event	(	integer(kind=jpim), intent(in)	K,
		integer(kind=jpim), intent(in), optional	MYEVENT
	)

Definition at line 158 of file yomoml.F90.

Here is the call graph for this function:

Variable Documentation

integer(kind=jpim) yomoml::m_event = 0

Definition at line 64 of file yomoml.F90.

integer(kind=oml_lock_kind), dimension(2) yomoml::m_lock = (/-1, -1/)

Definition at line 68 of file yomoml.F90.

logical, public yomoml::oml_debug = .FALSE.

Definition at line 47 of file yomoml.F90.

integer(kind=jpim), parameter, public yomoml::oml_lock_kind = JPIB

Definition at line 61 of file yomoml.F90.