is_sorted provides a simple way to checking if a 1d array is sorted
it is implemented for int32, int64, sp, and dp datatypes. The default
is to check if an array is sorted in ascending fashion.
Usage: result = is_sorted(array, [optional] ASCENDING/DESCENDING)
Nodes of different colours represent the following:
Solid arrows point from a procedure to one which it calls. Dashed
arrows point from an interface to procedures which implement that interface.
This could include the module procedures in a generic interface or the
implementation in a submodule of an interface in a parent module.
Where possible, edges connecting nodes are
given different colours to make them easier to distinguish in
large graphs.
Module Procedures
private pure function is_sorted_int32(array, order) result(sorted)
Arguments
Type
Intent
Optional
Attributes
Name
integer(kind=int32),
intent(in)
::
array(:)
integer(kind=default_int),
intent(in),
optional
::
order
Return Value
logical
private pure function is_sorted_int64(array, order) result(sorted)
Arguments
Type
Intent
Optional
Attributes
Name
integer(kind=int64),
intent(in)
::
array(:)
integer(kind=default_int),
intent(in),
optional
::
order
Return Value
logical
private pure function is_sorted_sp(array, order) result(sorted)
Arguments
Type
Intent
Optional
Attributes
Name
real(kind=sp),
intent(in)
::
array(:)
integer(kind=default_int),
intent(in),
optional
::
order
Return Value
logical
private pure function is_sorted_dp(array, order) result(sorted)