sort_arrays Module

Arthur Francisco
july, 23 2018
1.0.0
255 statements
Source File

Various routines to sort real/integer arrays

Uses

- data_arch
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Used by

Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Contents

Subroutines

init_order sort_integer sort_real sort_real_1real sort_real_1int sort_real_2real sort_int_1int_1real sort_int_1real

Subroutines

public subroutine init_order(order)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=I4),	intent(out),		dimension(:)	::	order

public recursive subroutine sort_integer(g, d, itabref)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=I4),	intent(in)			::	g
integer(kind=I4),	intent(in)			::	d
integer(kind=I4),	intent(inout),		dimension(:)	::	itabref

public recursive subroutine sort_real(g, d, rtabref)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=I4),	intent(in)			::	g
integer(kind=I4),	intent(in)			::	d
real(kind=R8),	intent(inout),		dimension(:)	::	rtabref

public recursive subroutine sort_real_1real(g, d, rtabref, rtab1)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=I4),	intent(in)			::	g
integer(kind=I4),	intent(in)			::	d
real(kind=R8),	intent(inout),		dimension(:)	::	rtabref
real(kind=R8),	intent(inout),		dimension(:)	::	rtab1

public recursive subroutine sort_real_1int(g, d, rtabref, itab1)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=I4),	intent(in)			::	g
integer(kind=I4),	intent(in)			::	d
real(kind=R8),	intent(inout),		dimension(:)	::	rtabref
integer(kind=I4),	intent(inout),		dimension(:)	::	itab1

public recursive subroutine sort_real_2real(g, d, rtabref, rtab1, rtab2)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=I4),	intent(in)			::	g
integer(kind=I4),	intent(in)			::	d
real(kind=R8),	intent(inout),		dimension(:)	::	rtabref
real(kind=R8),	intent(inout),		dimension(:)	::	rtab1
real(kind=R8),	intent(inout),		dimension(:)	::	rtab2

public recursive subroutine sort_int_1int_1real(g, d, itabref, itab1, rtab2)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=I4),	intent(in)			::	g
integer(kind=I4),	intent(in)			::	d
integer(kind=I4),	intent(inout),		dimension(:)	::	itabref
integer(kind=I4),	intent(inout),		dimension(:)	::	itab1
real(kind=R8),	intent(inout),		dimension(:)	::	rtab2

public recursive subroutine sort_int_1real(g, d, itabref, rtab1)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=I4),	intent(in)			::	g
integer(kind=I4),	intent(in)			::	d
integer(kind=I4),	intent(inout),		dimension(:)	::	itabref
real(kind=R8),	intent(inout),		dimension(:)	::	rtab1