isSorted Interface

public interface isSorted

Check that a 1D array is sorted

Example Usage

program arangeTest
use variableKind, only: i32,i64,r32,r64
use m_allocatable, only: allocatable
use m_array1D, only: arange, isSorted
real(r32), allocatable :: a(:)
integer(i32), allocatable :: b(:)
real(r64), allocatable :: c(:)
integer(i64), allocatable :: d(:)
integer :: N
N = 10000
call allocate(a, N)
call allocate(b, N)
call allocate(c, N)
call allocate(d, N)

call arange(a, 1, N)
call arange(b, 1, N)
call arange(c, 1, N)
call arange(d, 1, N)

call diff(a, 1, N)
call diff(b, 1, N)
call diff(c, 1, N)
call diff(d, 1, N)

call deallocate(a)
call deallocate(b)
call deallocate(c)
call deallocate(d)

end program

Called By

interface~~issorted~~CalledByGraph interface~issorted isSorted proc~sorting_test sorting_test proc~sorting_test->interface~issorted program~test_coretran test_coretran program~test_coretran->proc~sorting_test
Help


Functions

public function isSorted_r1D(this) result(yes)

Interfaced with isSorted

Arguments

Type IntentOptional AttributesName
real(kind=r32), intent(in) :: this(:)

1D array

Return Value logical

isSorted

public function isSorted_d1D(this) result(yes)

Interfaced with isSorted

Arguments

Type IntentOptional AttributesName
real(kind=r64), intent(in) :: this(:)

1D array

Return Value logical

isSorted

public function isSorted_i1D(this) result(yes)

Interfaced with isSorted

Arguments

Type IntentOptional AttributesName
integer(kind=i32), intent(in) :: this(:)

1D array

Return Value logical

isSorted

public function isSorted_id1D(this) result(yes)

Interfaced with isSorted

Arguments

Type IntentOptional AttributesName
integer(kind=i64), intent(in) :: this(:)

1D array

Return Value logical

isSorted

public function isSorted_r1Di1D(this, indx) result(yes)

Interfaced with isSorted

Arguments

Type IntentOptional AttributesName
real(kind=r32), intent(in) :: this(:)

1D array

integer(kind=i32), intent(in) :: indx(:)

Index into 1D array

Return Value logical

isSorted

public function isSorted_d1Di1D(this, indx) result(yes)

Interfaced with isSorted

Arguments

Type IntentOptional AttributesName
real(kind=r64), intent(in) :: this(:)

1D array

integer(kind=i32), intent(in) :: indx(:)

Index into 1D array

Return Value logical

isSorted

public function isSorted_i1Di1D(this, indx) result(yes)

Interfaced with isSorted

Arguments

Type IntentOptional AttributesName
integer(kind=i32), intent(in) :: this(:)

1D array

integer(kind=i32), intent(in) :: indx(:)

Index into 1D array

Return Value logical

isSorted

public function isSorted_id1Di1D(this, indx) result(yes)

Interfaced with isSorted

Arguments

Type IntentOptional AttributesName
integer(kind=i64), intent(in) :: this(:)

1D array

integer(kind=i32), intent(in) :: indx(:)

Index into 1D array

Return Value logical

isSorted


allocate allocate_test appendString arange argInsertionsort argMedianOf3 argPartition argSelect argSort array1D_test binarySearch checkIsOpen closeFile compact compare compare_d1 copy copy_test countEntries crossproduct cumprod cumsum dArgDynamicArray dArgDynamicArray_test daysInMonth daysInYear dDynamicArray dDynamicArray_test deallocate debug debug_s deleteFile diff eMsg fastTwoDiff fastTwoSum fErr fileExists fileIO_test geometricMean getExtension getFileSize getNFileLines getRandomSeed hasExtension hasNentries iachar1D iArgDynamicArray iArgDynamicArray_test idArgDynamicArray idArgDynamicArray_test idDynamicArray idDynamicArray_test iDynamicArray iDynamicArray_test ind2sub indexing_test insertionsort integerBin intervalSearch isLeapYear isOpen isSorted isString KdTree KdTree_test lowerCase maths_test mean median medianOf3 mErr msg norm1 normI openBinaryFile openFile partition partition3way partition3way_d1D prependString Prng Prng_test ProgressBar project random_test rArgDynamicArray rArgDynamicArray_test rDynamicArray rDynamicArray_test read1Dble read1Integer readline readline reallocate reallocate_test removeComments repeat replacedelim rngExponential rngExponential_d1 rngExponential_d1D rngExponential_d2D rngExponential_d3D rngExponential_unscaled_d1 rngInteger rngInteger_i1 rngInteger_i1D rngInteger_i2D rngInteger_i3D rngNormal rngNormal_d1 rngNormal_d1D rngNormal_d2D rngNormal_d3D rngUniform rngUniform_d1 rngUniform_d1D rngUniform_d2D rngUniform_d3D rngUniform_xorshift rngWeibull rngWeibull_d1 rngWeibull_d1D rngWeibull_d2D rngWeibull_d3D secondsToHMS select select_test setPrng setPrng_withSeed setPrng_WOseed shuffle simpleSearch skipFileLines sort sorting_test std str strings_test sub2ind swap test tester time_test timeInSeconds timeToInteger trimExtension trimmedmean twoDiff twoSum upperCase variance wMsg writeline