All kind of helpful little routines. More...

Functions/Subroutines
pure integer function, public	locate (array, x)
	Purpose: Given an array array(1:n), and given a value x, a value x_index is returned which is the index value of the array element equal to the value x: x = array(x_index) The array must be monotonic increasing. x_index = 0 is returned, if no array element equal to the value of x was found. More...

pure integer function, dimension(2), public	get_limit (m, n, me)
	divide m entries into n parts, return size of part me More...

Detailed Description

All kind of helpful little routines.

History: none

Author: CJM & JGH

Function/Subroutine Documentation

◆ locate()

pure integer function, public util::locate	(	integer, dimension(:), intent(in)	array,
		integer, intent(in)	x
	)

Purpose: Given an array array(1:n), and given a value x, a value x_index is returned which is the index value of the array element equal to the value x: x = array(x_index) The array must be monotonic increasing. x_index = 0 is returned, if no array element equal to the value of x was found.

Parameters

array	...
x	...

Returns: ...

History: Derived from the locate function described in Numerical Recipes in Fortran 90 (09.01.2004,MK)

Definition at line 60 of file util.F.

Here is the caller graph for this function:

◆ get_limit()

pure integer function, dimension(2), public util::get_limit	(	integer, intent(in)	m,
		integer, intent(in)	n,
		integer, intent(in)	me
	)

divide m entries into n parts, return size of part me