oml_mod Module Reference

Data Types
interface	oml_num_threads

Functions/Subroutines
subroutine, public	oml_init ()
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 ()
integer(kind=jpim) function, public	oml_get_num_threads ()
integer(kind=jpim) function	oml_num_threads_int (KOMP_SET_THREADS)
integer(kind=jpim) function	oml_num_threads_str (CD_ENV)

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/)
integer(kind=jpim)	n_oml_max_threads = -1

Function/Subroutine Documentation

oml_destroy_lock()

subroutine, public oml_mod::oml_destroy_lock

(

integer(kind=oml_lock_kind), intent(inout), optional

MYLOCK

)

Definition at line 184 of file oml_mod.F90.

oml_get_num_threads()

integer(kind=jpim) function, public oml_mod::oml_get_num_threads

(

)

Definition at line 263 of file oml_mod.F90.

Here is the caller graph for this function:

oml_in_parallel()

logical function, public oml_mod::oml_in_parallel

(

)

Definition at line 125 of file oml_mod.F90.

Here is the caller graph for this function:

oml_incr_event()

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

Definition at line 233 of file oml_mod.F90.

oml_init()

subroutine, public oml_mod::oml_init

(

)

Definition at line 111 of file oml_mod.F90.

Here is the caller graph for this function:

oml_init_lock()

subroutine, public oml_mod::oml_init_lock

(

integer(kind=oml_lock_kind), intent(inout), optional

MYLOCK

)

Definition at line 172 of file oml_mod.F90.

Here is the caller graph for this function:

oml_max_threads()

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

(

)

Definition at line 256 of file oml_mod.F90.

Here is the caller graph for this function:

oml_my_thread()

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

(

)

Definition at line 249 of file oml_mod.F90.

Here is the caller graph for this function:

oml_num_threads_int()

integer(kind=jpim) function oml_mod::oml_num_threads_int ( integer(kind=jpim), intent(in), optional  KOMP_SET_THREADS )

private

Definition at line 270 of file oml_mod.F90.

oml_num_threads_str()

integer(kind=jpim) function oml_mod::oml_num_threads_str ( character(len=*), intent(in)  CD_ENV )

private

Definition at line 287 of file oml_mod.F90.

oml_omp()

logical function, public oml_mod::oml_omp

(

)

Definition at line 119 of file oml_mod.F90.

oml_set_event()

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

Definition at line 223 of file oml_mod.F90.

oml_set_lock()

subroutine, public oml_mod::oml_set_lock

(

integer(kind=oml_lock_kind), intent(inout), optional

MYLOCK

)

Definition at line 160 of file oml_mod.F90.

Here is the caller graph for this function:

oml_test_event()

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

Definition at line 196 of file oml_mod.F90.

Here is the caller graph for this function:

oml_test_lock()

logical function, public oml_mod::oml_test_lock

(

integer(kind=oml_lock_kind), intent(inout), optional

MYLOCK

)

Definition at line 133 of file oml_mod.F90.

Here is the caller graph for this function:

oml_unset_lock()

subroutine, public oml_mod::oml_unset_lock

(

integer(kind=oml_lock_kind), intent(inout), optional

MYLOCK

)

Definition at line 148 of file oml_mod.F90.

Here is the caller graph for this function:

oml_wait_event()

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

Definition at line 209 of file oml_mod.F90.

Here is the call graph for this function:

Variable Documentation

m_event

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

private

Definition at line 100 of file oml_mod.F90.

m_lock

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

private

Definition at line 103 of file oml_mod.F90.

n_oml_max_threads

integer(kind=jpim) oml_mod::n_oml_max_threads = -1

private

Definition at line 106 of file oml_mod.F90.

oml_debug

logical, public oml_mod::oml_debug = .FALSE.

Definition at line 77 of file oml_mod.F90.

oml_lock_kind

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

Definition at line 97 of file oml_mod.F90.